User Tools

Site Tools


cdc:nos2.source:nam5871:ns_main

NS$MAIN

Table Of Contents

  • [00051] NS INITIALIZATION OVERLAY
  • [00061] NS CONTROL CARD CRACKER OVERLAY
  • [00071] NS NETON OVERLAY
  • [00081] NS BUILD NODE CONNECTION TABLE OVLY
  • [00091] NS BUILD NPU TABLE OVERLAY
  • [00101] NS INITIATE NPU DUMP INDEX OVERLAY
  • [00111] NS HOST INTERFACE OVERLAY
  • [00121] NS HOP BREAK PROCESSOR OVERLAY
  • [00131] NS HOP END PROCESSOR OVERLAY
  • [00141] NS HOP CMD PREPROCESSOR OVERLAY
  • [00151] NS FILE COMMAND PROCESSOR OVERLAY
  • [00161] NS HISTORY COMMAND PROCESSOR OVERLAY
  • [00171] NS NOFILE COMMAND PROCESSOR OVERLAY
  • [00181] NS STATUS COMMAND PROCESSOR OVERLAY
  • [00191] NS K DISPLAY DIAGNOSTIC OVERLAY
  • [00201] NS HOP PAGE PROCESSOR OVERLAY
  • [00211] NS PROGRAM COMMAND PROCESSOR OVERLAY
  • [00221] NS HOP START PROCESSOR OVERLAY
  • [00231] NS K-DISPLAY MANAGER OVERLAY
  • [00241] NS NPU ABNORMAL RESPONSE PROCESSOR
  • [00251] NS ERROR PROCESSOR

Source Code

