9base

revived minimalist port of Plan 9 userland to Unix
git clone git://git.suckless.org/9base
Log | Files | Refs | README | 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