Subversion Repositories planix.SVN

Rev

Details | Last modification | View Log | RSS feed

Rev Author Line No. Line
2 - 1 
#!/bin/rc
2 
 
3 
rfork e
4 
if(! ~ $#* 1){
5 
	echo 'usage: patch/note patch-name' >[1=2]
6 
	exit usage
7 
}
8 
 
9 
if(! test -d /n/sources/patch){
10 
	rfork n
11 
	9fs sources
12 
}
13 
 
14 
if(! test -d /n/sources/patch/$1){
15 
	echo 'no such patch' /n/sources/patch/$1 >[1=2]
16 
	exit nopatch
17 
}
18 
 
19 
builtin cd /n/sources/patch/$1 || exit nopatch
20 
if(! patch/okay .){
21 
	echo 'bad patch: '$status >[1=2]
22 
	exit badpatch
23 
}
24 
 
25 
if(~ `{cat /proc/$pid/fd | awk 'NR==2{print $NF}'} */dev/cons && ~ `{ls -l /dev/consctl | awk '{print $1}'} *w*){
26 
	>/dev/consctl {
27 
		echo holdon
28 
		{echo `{date} `{cat /dev/user}
29 
		cat |sed 's/^/    /'; echo } >>notes
30 
	}
31 
}
32 
if not
33 
	{echo `{date} `{cat /dev/user}
34 
	cat |sed 's/^/    /'; echo } >>notes
35