Path: utzoo!utgpu!news-server.csri.toronto.edu!cs.utexas.edu!wotan!twisto!isis!max
From: max@compaq.com (Max Heffler)
Newsgroups: comp.sys.isis
Subject: Interactive Systems 386/ix 3.2.2 (System V.3.2) ISIS v2.1 (2 of 2)
Keywords: ISC Interactive Systems System V 386
Message-ID: <max.678033306@isis>
Date: 27 Jun 91 14:35:06 GMT
Sender: news@twisto.compaq.com
Lines: 495


#!/bin/sh
# This is part 02 of a multipart archive
# ============= spread.c.patch ==============
if test -f 'spread.c.patch' -a X"$1" != X"-c"; then
	echo 'x - skipping spread.c.patch (File already exists)'
else
echo 'x - extracting spread.c.patch (Text)'
sed 's/^X//' << 'SHAR_EOF' > 'spread.c.patch' &&
1624d1623
<     menu[5].left = menu[3].left;
SHAR_EOF
chmod 0644 spread.c.patch ||
echo 'restore of spread.c.patch failed'
Wc_c="`wc -c < 'spread.c.patch'`"
test 45 -eq "$Wc_c" ||
	echo 'spread.c.patch: original size 45, current size' "$Wc_c"
fi
# ============= spread.h.patch ==============
if test -f 'spread.h.patch' -a X"$1" != X"-c"; then
	echo 'x - skipping spread.h.patch (File already exists)'
else
echo 'x - extracting spread.h.patch (Text)'
sed 's/^X//' << 'SHAR_EOF' > 'spread.h.patch' &&
46c46
< #if (HPUX)
---
> #if (HPUX|ISC)
SHAR_EOF
chmod 0644 spread.h.patch ||
echo 'restore of spread.h.patch failed'
Wc_c="`wc -c < 'spread.h.patch'`"
test 40 -eq "$Wc_c" ||
	echo 'spread.h.patch: original size 40, current size' "$Wc_c"
fi
# ============= mlibmakefile.patch ==============
if test -f 'mlibmakefile.patch' -a X"$1" != X"-c"; then
	echo 'x - skipping mlibmakefile.patch (File already exists)'
else
echo 'x - extracting mlibmakefile.patch (Text)'
sed 's/^X//' << 'SHAR_EOF' > 'mlibmakefile.patch' &&
13c13
< 	-$(S)/fix_mlib_for_gcc $(CC)
---
> 	#-$(S)/fix_mlib_for_g $(CC)
15c15
< 	if test $(MCHTYPE) != HPUX -a $(MCHTYPE) != AIX -a $(MCHTYPE) != AUX; then ranlib libisism.a; fi; exit 0
---
> 	if test $(MCHTYPE) != HPUX -a $(MCHTYPE) != ISC -a $(MCHTYPE) != AIX -a $(MCHTYPE) != AUX; then ranlib libisism.a; fi; exit 0
SHAR_EOF
chmod 0644 mlibmakefile.patch ||
echo 'restore of mlibmakefile.patch failed'
Wc_c="`wc -c < 'mlibmakefile.patch'`"
test 320 -eq "$Wc_c" ||
	echo 'mlibmakefile.patch: original size 320, current size' "$Wc_c"
fi
# ============= msg_alloc.c.patch ==============
if test -f 'msg_alloc.c.patch' -a X"$1" != X"-c"; then
	echo 'x - skipping msg_alloc.c.patch (File already exists)'
else
echo 'x - extracting msg_alloc.c.patch (Text)'
sed 's/^X//' << 'SHAR_EOF' > 'msg_alloc.c.patch' &&
213c213
< #if     !(HPUX|AIXRS|SGI|CONVEX)
---
> #if     !(HPUX|AIXRS|ISC|SGI|CONVEX)
SHAR_EOF
chmod 0644 msg_alloc.c.patch ||
echo 'restore of msg_alloc.c.patch failed'
Wc_c="`wc -c < 'msg_alloc.c.patch'`"
test 86 -eq "$Wc_c" ||
	echo 'msg_alloc.c.patch: original size 86, current size' "$Wc_c"
fi
# ============= FILES/ISC.MAKEFILE ==============
if test ! -d 'FILES'; then
    echo 'x - creating directory FILES'
    mkdir 'FILES'
fi
if test -f 'FILES/ISC.MAKEFILE' -a X"$1" != X"-c"; then
	echo 'x - skipping FILES/ISC.MAKEFILE (File already exists)'
