HONEYWELL GCOS KERMIT


This is the release notes for version 3.0 of KERMIT-GCOS for the Honeywell 
DPS 6 and DPS 8, running either GCOS8 or GCOS3.  The program is written in the
C language, adapted from Columbia University Unix Kermit, and is distributed in
both source and printably-encoded binary form.  This release depends on
modifications to the Datanet 8 DNS software or to NPS.  Contributed by:

 Terry Carlin, Carlin%pco@MIT-MULTICS
 Honeywell Information Systems Inc
 333 Wyman Street
 Waltham, MA  02154
 Phone 617-895-3377

This release contains the following files:

Kermit
Distribution   Original
Filename       Filename       Description
---------      -----------    --------------------------------------------
HGKER.HLP      README         This file.
HGKER.B        KERMIT.B       'PRINTABLE' version of KERMIT-GCOS.
HGBOOT.A       HBOOT.A        Assembly program to make KERMIT.B into a
                               system loadable file (H*).
HGMKBOO.A      HMKBOO.A       Assembly program to make printable (BOOT)
                               files from system loadable (H*) files
                               on DPS 66 and DPS8.
HGKER.C        KERMIT.C       'C' source for KERMIT-GCOS
HGKER.DOC      KERMIT.E       EXPLAIN (HELP) file for KERMIT-GCOS.
HGDNS.DOC      DNS.DOC        DNS terminal model for KERMIT-GCOS (PCTRAN).
HGNPS.DOC      NPS.DOC        Documentation for NPS mods.

Installation is as follows:

  1.  Use JCL below to unload the ANSI multi-file tape.
  2.  The IDENT and PARAM cards must be changed to reflect the site options.
  3.  Copy KERM to the CMDLIB.
  4.  Copy KERMIT.E to the EXPL catalog and make entry into
      EXPL/INDEX.

   (jcl follows)

[Editor's note:  This JCL is intended for use on a tape that only contains
the Honeywell files, and will have to be suitably modified for use with a
standard Kermit distribution tape.]

10$$N,J,MONI
20$:IDENT:accounting info,site params  INSTALL KERMIT
25$:USERID:your-userid$your-password
26$:NOTE:PARAM CARDS CONTAINS YOUR USERID AND THE KERMIT RELEASE NUMBER
30$:PARAM:your-userid,K3.0
40$:FILSYS
50 IGNORE ERRS
60CC /KERMIT
62CC /KERMIT/K3.0
70CPOS /KERMIT/K3.0
80CF README,LLINKS/1,UNLIMITED/
90CF KERMIT.B,LLINKS/60,UNLIMITED/
100CF HBOOT.A,LLINKS/5,UNLIMITED/
110CF HMKBOO.A,LLINKS/5,UNLIMITED/
120CF KERMIT.C,LLINKS/10,UNLIMITED/
130CF KERMIT.E,LLINKS/5,UNLIMITED/
140CF DNS.DOC,LLINKS/5,UNLIMITED/
150CF NPS.DOC,LLINKS/5,UNLIMITED/
160CF MSKERMIT,LLINKS/10,UNLIMITED/
170CF MSL610.A,LLINKS/25,UNLIMITED/
180CF MSTRAN.B,LLINKS/5,UNLIMITED/
190CF KERM,LLINKS/35,UNLIMITED/,MODE/RAND/
200$:UTL2
210$:TAPE:OT,O1D,,KERMIT,,RING-IN,,DEN16
220$:PRMFL:01,W,S,#1/KERMIT/#2/README
230$:PRMFL:02,W,S,#1/KERMIT/#2/KERMIT.B
240$:PRMFL:03,W,S,#1/KERMIT/#2/HBOOT.A
250$:PRMFL:04,W,S,#1/KERMIT/#2/HMKBOO.A
260$:PRMFL:05,W,S,#1/KERMIT/#2/KERMIT.C
270$:PRMFL:06,W,S,#1/KERMIT/#2/KERMIT.E
280$:PRMFL:07,W,S,#1/KERMIT/#2/DNS.DOC
290$:PRMFL:08,W,S,#1/KERMIT/#2/NPS.DOC
300$:PRMFL:09,W,S,#1/KERMIT/#2/MSKERMIT
310$:PRMFL:10,W,S,#1/KERMIT/#2/MSL610.A
320$:PRMFL:11,W,S,#1/KERMIT/#2/MSTRAN.B
330FDEF OT,ANSI,CI1024,MR90.
340FDEF 01 AND 02 AND 03 AND 04 AND 05 AND 06,GFRC,ASCII.
350FDEF 07 AND 08 AND 09 AND 10 AND 11,GFRC,ASCII.
360PROC REWIND OT. COPY OT TO 01 1FILE.
370PROC COPY OT TO 02 1FILE.
380PROC COPY OT TO 03 1FILE.
390PROC COPY OT TO 04 1FILE.
400PROC COPY OT TO 05 1FILE.
410PROC COPY OT TO 06 1FILE.
420PROC COPY OT TO 07 1FILE.
430PROC COPY OT TO 08 1FILE.
440PROC COPY OT TO 09 1FILE.
450PROC COPY OT TO 10 1FILE.
460PROC COPY OT TO 11 1FILE.
490$:gmap:ndeck
500:lodm:.dmac
510:symref:.dvlri
520:symdef:open
530open:dopen:,,[*,fib,in,,.dvlri]
540begin:stz:cnt
550:eax2:inbuf
560:awdx:0,2,2
570loop:dlgxt:fib,vibot,eof,[rsz,64]
580:mlr:,(1)
590:adsc9:wksp,0,64
600:adsc9:0,0,64,2
610:awd:16,,2
620:aos:cnt
630:lda:=6
640:cmpa:cnt
650:tnz:loop
660:eax5:inbuf
670:lda:=o717717717720
680:rpt:96,1
690:asa:0,5
700:mlr
710:adsc9:inbuf,0,384
720:adsc6:otbuf,0,384
730:mme:geinos
740:sdia
750:zero:fc,dcw1
760:wdic
770:zero:fc,dcw2
780:zero:statr,0
790:mme:geroad
800* WRITE H*
810:aos:ctr
820:lda:ctr
830:sta:ptr
840:tra:begin
850eof:null
860:mme:gefini
870***************************
880*     DATA
890***************************
900dcw1:iotd:ptr,1
910ptr:zero:0,0
920fc:bci:1,0000HS
930dcw2:iotd:otbuf,64
940inbuf:bss:96
950otbuf:bss:64
960statr:dec:0,0
970ctr:dec:0
980cnt:dec:0
990mask:oct:077077077077
1000wksp:bss:16
1010vibot:bss:2
1020fib:null
1030:fibmac:in,gfrc,[nbuf,1,proar,wksp,0,medcod,6]
1040:end
1050$:execute:dump
1060$:PRMFL:IN,R,S,#1/KERMIT/#2/KERMIT.B
1070$:PRMFL:HS,W,R,#1/KERMIT/#2/KERM
1080$:endjob
