rcmain - 9base - revived minimalist port of Plan 9 userland to Unix
 (HTM) git clone git://git.suckless.org/9base
 (DIR) Log
 (DIR) Files
 (DIR) Refs
 (DIR) README
 (DIR) LICENSE
       ---
       rcmain (755B)
       ---
            1 # rcmain: Plan 9 on Unix version
            2 if(~ $#home 0) home=$HOME
            3 if(~ $#home 0) home=/
            4 if(~ $#ifs 0) ifs='         
            5 '
            6 switch($#prompt){
            7 case 0
            8         prompt=('; ' '        ')
            9 case 1
           10         prompt=($prompt '        ')
           11 }
           12 if(~ $rcname ?.out ?.rc */?.rc */?.out) prompt=('broken! ' '        ')
           13 if(flag p) path=(/bin /usr/bin)
           14 if not{
           15         finit
           16         # should be taken care of by rc now, but leave just in case
           17 }
           18 fn sigexit
           19 if(! ~ $#cflag 0){
           20         if(flag l && test -r $home/lib/profile) . $home/lib/profile
           21         status=''
           22         eval $cflag
           23         exit $status
           24 }
           25 if(flag i){
           26         if(flag l && test -r $home/lib/profile) . $home/lib/profile
           27         status=''
           28         if(! ~ $#* 0) . $*
           29         . -i '/dev/stdin'
           30         exit $status
           31 }
           32 if(flag l && test -r $home/lib/profile) . $home/lib/profile
           33 if(~ $#* 0){
           34         . /dev/stdin
           35         exit $status
           36 }
           37 status=''
           38 . $*
           39 exit $status