diff options
Diffstat (limited to 'rc')
| -rwxr-xr-x | rc/bin/sysinfo | 34 |
1 files changed, 25 insertions, 9 deletions
diff --git a/rc/bin/sysinfo b/rc/bin/sysinfo index 5f8843f22..8905368f8 100755 --- a/rc/bin/sysinfo +++ b/rc/bin/sysinfo @@ -1,12 +1,10 @@ #!/bin/rc rfork e - fn logprog{ echo % `{echo $"* | sed 's/#/''#''/g'} $* echo } - fn print{ echo '% cd ''#ec''; for(i in *){echo $i ''='' `{cat $i}}' cd '#ec'; for(i in *){echo $i '=' `{cat $i}} @@ -42,10 +40,11 @@ fn print{ logprog cat '#A/volume' logprog cat /mnt/apm/ctl } - fn post{ file=/tmp/sysinfo.$user.$pid - print >$file >[2=1] + if(! ~ $#e 0) + echo $e >$file + print >>$file >[2=1] @{ rfork n webfs @@ -55,11 +54,28 @@ fn post{ rm -f $file } } - -switch($1){ -case -p +argv0=$0 +fn usage { + echo usage: $argv0 '[ -e e-mail ] [ -p ]' >[1=2] + exit usage +} +e=() +p=() +while(~ $1 -*){ + switch($1){ + case -e + e=$2 + shift + case -p + p=1 + shift + case * + usage + } + shift +} +if(~ $p 1) post -case * +if not print -} |
