#!/bin/rc
#
# command: /bin/boddle /usr/rsc/plan9/cd/9/port port
# srcdir: /usr/rsc/plan9/cd/9/port
# version: 898309007
# date: Sat Jun 20 02:16:47 GMT 1998
#
myname=$0
doextract=no

fn usage{
	echo $myname: usage: $myname '[-X] [src-directory]' >[1=2]
	exit usage
}

fn sigint{
	rm -rf 898309007
	exit interrupt
}

while(~ $1 -*){
	switch($1){
	case -X
		doextract=yes
	case -*
		usage
	}
	shift
}

switch($#*){
case 0
	srcdir=/usr/rsc/plan9/cd/9/port
case 1
	srcdir=$1
case *
	usage
}

if(! ~ $doextract yes){
	echo This shell file contains a bundle of diffs representing changes
	echo to original source files in the Plan 9 distribution. It will run
	echo against the files in
	echo ' ' $srcdir
	echo '(unless overridden by the optional source directory argument)'
	echo and create a directory 898309007 containing the updated files.
	echo It will NOT automatically update the original files.
	echo
	echo Invoke with argument -X to perform the actual extraction.
	exit 0
}

rm -rf 898309007
mkdir 898309007

target=898309007/devarp.c
echo -n '898309007/devarp.c: '
if(! test -f $srcdir/devarp.c || ! test -r $srcdir/devarp.c){
	echo $srcdir/devarp.c unreadable
	exit unreadable
}
sum=`{sum < $srcdir/devarp.c}
if(! ~ 880258049025  $sum(1)^$sum(2)){
	echo $srcdir/devarp.c is not the original distribution file
	exit original
}
cp $srcdir/devarp.c 898309007/devarp.c
ed 898309007/devarp.c >/dev/null >[2=1] <<'//GO.SYSIN DD VADIM devarp.c'
542a

.
388c
	PUTNEXT(p->arpq, bp);
.
380c
	if(!p->arpq) {
.
359c
	p = &ipd[eh->d[4]];
.
355,356c
	 * sleaze - we hid the next hop in first 4 bytes of the
	 *  ethernet destination and the interface in the 5th
.
344a
		}
.
339,343c
		if(streamparse("arpd", bp)) {
			n = BLEN(bp);
			if(n >= sizeof(msg))
				n = sizeof(msg) - 1;
			memmove(msg, bp->rptr, n);
			msg[n] = 0;
			n = atoi(msg);
			if (n >= 0 && n <= Nipd && ipd[n].q && !ipd[n].arpq) {
				ipd[n].arpq = RD(q);
				freeb(bp);
			} else {
				PUTNEXT(q, bp);
			}
		} else {
.
334a
	char msg[64];
	int n;
.
318,319c
	int i;

	for (i = 0; i < Nipd; ++i) {
		if (q == ipd[i].arpq) {
			ipd[i].arpq = 0;
			return;
		}
	}
.
36d
wq
//GO.SYSIN DD VADIM devarp.c
sum=`{sum < 898309007/devarp.c}
if(~ 0784833d9330  $sum(1)^$sum(2))
	echo
if not{
	echo 898309007/devarp.c checksum error creating updated file
	exit checksum
}
target=898309007/devip.c
echo -n '898309007/devip.c: '
if(! test -f $srcdir/devip.c || ! test -r $srcdir/devip.c){
	echo $srcdir/devip.c unreadable
	exit unreadable
}
sum=`{sum < $srcdir/devip.c}
if(! ~ 0ce114ad21976  $sum(1)^$sum(2)){
	echo $srcdir/devip.c is not the original distribution file
	exit original
}
cp $srcdir/devip.c 898309007/devip.c
ed 898309007/devip.c >/dev/null >[2=1] <<'//GO.SYSIN DD VADIM devip.c'
1254a

.
796c
	sprint(buf, "%d.%d.%d.%d!%d\n", fmtaddr(cp->src), cp->psrc);
.
732d
709a
		case Close_wait:
.
680a
	case Close_wait:
.
wq
//GO.SYSIN DD VADIM devip.c
sum=`{sum < 898309007/devip.c}
if(~ 5f2ac62821984  $sum(1)^$sum(2))
	echo
if not{
	echo 898309007/devip.c checksum error creating updated file
	exit checksum
}
target=898309007/devlance.c
echo -n '898309007/devlance.c: '
if(! test -f $srcdir/devlance.c || ! test -r $srcdir/devlance.c){
	echo $srcdir/devlance.c unreadable
	exit unreadable
}
sum=`{sum < $srcdir/devlance.c}
if(! ~ 610d930317948  $sum(1)^$sum(2)){
	echo $srcdir/devlance.c is not the original distribution file
	exit original
}
cp $srcdir/devlance.c 898309007/devlance.c
ed 898309007/devlance.c >/dev/null >[2=1] <<'//GO.SYSIN DD VADIM devlance.c'
902a

.
592c
		print("lance ether0: %.2x%.2x%.2x%.2x%.2x%.2x\n",
.
438c
		l.net.name = "ether0";
.
wq
//GO.SYSIN DD VADIM devlance.c
sum=`{sum < 898309007/devlance.c}
if(~ 3e39304117951  $sum(1)^$sum(2))
	echo
if not{
	echo 898309007/devlance.c checksum error creating updated file
	exit checksum
}
target=898309007/ipdat.h
echo -n '898309007/ipdat.h: '
if(! test -f $srcdir/ipdat.h || ! test -r $srcdir/ipdat.h){
	echo $srcdir/ipdat.h unreadable
	exit unreadable
}
sum=`{sum < $srcdir/ipdat.h}
if(! ~ b55db72a13693  $sum(1)^$sum(2)){
	echo $srcdir/ipdat.h is not the original distribution file
	exit original
}
cp $srcdir/ipdat.h 898309007/ipdat.h
ed 898309007/ipdat.h >/dev/null >[2=1] <<'//GO.SYSIN DD VADIM ipdat.h'
397a
	Queue	*arpq;
.
374c
	Nipd=	8,		/* ip hardware interfaces */
.
334a
	SYN_MSS		= 1460,		/* max segment for SYN */
.
wq
//GO.SYSIN DD VADIM ipdat.h
sum=`{sum < 898309007/ipdat.h}
if(~ 470eb22f13750  $sum(1)^$sum(2))
	echo
if not{
	echo 898309007/ipdat.h checksum error creating updated file
	exit checksum
}
target=898309007/stip.c
echo -n '898309007/stip.c: '
if(! test -f $srcdir/stip.c || ! test -r $srcdir/stip.c){
	echo $srcdir/stip.c unreadable
	exit unreadable
}
sum=`{sum < $srcdir/stip.c}
if(! ~ 2ec3fb6414153  $sum(1)^$sum(2)){
	echo $srcdir/stip.c is not the original distribution file
	exit original
}
cp $srcdir/stip.c 898309007/stip.c
ed 898309007/stip.c >/dev/null >[2=1] <<'//GO.SYSIN DD VADIM stip.c'
377c
	eh->d[4] = p - ipd;
.
339c
		eh->d[4] = p - ipd;
.
274c
		eh->d[4] = p - ipd;
.
116c
static void
.
101a
	p->arpq = 0;
.
wq
//GO.SYSIN DD VADIM stip.c
sum=`{sum < 898309007/stip.c}
if(~ 89189c5814174  $sum(1)^$sum(2))
	echo
if not{
	echo 898309007/stip.c checksum error creating updated file
	exit checksum
}