summaryrefslogtreecommitdiff
path: root/rc/bin/patch/undo
blob: 177c24ab1658948e4752e7a955eb486c83bdccf9 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
#!/bin/rc

rfork e
if(! ~ $#* 1){
	echo 'usage: patch/undo patch-name' >[1=2]
	exit usage
}

if(! test -d /n/sources/patch){
	rfork n
	9fs sources
}

if(! test -d /n/sources/patch/$1){
	echo 'no such patch' /n/sources/patch/$1 >[1=2]
	exit nopatch
}

d=$1
builtin cd /n/sources/patch/$1 || exit nopatch
if(! patch/okay .){
	echo 'bad patch: '$status >[1=2]
	exit badpatch
}

fn xxx {
	if(cmp $2.new $1){
		echo cp /n/sources/patch/$d/$2.backup $1
		cp $2.backup $1
	}
	if not
		echo $1 has changed since patch was applied! >[2=1]
}
cat files | sed 's/^/xxx /' |rc