finally got these working

This commit is contained in:
rsc 2004-10-17 04:02:55 +00:00
parent 63853aa069
commit 47e0a2aa3c
2 changed files with 39 additions and 0 deletions

29
bin/" Executable file
View file

@ -0,0 +1,29 @@
#!/usr/local/plan9/bin/rc
fn text {
if(~ $winid [0-9]*)
9p read acme/$winid/body
if not if(~ $text9term unix!*)
dial -e $text9term </dev/null
if not
status=''
}
PROMPT='[^ ]*[%;$#][ ]+'
fn cmds {
text | 9grep '^'$PROMPT'[^"]' | sed 's/^/ /'
}
switch($#*) {
case 0
cmds | tail -1
case *
cmds | 9grep '^ '$PROMPT^$"* | {echo; cat} |
pr -t -n | sort -nr | sort -u +1 | sort -n |
9sed 's/^ *[0-9]+ //' | grep .
}
# the silly {echo; cat} gets around pr printing "empty file" when
# presented with no input.

10
bin/"" Executable file
View file

@ -0,0 +1,10 @@
#!/usr/local/plan9/bin/rc
PROMPT='[^ ]*[%;$#][ ]+'
" $* | tail -1 | tee >{wc -l >/tmp/qq.$pid} | tee /dev/stderr | 9sed 's/^ '$PROMPT'//' | rc
if(~ `{cat /tmp/qq.$pid} 0){
echo no such command found
exit notfound
}
exit 0