Commit Diff


commit - 97a5e5f2dd40eff09cb650c91c21f680b6d4206a
commit + dbd7b9a97eede27e707a279114305d7591d371fc
blob - c1a4b163b73b2d7bc3056a03fd487d4d522f83a1
blob + 74bdb48ba55e4dc2e8ee04236dec2aa9157b0dc1
--- bin/B
+++ bin/B
@@ -18,16 +18,10 @@ then
 	echo could not find sam 2>&1
 	exit 2
 else
-	pwd=`pwd`
 	for i
 	do
-		case $i in
-		/*)
-			echo "B $i" >>$sam
-			;;
-		*)
-			echo "B $pwd/$i" >>$sam
-			;;
-		esac
+		pwd=`pwd`
+		file=`cleanname -d $pwd $i`
+		echo "B $file" >>$sam
 	done
 fi
blob - /dev/null
blob + f2984ffbafbaa9c719e03c97e0ceaf98d61100f2 (mode 755)
--- /dev/null
+++ bin/9a
@@ -0,0 +1,9 @@
+#!/bin/sh
+
+if [ $# != 1 ]; then
+	echo 'usage: 9a file.s' 1>&2
+	exit 1
+fi
+
+out=`echo $1 | sed 's/\.s$//;s/$/.o/'`
+exec as -o $out $1
blob - 1c6ef96f20a8e35c0399ba8a4e07f3bcf2f5d750
blob + 004296094812801a09fd9b84ce2b321adae31eff
--- bin/Bwait
+++ bin/Bwait
@@ -9,7 +9,7 @@ B "$@"
 while true
 do
 	nstat=`ls -l $1`
-	if [ "$stat" eq "$nstat" ]
+	if [ "x$stat" != "x$nstat" ]
 	then
 		exit
 	fi
blob - /dev/null
blob + dc9cc3d8892f83d8168167a5bbe4f3cf2ff1af15 (mode 755)
--- /dev/null
+++ bin/9c
@@ -0,0 +1,33 @@
+#!/bin/sh
+
+usegcc()
+{
+	cc=gcc
+	cflags=" \
+		-O2 \
+		-I$PLAN9/include \
+		-c \
+		-ggdb \
+		-Wall \
+		-Wno-parentheses \
+		-Wno-missing-braces \
+		-Wno-switch \
+	"
+}
+
+cc=none
+tag="`uname`-`uname -m`-${CC:-cc}"
+case "$tag" in
+*BSD*)		usegcc ;;
+*Darwin*)	usegcc ;;
+*HP-UX*)	cc=cc; cflags="-g -O -c -Ae" ;;
+*Linux*)	usegcc ;;
+*OSF1*)		cc=cc; cflags="-g -O -c" ;;
+*SunOS*-cc)	cc=cc; cflags="-g -O -c -xCC -D__sun__" ;;
+*SunOS*-gcc)	usegcc ;;
+*)
+	echo 9c does not know how to compile on "$tag" 1>&2
+	exit 1
+esac
+
+exec cc $cflags "$@"
blob - /dev/null
blob + 2db7be540115d14ad7590986ba16950a20d66a59 (mode 755)
--- /dev/null
+++ bin/9l
@@ -0,0 +1,26 @@
+#!/bin/sh
+
+ld=none
+extralibs=-lm
+tag="`uname`-`uname -m`-${CC:-cc}"
+case "$tag" in
+*FreeBSD*)	ld=gcc ;;
+*BSD*)		ld=gcc ;;
+*Linux*)	ld=gcc ;;
+*Darwin*)	ld=gcc ;;
+*SunOS*-cc)	ld=cc; extralibs="$extralibs -lrt -lpthread" ;;
+*SunOS*-gcc)	ld=gcc ;;
+*)
+	echo do not know how to link on "$tag" 1>&2
+	exit 1
+esac
+
+case $ld in
+gcc)
+	exec gcc \
+		-ggdb \
+		-L$PLAN9/lib \
+		"$@" \
+		$extralibs
+	;;
+esac
blob - 0d6c7ecc27d11520374805175dd9acb7f2663b64
blob + 54678eb802bc520246d28678a7cfad1af2f897ad
--- bin/ps
+++ bin/ps
@@ -66,7 +66,7 @@ function statestr(s)
 !
 
 /bin/ps -axww -o 'user,pid,start,time,vsz,stat,command' | sed 1d |
-	awk -f /tmp/awk.xxx$$ | sort +1 -n
+	awk -f /tmp/awk.xxx$$ | sort -n +1
 
 rm -f /tmp/awk.xxx$$
 
blob - /dev/null
blob + e8e3e8b06d16e4abb465c8617c9975639631215b (mode 755)
--- /dev/null
+++ bin/label
@@ -0,0 +1,7 @@
+#!/bin/sh
+
+label() {
+	echo "$@" | awk '{printf("\033];%s\007", $0);}'
+}
+
+label "$@"