else
echo 'x - extracting FILES/ISC.MAKEFILE (Text)'
sed 's/^X//' << 'SHAR_EOF' > 'FILES/ISC.MAKEFILE' &&
#  $RCSfile: makefile,v $ $Revision: 1.5 $ $Date: 90/04/25 13:15:25 $ 
SHELL = /bin/sh
MCH = MCHTYPE=ISC
X
MCHDEP = $(MCH) MCHDEPCFLAGS="-DNO_ASM -U__STDC__" \
X OPLIBS="-linet -lcposix -lrpc"
# Use the following line if you want to enable bypass communication mode.
#MCHDEP = $(MCH) MCHDEPCFLAGS="-DBYPASS" OPLIBS=
X
# The following lines define useful sets of options for using either the 
# gcc compiler or the standard C compiler on your system.
OPTIMSTD = CC=cc OPTIM="-O"
DEBUGSTD = CC=cc OPTIM="-g"
OPTIMGCC =  CC=gcc OPTIM="-g -O"
DEBUGGCC = CC=gcc OPTIM="-g"
WARNGCC =  CC=gcc OPTIM="-g -O -W"
WALLGCC =  CC=gcc OPTIM="-g -Wall -O"
NOWARNGCC =  CC=gcc OPTIM="-g -w -O"
X
all: readme mlib clib protos util demos
X
readme:
X	@cat README
X
protos:	pr_action
clib:	cl_action
mlib:	ml_action
util:	ut_action
demos: de_action
X
pr_action:
X	cd protos; make $(MCHDEP) $(DEBUGSTD) ; cd ..
cl_action: 
X	cd clib; make $(MCHDEP) $(DEBUGSTD) ; cd ..
ml_action: 
X	cd mlib; make $(MCHDEP) $(DEBUGSTD) ; cd ..
ut_action: 
X	cd util; make $(MCHDEP) $(DEBUGSTD) ; cd ..
de_action: 
X	cd demos; make $(MCHDEP) $(DEBUGSTD) ; cd ..
X
UTILPROGS = cmd isis lmgr news prstat rexec \
X            rmgr rmgr_cmd spooler tabex xmgr 
DEMOPROGS = bank fortran_test grid lh_sp_test lisp_test \
X            qa selftest silentjoins sun_grid teller testjoins \
X            testtasks twenty wanClient wanServer spread
X
install:
X	(cd bin; /bin/rm -f protos $(UTILPROGS) $(DEMOPROGS) )
X	- (cd demos/pmk; make install )
X	ln protos/protos bin
X	(cd util; ln $(UTILPROGS) ../bin )
X	- (cd demos; ln $(DEMOPROGS) ../bin )
X	/bin/rm -f lib/libisis1.a lib/libisis2.a lib/libisism.a
X	ln clib/libisis1.a clib/libisis2.a mlib/libisism.a lib
X
clean:
X	/bin/rm -f protos/*.[os] clib/*.[os] mlib/*.o util/*.o demos/*.o
X	/bin/rm -f util/cmd[ly].[ch]
X	- (cd demos/pmk; make clean )
X
realclean: clean
X	- (cd demos/pmk; make realclean )
X	/bin/rm -f protos/protos
X	(cd util; /bin/rm -f $(UTILPROGS) )
X	(cd demos; /bin/rm -f $(DEMOPROGS) )
X	/bin/rm -f bin/*
X	/bin/rm -f clib/libisis1.a clib/libisis2.a mlib/libisism.a
X	/bin/rm -f lib/*.a
X	(cd run_demos; /bin/rm -f *.log core )
X	(cd run_isis; /bin/rm -f *.log core )
X
SHAR_EOF
chmod 0644 FILES/ISC.MAKEFILE ||
echo 'restore of FILES/ISC.MAKEFILE failed'
Wc_c="`wc -c < 'FILES/ISC.MAKEFILE'`"
test 2157 -eq "$Wc_c" ||
	echo 'FILES/ISC.MAKEFILE: original size 2157, current size' "$Wc_c"
fi
# ============= FILES/ISC.README ==============
if test -f 'FILES/ISC.README' -a X"$1" != X"-c"; then
	echo 'x - skipping FILES/ISC.README (File already exists)'
else
echo 'x - extracting FILES/ISC.README (Text)'
sed 's/^X//' << 'SHAR_EOF' > 'FILES/ISC.README' &&
This is a recent port of ISIS to the Interactive Systems system
software release 386/ix 2.2 (System V R 3.2) or higher.  Port by Max Heffler
of Compaq Computer Corp.  Not extensively tested yet.
X
Please report bugs or problems to isis-bugs@cs.cornell.edu
X
Consider this an experimental port...
X
Ken
X
NOTE:
X
Using the kernel defaults, a high rate of overflows was observed.
Increasing NQUEUE, NSTREAM, and NBLK16, eliminated the problems, but
might degrade performance.
X
There may be a minor problem in the pmake demo.
X
SHAR_EOF
chmod 0644 FILES/ISC.README ||
echo 'restore of FILES/ISC.README failed'
Wc_c="`wc -c < 'FILES/ISC.README'`"
test 519 -eq "$Wc_c" ||
	echo 'FILES/ISC.README: original size 519, current size' "$Wc_c"
fi
# ============= FILES/remake_ISClink ==============
if test -f 'FILES/remake_ISClink' -a X"$1" != X"-c"; then
	echo 'x - skipping FILES/remake_ISClink (File already exists)'
else
echo 'x - extracting FILES/remake_ISClink (Text)'
sed 's/^X//' << 'SHAR_EOF' > 'FILES/remake_ISClink' &&
#!/bin/csh
echo "Starting to remake links for ISC"
cd ../include
/bin/rm -f *
ln ../{mlib,clib,protos,util,demos}/*.h .
cd ../ISC/mlib
/bin/rm -f makefile
ln ../../mlib/makefile .
cd ../clib
/bin/rm -f makefile
ln ../../clib/makefile .
cd ../protos
/bin/rm -f makefile
ln ../../protos/makefile .
cd ../util
/bin/rm -f makefile
ln ../../util/makefile .
cd ../demos
/bin/rm -f makefile make_grid
ln ../../demos/makefile ../../demos/make_grid .
cd pmk
/bin/rm -f makefile
ln ../../../demos/pmk/makefile .
cd ..
X
set demos = ( twenty qa testjoins silentjoins bank teller testtasks selftest \
X              grid spread fortran_test )
set utils = ( isis rexec spooler news rmgr rmgr_cmd lmgr cmd tabex prstat xmgr )
cd ../run_isis
X
foreach f ( $demos $utils protos pmake pmkexec )
X   /bin/rm -f $f
X   ln ../bin/$f .
end
foreach f ( aux1 aux2 globalspd questions.dat )
X   /bin/rm -f $f
X   ln ../../demos/$f .
end
X
cd ../run_demos
foreach f ( $demos )
X   /bin/rm -f $f
X   ln ../demos/$f .
end
/bin/rm -f pmake pmkexec
ln ../demos/pmk/pmake ../demos/pmk/pmkexec .
foreach f ( aux1 aux2 globalspd questions.dat )
X   /bin/rm -f $f
X   ln ../../demos/$f .
end
X
foreach f ( $utils )
X   /bin/rm -f $f
X   ln ../util/$f .
end
/bin/rm -f protos
ln ../protos/protos .
cd ..
X
echo "Done remaking 'symbolic' links"
SHAR_EOF
chmod 0755 FILES/remake_ISClink ||
echo 'restore of FILES/remake_ISClink failed'
Wc_c="`wc -c < 'FILES/remake_ISClink'`"
test 1294 -eq "$Wc_c" ||
	echo 'FILES/remake_ISClink: original size 1294, current size' "$Wc_c"
fi
# ============= pr.h.patch ==============
if test -f 'pr.h.patch' -a X"$1" != X"-c"; then
	echo 'x - skipping pr.h.patch (File already exists)'
else
echo 'x - extracting pr.h.patch (Text)'
sed 's/^X//' << 'SHAR_EOF' > 'pr.h.patch' &&
73c73
< #ifdef  SGI
---
> #if  SGI
83a84,88
> #ifdef  ISC
> # define JB_BP              3
> # define JB_SP              4
> #endif
>
168a174,183
> #endif
>
> #ifdef ISC
> #include "sys/types.h"
> #include <memory.h>
> #define random()        rand()
> #define srandom(s)      srand(s)
> #define bcopy(a,b,c)    memcpy(b,a,c)
> #define bzero(a,b)      memset(a,0,b)
> #define signal		sigset		/* reliable signals */
SHAR_EOF
chmod 0644 pr.h.patch ||
echo 'restore of pr.h.patch failed'
Wc_c="`wc -c < 'pr.h.patch'`"
test 413 -eq "$Wc_c" ||
	echo 'pr.h.patch: original size 413, current size' "$Wc_c"