NS$MAIN.txt
  1. *DECK NS$MAIN
  2. IDENT NS
  3. COMMENT NS NETWORK SUPERVISOR
  4. OPL XTEXT COMCCMD
  5. ENTRY NS
  6. ENTRY ARG
  7. ENTRY ACT
  8. SYSCOM
  9.  
  10. LCC OVERLAY(NS,0,0,OV=24)
  11. LDSET USEP=GETTSB FORCE LOAD OF TSB MANAGER PROC-S INTO
  12. LDSET USEP=GIVETSB THE MAIN OVERLAY
  13. LDSET USEP=EXINCSZ
  14. LDSET USEP=MOVEOK
  15. LDSET USEP=MEMREQ
  16. LDSET USEP=EXREDUC
  17. LDSET USEP=RETTSB
  18. LDSET USEP=REQTSB
  19. LDSET USEP=SQUEEZE
  20. LDSET USEP=TSBINFO
  21. LDSET USEP=TSBINIT
  22. LDSET USEP=XFLMGR
  23.  
  24. EXT NS$NSI
  25. EXT NS$EXC
  26. EXT NS$RPV
  27. ARG EQU ARGR
  28. ACT EQU ACTR
  29.  
  30. NS BSS 0
  31. SB1 1
  32. REPRIEVE RPVADDR,SET,77B
  33. MESSAGE BLDMSG,0,R
  34. RJ NS$EXC
  35.  
  36. NSABT BSS 0
  37. RJ NS$RPV
  38. REPRIEVE RPVADDR,RESET,77B
  39. ENDRUN
  40.  
  41. BLDMSG DIS ,*BUILT "DATE" "TIME"*
  42. RPVADDR BSS 0
  43. VFD 36/0,12/25,12/0
  44. VFD 30/0,30/NSABT
  45. BSSZ 23
  46.  
  47. END NS
  48. IDENT NSIOVLY NS INITIALIZATION OVERLAY
  49. COMMENT NS INITIALIZATION OVERLAY (1,0)
  50. ENTRY NSIOVLY
  51. TITLE NS INITIALIZATION OVERLAY
  52. LCC OVERLAY(NS,1,0) OVERLAY LEVEL 01,00
  53. NSIOVLY BSSZ 1
  54. RJ =XNS$NSI PASS CONTROL TO INIT PROC
  55. EQ NSIOVLY
  56. END NSIOVLY
  57.  
  58. IDENT CRAOVLY NS CONTROL CARD CRACKER OVERLAY
  59. COMMENT NS CONTROL STATEMENT CRACKER OVERLAY (1,1)
  60. ENTRY CRAOVLY
  61. TITLE NS CONTROL CARD CRACKER OVERLAY
  62. LCC OVERLAY(NS,1,1) OVERLAY LEVEL 01,01
  63. CRAOVLY BSSZ 1
  64. RJ =XNS$CRA PASS CONTROL TO CONTROL CARD CRACKER
  65. EQ CRAOVLY
  66. END CRAOVLY
  67.  
  68. IDENT NONOVLY NS NETON OVERLAY
  69. COMMENT NS NETON PROCESSOR OVERLAY (1,2)
  70. ENTRY NONOVLY
  71. TITLE NS NETON OVERLAY
  72. LCC OVERLAY(NS,1,2) OVERLAY LEVEL 01,02
  73. NONOVLY BSSZ 1
  74. RJ =XNS$NON PASS NETON PROC
  75. EQ NONOVLY
  76. END NONOVLY
  77.  
  78. IDENT BNCTOVL NS BUILD NODE CONNECTION TABLE OVLY
  79. COMMENT NS BUILD NODE CONNECTION TABLE OVERLAY (1,3)
  80. ENTRY BNCTOVL
  81. TITLE NS BUILD NODE CONNECTION TABLE OVLY
  82. LCC OVERLAY(NS,1,3) OVERLAY LEVEL 01,03
  83. BNCTOVL BSSZ 1
  84. RJ =XNS$BNCT PASS CONTROL TO NCT BUILDER PROC
  85. EQ BNCTOVL
  86. END BNCTOVL
  87.  
  88. IDENT BNPTOVL NS BUILD NPU TABLE OVERLAY
  89. COMMENT NS BUILD NPU TABLE OVERLAY (1,4)
  90. ENTRY BNPTOVL
  91. TITLE NS BUILD NPU TABLE OVERLAY
  92. LCC OVERLAY(NS,1,4) OVERLAY LEVEL 01,04
  93. BNPTOVL BSSZ 1
  94. RJ =XNS$BNPT PASS CONTROL TO NCT BUILDER PROC
  95. EQ BNPTOVL
  96. END BNPTOVL
  97.  
  98. IDENT IDNOVLY NS INITIATE NPU DUMP INDEX OVERLAY
  99. COMMENT NS NPU DUMP INDEX INITIALIZER OVERLAY (1,5)
  100. ENTRY IDNOVLY
  101. TITLE NS INITIATE NPU DUMP INDEX OVERLAY
  102. LCC OVERLAY(NS,1,5) OVERLAY LEVEL 01,05
  103. IDNOVLY BSSZ 1
  104. RJ =XNS$IDN PASS CONTROL TO NPU DUMP INDEX INITIATOR
  105. EQ IDNOVLY
  106. END IDNOVLY
  107.  
  108. IDENT HSMOVLY NS HOST INTERFACE OVERLAY
  109. COMMENT NS HOST INTERFACE OVERLAY (2,0)
  110. ENTRY HSMOVLY
  111. TITLE NS HOST INTERFACE OVERLAY
  112. LCC OVERLAY(NS,2,0) OVERLAY LEVEL 02,00
  113. HSMOVLY BSSZ 1
  114. RJ =XNS$HSM PASS CONTROL TO HOP INTERFACE PROC
  115. EQ HSMOVLY
  116. END HSMOVLY
  117.  
  118. IDENT BRKOVLY NS HOP BREAK PROCESSOR OVERLAY
  119. COMMENT NS HOP BREAK PROCESSOR OVERLAY (2,1)
  120. ENTRY BRKOVLY
  121. TITLE NS HOP BREAK PROCESSOR OVERLAY
  122. LCC OVERLAY(NS,2,1) OVERLAY LEVEL 02,01
  123. BRKOVLY BSSZ 1
  124. RJ =XNS$BRK PASS CONTROL TO HOP BREAK PROCESSOR
  125. EQ BRKOVLY
  126. END BRKOVLY
  127.  
  128. IDENT ENDOVLY NS HOP END PROCESSOR OVERLAY
  129. COMMENT NS HOP END PROCESSOR OVERLAY (2,2)
  130. ENTRY ENDOVLY
  131. TITLE NS HOP END PROCESSOR OVERLAY
  132. LCC OVERLAY(NS,2,2) OVERLAY LEVEL 02,02
  133. ENDOVLY BSSZ 1
  134. RJ =XNS$END PASS CONTROL TO HOP END PROCESSOR
  135. EQ ENDOVLY
  136. END ENDOVLY
  137.  
  138. IDENT HCPOVLY NS HOP CMD PREPROCESSOR OVERLAY
  139. COMMENT NS HOP COMMAND PROCESSOR OVERLAY (2,3)
  140. ENTRY HCPOVLY
  141. TITLE NS HOP CMD PREPROCESSOR OVERLAY
  142. LCC OVERLAY(NS,2,3) OVERLAY LEVEL 02,03
  143. HCPOVLY BSSZ 1
  144. RJ =XNS$HCP PASS CONTROL TO HOP CMD PREPROCESSOR
  145. EQ HCPOVLY
  146. END HCPOVLY
  147.  
  148. IDENT HFIOVLY NS FILE COMMAND PROCESSOR OVERLAY
  149. COMMENT NS FILE COMMAND PROCESSOR OVERLAY (2,4)
  150. ENTRY HFIOVLY
  151. TITLE NS FILE COMMAND PROCESSOR OVERLAY
  152. LCC OVERLAY(NS,2,4) OVERLAY LEVEL 02,04
  153. HFIOVLY BSSZ 1
  154. RJ =XNS$HFI PASS CONTROL TO FILE COMMAND PROCESSOR
  155. EQ HFIOVLY
  156. END HFIOVLY
  157.  
  158. IDENT HHIOVLY NS HISTORY COMMAND PROCESSOR OVERLAY
  159. COMMENT NS HISTORY COMMAND PROCESSOR OVERLAY (2,5)
  160. ENTRY HHIOVLY
  161. TITLE NS HISTORY COMMAND PROCESSOR OVERLAY
  162. LCC OVERLAY(NS,2,5) OVERLAY LEVEL 02,05
  163. HHIOVLY BSSZ 1
  164. RJ =XNS$HHI PASS CONTROL TO HISTORY COMMAND PROCESSOR
  165. EQ HHIOVLY
  166. END HHIOVLY
  167.  
  168. IDENT HNOOVLY NS NOFILE COMMAND PROCESSOR OVERLAY
  169. COMMENT NS NOFILE COMMAND PROCESSOR OVERLAY (2,6)
  170. ENTRY HNOOVLY
  171. TITLE NS NOFILE COMMAND PROCESSOR OVERLAY
  172. LCC OVERLAY(NS,2,6) OVERLAY LEVEL 02,06
  173. HNOOVLY BSSZ 1
  174. RJ =XNS$HNO PASS CONTROL TO NOFILE COMMAND PROCESSOR
  175. EQ HNOOVLY
  176. END HNOOVLY
  177.  
  178. IDENT HSTOVLY NS STATUS COMMAND PROCESSOR OVERLAY
  179. COMMENT NS STATUS COMMAND PROCESSOR OVERLAY (2,7)
  180. ENTRY HSTOVLY
  181. TITLE NS STATUS COMMAND PROCESSOR OVERLAY
  182. LCC OVERLAY(NS,2,7) OVERLAY LEVEL 02,07
  183. HSTOVLY BSSZ 1
  184. RJ =XNS$HST PASS CONTROL TO STATUS COMMAND PROCESSOR
  185. EQ HSTOVLY
  186. END HSTOVLY
  187.  
  188. IDENT KDDOVLY NS K DISPLAY DIAGNOSTIC OVERLAY
  189. COMMENT NS K DISPLAY DIAGNOSTIC OVERLAY (2,8)
  190. ENTRY KDDOVLY
  191. TITLE NS K DISPLAY DIAGNOSTIC OVERLAY
  192. LCC OVERLAY(NS,2,10) OVERLAY LEVEL 02,010
  193. KDDOVLY BSSZ 1
  194. RJ =XNS$KDD PASS CONTROL TO K DISPLAY DIAGNOSTIC
  195. EQ KDDOVLY
  196. END KDDOVLY
  197.  
  198. IDENT PAGOVLY NS HOP PAGE PROCESSOR OVERLAY
  199. COMMENT NS HOP PAGE PROCESSOR OVERLAY (2,9)
  200. ENTRY PAGOVLY
  201. TITLE NS HOP PAGE PROCESSOR OVERLAY
  202. LCC OVERLAY(NS,2,11) OVERLAY LEVEL 02,011
  203. PAGOVLY BSSZ 1
  204. RJ =XNS$PAG PASS CONTROL TO HOP PAGE PROCESSOR
  205. EQ PAGOVLY
  206. END PAGOVLY
  207.  
  208. IDENT PCMOVLY NS PROGRAM COMMAND PROCESSOR OVERLAY
  209. COMMENT NS PROGRAM COMMAND PROCESSOR OVERLAY (2,10)
  210. ENTRY PCMOVLY
  211. TITLE NS PROGRAM COMMAND PROCESSOR OVERLAY
  212. LCC OVERLAY(NS,2,12) OVERLAY LEVEL 02,12
  213. PCMOVLY BSSZ 1
  214. RJ =XNS$PCM PASS CONTROL TO PROGRAM COMMAND PROCESSOR
  215. EQ PCMOVLY
  216. END PCMOVLY
  217.  
  218. IDENT STROVLY NS HOP START PROCESSOR OVERLAY
  219. COMMENT NS HOP START PROCESSOR OVERLAY (2,11)
  220. ENTRY STROVLY
  221. TITLE NS HOP START PROCESSOR OVERLAY
  222. LCC OVERLAY(NS,2,13) OVERLAY LEVEL 02,13
  223. STROVLY BSSZ 1
  224. RJ =XNS$STR PASS CONTROL TO HOP START PROCESSOR
  225. EQ STROVLY
  226. END STROVLY
  227.  
  228. IDENT MKDOVLY NS K-DISPLAY MANAGER OVERLAY
  229. COMMENT NS K DISPLAY MANAGER OVERLAY (3,0)
  230. ENTRY MKDOVLY
  231. TITLE NS K-DISPLAY MANAGER OVERLAY
  232. LCC OVERLAY(NS,3,0) OVERLAY LEVEL 03,00
  233. MKDOVLY BSSZ 1
  234. RJ =XNS$MKD PASS CONTROL TO K DISPLAY MANAGER
  235. EQ MKDOVLY
  236. END MKDOVLY
  237.  
  238. IDENT DAROVLY NS NPU ABNORMAL RESPONSE PROCESSOR
  239. COMMENT NS NPU ABNORMAL RESP PROCESSOR OVERLAY (4,0)
  240. ENTRY DAROVLY
  241. TITLE NS NPU ABNORMAL RESPONSE PROCESSOR
  242. LCC OVERLAY(NS,4,0) OVERLAY LEVEL 04,00
  243. DAROVLY BSSZ 1
  244. RJ =XNS$DAR PASS CONTROL TO NPU/DT/A PROCESSOR
  245. EQ DAROVLY
  246. END DAROVLY
  247.  
  248. IDENT ERROVLY NS ERROR PROCESSOR
  249. COMMENT NS ERROR PROCESSOR (5,0)
  250. ENTRY ERROVLY
  251. TITLE NS ERROR PROCESSOR
  252. LCC OVERLAY(NS,5,0) OVERLAY LEVEL 05,00
  253. ERROVLY BSSZ 1
  254. RJ =XNS$ERR PASS CONTROL TO ERROR PROCESSOR
  255. EQ ERROVLY
  256. END ERROVLY
  257. IDENT N00OVLY NS LOAD REQUEST PROCESSOR
  258. COMMENT NS LOAD REQUEST PROCESSOR OVERLAY
  259. ENTRY N00OVLY
  260. LCC OVERLAY(NS,6,0) OVERLAY LEVEL 06,00
  261. N00OVLY BSSZ 1
  262. RJ =XNS$N00 PASS CONTROL TO LOAD REQUEST PROC
  263. EQ N00OVLY
  264. END N00OVLY
  265. IDENT N04OVLY NS NDCB RESPONSE PROCESSOR
  266. COMMENT NS NDCB RESPONSE PROCESSOR OVERLAY
  267. ENTRY N04OVLY
  268. LCC OVERLAY(NS,7,0) OVERLAY LEVEL 07,00
  269. N04OVLY BSSZ 1
  270. RJ =XNS$N04 PASS CONTROL TO NDCB RESPONSE PROC
  271. EQ N04OVLY
  272. END N04OVLY
cdc/nos2.source/nam5871/ns_main.txt ยท Last modified: 2023/08/05 17:22 by Site Administrator