CAC 2017-01-25

HASP

F86

BISYNC
  3270
  HASP
  2780 RJE
  3780 RJE

G115  honeywell's bisync

AN85

CC75 defines CDT entries
  line types:
    ASCII
    SYNC -- no protocol
    G115 -- ASCII sync. connection, Level 6 remote computer interface
    BSC
    VIP
    POLLED_VIP
    X25LAP

  multiplexor_type:
     imb3270
     vip7760
     hasp
     sty
     x25

GB61 and AM81 mention 2780

GB60 HASP service and utility
  must configure one operator's console
  0-8 card readers
  0-8 printers+punches

name d.h010: /* the workstation itself */
  service: multiplexor;
  multiplexor_type: hasp;
  line_type: BSC;
  baud: 4800;
  terminal_type: HASP_WORKSTATION;

name d.h010.opr; /* operator's console */
  service: slave;

name d.h010.rdr1; /* reader */
  service: slave;

name d.h010.prt1; /* printer */
  service: slave;

name d.h010.pun1; /* punch */
  service: slave;

Installation Instructions
--------------------------

Add to devices.txt:

-name: d.h029;
+name: d.h029; /* HASP workstation */
+  service: multiplexer;
+  multiplexer_type: hasp;
+  line_type: BSC;
+  baud: 4800;
+  terminal_type: IBM3780_FULL;
+
+name: d.h029.opr; /* operator's console */
+  service: slave;
+
+name: d.h029.rdr1; /* reader */
+  service: slave;
+
+name: d.h029.prt1; /* printer */
+  service: slave;
+
+name: d.h029.pun1; /* punch */
+  service: slave;
+

Login as Repair

Edit the FNP configuration:
 Add bsc_tables and ibm3270_tables

cwd >udd>sa>a>mcs.7.6c
hpsa site_mcs.bind_fnp rw
qedx
r site_mcs.bind_fnp
/init;/
i
          bsc_tables,
          hasp_tables,
\f
w
q

On the console

admin
cwd >udd>sa>a>mcs.7.6c
bind_fnp site_mcs -list
hp_delete >unb>site_mcs
y
cp site_mcs >unb>site_mcs
hpsrb >unb>site_mcs 1 5 5
hpda >unb>site_mcs Initializer.SysDaemon.*
hpda >unb>site_mcs *.SysDaemon.*
hpda >unb>site_mcs *.SysAdmin.*
ame

On the Repair terminal:

cwd >udd>sa>a
qedx
i
    <paste the contents of Devices.txt>
\f
/port:/
  port: 6132;
d
//
   port: 6131;
d
w CMF.cmf
q
cv_cmf CMF.cmf
install CMF.cdt

GB60 pg 20 "You must create an ACS segment for each subchannel of the HASP
multiplex channel. Once you have done so:
  1. Give the daemon process that will attach that subchannel rw access to
     the ACS.
  2. Give the attaching process the dialok attribute in the Project Master
     File (PMF). It is recommended that the process that attaches the
     simulated operator's console not be registered on the SysDaemon
     project, since that may confer undesirable access to too much of
     the system.

pg 21:

cwd >ddd>idd

Add to iod_tables.iodt

qedx
r iod_tables.iodt
/End;/
i
Device:          rje_rdr1;
  line:          d.h029.rdr1;
  driver_module: remote_driver_;
  args:          "station= rje, slave= no,
                 desc= -terminal hasp_workstation_ -comm hasp";
  minor_device:  rdr1;
  default_type:  rje_dummy;
  minor_args:    "dev= reader";

Device:          rje_prt1;
  line:          d.h029.prt1;
  driver_module: remote_driver_;
  args:          "station= rje, slave= no,
                 desc= -terminal hasp_workstation_ -comm hasp";
  minor_device:  prt1;
  default_type:  rje_prt;
  minor_args:    "dev= printer";

Device:          rje_pun1;
  line:          d.h029.pun1;
  driver_module: remote_driver_;
  args:          "station= rje, slave= no,
                 desc= -terminal hasp_workstation_ -comm hasp";
  minor_device:  pun1;
  default_type:  rje_pun;
  minor_args:    "dev= punch";

Request_type:    rje_dummy;
  driver_userid: IO.SysDaemon;
  generic_type:  none;
  max_queues:    1;
  device:        rje_rdr1.rdr1;

Request_type:    rje_prt;
  driver_userid: IO.SysDaemon;
  generic_type:  printer;
  max_queues:    1;
  device:        rje_prt1.prt1;

Request_type:    rje_pun;
  driver_userid: IO.SysDaemon;
  generic_type:  punch;
  max_queues:    1;
  device:        rje_pun1.pun1;
\f
w
q
iod_tables_compiler iod_tables
cdq iod_tables

XXX pg 3-15 Add user HASP
XXX 
XXX cwd >udd>sa>a
XXX 
XXX new_user$nu
XXX *HASP, USER
XXX Yoyodyne
XXX 2
XXX 
XXX SysDaemon
XXX HASP
XXX HASP
XXX HASP
XXX HASP
XXX HASP
XXX y
XXX n
XXX 
XXX ec master upmf SysDaemon HASP

create >sc1>(rje_rdr rje_prt rje_pun).message
set_acl (rje_rdr rje_prt rje_pun).message rw *.SysDaemon.*

logout, shutdown

Add to your .ini:

autoinput hp_set_acl >sl1>system_privilege_ re HASP.SysDaemon\n
autoinput hp_set_acl >sss>queue_admin_ re HASP.SysDaemon\n
autoinput ame\n
autoinput define iolog log iolog\n
autoinput define iod tty otw_\n
autoinput route (rje_rdr rje_prt rje_pun) user_i/o iod\n
autoinput route (rje_rdr rje_prt rje_pun) error_i/o *iod\n
autoinput route (rje_rdr rje_prt rje_pun) log_i/o *iod\n
autoinput route (rje_rdr rje_prt rje_pun) user_i/o iolog\n
autoinput route (rje_rdr rje_prt rje_pun) error_i/o *iolog\n
autoinput route (rje_rdr rje_prt rje_pun) log_i/o *iolog\n
autoinput x io\n
autoinput admin\n
autoinput pause 10\n
autoinput ame\n

autoinput login IO.SysDaemon rje_rdr\n
autoinput admin\n
autoinput pause 10\n
autoinput ame\n
autoinput reply rje_rdr driver\n
autoinput admin\n
autoinput pause 10\n
autoinput ame\n
autoinput reply rje_rdr rje_rdr1.rdr1\n
autoinput admin\n
autoinput pause 10\n
autoinput ame\n

autoinput login IO.SysDaemon rje_pun\n
autoinput admin\n
autoinput pause 10\n
autoinput ame\n
autoinput reply rje_pun driver\n
autoinput admin\n
autoinput pause 10\n
autoinput ame\n
autoinput reply rje_pun rje_pun1.pun1\n
autoinput admin\n
autoinput pause 10\n
autoinput ame\n

autoinput login IO.SysDaemon rje_prt\n
autoinput admin\n
autoinput pause 10\n
autoinput ame\n
autoinput reply rje_prt driver\n
autoinput admin\n
autoinput pause 10\n
autoinput ame\n
autoinput reply rje_prt rje_prt1.prt1\n
autoinput admin\n
autoinput pause 10\n
autoinput ame\n

 and reboot
Unless otherwise stated, the content of this page is licensed under Creative Commons Attribution-ShareAlike 3.0 License