fi
# ============= pr_client.c.patch ==============
if test -f 'pr_client.c.patch' -a X"$1" != X"-c"; then
	echo 'x - skipping pr_client.c.patch (File already exists)'
else
echo 'x - extracting pr_client.c.patch (Text)'
sed 's/^X//' << 'SHAR_EOF' > 'pr_client.c.patch' &&
24a25,27
> #ifdef ISC
> # include <sys/file.h>
> #endif
235a239,242
> #ifdef ISC
> 		if (nb == -1 && errno == EAGAIN)
> #endif
> 		    return;
SHAR_EOF
chmod 0644 pr_client.c.patch ||
echo 'restore of pr_client.c.patch failed'
Wc_c="`wc -c < 'pr_client.c.patch'`"
test 143 -eq "$Wc_c" ||
	echo 'pr_client.c.patch: original size 143, current size' "$Wc_c"
fi
# ============= pr_inter.c.patch ==============
if test -f 'pr_inter.c.patch' -a X"$1" != X"-c"; then
	echo 'x - skipping pr_inter.c.patch (File already exists)'
else
echo 'x - extracting pr_inter.c.patch (Text)'
sed 's/^X//' << 'SHAR_EOF' > 'pr_inter.c.patch' &&
22a23,25
> #ifdef ISC
> #include <net/errno.h>
> #endif
666a670,671
> #  ifdef ISC
> loop:
668a674,682
>             else if (errno == EWOULDBLOCK || errno == EAGAIN)
>             {
>                 net_socket = isis_reset_sock(net_socket);
>                 goto loop;
>             }
> #  else ISC
>             if(sendto(net_socket, staging_buf, len, 0, (struct sockaddr*)&ioqp->io_address, sizeof(saddr)) != -1)
>                 errno = 0;
> #  endif ISC
1466c1480
< #ifdef HPUX
---
> #if (HPUX|ISC)
1508c1522
< #endif HPUX
---
> #endif HPUX|ISC
SHAR_EOF
chmod 0644 pr_inter.c.patch ||
echo 'restore of pr_inter.c.patch failed'
Wc_c="`wc -c < 'pr_inter.c.patch'`"
test 553 -eq "$Wc_c" ||
	echo 'pr_inter.c.patch: original size 553, current size' "$Wc_c"
