ref: ca58f1df1755d3fdaa61bd3b6f3457b804ece7d7
parent: 776ac2e25d0dff09bc3becea409a0cdae9cde827
parent: 67fe83b40f4d427d3abc5f52bc1509559ec04214
author: cinap_lenrek <cinap_lenrek@centraldogma>
date: Wed Nov 23 19:04:36 EST 2011
merge
--- /dev/null
+++ b/rc/bin/"
@@ -1,0 +1,25 @@
+#!/bin/rc
+
+rfork en
+
+if(test -r /mnt/acme/acme/body)
+ bind /mnt/acme/acme/body /dev/text
+
+PROMPT='[^ ]*%[ ]+'
+
+fn cmds {+ grep '^'$PROMPT'[^"]' /dev/text | sed 's/^/ /'
+}
+
+switch($#*) {+case 0
+ cmds | tail -1
+case *
+ cmds | grep '^ '$PROMPT^$"* | {echo; cat} |+ pr -t -n | sort -nr | sort -u +1 | sort -n |
+ sed 's/^ *[0-9]+ //' | grep .
+}
+
+# the silly {echo; cat} gets around pr printing "empty file" when+# presented with no input.
+
--- /dev/null
+++ b/rc/bin/""
@@ -1,0 +1,13 @@
+#!/bin/rc
+
+PROMPT='[^ ]*%+[ ]+'
+
+_x = `{" $* | tail -1}+if(~ $#_x 0) {+ echo no such command found
+ exit notfound
+}
+
+echo ' ' $_x
+_x=`{ echo -n 'eval '; echo $_x | sed 's/^'$PROMPT'//'}+rc -c $"_x
--- /dev/null
+++ b/rc/bin/g
@@ -1,0 +1,23 @@
+#!/bin/rc
+
+flags=()
+while(! ~ $#* 1 && ~ $1 -* && ! ~ $1 --){ + flags=($flags $1);
+ shift
+}
+if(~ $1 --)
+ shift
+
+switch($#*){ +case 0
+ echo 'usage: g [flags] pattern [files]' >[1=2]
+ exit usage
+case 1
+ pattern=$1
+ files=(`{ls *.[bcChm] *.cc *.py *.tex *.ms *.java >[2]/dev/null}) +case *
+ pattern=$1
+ shift
+ files=($*)
+}
+grep -n $flags -- $pattern $files /dev/null
--
⑨