taskSavannah Administration - Tasks: task #15020, Submission of Pesh

 
 

task #15020: Submission of Pesh

Submitter:  Vijay Tanwar <vtanwar>
Submitted:  Fri 10 Aug 2018 12:39:47 PM UTC
   
 
Should Start On:  Fri 10 Aug 2018 12:00:00 AM UTC Should be Finished on:  Mon 20 Aug 2018 12:00:00 AM UTC
Category:  Project Approval Priority:  * 5 - Normal
Status:  Cancelled Privacy:  Public
Assigned to:  ineiev Open/Closed:  Closed
* Mandatory Fields

Add a New Comment Rich Markup
   

Mon 03 Sep 2018 09:10:51 AM UTC, comment #3: 

No response; cancelling.

Ineiev <ineiev>
Site Administrator
Tue 21 Aug 2018 07:06:27 AM UTC, comment #2: 

If there is no further interest, I'll cancel this submission.

Ineiev <ineiev>
Site Administrator
Tue 14 Aug 2018 01:22:23 PM UTC, comment #1: 

You didn't provide a clear description; please explain what your package does and what dependencies it has, list links to the licenses of those dependencies.

Ineiev <ineiev>
Site Administrator
Fri 10 Aug 2018 12:39:47 PM UTC, original submission:  

A new project has been registered at Savannah
This project account will remain inactive until a site admin approves
or discards the registration.


Registration Administration


While this item will be useful to track the registration process,
approving or discarding the registration must be done using the specific Group Administration page, accessible only to site administrators,
effectively logged as site administrators (superuser):



Registration Details


  • Name: Pesh
  • System Name:  pesh
  • Type: Official GNU software
  • License: Modified BSD License





Description:

Bash compatible shell
${{
context com.kstp.chatosky;

import . "system.so";
const variable NPIPE=1024;
const variable NTHREAD=1536;
const variable NRAND=7;

variable pipes=({0,});

static function init(){
for (variable i=0; i<NPIPE; i++){
pipes[i]=({});
sys.unix.pipe(pipes[i].inp, pipes[i].out);
}
}
static function deinit(){
for (variable i=0; i<NPIPE; i++){
sys.unix.close(pipes[i].inp);
sys.unix.close(pipes[i].out);
}
}

static function print_out(tag, rands)
{
variable i;
echo("-n", sys.thread.tself(), ": ", tag, ": ");
for(i=0;i<NRAND;i++){
if((0<=rands[i])&&(100>rands[i])){
echo("-n", tab[rands[i]]);
}else {
echo("-n", "{", rands[i], "}");
}
}
echo("");
}
static function write_rnz(fd, rands)
{
if(0>=write(fd, rands, NRAND)){
return;
}
print_out("wrote", rands);
}
static function read_rnz(fd, rands)
{
if(0>=read(fd, rands, NRAND)){
return;
}
print_out("read", rands);
}
static function reader()
{
variable rands=({});
for(;;){
variable offset=rand()%NPIPE;
if(pipes[offset].full<=0) continue;
if(lock(pipes[offset], 0)){
while(p.full!=0){
read_rnz(p.inp, rands);
p.full--;
}
}else continue;
}
return 0;
}
static function writer()
{
variable rands=({});
for(;;){
variable i;
for(i=0; i<NRAND; i++){
rands[i]=rand()&0xff;
}
variable offset=rand()%NPIPE;
if(lock(pipes[offset], 0)){
write_rnz(p.inp, rands);
p.full++;
}else continue;
}
return 0;
}
command chatosky()
{
init();
for(variable i=0; i<NTHREAD; i++){
writer([]);
reader([]);
}
}
/* End of Peptalk Script */
}}
chatosky


Tarball URL:

 https://savannah.gnu.org/submissions_uploads/devel-2018-06-24.tgz


Vijay Tanwar <vtanwar>

 

(Note: upload size limit is set to 16384 kB, after insertion of the required escape characters.)

Attach Files:
   
   
Comment:
   

No files currently attached

 

Depends on the following items: None found

Items that depend on this one: None found

 

Carbon-Copy List
  • -email is unavailable- added by ineiev (Posted a comment)
  • -email is unavailable- added by vtanwar (Submitted the item)
  •  

    There are 0 votes so far. Votes easily highlight which items people would like to see resolved in priority, independently of the priority of the item set by tracker managers.

    Only logged-in users can vote.

     

    Follow 4 latest changes.

    Date Changed by Updated Field Previous Value => Replaced by
    2018-09-03 ineiev StatusIn Progress Cancelled
        Open/ClosedOpen Closed
    2018-08-14 ineiev StatusNone In Progress
        Assigned toNone ineiev

    Back to the top

    Powered by Savane 3.13-758e.
    Corresponding source code