fi
# ============= pr_inter.h.patch ==============
if test -f 'pr_inter.h.patch' -a X"$1" != X"-c"; then
	echo 'x - skipping pr_inter.h.patch (File already exists)'
else
echo 'x - extracting pr_inter.h.patch (Text)'
sed 's/^X//' << 'SHAR_EOF' > 'pr_inter.h.patch' &&
33a34,36
> #ifdef ISC
> # include <net/errno.h>
> #endif
SHAR_EOF
chmod 0644 pr_inter.h.patch ||
echo 'restore of pr_inter.h.patch failed'
Wc_c="`wc -c < 'pr_inter.h.patch'`"
test 57 -eq "$Wc_c" ||
	echo 'pr_inter.h.patch: original size 57, current size' "$Wc_c"
fi
# ============= pr_task.c.patch ==============
if test -f 'pr_task.c.patch' -a X"$1" != X"-c"; then
	echo 'x - skipping pr_task.c.patch (File already exists)'
else
echo 'x - extracting pr_task.c.patch (Text)'
sed 's/^X//' << 'SHAR_EOF' > 'pr_task.c.patch' &&
35c35
< #    if     (AIX)
---
> #    if     (AIX|ISC)
309a310,327
>                     isis_longjmp(env, 1);
> 		    panic("unexpected return from longjmp");
>                 }
>             }
> #           endif
> #           ifdef ISC
>             {
> #include <signal.h>
>                 jmp_buf env;
>                 int *envp;
>
>                 if (isis_setjmp(env) == 0) {
>                     stackp = &ctp->task_stack[STACKLEN-(32 words)];
>                     stackp = (char*)((int)stackp & ~0x1f);
>                     envp = (int *)env;
>                     envp[JB_SP] = (int)stackp;
>                     envp[JB_BP] = (int)stackp;
> 		    sigset (SIGCHLD, SIG_IGN);
SHAR_EOF
chmod 0644 pr_task.c.patch ||
echo 'restore of pr_task.c.patch failed'
Wc_c="`wc -c < 'pr_task.c.patch'`"
test 691 -eq "$Wc_c" ||
	echo 'pr_task.c.patch: original size 691, current size' "$Wc_c"
fi
# ============= cmd.c.patch ==============
if test -f 'cmd.c.patch' -a X"$1" != X"-c"; then
	echo 'x - skipping cmd.c.patch (File already exists)'
else
echo 'x - extracting cmd.c.patch (Text)'
sed 's/^X//' << 'SHAR_EOF' > 'cmd.c.patch' &&
29a30
> #include "isis.h"
44,46c45
< #include "isis.h"
<
< #if(HPUX)
---
> #if(HPUX|ISC)
SHAR_EOF
chmod 0644 cmd.c.patch ||
echo 'restore of cmd.c.patch failed'
Wc_c="`wc -c < 'cmd.c.patch'`"
test 89 -eq "$Wc_c" ||
	echo 'cmd.c.patch: original size 89, current size' "$Wc_c"
fi
# ============= isis.c.patch ==============
if test -f 'isis.c.patch' -a X"$1" != X"-c"; then
	echo 'x - skipping isis.c.patch (File already exists)'
else
echo 'x - extracting isis.c.patch (Text)'
sed 's/^X//' << 'SHAR_EOF' > 'isis.c.patch' &&
48a49,51
> #ifdef ISC
> static struct  timeval poll ={ 0, 0};
> #else
49a53
> #endif
SHAR_EOF
chmod 0644 isis.c.patch ||
echo 'restore of isis.c.patch failed'
Wc_c="`wc -c < 'isis.c.patch'`"
test 85 -eq "$Wc_c" ||
	echo 'isis.c.patch: original size 85, current size' "$Wc_c"
fi
# ============= rmgr.c.patch ==============
if test -f 'rmgr.c.patch' -a X"$1" != X"-c"; then
	echo 'x - skipping rmgr.c.patch (File already exists)'
else
echo 'x - extracting rmgr.c.patch (Text)'
sed 's/^X//' << 'SHAR_EOF' > 'rmgr.c.patch' &&
35a36
> #ifndef ISC
36a38
> #endif
SHAR_EOF
chmod 0644 rmgr.c.patch ||
echo 'restore of rmgr.c.patch failed'
Wc_c="`wc -c < 'rmgr.c.patch'`"
test 35 -eq "$Wc_c" ||
	echo 'rmgr.c.patch: original size 35, current size' "$Wc_c"
fi
# ============= protosmkfile.patch ==============
if test -f 'protosmkfile.patch' -a X"$1" != X"-c"; then
	echo 'x - skipping protosmkfile.patch (File already exists)'
else
echo 'x - extracting protosmkfile.patch (Text)'
sed 's/^X//' << 'SHAR_EOF' > 'protosmkfile.patch' &&
61,62c61,62
< 		-if test $(MCHTYPE) != GOULD -a $(MCHTYPE) != RT43 -a $(MCHTYPE) != MIPS -a $(MCHTYPE) != AIX -a $(MCHTYPE) != MACH -a $(MCHTYPE) != APOLLO -a $(MCHTYPE) != SGI -a $(MCHTYPE) != CONVEX; then cc -c $(CFLAGS) pr_setjmp.s; fi
< 		-if test $(MCHTYPE) = GOULD -o $(MCHTYPE) = RT43 -o $(MCHTYPE) = MIPS -o $(MCHTYPE) = AIX -o $(MCHTYPE) = MACH -o $(MCHTYPE) = APOLLO -o $(MCHTYPE) = SGI -o $(MCHTYPE) = CONVEX; then $(CC) -c $(CFLAGS) $(S)/pr_setjmp.c; fi
---
> 		-if test $(MCHTYPE) != GOULD -a $(MCHTYPE) != RT43 -a $(MCHTYPE) != MIPS -a $(MCHTYPE) != AIX -a $(MCHTYPE) != ISC -a $(MCHTYPE) != MACH -a $(MCHTYPE) != APOLLO -a $(MCHTYPE) != SGI -a $(MCHTYPE) != CONVEX; then cc -c $(CFLAGS) pr_setjmp.s; fi
> 		-if test $(MCHTYPE) = GOULD -o $(MCHTYPE) = RT43 -o $(MCHTYPE) = MIPS -o $(MCHTYPE) = AIX -o $(MCHTYPE) = ISC -o $(MCHTYPE) = MACH -o $(MCHTYPE) = APOLLO -o $(MCHTYPE) = SGI -o $(MCHTYPE) = CONVEX; then $(CC) -c $(CFLAGS) $(S)/pr_setjmp.c; fi
SHAR_EOF
chmod 0644 protosmkfile.patch ||
echo 'restore of protosmkfile.patch failed'
Wc_c="`wc -c < 'protosmkfile.patch'`"
test 965 -eq "$Wc_c" ||
	echo 'protosmkfile.patch: original size 965, current size' "$Wc_c"
fi
exit 0
--
Max Heffler, Senior Software Engineer        internet: max@compaq.com
Compaq Computer Corporation     uucp: ..!uunet!max@compaq.com
P.O. Box 692000 - M050701       phone: (713) 378-8366
Houston, Texas  77269-2000      fax:   (713) 374-7305