bugGNU Parallel - Bugs: bug #44045, --return and csh

 
 

bug #44045: --return and csh

Submitter:  Ole Tange <tange>
Submitted:  Sun 18 Jan 2015 10:57:33 PM UTC
   
 
Category:  None Severity:  3 - Normal
Item Group:  None Status:  Fixed
Privacy:  Public Assigned to:  tange
Open/Closed:  Closed
* Mandatory Fields

Add a New Comment Rich Markup
   

Sun 18 Oct 2015 02:56:13 PM UTC, comment #1: 

Fixed in 20150322.

Ole Tange <tange>
Group administrator
Sun 18 Jan 2015 10:57:33 PM UTC, original submission:  

Exit value is probably lost in csh if you do --trc.

Fix with:
                                                                                                                
perl -e '$bash=shift; $csh=shift; $clean=shift;$wd=shift; $file=shift;                                                       
system("mkdir -p $wd; rsync --protocol 30 --rsync-path=cd\ $wd\;\ rsync -rlDzR -essh I<sln>:$file $wd;");                    
if($clean) {unlink $wd/$file; rmdir $wd;}                                                                                    
if($bash=~s/h//) {exit$bash;} exit$csh;' "$?h" "$status" clean wdwith./ filewith./                                           
                                                                                                                             
Test med $wd = ":/ / !" og fil " <!"                                                                                         
Test med $wd = "/tmp/:/ / !" og fil " <!"                                                                                    
Test med $wd = ":/ / !" og fil "/tmp/ <!"                                                                                    
Test med $wd = "/tmp/:/ / !" og fil "/tmp/ <!"                                                                               
                                                                                                                             
mkdir d"`perl -e 'print pack("c*",1..9,11..46,48..255)'`"                                                                    
echo ged > d"`perl -e 'print pack("c*",1..9,11..46,48..255)'`"/f"`perl -e 'print pack("c*",1..9,11..46,48..255)'`"           
                                                                                                                             
Virker i csh                                                                                                                 
echo ged >> d"`perl -e 'print pack("c*",1..9,11..46,48..159,161..255)'`"/f"`perl -e 'print pack("c*",1..9,11..46,48..159,161.\
.255)'`"                                                                                                                     
                                                                                                                             
echo ged > d"`perl -e 'print pack("c*",1..9,11..46,48..255)'`"/f"`perl -e 'print pack("c*",1..9,11..46,48..255)'`"          
                                                                                                                             

Ole Tange <tange>
Group administrator

 

(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 tange (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 3 latest changes.

    Date Changed by Updated Field Previous Value => Replaced by
    2015-10-18 tange StatusNone Fixed
        Assigned toNone tange
        Open/ClosedOpen Closed

    Back to the top

    Powered by Savane 3.13-f8d8.
    Corresponding source code