1
0
mirror of https://github.com/Interlisp/maiko.git synced 2026-01-11 23:43:19 +00:00

Remove key checking code. (#251)

This wasn't actually hooked up any more, so it was pretty much
all dead code. The handling of this in the command line options
is gone.

In `bin/makefile-tail`, `DEVFILES` and `LIBFILES` became identical, so
`DEVFILES` went away.
This commit is contained in:
Bruce Mitchener 2021-01-20 14:47:55 +07:00 committed by GitHub
parent 397143d760
commit 85fa89ba88
No known key found for this signature in database
GPG Key ID: 4AEE18F83AFDEB23
19 changed files with 29 additions and 697 deletions

View File

@ -106,7 +106,6 @@ SET(BAD_SRCS
src/ejlisp.c
src/imagefile2.c
src/imagefile.c
src/keytst.c
src/kbdif.c
src/lpdual.c
src/lpkit.c
@ -187,8 +186,6 @@ SET(MAIKO_SRCS
src/intcall.c
src/kbdsubrs.c
src/keyevent.c
src/keylib.c
src/keytstno.c
src/kprint.c
src/ldsout.c
src/lineblt8.c
@ -203,7 +200,6 @@ SET(MAIKO_SRCS
src/miscn.c
src/mkatom.c
src/mkcell.c
src/mkkey.c
src/mvs.c
src/osmsg.c
src/perrno.c
@ -328,7 +324,6 @@ SET(MAIKO_HDRS
inc/kbdsubrsdefs.h
inc/keyboard.h
inc/keyeventdefs.h
inc/keylibdefs.h
inc/keysym.h
inc/kprintdefs.h
inc/ldeXdefs.h
@ -445,10 +440,7 @@ ADD_CUSTOM_TARGET(gen-vdate
BYPRODUCTS vdate.c
)
# keymaker lde ldeether ldex mkvdate setsout tstsout
ADD_EXECUTABLE(keymaker src/keymaker.c)
TARGET_LINK_LIBRARIES(keymaker maiko)
# lde ldeether ldex mkvdate setsout tstsout
ADD_EXECUTABLE(lde src/ldeboot.c src/unixfork.c)
TARGET_COMPILE_DEFINITIONS(lde PUBLIC ${MAIKO_DEFINITIONS})

View File

@ -6,8 +6,6 @@ ADMINFILES = makefile mkvdate.c optck.c
LPFILES = lpmain.obj lpread.obj lpsolve.obj lpwrite.obj lpdual.obj lptran.obj
KEY = keytstno.obj
CFLAGS = -DDOS -DBYTESWAP -DKBINT -DNOPIXRECT \
-DNOVERSION -DLPSOLVE -g
@ -15,9 +13,9 @@ LDFLAGS = -g graphics.lib binmode.lib mouse.lib
RM = del
SRCFILES = conspage.c gcoflow.c shift.c dbgtool.c gcr.c gcrcell.c llstk.c gcscan.c loopsops.c storage.c allocmds.c dir.c gvar2.c lowlev1.c subr.c arith2.c lowlev2.c subr0374.c arith3.c doscomm.c hardrtn.c lsthandl.c sxhash.c arith4.c draw.c main.c testtool.c array.c dsk.c inet.c misc7.c timer.c array2.c dspif.c initdsp.c miscn.c typeof.c array3.c initkbd.c ubf1.c array4.c dspsubrs.c initsout.c mkatom.c ubf2.c array5.c eqf.c intcall.c mkcell.c ubf3.c array6.c ether.c mkvdate.c ufn.c atom.c findkey.c kbdsubrs.c mouseif.c ufs.c bbtsub.c foreign.c keyevent.c unixcomm.c bin.c fp.c keylib.c binds.c asmbbt.c fvar.c mvs.c unwind.c bitblt.c gc.c uraid.c blt.c gc2.c kprint.c keytstno.c keytst.c osmsg.c usrsubr.c byteswap.c gcarray.c perrno.c ldeboot.c ldeether.c uutils.c carcdr.c gccode.c rawcolor.c vars3.c gcfinal.c ldsout.c return.c vmemsave.c chardev.c gchtfind.c lineblt8.c rpc.c xc.c common.c gcmain3.c lisp2c.c rplcons.c z2.c find-dsp.l dsphack.l xmkicon.c xbbt.c xinit.c xscroll.c xcursor.c xlspwin.c xrdopt.c xwinman.c dosmouse.c vesafns.asm vesainit.c vgainit.c kbdif.c dspsparc.il copyright launch.asm lpread.c lpsolve.c lpmain.c lpwrite.c lpdual.c lptran.c
SRCFILES = conspage.c gcoflow.c shift.c dbgtool.c gcr.c gcrcell.c llstk.c gcscan.c loopsops.c storage.c allocmds.c dir.c gvar2.c lowlev1.c subr.c arith2.c lowlev2.c subr0374.c arith3.c doscomm.c hardrtn.c lsthandl.c sxhash.c arith4.c draw.c main.c testtool.c array.c dsk.c inet.c misc7.c timer.c array2.c dspif.c initdsp.c miscn.c typeof.c array3.c initkbd.c ubf1.c array4.c dspsubrs.c initsout.c mkatom.c ubf2.c array5.c eqf.c intcall.c mkcell.c ubf3.c array6.c ether.c mkvdate.c ufn.c atom.c findkey.c kbdsubrs.c mouseif.c ufs.c bbtsub.c foreign.c keyevent.c unixcomm.c bin.c fp.c binds.c asmbbt.c fvar.c mvs.c unwind.c bitblt.c gc.c uraid.c blt.c gc2.c kprint.c osmsg.c usrsubr.c byteswap.c gcarray.c perrno.c ldeboot.c ldeether.c uutils.c carcdr.c gccode.c rawcolor.c vars3.c gcfinal.c ldsout.c return.c vmemsave.c chardev.c gchtfind.c lineblt8.c rpc.c xc.c common.c gcmain3.c lisp2c.c rplcons.c z2.c find-dsp.l dsphack.l xmkicon.c xbbt.c xinit.c xscroll.c xcursor.c xlspwin.c xrdopt.c xwinman.c dosmouse.c vesafns.asm vesainit.c vgainit.c kbdif.c dspsparc.il copyright launch.asm lpread.c lpsolve.c lpmain.c lpwrite.c lpdual.c lptran.c
OFILES = conspage.obj gcoflow.obj shift.obj dbgtool.obj gcr.obj gcrcell.obj llstk.obj gcscan.obj loopsops.obj storage.obj allocmds.obj dir.obj gvar2.obj lowlev1.obj subr.obj arith2.obj lowlev2.obj subr0374.obj arith3.obj doscomm.obj hardrtn.obj lsthandl.obj sxhash.obj arith4.obj draw.obj main.obj testtool.obj array.obj dsk.obj inet.obj misc7.obj timer.obj array2.obj dspif.obj initdsp.obj miscn.obj typeof.obj array3.obj initkbd.obj ubf1.obj array4.obj dspsubrs.obj initsout.obj mkatom.obj ubf2.obj array5.obj eqf.obj intcall.obj mkcell.obj ubf3.obj array6.obj ether.obj ufn.obj atom.obj findkey.obj kbdsubrs.obj mouseif.obj ufs.obj bbtsub.obj foreign.obj keyevent.obj unixcomm.obj bin.obj fp.obj keylib.obj binds.obj fvar.obj mvs.obj unwind.obj bitblt.obj gc.obj uraid.obj blt.obj gc2.obj kprint.obj osmsg.obj usrsubr.obj byteswap.obj gcarray.obj perrno.obj uutils.obj carcdr.obj asmbbt.obj gccode.obj vars3.obj gcfinal.obj ldsout.obj return.obj vmemsave.obj chardev.obj gchtfind.obj lineblt8.obj rpc.obj xc.obj common.obj gcmain3.obj lisp2c.obj rplcons.obj z2.obj vdate.obj $(KEY) $(COLORFILES) $(ARCHFILES) $(LPFILES)
OFILES = conspage.obj gcoflow.obj shift.obj dbgtool.obj gcr.obj gcrcell.obj llstk.obj gcscan.obj loopsops.obj storage.obj allocmds.obj dir.obj gvar2.obj lowlev1.obj subr.obj arith2.obj lowlev2.obj subr0374.obj arith3.obj doscomm.obj hardrtn.obj lsthandl.obj sxhash.obj arith4.obj draw.obj main.obj testtool.obj array.obj dsk.obj inet.obj misc7.obj timer.obj array2.obj dspif.obj initdsp.obj miscn.obj typeof.obj array3.obj initkbd.obj ubf1.obj array4.obj dspsubrs.obj initsout.obj mkatom.obj ubf2.obj array5.obj eqf.obj intcall.obj mkcell.obj ubf3.obj array6.obj ether.obj ufn.obj atom.obj findkey.obj kbdsubrs.obj mouseif.obj ufs.obj bbtsub.obj foreign.obj keyevent.obj unixcomm.obj bin.obj fp.obj binds.obj fvar.obj mvs.obj unwind.obj bitblt.obj gc.obj uraid.obj blt.obj gc2.obj kprint.obj osmsg.obj usrsubr.obj byteswap.obj gcarray.obj perrno.obj uutils.obj carcdr.obj asmbbt.obj gccode.obj vars3.obj gcfinal.obj ldsout.obj return.obj vmemsave.obj chardev.obj gchtfind.obj lineblt8.obj rpc.obj xc.obj common.obj gcmain3.obj lisp2c.obj rplcons.obj z2.obj vdate.obj $(COLORFILES) $(ARCHFILES) $(LPFILES)
HFILES = address.h adr68k.h arith.h cell.h dbprint.h display.h dspif.h ifpage.h iopage.h lispemul.h lispmap.h lsptypes.h miscstat.h lspglob.h array.h bb.h bitblt.h debug.h devconf.h dspdata.h ether.h fast_dsp.h gcdata.h hdw_conf.h initatms.h inlinec.h keyboard.h lispver1.h lispver2.h lldsp.h locfile.h medleyfp.h mouseif.h my.h opcodes.h osmsg.h pilotbbt.h print.h profile.h return.h stack.h stream.h subrs.h timeout.h tos1defs.h tosfns.h tosret.h vmemsave.h xdefs.h xbitmaps.h xkeymap.h
@ -106,11 +104,6 @@ conspage.obj : ../src/conspage.c
$(CC) @copts ../src/conspage.c -I ../inc -c $@
del copts
keytstno.obj : ../src/keytstno.c
@ echo $(CFLAGS) > copts
$(CC) @copts ../src/keytstno.c -I ../inc -c $@
del copts
dosmouse.obj : ../src/dosmouse.c
@ echo $(CFLAGS) > copts
$(CC) @copts ../src/dosmouse.c -I ../inc -c $@
@ -454,11 +447,6 @@ fp.obj : ../src/fp.c
$(CC) @copts ../src/fp.c -I ../inc -c $@
del copts
keylib.obj : ../src/keylib.c
@ echo $(CFLAGS) > copts
$(CC) @copts ../src/keylib.c -I ../inc -c $@
del copts
binds.obj : ../src/binds.c
@ echo $(CFLAGS) > copts
$(CC) @copts ../src/binds.c -I ../inc -c $@

View File

@ -6,8 +6,6 @@ ADMINFILES = makefile mkvdate.c optck.c
LPFILES = lpmain.obj lpread.obj lpsolve.obj lpwrite.obj lpdual.obj lptran.obj
KEY = keytstno.obj
CFLAGS = -DDOS -DBYTESWAP -DKBINT -DNOPIXRECT \
-DNOVERSION -DLPSOLVE -g
@ -15,9 +13,9 @@ LDFLAGS = -g graphics.lib binmode.lib mouse.lib
RM = del
SRCFILES = conspage.c gcoflow.c shift.c dbgtool.c gcr.c gcrcell.c llstk.c gcscan.c loopsops.c storage.c allocmds.c dir.c gvar2.c lowlev1.c subr.c arith2.c lowlev2.c subr0374.c arith3.c doscomm.c hardrtn.c lsthandl.c sxhash.c arith4.c draw.c main.c testtool.c array.c dsk.c inet.c misc7.c timer.c array2.c dspif.c initdsp.c miscn.c typeof.c array3.c initkbd.c ubf1.c array4.c dspsubrs.c initsout.c mkatom.c ubf2.c array5.c eqf.c intcall.c mkcell.c ubf3.c array6.c ether.c mkvdate.c ufn.c atom.c findkey.c kbdsubrs.c mouseif.c ufs.c bbtsub.c foreign.c keyevent.c unixcomm.c bin.c fp.c keylib.c binds.c asmbbt.c fvar.c mvs.c unwind.c bitblt.c gc.c uraid.c blt.c gc2.c kprint.c keytstno.c keytst.c osmsg.c usrsubr.c byteswap.c gcarray.c perrno.c ldeboot.c ldeether.c uutils.c carcdr.c gccode.c rawcolor.c vars3.c gcfinal.c ldsout.c return.c vmemsave.c chardev.c gchtfind.c lineblt8.c rpc.c xc.c common.c gcmain3.c lisp2c.c rplcons.c z2.c find-dsp.l dsphack.l xmkicon.c xbbt.c xinit.c xscroll.c xcursor.c xlspwin.c xrdopt.c xwinman.c dosmouse.c vesafns.asm vesainit.c vgainit.c kbdif.c dspsparc.il copyright launch.asm lpread.c lpsolve.c lpmain.c lpwrite.c lpdual.c lptran.c
SRCFILES = conspage.c gcoflow.c shift.c dbgtool.c gcr.c gcrcell.c llstk.c gcscan.c loopsops.c storage.c allocmds.c dir.c gvar2.c lowlev1.c subr.c arith2.c lowlev2.c subr0374.c arith3.c doscomm.c hardrtn.c lsthandl.c sxhash.c arith4.c draw.c main.c testtool.c array.c dsk.c inet.c misc7.c timer.c array2.c dspif.c initdsp.c miscn.c typeof.c array3.c initkbd.c ubf1.c array4.c dspsubrs.c initsout.c mkatom.c ubf2.c array5.c eqf.c intcall.c mkcell.c ubf3.c array6.c ether.c mkvdate.c ufn.c atom.c findkey.c kbdsubrs.c mouseif.c ufs.c bbtsub.c foreign.c keyevent.c unixcomm.c bin.c fp.c binds.c asmbbt.c fvar.c mvs.c unwind.c bitblt.c gc.c uraid.c blt.c gc2.c kprint.c osmsg.c usrsubr.c byteswap.c gcarray.c perrno.c ldeboot.c ldeether.c uutils.c carcdr.c gccode.c rawcolor.c vars3.c gcfinal.c ldsout.c return.c vmemsave.c chardev.c gchtfind.c lineblt8.c rpc.c xc.c common.c gcmain3.c lisp2c.c rplcons.c z2.c find-dsp.l dsphack.l xmkicon.c xbbt.c xinit.c xscroll.c xcursor.c xlspwin.c xrdopt.c xwinman.c dosmouse.c vesafns.asm vesainit.c vgainit.c kbdif.c dspsparc.il copyright launch.asm lpread.c lpsolve.c lpmain.c lpwrite.c lpdual.c lptran.c
OFILES = conspage.obj gcoflow.obj shift.obj dbgtool.obj gcr.obj gcrcell.obj llstk.obj gcscan.obj loopsops.obj storage.obj allocmds.obj dir.obj gvar2.obj lowlev1.obj subr.obj arith2.obj lowlev2.obj subr0374.obj arith3.obj doscomm.obj hardrtn.obj lsthandl.obj sxhash.obj arith4.obj draw.obj main.obj testtool.obj array.obj dsk.obj inet.obj misc7.obj timer.obj array2.obj dspif.obj initdsp.obj miscn.obj typeof.obj array3.obj initkbd.obj ubf1.obj array4.obj dspsubrs.obj initsout.obj mkatom.obj ubf2.obj array5.obj eqf.obj intcall.obj mkcell.obj ubf3.obj array6.obj ether.obj ufn.obj atom.obj findkey.obj kbdsubrs.obj mouseif.obj ufs.obj bbtsub.obj foreign.obj keyevent.obj unixcomm.obj bin.obj fp.obj keylib.obj binds.obj fvar.obj mvs.obj unwind.obj bitblt.obj gc.obj uraid.obj blt.obj gc2.obj kprint.obj osmsg.obj usrsubr.obj byteswap.obj gcarray.obj perrno.obj uutils.obj carcdr.obj asmbbt.obj gccode.obj vars3.obj gcfinal.obj ldsout.obj return.obj vmemsave.obj chardev.obj gchtfind.obj lineblt8.obj rpc.obj xc.obj common.obj gcmain3.obj lisp2c.obj rplcons.obj z2.obj vdate.obj $(KEY) $(COLORFILES) $(ARCHFILES) $(LPFILES)
OFILES = conspage.obj gcoflow.obj shift.obj dbgtool.obj gcr.obj gcrcell.obj llstk.obj gcscan.obj loopsops.obj storage.obj allocmds.obj dir.obj gvar2.obj lowlev1.obj subr.obj arith2.obj lowlev2.obj subr0374.obj arith3.obj doscomm.obj hardrtn.obj lsthandl.obj sxhash.obj arith4.obj draw.obj main.obj testtool.obj array.obj dsk.obj inet.obj misc7.obj timer.obj array2.obj dspif.obj initdsp.obj miscn.obj typeof.obj array3.obj initkbd.obj ubf1.obj array4.obj dspsubrs.obj initsout.obj mkatom.obj ubf2.obj array5.obj eqf.obj intcall.obj mkcell.obj ubf3.obj array6.obj ether.obj ufn.obj atom.obj findkey.obj kbdsubrs.obj mouseif.obj ufs.obj bbtsub.obj foreign.obj keyevent.obj unixcomm.obj bin.obj fp.obj binds.obj fvar.obj mvs.obj unwind.obj bitblt.obj gc.obj uraid.obj blt.obj gc2.obj kprint.obj osmsg.obj usrsubr.obj byteswap.obj gcarray.obj perrno.obj uutils.obj carcdr.obj asmbbt.obj gccode.obj vars3.obj gcfinal.obj ldsout.obj return.obj vmemsave.obj chardev.obj gchtfind.obj lineblt8.obj rpc.obj xc.obj common.obj gcmain3.obj lisp2c.obj rplcons.obj z2.obj vdate.obj $(COLORFILES) $(ARCHFILES) $(LPFILES)
HFILES = address.h adr68k.h arith.h cell.h dbprint.h display.h dspif.h ifpage.h iopage.h lispemul.h lispmap.h lsptypes.h miscstat.h lspglob.h array.h bb.h bitblt.h debug.h devconf.h dspdata.h ether.h fast_dsp.h gcdata.h hdw_conf.h initatms.h inlinec.h keyboard.h lispver1.h lispver2.h lldsp.h locfile.h medleyfp.h mouseif.h my.h opcodes.h osmsg.h pilotbbt.h print.h profile.h return.h stack.h stream.h subrs.h timeout.h tos1defs.h tosfns.h tosret.h vmemsave.h xdefs.h xbitmaps.h xkeymap.h
@ -106,11 +104,6 @@ conspage.obj : ../src/conspage.c
$(CC) @copts ../src/conspage.c -I ../inc -c $@
del copts
keytstno.obj : ../src/keytstno.c
@ echo $(CFLAGS) > copts
$(CC) @copts ../src/keytstno.c -I ../inc -c $@
del copts
dosmouse.obj : ../src/dosmouse.c
@ echo $(CFLAGS) > copts
$(CC) @copts ../src/dosmouse.c -I ../inc -c $@
@ -454,11 +447,6 @@ fp.obj : ../src/fp.c
$(CC) @copts ../src/fp.c -I ../inc -c $@
del copts
keylib.obj : ../src/keylib.c
@ echo $(CFLAGS) > copts
$(CC) @copts ../src/keylib.c -I ../inc -c $@
del copts
binds.obj : ../src/binds.c
@ echo $(CFLAGS) > copts
$(CC) @copts ../src/binds.c -I ../inc -c $@

View File

@ -58,9 +58,6 @@ RFLAGS = -c $(CFLAGS) -I$(INCDIR) -I$(INCLUDEDIR)
ANSIRFLAGS = -c $(ANSIOPTFLAGS) $(DFLAGS) $(FPFLAGS) -I$(INCDIR) -I$(INCLUDEDIR)
DISPRFLAGS = -c $(DISPCFLAGS) -I$(INCDIR) -I$(INCLUDEDIR)
KEYON = $(OBJECTDIR)keytst.o
KEYOFF = $(OBJECTDIR)keytstno.o
OFILES = $(OBJECTDIR)arith2.o \
$(OBJECTDIR)arith3.o \
$(OBJECTDIR)arith4.o \
@ -90,7 +87,6 @@ OFILES = $(OBJECTDIR)arith2.o \
$(OBJECTDIR)hardrtn.o \
$(OBJECTDIR)inet.o \
$(OBJECTDIR)intcall.o \
$(OBJECTDIR)keylib.o \
$(OBJECTDIR)lineblt8.o \
$(OBJECTDIR)lsthandl.o \
$(OBJECTDIR)llcolor.o \
@ -164,10 +160,7 @@ SXHASHFILE = $(OBJECTDIR)sxhash.o
VFILE = $(OBJECTDIR)vdate
DEVFILES = $(OFILES) $(KEYOFF) $(TESTFILES) $(BYTESWAPFILES) $(MAINFILES) \
$(DEVICES) $(GCFILES) $(SXHASHFILE) $(BITBLTFILE) $(XFILES) \
$(COLORFILES) $(LPFILES) $(DLPIFILES)
LIBFILES = $(OFILES) $(KEYON) $(TESTFILES) $(BYTESWAPFILES) $(MAINFILES) \
LIBFILES = $(OFILES) $(TESTFILES) $(BYTESWAPFILES) $(MAINFILES) \
$(DEVICES) $(GCFILES) $(SXHASHFILE) $(BITBLTFILE) $(XFILES) \
$(COLORFILES) $(LPFILES) $(DLPIFILES)
EXTFILES = $(OBJECTDIR)usrsubr.o
@ -179,16 +172,16 @@ EXTFILES = $(OBJECTDIR)usrsubr.o
################################################################################
default : $(OSARCHDIR)lde $(OSARCHDIR)$(LDENAME) $(OSARCHDIR)ldeether \
$(OSARCHDIR)tstsout $(OSARCHDIR)setsout $(OSARCHDIR)keymaker
$(OSARCHDIR)tstsout $(OSARCHDIR)setsout
$(OSARCHDIR)lde: $(SRCDIR)ldeboot.c $(SRCDIR)unixfork.c $(INCDIR)unixfork.h
$(CC) $(CFLAGS) -I$(INCDIR) $(SRCDIR)ldeboot.c $(SRCDIR)unixfork.c \
$(LDELDFLAGS) -o $(OSARCHDIR)lde
$(OSARCHDIR)$(LDENAME) : $(DEVFILES) $(EXTFILES) $(OSARCHDIR)mkvdate
$(OSARCHDIR)$(LDENAME) : $(LIBFILES) $(EXTFILES) $(OSARCHDIR)mkvdate
/bin/rm -f $(VFILE).c
$(OSARCHDIR)mkvdate > $(VFILE).c
$(CC) $(CFLAGS) $(DEVFILES) $(EXTFILES) $(VFILE).c \
$(CC) $(CFLAGS) $(LIBFILES) $(EXTFILES) $(VFILE).c \
$(LDFLAGS) -o $(OSARCHDIR)$(LDENAME)
@ echo ""
@ echo "Executable is now named '$(OSARCHDIR)$(LDENAME)'"
@ -213,9 +206,6 @@ $(OSARCHDIR)testdsp : $(SRCDIR)testdsp.c $(REQUIRED-INCS) $(INCDIR)lispemul.h
$(INCDIR)display.h $(INCDIR)dbprint.h
$(CC) $(CFLAGS) -DDEBUG -I$(INCDIR) $(SRCDIR)testdsp.c -lsuntool -lsunwindow -lpixrect -lc -lm -o $(OSARCHDIR)testdsp
$(OSARCHDIR)keymaker : ../src/keymaker.c $(REQUIRED-INCS) $(OBJECTDIR)keylib.o
$(CC) $(CFLAGS) -I$(INCDIR) ../src/keymaker.c $(OBJECTDIR)keylib.o -o $(OSARCHDIR)keymaker
#### Component files ######################################################
$(OBJECTDIR)tstsout.o: $(SRCDIR)tstsout.c $(REQUIRED-INCS)
@ -600,15 +590,6 @@ $(OBJECTDIR)keyevent.o : $(SRCDIR)keyevent.c $(REQUIRED-INCS) $(INCDIR)lispemu
$(INCDIR)pilotbbt.h
$(CC) $(RFLAGS) $(SRCDIR)keyevent.c $(INLINE) -o $(OBJECTDIR)keyevent$(OEXT)
$(OBJECTDIR)keylib.o : $(SRCDIR)keylib.c $(REQUIRED-INCS)
$(CC) $(RFLAGS) $(SRCDIR)keylib.c $(INLINE) -o $(OBJECTDIR)keylib$(OEXT)
$(OBJECTDIR)keytst.o : $(SRCDIR)keytst.c $(REQUIRED-INCS)
$(CC) $(RFLAGS) $(SRCDIR)keytst.c $(INLINE) -o $(OBJECTDIR)keytst$(OEXT)
$(OBJECTDIR)keytstno.o : $(SRCDIR)keytstno.c $(REQUIRED-INCS)
$(CC) $(RFLAGS) $(SRCDIR)keytstno.c $(INLINE) -o $(OBJECTDIR)keytstno$(OEXT)
$(OBJECTDIR)lsthandl.o : $(SRCDIR)lsthandl.c $(REQUIRED-INCS) $(INCDIR)lispemul.h \
$(INCDIR)emlglob.h $(INCDIR)lspglob.h \
$(INCDIR)lsptypes.h $(INCDIR)address.h $(INCDIR)adr68k.h \
@ -979,7 +960,7 @@ $(SCRPTDIR)medley : $(BINDIR)medley
################################################################################
cleanup :
rm -f $(LIBFILES) $(EXTFILES) $(KEYOFF) $(OBJECTDIR)tstsout.o $(OBJECTDIR)setsout.o $(OSARCHDIR)lde $(OSARCHDIR)ldex $(OSARCHDIR)ldeether
rm -f $(LIBFILES) $(EXTFILES) $(OBJECTDIR)tstsout.o $(OBJECTDIR)setsout.o $(OSARCHDIR)lde $(OSARCHDIR)ldex $(OSARCHDIR)ldeether
.c.o:
$(CC) $(RFLAGS) $*.c -o $@ $(INLINE)
@ -987,8 +968,5 @@ cleanup :
.c.s:
$(CC) -S $(CFLAGS) -I$(INCDIR) $(SRCDIR)$*.c -o $(SRCDIR)$@ $(INLINE)
$(OBJECTDIR)keymaker : ../src/keymaker.c $(REQUIRED-INCS) $(OBJECTDIR)keylib.o
$(CC) $(CFLAGS) -I$(INCDIR) ../src/keymaker.c $(OBJECTDIR)keylib.o -o $(OBJECTDIR)keymaker
cxref :
cxref -c $(DFLAGS) -I$(INCDIR) $(SRCDIR)*.c -o ../all.cxref

View File

@ -6,17 +6,15 @@ ADMINFILES = makefile mkvdate.c optck.c
LPFILES = lpmain.obj lpread.obj lpsolve.obj lpwrite.obj lpdual.obj lptran.obj
KEY = keytstno.obj
CFLAGS = -DDOS -DBYTESWAP -DKBINT -DNOPIXRECT -DNOVERSION
LDFLAGS = -g graphics.lib binmode.lib mouse.lib
RM = del
SRCFILES = conspage.c gcoflow.c shift.c dbgtool.c gcr.c gcrcell.c llstk.c gcscan.c loopsops.c storage.c allocmds.c dir.c gvar2.c lowlev1.c subr.c arith2.c lowlev2.c subr0374.c arith3.c doscomm.c hardrtn.c lsthandl.c sxhash.c arith4.c draw.c main.c testtool.c array.c dsk.c inet.c misc7.c timer.c array2.c dspif.c initdsp.c miscn.c typeof.c array3.c initkbd.c ubf1.c array4.c dspsubrs.c initsout.c mkatom.c ubf2.c array5.c eqf.c intcall.c mkcell.c ubf3.c array6.c ether.c mkvdate.c ufn.c atom.c findkey.c kbdsubrs.c mouseif.c ufs.c bbtsub.c foreign.c keyevent.c unixcomm.c bin.c fp.c keylib.c binds.c asmbbt.c fvar.c mvs.c unwind.c bitblt.c gc.c uraid.c blt.c gc2.c kprint.c keytstno.c keytst.c osmsg.c usrsubr.c byteswap.c gcarray.c perrno.c ldeboot.c ldeether.c uutils.c carcdr.c gccode.c rawcolor.c vars3.c gcfinal.c ldsout.c return.c vmemsave.c chardev.c gchtfind.c lineblt8.c rpc.c xc.c common.c gcmain3.c lisp2c.c rplcons.c z2.c find-dsp.l dsphack.l xmkicon.c xbbt.c xinit.c xscroll.c xcursor.c xlspwin.c xrdopt.c xwinman.c dosmouse.c vesafns.asm vesainit.c vgainit.c kbdif.c dspsparc.il copyright launch.asm lpread.c lpsolve.c lpmain.c lpwrite.c lpdual.c lptran.c
SRCFILES = conspage.c gcoflow.c shift.c dbgtool.c gcr.c gcrcell.c llstk.c gcscan.c loopsops.c storage.c allocmds.c dir.c gvar2.c lowlev1.c subr.c arith2.c lowlev2.c subr0374.c arith3.c doscomm.c hardrtn.c lsthandl.c sxhash.c arith4.c draw.c main.c testtool.c array.c dsk.c inet.c misc7.c timer.c array2.c dspif.c initdsp.c miscn.c typeof.c array3.c initkbd.c ubf1.c array4.c dspsubrs.c initsout.c mkatom.c ubf2.c array5.c eqf.c intcall.c mkcell.c ubf3.c array6.c ether.c mkvdate.c ufn.c atom.c findkey.c kbdsubrs.c mouseif.c ufs.c bbtsub.c foreign.c keyevent.c unixcomm.c bin.c fp.c binds.c asmbbt.c fvar.c mvs.c unwind.c bitblt.c gc.c uraid.c blt.c gc2.c kprint.c osmsg.c usrsubr.c byteswap.c gcarray.c perrno.c ldeboot.c ldeether.c uutils.c carcdr.c gccode.c rawcolor.c vars3.c gcfinal.c ldsout.c return.c vmemsave.c chardev.c gchtfind.c lineblt8.c rpc.c xc.c common.c gcmain3.c lisp2c.c rplcons.c z2.c find-dsp.l dsphack.l xmkicon.c xbbt.c xinit.c xscroll.c xcursor.c xlspwin.c xrdopt.c xwinman.c dosmouse.c vesafns.asm vesainit.c vgainit.c kbdif.c dspsparc.il copyright launch.asm lpread.c lpsolve.c lpmain.c lpwrite.c lpdual.c lptran.c
OFILES = conspage.obj gcoflow.obj shift.obj dbgtool.obj gcr.obj gcrcell.obj llstk.obj gcscan.obj loopsops.obj storage.obj allocmds.obj dir.obj gvar2.obj lowlev1.obj subr.obj arith2.obj lowlev2.obj subr0374.obj arith3.obj doscomm.obj hardrtn.obj lsthandl.obj sxhash.obj arith4.obj draw.obj main.obj testtool.obj array.obj dsk.obj inet.obj misc7.obj timer.obj array2.obj dspif.obj initdsp.obj miscn.obj typeof.obj array3.obj initkbd.obj ubf1.obj array4.obj dspsubrs.obj initsout.obj mkatom.obj ubf2.obj array5.obj eqf.obj intcall.obj mkcell.obj ubf3.obj array6.obj ether.obj ufn.obj atom.obj findkey.obj kbdsubrs.obj mouseif.obj ufs.obj bbtsub.obj foreign.obj keyevent.obj unixcomm.obj bin.obj fp.obj keylib.obj binds.obj fvar.obj mvs.obj unwind.obj bitblt.obj gc.obj uraid.obj blt.obj gc2.obj kprint.obj osmsg.obj usrsubr.obj byteswap.obj gcarray.obj perrno.obj uutils.obj carcdr.obj asmbbt.obj gccode.obj vars3.obj gcfinal.obj ldsout.obj return.obj vmemsave.obj chardev.obj gchtfind.obj lineblt8.obj rpc.obj xc.obj common.obj gcmain3.obj lisp2c.obj rplcons.obj z2.obj vdate.obj $(KEY) $(COLORFILES) $(ARCHFILES) $(LPFILES)
OFILES = conspage.obj gcoflow.obj shift.obj dbgtool.obj gcr.obj gcrcell.obj llstk.obj gcscan.obj loopsops.obj storage.obj allocmds.obj dir.obj gvar2.obj lowlev1.obj subr.obj arith2.obj lowlev2.obj subr0374.obj arith3.obj doscomm.obj hardrtn.obj lsthandl.obj sxhash.obj arith4.obj draw.obj main.obj testtool.obj array.obj dsk.obj inet.obj misc7.obj timer.obj array2.obj dspif.obj initdsp.obj miscn.obj typeof.obj array3.obj initkbd.obj ubf1.obj array4.obj dspsubrs.obj initsout.obj mkatom.obj ubf2.obj array5.obj eqf.obj intcall.obj mkcell.obj ubf3.obj array6.obj ether.obj ufn.obj atom.obj findkey.obj kbdsubrs.obj mouseif.obj ufs.obj bbtsub.obj foreign.obj keyevent.obj unixcomm.obj bin.obj fp.obj binds.obj fvar.obj mvs.obj unwind.obj bitblt.obj gc.obj uraid.obj blt.obj gc2.obj kprint.obj osmsg.obj usrsubr.obj byteswap.obj gcarray.obj perrno.obj uutils.obj carcdr.obj asmbbt.obj gccode.obj vars3.obj gcfinal.obj ldsout.obj return.obj vmemsave.obj chardev.obj gchtfind.obj lineblt8.obj rpc.obj xc.obj common.obj gcmain3.obj lisp2c.obj rplcons.obj z2.obj vdate.obj $(COLORFILES) $(ARCHFILES) $(LPFILES)
HFILES = address.h adr68k.h arith.h cell.h dbprint.h display.h dspif.h ifpage.h iopage.h lispemul.h lispmap.h lsptypes.h miscstat.h lspglob.h array.h bb.h bitblt.h debug.h devconf.h dspdata.h ether.h fast_dsp.h gcdata.h hdw_conf.h initatms.h inlinec.h keyboard.h lispver1.h lispver2.h lldsp.h locfile.h medleyfp.h mouseif.h my.h opcodes.h osmsg.h pilotbbt.h print.h profile.h return.h stack.h stream.h subrs.h timeout.h tos1defs.h tosfns.h tosret.h vmemsave.h xdefs.h xbitmaps.h xkeymap.h
@ -105,11 +103,6 @@ conspage.obj : ../dossrc/conspage.c
$(CC) @copts ../dossrc/conspage.c -I ../dosinc -c $@
del copts
keytstno.obj : ../dossrc/keytstno.c
@ echo $(CFLAGS) > copts
$(CC) @copts ../dossrc/keytstno.c -I ../dosinc -c $@
del copts
dosmouse.obj : ../dossrc/dosmouse.c
@ echo $(CFLAGS) > copts
$(CC) @copts ../dossrc/dosmouse.c -I ../dosinc -c $@
@ -453,11 +446,6 @@ fp.obj : ../dossrc/fp.c
$(CC) @copts ../dossrc/fp.c -I ../dosinc -c $@
del copts
keylib.obj : ../dossrc/keylib.c
@ echo $(CFLAGS) > copts
$(CC) @copts ../dossrc/keylib.c -I ../dosinc -c $@
del copts
binds.obj : ../dossrc/binds.c
@ echo $(CFLAGS) > copts
$(CC) @copts ../dossrc/binds.c -I ../dosinc -c $@

View File

@ -44,8 +44,6 @@ ADMINFILES = mkdos mkvdate.c optck.c
ETHERFILES = ldeether.OEXT
KEY = keytstno.OEXT
CFLAGS = -I. XFLAGS EXTRACFLAGS DEBUG
LDFLAGS = DEBUG EXTRALDFLAGS XLDFLAGS
@ -62,9 +60,9 @@ SRCFILES = $(SRCDIR)conspage.c $(SRCDIR)gcoflow.c $(SRCDIR)shift.c $(SRCDIR)dbgt
$(SRCDIR)array5.c $(SRCDIR)eqf.c $(SRCDIR)intcall.c $(SRCDIR)mkcell.c $(SRCDIR)ubf3.c $(SRCDIR)array6.c \
$(SRCDIR)ether.c $(SRCDIR)mkvdate.c $(SRCDIR)ufn.c $(SRCDIR)atom.c $(SRCDIR)findkey.c \
$(SRCDIR)kbdsubrs.c $(SRCDIR)mouseif.c $(SRCDIR)ufs.c $(SRCDIR)bbtsub.c $(SRCDIR)foreign.c \
$(SRCDIR)keyevent.c $(SRCDIR)unixcomm.c $(SRCDIR)bin.c $(SRCDIR)fp.c $(SRCDIR)keylib.c $(SRCDIR)binds.c \
$(SRCDIR)keyevent.c $(SRCDIR)unixcomm.c $(SRCDIR)bin.c $(SRCDIR)fp.c $(SRCDIR)binds.c \
$(SRCDIR)asmbbt.c $(SRCDIR)fvar.c $(SRCDIR)mvs.c $(SRCDIR)unwind.c $(SRCDIR)bitblt.c $(SRCDIR)gc.c \
$(SRCDIR)uraid.c $(SRCDIR)blt.c $(SRCDIR)gc2.c $(SRCDIR)kprint.c $(SRCDIR)keytstno.c $(SRCDIR)keytst.c\
$(SRCDIR)uraid.c $(SRCDIR)blt.c $(SRCDIR)gc2.c $(SRCDIR)kprint.c \
$(SRCDIR)osmsg.c usrsubr.c $(SRCDIR)byteswap.c $(SRCDIR)gcarray.c \
$(SRCDIR)perrno.c $(SRCDIR)ldeboot.c $(SRCDIR)ldeether.c $(SRCDIR)uutils.c $(SRCDIR)carcdr.c $(SRCDIR)gccode.c \
$(SRCDIR)rawcolor.c $(SRCDIR)vars3.c $(SRCDIR)gcfinal.c $(SRCDIR)ldsout.c $(SRCDIR)return.c \
@ -93,7 +91,7 @@ OFILES = $(OBJECTDIR)conspage.OEXT $(OBJECTDIR)gcoflow.OEXT $(OBJECTDIR)shift.OE
$(OBJECTDIR)ether.OEXT $(OBJECTDIR)ufn.OEXT $(OBJECTDIR)atom.OEXT \
$(OBJECTDIR)findkey.OEXT $(OBJECTDIR)kbdsubrs.OEXT $(OBJECTDIR)mouseif.OEXT $(OBJECTDIR)ufs.OEXT \
$(OBJECTDIR)bbtsub.OEXT $(OBJECTDIR)foreign.OEXT $(OBJECTDIR)keyevent.OEXT \
$(OBJECTDIR)unixcomm.OEXT $(OBJECTDIR)bin.OEXT $(OBJECTDIR)fp.OEXT $(OBJECTDIR)keylib.OEXT \
$(OBJECTDIR)unixcomm.OEXT $(OBJECTDIR)bin.OEXT $(OBJECTDIR)fp.OEXT \
$(OBJECTDIR)binds.OEXT $(OBJECTDIR)fvar.OEXT $(OBJECTDIR)mvs.OEXT \
$(OBJECTDIR)unwind.OEXT $(OBJECTDIR)bitblt.OEXT $(OBJECTDIR)gc.OEXT \
$(OBJECTDIR)uraid.OEXT $(OBJECTDIR)blt.OEXT $(OBJECTDIR)gc2.OEXT \
@ -104,7 +102,7 @@ OFILES = $(OBJECTDIR)conspage.OEXT $(OBJECTDIR)gcoflow.OEXT $(OBJECTDIR)shift.OE
$(OBJECTDIR)return.OEXT $(OBJECTDIR)vmemsave.OEXT $(OBJECTDIR)chardev.OEXT \
$(OBJECTDIR)gchtfind.OEXT $(OBJECTDIR)lineblt8.OEXT $(OBJECTDIR)rpc.OEXT $(OBJECTDIR)xc.OEXT \
$(OBJECTDIR)common.OEXT $(OBJECTDIR)gcmain3.OEXT $(OBJECTDIR)lisp2c.OEXT $(OBJECTDIR)rplcons.OEXT \
$(OBJECTDIR)z2.OEXT $(OBJECTDIR) $(OBJECTDIR)vdate.OEXT $(KEY) $(COLORFILES) $(ARCHFILES) EXTRAFILES
$(OBJECTDIR)z2.OEXT $(OBJECTDIR) $(OBJECTDIR)vdate.OEXT $(COLORFILES) $(ARCHFILES) EXTRAFILES
HFILES = $(INCDIR)address.h $(INCDIR)adr68k.h $(INCDIR)arith.h $(INCDIR)cell.h $(INCDIR)dbprint.h $(INCDIR)display.h \

View File

@ -49,8 +49,6 @@ ADMINFILES = mkdos mkvdate.c optck.c
ETHERFILES = ldeether.OEXT
KEY = keytstno.OEXT
CFLAGS = -I. XFLAGS EXTRACFLAGS DEBUG
LDFLAGS = DEBUG EXTRALDFLAGS XLDFLAGS
@ -67,9 +65,9 @@ SRCFILES = SRCDIR/conspage.c SRCDIR/gcoflow.c SRCDIR/shift.c SRCDIR/dbgtool.c SR
SRCDIR/array5.c SRCDIR/eqf.c SRCDIR/intcall.c SRCDIR/mkcell.c SRCDIR/ubf3.c SRCDIR/array6.c \
SRCDIR/ether.c SRCDIR/mkvdate.c SRCDIR/ufn.c SRCDIR/atom.c SRCDIR/findkey.c \
SRCDIR/kbdsubrs.c SRCDIR/mouseif.c SRCDIR/ufs.c SRCDIR/bbtsub.c SRCDIR/foreign.c \
SRCDIR/keyevent.c SRCDIR/unixcomm.c SRCDIR/bin.c SRCDIR/fp.c SRCDIR/keylib.c SRCDIR/binds.c \
SRCDIR/keyevent.c SRCDIR/unixcomm.c SRCDIR/bin.c SRCDIR/fp.c SRCDIR/binds.c \
SRCDIR/asmbbt.c SRCDIR/fvar.c SRCDIR/mvs.c SRCDIR/unwind.c SRCDIR/bitblt.c SRCDIR/gc.c \
SRCDIR/uraid.c SRCDIR/blt.c SRCDIR/gc2.c SRCDIR/kprint.c SRCDIR/keytstno.c SRCDIR/keytst.c\
SRCDIR/uraid.c SRCDIR/blt.c SRCDIR/gc2.c SRCDIR/kprint.c \
SRCDIR/osmsg.c usrsubr.c SRCDIR/byteswap.c SRCDIR/gcarray.c \
SRCDIR/perrno.c SRCDIR/ldeboot.c SRCDIR/ldeether.c SRCDIR/uutils.c SRCDIR/carcdr.c SRCDIR/gccode.c \
SRCDIR/rawcolor.c SRCDIR/vars3.c SRCDIR/gcfinal.c SRCDIR/ldsout.c SRCDIR/return.c \
@ -98,7 +96,7 @@ OFILES = conspage.OEXT gcoflow.OEXT shift.OEXT dbgtool.OEXT \
ether.OEXT ufn.OEXT atom.OEXT \
findkey.OEXT kbdsubrs.OEXT mouseif.OEXT ufs.OEXT \
bbtsub.OEXT foreign.OEXT keyevent.OEXT \
unixcomm.OEXT bin.OEXT fp.OEXT keylib.OEXT \
unixcomm.OEXT bin.OEXT fp.OEXT \
binds.OEXT fvar.OEXT mvs.OEXT \
unwind.OEXT bitblt.OEXT gc.OEXT \
uraid.OEXT blt.OEXT gc2.OEXT \
@ -109,7 +107,7 @@ OFILES = conspage.OEXT gcoflow.OEXT shift.OEXT dbgtool.OEXT \
return.OEXT vmemsave.OEXT chardev.OEXT \
gchtfind.OEXT lineblt8.OEXT rpc.OEXT xc.OEXT \
common.OEXT gcmain3.OEXT lisp2c.OEXT rplcons.OEXT \
z2.OEXT vdate.OEXT $(KEY) $(COLORFILES) $(ARCHFILES) EXTRAFILES
z2.OEXT vdate.OEXT $(COLORFILES) $(ARCHFILES) EXTRAFILES
HFILES = INCDIR/address.h INCDIR/adr68k.h INCDIR/arith.h INCDIR/cell.h INCDIR/dbprint.h INCDIR/display.h \

View File

@ -49,8 +49,6 @@ ADMINFILES = mkdos mkvdate.c optck.c
ETHERFILES = ldeether.OEXT
KEY = keytstno.OEXT
CFLAGS = -I. XFLAGS EXTRACFLAGS DEBUG
LDFLAGS = DEBUG EXTRALDFLAGS XLDFLAGS
@ -67,9 +65,9 @@ SRCFILES = SRCDIR/conspage.c SRCDIR/gcoflow.c SRCDIR/shift.c SRCDIR/dbgtool.c SR
SRCDIR/array5.c SRCDIR/eqf.c SRCDIR/intcall.c SRCDIR/mkcell.c SRCDIR/ubf3.c SRCDIR/array6.c \
SRCDIR/ether.c SRCDIR/mkvdate.c SRCDIR/ufn.c SRCDIR/atom.c SRCDIR/findkey.c \
SRCDIR/kbdsubrs.c SRCDIR/mouseif.c SRCDIR/ufs.c SRCDIR/bbtsub.c SRCDIR/foreign.c \
SRCDIR/keyevent.c SRCDIR/unixcomm.c SRCDIR/bin.c SRCDIR/fp.c SRCDIR/keylib.c SRCDIR/binds.c \
SRCDIR/keyevent.c SRCDIR/unixcomm.c SRCDIR/bin.c SRCDIR/fp.c SRCDIR/binds.c \
SRCDIR/asmbbt.c SRCDIR/fvar.c SRCDIR/mvs.c SRCDIR/unwind.c SRCDIR/bitblt.c SRCDIR/gc.c \
SRCDIR/uraid.c SRCDIR/blt.c SRCDIR/gc2.c SRCDIR/kprint.c SRCDIR/keytstno.c SRCDIR/keytst.c\
SRCDIR/uraid.c SRCDIR/blt.c SRCDIR/gc2.c SRCDIR/kprint.c \
SRCDIR/osmsg.c usrsubr.c SRCDIR/byteswap.c SRCDIR/gcarray.c \
SRCDIR/perrno.c SRCDIR/ldeboot.c SRCDIR/ldeether.c SRCDIR/uutils.c SRCDIR/carcdr.c SRCDIR/gccode.c \
SRCDIR/rawcolor.c SRCDIR/vars3.c SRCDIR/gcfinal.c SRCDIR/ldsout.c SRCDIR/return.c \
@ -98,7 +96,7 @@ OFILES = conspage.OEXT gcoflow.OEXT shift.OEXT dbgtool.OEXT \
ether.OEXT ufn.OEXT atom.OEXT \
findkey.OEXT kbdsubrs.OEXT mouseif.OEXT ufs.OEXT \
bbtsub.OEXT foreign.OEXT keyevent.OEXT \
unixcomm.OEXT bin.OEXT fp.OEXT keylib.OEXT \
unixcomm.OEXT bin.OEXT fp.OEXT \
binds.OEXT fvar.OEXT mvs.OEXT \
unwind.OEXT bitblt.OEXT gc.OEXT \
uraid.OEXT blt.OEXT gc2.OEXT \
@ -109,7 +107,7 @@ OFILES = conspage.OEXT gcoflow.OEXT shift.OEXT dbgtool.OEXT \
return.OEXT vmemsave.OEXT chardev.OEXT \
gchtfind.OEXT lineblt8.OEXT rpc.OEXT xc.OEXT \
common.OEXT gcmain3.OEXT lisp2c.OEXT rplcons.OEXT \
z2.OEXT vdate.OEXT $(KEY) $(COLORFILES) $(ARCHFILES) EXTRAFILES
z2.OEXT vdate.OEXT $(COLORFILES) $(ARCHFILES) EXTRAFILES
HFILES = INCDIR/address.h INCDIR/adr68k.h INCDIR/arith.h INCDIR/cell.h INCDIR/dbprint.h INCDIR/display.h \

View File

@ -22,15 +22,13 @@ ADMINFILES = mkdos mkvdate.c optck.c
ETHERFILES = ldeether.obj
KEY = keytstno.obj
CFLAGS = -I. -DDOS -DBYTESWAP -DKBINT -DNOPIXRECT -O2
LDFLAGS = -O2 graphics.lib binmode.lib mouse.lib
SRCFILES = ./conspage.c ./gcoflow.c ./shift.c ./dbgtool.c ./gcr.c ./llcolor.c ./gcrcell.c ./llstk.c ./gcscan.c ./loopsops.c ./storage.c ./allocmds.c ./dir.c ./gvar2.c ./lowlev1.c ./subr.c ./arith2.c ./lowlev2.c ./subr0374.c ./arith3.c ./doscomm.c ./hardrtn.c ./lsthandl.c ./sxhash.c ./arith4.c ./draw.c ./main.c ./testtool.c ./array.c ./dsk.c ./inet.c ./misc7.c ./timer.c ./array2.c ./dspif.c ./initdsp.c ./miscn.c ./typeof.c ./array3.c ./initkbd.c ./ubf1.c ./array4.c ./dspsubrs.c ./initsout.c ./mkatom.c ./ubf2.c ./array5.c ./eqf.c ./intcall.c ./mkcell.c ./ubf3.c ./array6.c ./ether.c ./mkvdate.c ./ufn.c ./atom.c ./findkey.c ./kbdsubrs.c ./mouseif.c ./ufs.c ./bbtsub.c ./foreign.c ./keyevent.c ./unixcomm.c ./bin.c ./fp.c ./keylib.c ./binds.c ./asmbbt.c ./fvar.c ./mvs.c ./unwind.c ./bitblt.c ./gc.c ./uraid.c ./blt.c ./gc2.c ./kprint.c ./keytstno.c ./keytst.c ./osmsg.c usrsubr.c ./byteswap.c ./gcarray.c ./perrno.c ./ldeboot.c ./ldeether.c ./uutils.c ./carcdr.c ./gccode.c ./rawcolor.c ./vars3.c ./gcfinal.c ./ldsout.c ./return.c ./vmemsave.c ./chardev.c ./gchtfind.c ./lineblt8.c ./rpc.c ./xc.c ./common.c ./gcmain3.c ./lisp2c.c ./rplcons.c ./z2.c ./find-dsp.l ./dsphack.l ./xmkicon.c ./xbbt.c ./xinit.c ./xscroll.c ./xcursor.c ./xlspwin.c ./xrdopt.c ./xwinman.c ./dosmouse.c ./vesafns.asm ./vesainit.c ./vgainit.c ./kbdif.c ./dspsparc.il ./copyright ./launch.asm
SRCFILES = ./conspage.c ./gcoflow.c ./shift.c ./dbgtool.c ./gcr.c ./llcolor.c ./gcrcell.c ./llstk.c ./gcscan.c ./loopsops.c ./storage.c ./allocmds.c ./dir.c ./gvar2.c ./lowlev1.c ./subr.c ./arith2.c ./lowlev2.c ./subr0374.c ./arith3.c ./doscomm.c ./hardrtn.c ./lsthandl.c ./sxhash.c ./arith4.c ./draw.c ./main.c ./testtool.c ./array.c ./dsk.c ./inet.c ./misc7.c ./timer.c ./array2.c ./dspif.c ./initdsp.c ./miscn.c ./typeof.c ./array3.c ./initkbd.c ./ubf1.c ./array4.c ./dspsubrs.c ./initsout.c ./mkatom.c ./ubf2.c ./array5.c ./eqf.c ./intcall.c ./mkcell.c ./ubf3.c ./array6.c ./ether.c ./mkvdate.c ./ufn.c ./atom.c ./findkey.c ./kbdsubrs.c ./mouseif.c ./ufs.c ./bbtsub.c ./foreign.c ./keyevent.c ./unixcomm.c ./bin.c ./fp.c ./binds.c ./asmbbt.c ./fvar.c ./mvs.c ./unwind.c ./bitblt.c ./gc.c ./uraid.c ./blt.c ./gc2.c ./kprint.c ./osmsg.c usrsubr.c ./byteswap.c ./gcarray.c ./perrno.c ./ldeboot.c ./ldeether.c ./uutils.c ./carcdr.c ./gccode.c ./rawcolor.c ./vars3.c ./gcfinal.c ./ldsout.c ./return.c ./vmemsave.c ./chardev.c ./gchtfind.c ./lineblt8.c ./rpc.c ./xc.c ./common.c ./gcmain3.c ./lisp2c.c ./rplcons.c ./z2.c ./find-dsp.l ./dsphack.l ./xmkicon.c ./xbbt.c ./xinit.c ./xscroll.c ./xcursor.c ./xlspwin.c ./xrdopt.c ./xwinman.c ./dosmouse.c ./vesafns.asm ./vesainit.c ./vgainit.c ./kbdif.c ./dspsparc.il ./copyright ./launch.asm
OFILES = conspage.obj gcoflow.obj shift.obj dbgtool.obj gcr.obj llcolor.obj gcrcell.obj llstk.obj gcscan.obj loopsops.obj storage.obj allocmds.obj dir.obj gvar2.obj lowlev1.obj subr.obj arith2.obj lowlev2.obj subr0374.obj arith3.obj doscomm.obj hardrtn.obj lsthandl.obj sxhash.obj arith4.obj draw.obj main.obj testtool.obj array.obj dsk.obj inet.obj misc7.obj timer.obj array2.obj dspif.obj initdsp.obj miscn.obj typeof.obj array3.obj initkbd.obj ubf1.obj array4.obj dspsubrs.obj initsout.obj mkatom.obj ubf2.obj array5.obj eqf.obj intcall.obj mkcell.obj ubf3.obj array6.obj ether.obj ufn.obj atom.obj findkey.obj kbdsubrs.obj mouseif.obj ufs.obj bbtsub.obj foreign.obj keyevent.obj unixcomm.obj bin.obj fp.obj keylib.obj binds.obj fvar.obj mvs.obj unwind.obj bitblt.obj gc.obj uraid.obj blt.obj gc2.obj kprint.obj osmsg.obj usrsubr.obj byteswap.obj gcarray.obj perrno.obj uutils.obj carcdr.obj asmbbt.obj gccode.obj vars3.obj gcfinal.obj ldsout.obj return.obj vmemsave.obj chardev.obj gchtfind.obj lineblt8.obj rpc.obj xc.obj common.obj gcmain3.obj lisp2c.obj rplcons.obj z2.obj vdate.obj $(KEY) $(COLORFILES) $(ARCHFILES)
OFILES = conspage.obj gcoflow.obj shift.obj dbgtool.obj gcr.obj llcolor.obj gcrcell.obj llstk.obj gcscan.obj loopsops.obj storage.obj allocmds.obj dir.obj gvar2.obj lowlev1.obj subr.obj arith2.obj lowlev2.obj subr0374.obj arith3.obj doscomm.obj hardrtn.obj lsthandl.obj sxhash.obj arith4.obj draw.obj main.obj testtool.obj array.obj dsk.obj inet.obj misc7.obj timer.obj array2.obj dspif.obj initdsp.obj miscn.obj typeof.obj array3.obj initkbd.obj ubf1.obj array4.obj dspsubrs.obj initsout.obj mkatom.obj ubf2.obj array5.obj eqf.obj intcall.obj mkcell.obj ubf3.obj array6.obj ether.obj ufn.obj atom.obj findkey.obj kbdsubrs.obj mouseif.obj ufs.obj bbtsub.obj foreign.obj keyevent.obj unixcomm.obj bin.obj fp.obj binds.obj fvar.obj mvs.obj unwind.obj bitblt.obj gc.obj uraid.obj blt.obj gc2.obj kprint.obj osmsg.obj usrsubr.obj byteswap.obj gcarray.obj perrno.obj uutils.obj carcdr.obj asmbbt.obj gccode.obj vars3.obj gcfinal.obj ldsout.obj return.obj vmemsave.obj chardev.obj gchtfind.obj lineblt8.obj rpc.obj xc.obj common.obj gcmain3.obj lisp2c.obj rplcons.obj z2.obj vdate.obj $(COLORFILES) $(ARCHFILES)
HFILES = ../inc/address.h ../inc/adr68k.h ../inc/arith.h ../inc/cell.h ../inc/dbprint.h ../inc/display.h ../inc/dspif.h ../inc/ifpage.h ../inc/iopage.h ../inc/lispemul.h ../inc/lispmap.h ../inc/lsptypes.h ../inc/miscstat.h ../inc/lspglob.h ../inc/array.h ../inc/bb.h ../inc/bitblt.h ../inc/debug.h ../inc/devconf.h ../inc/dspdata.h ../inc/ether.h ../inc/fast_dsp.h ../inc/gcdata.h ../inc/hdw_conf.h ../inc/initatms.h ../inc/inlinec.h ../inc/keyboard.h ../inc/lispver1.h ../inc/lispver2.h ../inc/lldsp.h ../inc/locfile.h ../inc/medleyfp.h ../inc/mouseif.h ../inc/my.h ../inc/opcodes.h ../inc/osmsg.h ../inc/pilotbbt.h ../inc/print.h ../inc/profile.h ../inc/return.h ../inc/stack.h ../inc/stream.h ../inc/subrs.h ../inc/timeout.h ../inc/tos1defs.h ../inc/tosfns.h ../inc/tosret.h ../inc/vmemsave.h ../inc/xdefs.h ../inc/xbitmaps.h ../inc/xkeymap.h

View File

@ -69,7 +69,6 @@ s/find\-disp/find\-dsp/g
s/gchoverflow/gcpunt/g
s/initdisplay/initdsp/g
s/inlineSPARC/inlnSPARC/g
s/newkeymaker/mkkey/g
s/newmakeatom/mkatom/g
s/systematoms/sysatms/g
s/testdisplay/testdsp/g

View File

@ -69,7 +69,6 @@ s/find\-disp\.lex/find\-dsp\.lex/g
s/gchoverflow\.c/gcpunt\.c/g
s/initdisplay\.c/initdsp\.c/g
s/inlineSPARC\.h/inlnSPARC\.h/g
s/newkeymaker\.c/mkkey\.c/g
s/newmakeatom\.c/mkatom\.c/g
s/systematoms\.h/sysatms\.h/g
s/testdisplay\.c/testdsp\.c/g

View File

@ -1,12 +0,0 @@
#ifndef KEYLIBDEFS_H
#define KEYLIBDEFS_H 1
unsigned long make_verification(unsigned long x, unsigned long y);
unsigned long date_integer16(const char *date);
unsigned long idate(const char *str);
unsigned long modify(unsigned long hostid);
int imod64bit(unsigned long x1, unsigned long x0, unsigned long y);
unsigned long make_verification(long unsigned int x, long unsigned int y);
unsigned long date_integer16(const char *date);
unsigned long idate(const char *str);
unsigned long modify(unsigned long hostid);
#endif

View File

@ -1,191 +0,0 @@
/* $Id: keylib.c,v 1.4 2001/12/24 01:09:03 sybalsky Exp $ (C) Copyright Venue, All Rights Reserved
*/
/************************************************************************/
/* */
/* (C) Copyright 1989-1999 Venue. All Rights Reserved. */
/* Manufactured in the United States of America. */
/* */
/************************************************************************/
#include "version.h"
/* ==============================================================================
The functions defined in this file were called by KEYMAKER.C & KEYTESTER.C
Creation Date: May, 1988
============================================================================== */
#include <stdio.h>
#include <stdlib.h>
#include <string.h>
#include <ctype.h>
#include "keylibdefs.h"
#define GOLDEN_RATIO_HACK -478700649
#define ULONG_MAX 4294967295
/* meaning of symbolic constant used:
FAILURE2 invalid date */
#define FAILURE2 -2
/* ===========================================================================
IMOD64BIT computes (IMOD X Y).
X is a 64-bit integer; x1 is the higher 32-bit while x0 is the lower 32-bit.
Y is less than 65535.
(((ULONG_MAX % y) + 1 ) % y) is equivalent to (expt 2 32) % y
=============================================================================*/
int imod64bit(unsigned long x1, unsigned long x0, unsigned long y) {
/* JDS 990601 ansi return (((x0 % y) + ((x1 % y) * (((ULONG_MAX % y) + 1 ) % y) )) % y); */
return (((x0 % y) + ((x1 % y) * ((y + 1) % y))) % y);
}
/* ===========================================================================
MAKE_VERIFICATION forms a new 32-bit integer by messaging the two input
long integers x and y. The number was created from the lower bits toward
higher bits.
=============================================================================*/
unsigned long make_verification(long unsigned int x, long unsigned int y) {
return (imod64bit(x, y, 4) | (imod64bit(x, y, 6) << 3) | (imod64bit(x, y, 13) << 6) |
(imod64bit(x, y, 25) << 10) | (imod64bit(x, y, 30) << 15) | (imod64bit(x, y, 63) << 20) |
(imod64bit(x, y, 5) << 26) | (imod64bit(x, y, 7) << 29));
}
/* ============================================================
DATE_INTEGER16 takes a date string and return an integer
=============================================================*/
unsigned long date_integer16(const char *date) {
unsigned long const1, const2;
const1 = 17152;
const2 = 86400;
return ((idate(date) - const1) / const2);
}
/* ===================================================================
IDATE takes a date string (dd-mmm-yy or dd mmm yy) and return an
integer.
dd - date in decimal digits
mmm - month name in alphabetic form or decimal digits
yy - year in decimal digits ; can be 2 or 4 digits
If date1 is before date2 then (idate date1) < (idate date2).
If date string is not valid, FAILURE2 is returned.
=====================================================================*/
unsigned long idate(const char *str) {
char ds[50];
char *decdigits = {"0123456789"};
char *tokendelimiters = {" -"};
char *yptr, *mptr, *dptr, *ptr1;
int day, month, year, maxday;
int i, len, s;
unsigned long days_since_day0, sec, hour;
static char *month_name[13] = {"", "JAN", "FEB", "MAR", "APR", "MAY", "JUN",
"JUL", "AUG", "SEP", "OCT", "NOV", "DEC"};
static int days_each_month[13] = {0, 31, 28, 31, 30, 31, 30, 31, 31, 30, 31, 30, 31};
static int days_since_jan1st[12] = {0, 31, 59, 90, 120, 151, 181, 212, 243, 273, 304, 334};
/* copy input string to a local one */
ds[0] = '\0';
strcpy(ds, str);
/* get day, month, and year string tokens */
if ((dptr = strtok(ds, tokendelimiters)) == NULL) return FAILURE2;
if ((mptr = strtok(NULL, tokendelimiters)) == NULL) return FAILURE2;
if ((yptr = strtok(NULL, tokendelimiters)) == NULL) return FAILURE2;
/* validate year and convert it to numeric form 19xx */
if (strspn(yptr, decdigits) != strlen(yptr)) return FAILURE2;
if ((year = atoi(yptr)) <= 100) year += 1900;
if (year < 1970 || year > 2050) return FAILURE2;
/* validate month and convert it to numeric form if necessary */
if (strspn(mptr, decdigits) == (len = (strlen(mptr)))) {
/* input month is in numeric form */
if ((month = atoi(mptr)) < 1 || month > 12) return FAILURE2;
} else {
/* input month is in alphabetic form */
/* we're only interested in the first 3 chars */
if (len > 3) *(mptr + 3) = '\0';
ptr1 = mptr;
/* make sure month name is in upper case letters */
for (i = 0; (s = *(ptr1 + i)) != '\0'; ++i)
if (islower(s)) *(ptr1 + i) = toupper(s);
/* find out its corresponding numeric value */
for (i = 1; i <= 12; ++i)
if (strcmp(*(month_name + i), mptr) == 0) {
month = i;
break;
};
if (i == 13) return FAILURE2;
};
/* set up maxday to be the number of days of that month */
maxday = days_each_month[month];
/* watch out for leap year */
if (month == 2 && (((year % 4 == 0) && (year % 100 != 0)) || (year % 400 == 0))) ++maxday;
/* validate day */
if (strspn(dptr, decdigits) != strlen(dptr) || (day = atoi(dptr)) < 1 || maxday < day)
return FAILURE2;
year -= 1901;
--month;
days_since_day0 = days_since_jan1st[month] + (day - 1) + (365 * year) + (year / 4);
if (month > 1 && year % 4 == 3 && year != -1) ++days_since_day0;
hour = (24 * days_since_day0) + 7;
/* JDS 990601 ANSI cleanup sec = (60 * (60 * hour)) ^ -2147483648L ; */
sec = (60 * (60 * hour)) ^ 0x80000000;
/* printf("\n days_since_day0: %ld hour: %ld sec: %ld\n", days_since_day0 , hour ,sec); */
return sec;
}
/* ============================================================
MODIFY turns on/off certain bits of the passed
in 32-bit hostid, depending on the value of (hostid % 16).
=============================================================*/
unsigned long modify(unsigned long hostid) {
unsigned long dividor;
#ifdef xBIGVM
hostid ^= 0xa3f5069e;
#endif /* xBIGVM */
dividor = 16;
switch (hostid % dividor) {
case 0: hostid = hostid | 0x48004802; break;
case 1: hostid = hostid ^ 0xfedc5793; break;
case 2: hostid = hostid ^ 0x9981afe3; break;
case 3: hostid = hostid & 0xffcb6ffd; break;
case 4: hostid = hostid ^ 0x3489dfa8; break;
case 5: hostid = hostid | 0x77012877; break;
case 6: hostid = hostid & 0xefc9fffd; break;
case 7: hostid = hostid | 0x22311300; break;
case 8: hostid = hostid & 0xdadf8871; break;
case 9: hostid = hostid ^ 0xe8c948ad; break;
case 10: hostid = hostid | 0x12488412; break;
case 11: hostid = hostid & 0xeffdea87; break;
case 12: hostid = hostid ^ 0xad8ce639; break;
case 13: hostid = hostid | 0x88221144; break;
case 14: hostid = hostid & 0xfffb6edd; break;
default: hostid = hostid ^ 0xfffddeee; break;
};
/* printf("\n ** new host id: result: %x ", hostid); */
return hostid;
}

View File

@ -1,188 +0,0 @@
/* $Id: keymaker.c,v 1.3 1999/05/31 23:35:35 sybalsky Exp $ (C) Copyright Venue, All Rights Reserved
*/
/************************************************************************/
/* */
/* (C) Copyright 1989-98 Venue. All Rights Reserved. */
/* Manufactured in the United States of America. */
/* */
/************************************************************************/
#include "version.h"
/* =====================================================================
This function is used to generate copyright protection keys for
Venue's Medley software. It prompts for a machine's host id and
the software's expiration date before generating a set of 3 keys.
The external functions called were stored in file 'keylib.o'.
Creation Date: May, 1988
===================================================================== */
#include <stdio.h>
#include <stdlib.h>
#include <string.h>
#include <ctype.h>
#include "keylibdefs.h"
#define GOLDEN_RATIO_HACK -478700649
#define floadbyte(number, pos) ((number >> pos) & 0xFFFF)
#define hash_unhash(number, hashkey) \
(number ^ (GOLDEN_RATIO_HACK * (floadbyte(hashkey, 16) + floadbyte(hashkey, 0))))
/* meaning of symbolic constants used:
FAILURE1 invalid hostid
FAILURE2 invalid date entered from terminal
FAILURE3 can't open logfile in the command line */
#define FAILURE1 -1
#define FAILURE2 -2
#define FAILURE3 -3
void writeresults(FILE *fp, char *host, char *expdate,
unsigned long key1, unsigned long key2, unsigned long key3,
char *info);
/************************************************************************/
/* */
/* */
/* */
/* */
/* */
/************************************************************************/
int main(int argc, char **argv) {
int logfile = 0; /* set to 1 if logfile on command line */
FILE *fp; /* file pointer for the logfile */
unsigned long hostid;
unsigned long keys[3];
char s[50], expdate[30], saveexpdate[30];
char infostring[500];
char *sptr;
char *eptr;
int i, c;
int commandlineargs;
commandlineargs = (argc > 2);
/* If we have more than one argv we assume this is used as a filter */
/* == check if user enters logfile name in the command line == */
if ((argc > 1) & !commandlineargs) {
if ((fp = fopen(*++argv, "a")) == NULL) {
printf("\n Can't open %s \n", *argv);
exit(FAILURE3);
};
logfile = 1;
};
/* == prompt for machine's host id, verify, then do some modification == */
if (commandlineargs) {
/* assume that the second argument is hex-hostid */
sptr = *++argv;
hostid = strtoul(sptr, &eptr, 16);
} else {
printf("Enter Host ID (starts with 0x if the number is hexadecimal): ");
sptr = fgets(s, sizeof(s), stdin);
hostid = strtoul(s, &eptr, 0);
/* look for syntax error */
if (*eptr != '\n') {
printf("\nInvalid Host ID\n");
exit(FAILURE1);
} else {
/* trim off the trailing newline */
*eptr = '\0';
}
/* make sure Host ID is less than 32 bits */
/* XXX: why?, is 32-bits not OK -- compare to original code */
if ((hostid & 0x7FFFFFFF) != hostid) {
printf("\nInvalid Host ID\n");
exit(FAILURE1);
}
}
hostid = modify(hostid);
/* == prompt for the expiration date and validate it == */
if (!commandlineargs) {
/* assume that info is not needed when we use argc,argv */
printf("Enter information string (one line only, below)\n:");
fgets(infostring, sizeof(infostring), stdin);
infostring[strlen(infostring) - 1] = '\0';
}
/* == prompt for the expiration date and validate it == */
if (commandlineargs) {
strcpy(expdate, *++argv);
} else {
printf("Enter Software Expiration Date (dd-mmm-yy or never): ");
fgets(expdate, sizeof(expdate), stdin);
expdate[strlen(expdate) - 1] = '\0';
}
strcpy(saveexpdate, expdate);
/* check for 'never' entry */
if ((expdate[0] == 'N') || (expdate[0] == 'n')) {
for (i = 0; (c = expdate[i]) != '\0'; ++i)
if (islower(c)) expdate[i] = toupper(c);
if (strcmp(expdate, "NEVER") == 0)
strcpy(expdate, "29-DEC-77");
else {
printf("\nInvalid Software Expiration Date\n");
exit(FAILURE2);
};
};
/* validate the date */
if (idate(expdate) == FAILURE2) {
printf("\nInvalid Software Expiration Date\n");
exit(FAILURE2);
};
/* == generate 3 keys == */
keys[0] = hash_unhash(hostid, hostid);
keys[1] = hash_unhash(((date_integer16(expdate) << 16) | 0), hostid);
keys[2] = make_verification(keys[0], keys[1]);
/* == report the results == */
if (commandlineargs) {
printf("%8lx %8lx %8lx\n", keys[0], keys[1], keys[2]);
exit(1);
} else {
/* if logfile is open, append the results to the end of the file */
if (logfile == 1) {
if (argc > 2) {
fprintf(fp, "\n%s", *++argv);
printf("\n%s", *argv);
}
writeresults(fp, sptr, saveexpdate, keys[0], keys[1], keys[2], infostring);
fclose(fp);
};
/* display the results on the terminal */
writeresults(stdout, sptr, saveexpdate, keys[0], keys[1], keys[2], infostring);
};
exit(0);
}
/************************************************************************/
/* */
/* w r i t e r e s u l t s */
/* */
/* Prints the newly-generated key, along with identifying info */
/* */
/************************************************************************/
void writeresults(FILE *fp, char *host, char *expdate,
unsigned long key1, unsigned long key2, unsigned long key3,
char *info) {
fprintf(fp, "Host ID: %-14s Expiration: %-9s", host, expdate);
fprintf(fp, " Key: %8lx %8lx %8lx", key1, key2, key3);
fprintf(fp, " Doc: %s\n", info);
}

View File

@ -1,151 +0,0 @@
/* $Id: keytst.c,v 1.3 1999/05/31 23:35:36 sybalsky Exp $ (C) Copyright Venue, All Rights Reserved
*/
/************************************************************************/
/* */
/* (C) Copyright 1989-95 Venue. All Rights Reserved. */
/* Manufactured in the United States of America. */
/* */
/************************************************************************/
#include "version.h"
/* =========================================================================
The functions defined in this file are used to validate the copyright
protection keys for NewCo's Maiko software. The main function is
'keytester', which takes an input key string and returns a status
code after processing the keys.
The external functions called were stored in file 'keylib.o'.
Creation date: May, 1988
====================================================================== */
#include <stdio.h>
#include <string.h>
#include <ctype.h>
#include "keylibdefs.h"
#define GOLDEN_RATIO_HACK -478700649
#define floadbyte(number, pos) ((number >> pos) & 0xFFFF)
#define hash_unhash(number, hashkey) \
(number ^ (GOLDEN_RATIO_HACK * (floadbyte(hashkey, 16) + floadbyte(hashkey, 0))))
#define KEYNUMBERS 3
#define RC0 0
/* meaning of symbolic constants used:
FAILURE2 invalid date
FAILURE3 invalid key
FAILURE4 key expired
FAILURE99 invalid date (this shouldn't happen unless string format returned
by ctime got changed) */
#define FAILURE2 -2
#define FAILURE3 -3
#define FAILURE4 -4
#define FAILURE99 -99
/* =====================================================================
KEYTESTER checks the input key string.
It returns 0 if the keys are valid, otherwise it returns non-0.
====================================================================== */
int keytester(char *keystring) {
unsigned long keyarray[KEYNUMBERS]; /* array which holds numeric keys */
unsigned long hostid; /* 32-bit unique identifier of the current host */
unsigned long hashedword;
int rc; /* return code */
/* check the keys and convert them from hexadecimal strings to numbers */
if (keystring == NULL) return FAILURE3;
if (read_hex(keystring, keyarray) == FAILURE3) return FAILURE3;
/* get machines host id */
hostid = gethostid();
printf("hostid = 0x%x\n", hostid);
hostid = modify(hostid);
/* generate hashword */
hashedword = hash_unhash(keyarray[1], hostid);
/* validate keys */
if (keyarray[0] != hash_unhash(hostid, hostid)) return FAILURE3;
if ((rc = ok_date(floadbyte(hashedword, 16))) != RC0) return rc;
if (keyarray[2] != make_verification(keyarray[0], keyarray[1])) return FAILURE3;
return 0;
}
/* =====================================================================
READ_HEX reads in keys from the input string , validates them, then
stores them in the input array.
====================================================================== */
int read_hex(char *s1, long unsigned int *array) {
char *s2 = {" "};
char *ptr;
char *hexdigits = {"0123456789abcdefABCDEF"};
int i;
for (i = 0; (i < KEYNUMBERS) && ((ptr = strtok(s1, s2)) != NULL); ++i) {
/* make sure the key contains only hexadecimal characters */
if ((strspn(ptr, hexdigits)) != strlen(ptr)) return FAILURE3;
/* convert key to numeric format*/
*(array + i) = strtol(ptr, NULL, 16); /* On suns, this works OK */
printf("0x%x ", *(array + i));
fflush(stdout);
/* continue search the next one */
s1 = NULL;
};
if (i == KEYNUMBERS)
return RC0;
else
return FAILURE3;
}
/* ============================================
OK_DATE checks the expiration of the key
============================================ */
int ok_date(long unsigned int date) {
char current_date[30];
char *mptr, *dptr, *yptr, *str;
long realtime, *clock;
/* first check if the expiration date is set to indefinite */
printf("\narg date: %ld %x\n", date, date);
printf("\narg date ?????: %ld %x\n", date_integer16("29-DEC-77"), date_integer16("29-DEC-77"));
if (date == date_integer16("29-DEC-77")) return RC0;
/* next check if current date is less than or equal to the expiration date */
/* get the current date string */
realtime = time(0);
clock = &realtime;
str = (char *)ctime(clock);
/* delete day and time info and rearrange the string format to be dd-mmm-yy */
mptr = strtok(str, " ");
mptr = strtok(NULL, " ");
dptr = strtok(NULL, " ");
yptr = strtok(NULL, " ");
yptr = strtok(NULL, " \n"); /* watch out for newline char */
current_date[0] = '\0';
strcat(current_date, dptr);
strcat(current_date, "-");
strcat(current_date, mptr);
strcat(current_date, "-");
strcat(current_date, yptr);
/* check the date */
if (idate(current_date) == FAILURE2) return FAILURE99;
printf("*current date*: %ld %x\n", date_integer16(current_date), date_integer16(current_date));
return (date_integer16(current_date) <= date) ? RC0 : FAILURE4;
}

View File

@ -1,18 +0,0 @@
/* $Id: keytstno.c,v 1.3 1999/05/31 23:35:36 sybalsky Exp $ (C) Copyright Venue, All Rights Reserved
*/
/* Loaded instead of keytst.c, with unlocked definition of keytester */
/************************************************************************/
/* */
/* (C) Copyright 1989-95 Venue. All Rights Reserved. */
/* Manufactured in the United States of America. */
/* */
/************************************************************************/
#include "version.h"
int keytester(void);
int keytester() {
return 0;
}

View File

@ -244,8 +244,6 @@ extern int maxpages;
extern int *Lisp_errno;
extern int Dummy_errno; /* If errno cell is not provided by Lisp, dummy_errno is used. */
char keystring[128] = {""};
#define FALSE 0
#define TRUE !FALSE
@ -292,7 +290,6 @@ const char *helpstring =
medley [<sysout-name>] [<options>]\n\
-info Print general info about the system\n\
-help Print this message\n\
-k access-key Your access key\n\
-d[isplay] host:srv.scr The host, X server and screen you want Medley on\n\
-bw <pixels> The Medley screen borderwidth\n\
-g[eometry] <geom>] The Medley screen geometry\n\
@ -301,7 +298,7 @@ const char *helpstring =
const char *helpstring =
"\n\
either setenv LDESRCESYSOUT or do:\n\
lde[ether] [sysout-name] [-k access-key] [<options>]\n\
lde[ether] [sysout-name] [<options>]\n\
-info Print general info about the system\n\
-help Print this message\n";
#endif /* DOS */
@ -318,7 +315,6 @@ int main(int argc, char *argv[])
int i;
char *envname;
extern int TIMER_INTERVAL;
char keytyped[255];
extern fd_set LispReadFds;
#ifdef MAIKO_ENABLE_FOREIGN_FUNCTION_INTERFACE
if (dld_find_executable(argv[0]) == 0) {
@ -408,14 +404,6 @@ int main(int argc, char *argv[])
else if (!strcmp(argv[i], "-INIT")) { /*** init sysout, no packaged */
for_makeinit = 1;
} else if (!strcmp(argv[i], "-k")) { /**** security key ****/
if (argc > ++i) {
(void)strcpy(keystring, argv[i]);
} else {
fprintf(stderr, "Missing argument after -k\n");
exit(1);
}
}
#ifdef DOS
else if ((strcmp(argv[i], "-vga") == 0) || (strcmp(argv[i], "-VGA") == 0)) {
@ -488,8 +476,6 @@ int main(int argc, char *argv[])
}
#endif /* DOS */
strcpy(keytyped, keystring);
FD_ZERO(&LispReadFds);
#ifdef MAIKO_ENABLE_ETHERNET

View File

@ -1,10 +0,0 @@
/* $Id: mkkey.c,v 1.2 1999/01/03 02:07:24 sybalsky Exp $ (C) Copyright Venue, All Rights Reserved */
/************************************************************************/
/* */
/* (C) Copyright 1989-95 Venue. All Rights Reserved. */
/* Manufactured in the United States of America. */
/* */
/************************************************************************/
#include "version.h"

View File

@ -64,8 +64,6 @@ XrmOptionDescRec opTable[] = {
{"-it", "*icontitle", XrmoptionSepArg, (caddr_t)NULL},
{"-iconbitmap", "*iconbitmap", XrmoptionSepArg, (caddr_t)NULL},
{"-ibm", "*iconbitmap", XrmoptionSepArg, (caddr_t)NULL},
{"-key", "*key", XrmoptionSepArg, (caddr_t)NULL},
{"-k", "*key", XrmoptionSepArg, (caddr_t)NULL},
{"-timer", "*timer", XrmoptionSepArg, (caddr_t)NULL},
{"-xpages", "*maxpages", XrmoptionSepArg, (caddr_t)NULL},
{"-m", "*memory", XrmoptionSepArg, (caddr_t)NULL},
@ -87,13 +85,11 @@ char iconpixmapfile[1024];
char Window_Title[255];
char Icon_Title[255];
extern char sysout_name[], keystring[];
extern char sysout_name[];
extern int sysout_size, for_makeinit, please_fork, Scroll_Border;
/* diagnostic flag for sysout dumping */
/* extern int maxpages; */
extern char keystring[];
int Lisp_Border = 2;
/*** Ethernet stuff (JRB) **/
@ -117,7 +113,6 @@ void print_Xusage(const char *prog)
{
fprintf(stderr, " %s options:\n", prog);
fprintf(stderr, " [-sysout] [<sysout>] -path to the Medley image\n");
fprintf(stderr, " -k[ey] <access-key> -see manual for details\n");
fprintf(stderr, " -h[elp] -prints this text\n");
fprintf(stderr, " -d[isplay] <host>:<display>.<screen>\n");
fprintf(stderr,
@ -147,7 +142,7 @@ void print_lispusage(const char *prog)
TPRINT(("TRACE: print_lisp_usage()\n"));
/* Lisp Option */
fprintf(stderr, "lde[ether] [sysout] [-k access-key]");
fprintf(stderr, "lde[ether] [sysout]");
fprintf(stderr, " [-E <ethernet-info>]");
fprintf(stderr, "\n");
@ -322,9 +317,6 @@ void read_Xoption(int *argc, char *argv[])
if (XrmGetResource(rDB, "ldex.Init", "Ldex.Init", str_type, &value) == True) { for_makeinit = 1; }
if (XrmGetResource(rDB, "ldex.key", "Ldex.key", str_type, &value) == True) {
(void)strncpy(keystring, value.addr, (int)value.size);
}
if (XrmGetResource(rDB, "ldex.xsync", "Ldex.xsync", str_type, &value) == True) { xsync = True; }
#ifdef MAIKO_ENABLE_ETHERNET
if (XrmGetResource(rDB, "ldex.EtherNet", "Ldex.EtherNet", str_type, &value) == True) {