1 1379cecf 2003-11-23 devnull # rcmain: Plan 9 on Unix version
 2 1379cecf 2003-11-23 devnull if(~ $#home 0) home=$HOME
 3 1379cecf 2003-11-23 devnull if(~ $#home 0) home=/
 4 1379cecf 2003-11-23 devnull if(~ $#ifs 0) ifs=' 	
 5 1379cecf 2003-11-23 devnull '
 6 1379cecf 2003-11-23 devnull switch($#prompt){
 7 1379cecf 2003-11-23 devnull case 0
 8 1379cecf 2003-11-23 devnull 	prompt=('% ' '	')
 9 1379cecf 2003-11-23 devnull case 1
10 1379cecf 2003-11-23 devnull 	prompt=($prompt '	')
11 1379cecf 2003-11-23 devnull }
12 2774920b 2004-03-26 devnull if(~ $rcname ?.out ?.rc */?.rc */?.out) prompt=('broken! ' '	')
13 cb27443a 2004-03-25 devnull if(flag p) path=(/bin)
14 1379cecf 2003-11-23 devnull if not{
15 1379cecf 2003-11-23 devnull 	finit
16 cb27443a 2004-03-25 devnull 	if(~ $#path 0) {
17 cb27443a 2004-03-25 devnull 		path=(/bin /usr/bin)
18 cb27443a 2004-03-25 devnull 		. <{sh -c 'echo $PATH |
19 1379cecf 2003-11-23 devnull 				sed "s/^/path=(''/; s/$/'')/; s/:/'' ''/g"'}
20 cb27443a 2004-03-25 devnull 	}
21 1379cecf 2003-11-23 devnull }
22 1379cecf 2003-11-23 devnull fn sigexit
23 1379cecf 2003-11-23 devnull if(! ~ $#cflag 0){
24 cb27443a 2004-03-25 devnull 	if(flag l && test -r $home/lib/profile) . $home/lib/profile
25 1379cecf 2003-11-23 devnull 	status=''
26 1379cecf 2003-11-23 devnull 	eval $cflag
27 1379cecf 2003-11-23 devnull }
28 1379cecf 2003-11-23 devnull if not if(flag i){
29 5a82f26e 2003-12-02 devnull 	if(~ $TERM 9term){
30 5a82f26e 2003-12-02 devnull 		if(~ $#'fn#cd' 0)
31 5a82f26e 2003-12-02 devnull 			fn cd { builtin cd $1 && label `{pwd} }
32 5a82f26e 2003-12-02 devnull 	}
33 1379cecf 2003-11-23 devnull 	if(flag l && /bin/test -r $home/lib/profile) . $home/lib/profile
34 1379cecf 2003-11-23 devnull 	status=''
35 1379cecf 2003-11-23 devnull 	if(! ~ $#* 0) . $*
36 1379cecf 2003-11-23 devnull 	. -i '/dev/stdin'
37 1379cecf 2003-11-23 devnull }
38 1379cecf 2003-11-23 devnull if not if(~ $#* 0) . '/dev/stdin'
39 1379cecf 2003-11-23 devnull if not{
40 1379cecf 2003-11-23 devnull 	status=''
41 1379cecf 2003-11-23 devnull 	. $*
42 1379cecf 2003-11-23 devnull }
43 1379cecf 2003-11-23 devnull exit $status