home *** CD-ROM | disk | FTP | other *** search
/ NetNews Usenet Archive 1993 #1 / NN_1993_1.iso / spool / vmsnet / sources / 490 < prev    next >
Encoding:
Internet Message Format  |  1993-01-11  |  46.2 KB
  1. Path: sparky!uunet!spool.mu.edu!howland.reston.ans.net!usc!news.service.uci.edu!unogate!mvb.saic.com!vmsnet-sources
  2. From: jhwelch@ecs.umass.edu
  3. Newsgroups: vmsnet.sources
  4. Subject: Show quota usage by another process, part 06/06
  5. Message-ID: <10032747@MVB.SAIC.COM>
  6. Date: Mon, 11 Jan 1993 11:41:13 GMT
  7. Lines: 906
  8. Approved: Mark.Berryman@Mvb.Saic.Com
  9.  
  10. Submitted-by: jhwelch@ecs.umass.edu
  11. Posting-number: Volume 4, Issue 44
  12. Archive-name: show_quota/part06
  13.  
  14. -+-+-+-+-+-+-+-+ START OF PART 6 -+-+-+-+-+-+-+-+
  15. V`20`20`20`09`20`20`20`20`09FF7C`20`20`20C6`09`20`20`20`20`2050`20`20D0`20`20
  16. V`20007D1
  17. X`09SUBW2`20`20`20#3,`20(R6)`09`09`09`20;#3,`20OUTBUF_DSC`09`09`20`20`20`20`20
  18. V`20`200724`20`09`20`20`20`20`20`20`2066`09`20`20`20`20`2003`20`20A2`20`20`2000
  19. V7D6
  20. X`09MOVL`20`20`20`20#62,`208(SP)`09`09`09`20;#62,`208(SP)`09`09`09`20`20`20`20
  21. V`20`20`200725`20`09`20`2008`20`20`20AE`09`20`20`20`20`203E`20`20D0`20`20`20007
  22. VD9
  23. X`09PUSHAB`20`208(SP)`09`09`09`09`20;8(SP)`09`09`09`09`20`20`20`20`20`20`09`20
  24. V`20`20`20`09`09`0908`20`20`20AE`20`209F`20`20`20007DD
  25. X`09MOVL`20`20`20`20#14,`208(SP)`09`09`09`20;#14,`208(SP)`09`09`09`20`20`20`20
  26. V`20`20`09`20`20`20`20`09`20`2008`20`20`20AE`09`20`20`20`20`200E`20`20D0`20`20
  27. V`20007E0
  28. X`09PUSHAB`20`208(SP)`09`09`09`09`20;8(SP)`09`09`09`09`20`20`20`20`20`20`09`20
  29. V`20`20`20`09`09`0908`20`20`20AE`20`209F`20`20`20007E4
  30. X`09PUSHL`20`20`20R6`09`09`09`09`20;R6`09`09`09`09`20`20`20`20`20`20`09`20`20
  31. V`20`20`09`09`09`20`20`20`20`2056`20`20DD`20`20`20007E7
  32. X`09PUSHAB`20`20-128(R6)`09`09`09`20;DISPLAY1`09`09`09`20`20`20`20`20`20`09`20
  33. V`20`20`20`09`09`0980`20`20`20A6`20`209F`20`20`20007E9
  34. X`09CALLS`20`20`20#4,`20(R7)`09`09`09`20;#4,`20SMG$PUT_CHARS`09`09`20`20`20`20
  35. V`20`20`09`20`20`20`20`09`20`20`20`20`20`20`2067`09`20`20`20`20`2004`20`20FB
  36. V`20`20`20007EC
  37. X`09MOVL`20`20`20`20#1,`208(SP)`09`09`09`20;#1,`208(SP)`09`09`09`20`20`20`20
  38. V`20`20`200730`20`09`20`2008`20`20`20AE`09`20`20`20`20`2001`20`20D0`20`20`20007
  39. VEF
  40. X`09PUSHAB`20`208(SP)`09`09`09`09`20;8(SP)`09`09`09`09`20`20`20`20`20`20`09`20
  41. V`20`20`20`09`09`0908`20`20`20AE`20`209F`20`20`20007F3
  42. X`09MOVL`20`20`20`20#24,`208(SP)`09`09`09`20;#24,`208(SP)`09`09`09`20`20`20`20
  43. V`20`20`09`20`20`20`20`09`20`2008`20`20`20AE`09`20`20`20`20`2018`20`20D0`20`20
  44. V`20007F6
  45. X`09PUSHAB`20`208(SP)`09`09`09`09`20;8(SP)`09`09`09`09`20`20`20`20`20`20`09`20
  46. V`20`20`20`09`09`0908`20`20`20AE`20`209F`20`20`20007FA
  47. X`09PUSHAB`20`20-128(R6)`09`09`09`20;DISPLAY1`09`09`09`20`20`20`20`20`20`09`20
  48. V`20`20`20`09`09`0980`20`20`20A6`20`209F`20`20`20007FD
  49. X`09CALLS`20`20`20#3,`20G`5ESMG$SET_CURSOR_ABS`09`20;#3,`20SMG$SET_CURSOR_ABS
  50. V`09`20`20`20`20`20`20`09`20`20`20`2000000000G`20`2000`09`20`20`20`20`2003`20
  51. V`20FB`20`20`2000800
  52. X`09MOVL`20`20`20`20#1,`20R0`09`09`09`09`20;#1,`20R0`09`09`09`20`20`20`20`20
  53. V`20`200731`20`09`20`20`20`20`20`20`2050`09`20`20`20`20`2001`20`20D0`20`20`2000
  54. V807
  55. X`09RET`20`20`20`20`20`09`09`09`09`20;`09`09`09`09`20`20`20`20`20`20`09`20`20
  56. V`20`20`09`09`09`09`2004`20`20`200080A
  57. X
  58. X;`20Routine`20Size:`20`202059`20bytes,`20`20`20`20Routine`20Base:`20`20$CODE$
  59. V`20+`2004FD
  60. X
  61. X
  62. X;`20`20`200733`20`201`09
  63. X;`20`20`200734`20`201`09ROUTINE`20TRANSLATE_VALUE(VALUE,TABLE)`20=
  64. X;`20`20`200735`20`201`09!
  65. X;`20`20`200736`20`201`09!`20This`20routine`20returns`20the`20address`20of`20a
  66. V`20counted`20string
  67. X;`20`20`200737`20`201`09!`20describing`20a`20given`20value.
  68. X;`20`20`200738`20`201`09!
  69. X;`20`20`200739`20`201`09!`20Inputs:
  70. X;`20`20`200740`20`201`09!
  71. X;`20`20`200741`20`201`09!`20`20`20value`20=`20The`20value`20to`20be`20translat
  72. Ved
  73. X;`20`20`200742`20`201`09!`20`20`20table`20=`20Address`20of`20the`20table`20whi
  74. Vch`20describes`20the`20values:
  75. X;`20`20`200743`20`201`09!
  76. X;`20`20`200744`20`201`09!`09`20`20`20`20cstring-addr,`20`20`20value
  77. X;`20`20`200745`20`201`09!`09`09.`09`20`20`20`20`20`20.
  78. X;`20`20`200746`20`201`09!`09`09.`09`20`20`20`20`20`20.
  79. X;`20`20`200747`20`201`09!`09`09`20`20`20`20-1,`09`20`20`20`20`20`20`20-1
  80. X;`20`20`200748`20`201`09!`20Outputs:
  81. X;`20`20`200749`20`201`09!
  82. X;`20`20`200750`20`201`09!`20`20`20The`20value`20of`20the`20routine`20is`20the
  83. V`20address`20of`20the`20counted
  84. X;`20`20`200751`20`201`09!`20`20`20ascii`20string.`20`20IF`20the`20search`20fai
  85. Vls,`20a`20pointer`20to`20the
  86. X;`20`20`200752`20`201`09!`20`20`20string`20"<NONE>"`20is`20returned
  87. X;`20`20`200753`20`201`09!
  88. X;`20`20`200754`20`201`09!
  89. X;`20`20`200755`20`202`09BEGIN
  90. X;`20`20`200756`20`202`09`20`20`20`20MAP
  91. X;`20`20`200757`20`202`09`20`20`20`20`20`20`20`20TABLE`20:`20REF`20VECTOR`20
  92. V`5B,LONG`5D;
  93. X;`20`20`200758`20`202`09
  94. X;`20`20`200759`20`202`09`20`20`20`20INCR`20ENTRY`20FROM`200`20BY`201`20DO
  95. X;`20`20`200760`20`202`09`09SELECT`20.TABLE`20`5B.ENTRY*2`5D`20OF
  96. X;`20`20`200761`20`202`09`09`20`20`20`20SET
  97. X;`20`20`200762`20`202`09`09`09`5B-1`5D`09:`20RETURN`20CSTRING('<NONE>');
  98. X;`20`20`200763`20`202`09`09`09`5B.VALUE`5D:`20RETURN`20.TABLE`5B.ENTRY*2+1`5D;
  99. V
  100. X;`20`20`200764`20`202`09`09`20`20`20`20TES
  101. X;`20`20`200765`20`201`09`20`20`20`20END;
  102. X
  103. X
  104. X
  105. X`09.PSECT`20`20$PLIT$,NOWRT,NOEXE,2
  106. X
  107. XP.AFM:`09.BYTE`20`20`206`09`09`09`09`20;`09`09`09`09`20`20`20`20`20`20`09`20
  108. V`20`20`20`09`09`09`09`20`2006`20`2000578
  109. X`09.ASCII`20`20\<NONE>\`09`09`09`20;`09`09`09`09`20`20`20`20`20`20`09`20`20
  110. V`20`20`09`20`20`20`20`20`203E`20`2045`20`204E`20`204F`20`204E`20`203C`20`20005
  111. V79
  112. X
  113. X
  114. X
  115. X`09.PSECT`20`20$CODE$,NOWRT,2
  116. X
  117. X;TRANSLATE_VALUE
  118. XU.5:`09.WORD`20`20`20`5EM<R2,R3>`09`09`09`20;Save`20R2,R3`09`09`09`20`20`20
  119. V`20`20`20`200734`20`09`09`09`20`20`20`20`20`20`20000C`20`20`2000000
  120. X`09CLRL`20`20`20`20R0`09`09`09`09`20;ENTRY`09`09`09`09`20`20`20`20`20`20`20075
  121. V9`20`09`09`09`20`20`20`20`2050`20`20D4`20`20`2000002
  122. X1$:`09ASHL`20`20`20`20#1,`20R0,`20R1`09`09`09`20;#1,`20ENTRY,`20R1`09`09`09
  123. V`20`20`20`20`20`20`200760`20`09`20`20`20`20`20`20`2050`09`20`20`20`20`2001`20
  124. V`2078`20`20`2000004
  125. X`09`09`09`09`09`09`20;`09`09`09`09`09`20`20`20`20`09`09`09`20`20`20`20`2051
  126. V`20`20`20`20`20`20`2000007
  127. X`09MOVL`20`20`20`20@8(AP)`5BR1`5D,`20R3`09`09`09`20;@TABLE`5BR1`5D,`20R3`09
  128. V`09`20`20`20`20`20`20`09`20`20`20`20`09`20`20`20`20`20`20`2053`0908`20BC41`20
  129. V`20D0`20`20`2000008
  130. X`09CMPL`20`20`20`20R3,`20#-1`09`09`09`09`20;R3,`20#-1`09`09`09`20`20`20`20`20
  131. V`20`200762`20FFFFFFFF`20`20`208F`09`20`20`20`20`2053`20`20D1`20`20`200000D
  132. X`09BNEQ`20`20`20`202$`09`09`09`09`20;2$`09`09`09`09`20`20`20`20`20`20`09`20
  133. V`20`20`20`09`09`09`20`20`20`20`2009`20`2012`20`20`2000014
  134. X`09MOVAB`20`20`20W`5EP.AFM,`20R2`09`09`09`20;P.AFM,`20R2`09`09`09`20`20`20`20
  135. V`20`20`09`20`20`20`20`09`20`20`20`20`20`20`2052`20`20`20`20`200000'`20`20CF
  136. V`20`209E`20`20`2000016
  137. X`09MOVL`20`20`20`20R2,`20R0`09`09`09`09`20;R2,`20R0`09`09`09`20`20`20`20`20
  138. V`20`09`20`20`20`20`09`20`20`20`20`20`20`2050`09`20`20`20`20`2052`20`20D0`20
  139. V`20`200001B
  140. X`09RET`20`20`20`20`20`09`09`09`09`20;`09`09`09`09`20`20`20`20`20`20`09`20`20
  141. V`20`20`09`09`09`09`2004`20`20`200001E
  142. X2$:`09CMPL`20`20`20`20R3,`204(AP)`09`09`09`20;R3,`20VALUE`09`09`09`20`20`20
  143. V`20`20`20`200763`20`09`20`2004`20`20`20AC`09`20`20`20`20`2053`20`20D1`20`20
  144. V`200001F
  145. X`09BNEQ`20`20`20`203$`09`09`09`09`20;3$`09`09`09`09`20`20`20`20`20`20`09`20
  146. V`20`20`20`09`09`09`20`20`20`20`200A`20`2012`20`20`2000023
  147. X`09MOVAL`20`20`20@8(AP)`5BR1`5D,`20R1`09`09`09`20;@TABLE`5BR1`5D,`20R1`09`09
  148. V`20`20`20`20`20`20`09`20`20`20`20`09`20`20`20`20`20`20`2051`0908`20BC41`20`20D
  149. VE`20`20`2000025
  150. X`09MOVL`20`20`20`204(R1),`20R0`09`09`09`20;4(R1),`20R0`09`09`09`20`20`20`20
  151. V`20`20`09`20`20`20`20`09`20`20`20`20`20`20`2050`0904`20`20`20A1`20`20D0`20`20
  152. V`200002A
  153. X`09RET`20`20`20`20`20`09`09`09`09`20;`09`09`09`09`20`20`20`20`20`20`09`20`20
  154. V`20`20`09`09`09`09`2004`20`20`200002E
  155. X3$:`09AOBLEQ`20`20#2147483647,`20R0,`201$`09`09`20;#2147483647,`20ENTRY,`201$
  156. V`09`20`20`20`20`20`20`200759`20`09`20`20`20`20`20`20`2050`207FFFFFFF`20`20`208
  157. VF`20`20F3`20`20`200002F
  158. X`09`09`09`09`09`09`20;`09`09`09`09`09`20`20`20`20`09`09`09`20`20`20`20`20CD
  159. V`20`20`20`20`20`20`2000036
  160. X`09MNEGL`20`20`20#1,`20R0`09`09`09`09`20;#1,`20R0`09`09`09`20`20`20`20`20`20
  161. V`200765`20`09`20`20`20`20`20`20`2050`09`20`20`20`20`2001`20`20CE`20`20`2000037
  162. V
  163. X`09RET`20`20`20`20`20`09`09`09`09`20;`09`09`09`09`20`20`20`20`20`20`09`20`20
  164. V`20`20`09`09`09`09`2004`20`20`200003A
  165. X
  166. X;`20Routine`20Size:`20`2059`20bytes,`20`20`20`20Routine`20Base:`20`20$CODE$
  167. V`20+`200D08
  168. X
  169. X
  170. X;`20`20`200766`20`201`09
  171. X;`20`20`200767`20`201`09%SBTTL`20'EXIT_HANDLER'
  172. X;`20`20`200768`20`201`09!+
  173. X;`20`20`200769`20`201`09!`20If`20an`20update`20was`20in`20progress,`20re-posit
  174. Vion`20the`20cursor
  175. X;`20`20`200770`20`201`09!`20and`20finish`20the`20screen`20update`20before`20ex
  176. Viting.
  177. X;`20`20`200771`20`201`09!-
  178. X;`20`20`200772`20`201`09ROUTINE`20EXIT_HANDLER`20=`20
  179. X;`20`20`200773`20`202`09`20`20`20`20BEGIN
  180. X;`20`20`200774`20`202`09`20`20`20`20IF`20.UPDATE_FLAG`20THEN
  181. X;`20`20`200775`20`203`09`09BEGIN
  182. X;`20`20`200776`20`203`09`09SMG$SET_CURSOR_ABS(DISPLAY1,%REF(24),%REF(1));
  183. X;`20`20`200777`20`203`09`09SMG$END_DISPLAY_UPDATE(DISPLAY1);
  184. X;`20`20`200778`20`202`09`09END;
  185. X;`20`20`200779`20`202`09`20`20`20`20RETURN`20.EXIT_STATUS;
  186. X;`20`20`200780`20`201`09`20`20`20`20END;
  187. X
  188. X
  189. X
  190. X
  191. X
  192. X;EXIT_HANDLER
  193. XU.1:`09.WORD`20`20`20`5EM<>`09`09`09`09`20;Save`20nothing`09`09`09`20`20`20
  194. V`20`20`20`200772`20`09`09`09`20`20`20`20`20`20`200000`20`20`2000000
  195. X`09SUBL2`20`20`20#8,`20SP`09`09`09`09`20;#8,`20SP`09`09`09`20`20`20`20`20`20
  196. V`09`20`20`20`20`09`20`20`20`20`20`20`205E`09`20`20`20`20`2008`20`20C2`20`20
  197. V`2000002
  198. X`09BLBC`20`20`20`20W`5EU.25,`201$`09`09`09`20;U.25,`201$`09`09`09`20`20`20`20
  199. V`20`20`200774`20`09`20`20`20`20`20`20`2024`20`20`20`20`200000'`20`20CF`20`20E9
  200. V`20`20`2000005
  201. X`09MOVL`20`20`20`20#1,`204(SP)`09`09`09`20;#1,`204(SP)`09`09`09`20`20`20`20
  202. V`20`20`200776`20`09`20`2004`20`20`20AE`09`20`20`20`20`2001`20`20D0`20`20`20000
  203. V0A
  204. X`09PUSHAB`20`204(SP)`09`09`09`09`20;4(SP)`09`09`09`09`20`20`20`20`20`20`09`20
  205. V`20`20`20`09`09`0904`20`20`20AE`20`209F`20`20`200000E
  206. X`09MOVL`20`20`20`20#24,`204(SP)`09`09`09`20;#24,`204(SP)`09`09`09`20`20`20`20
  207. V`20`20`09`20`20`20`20`09`20`2004`20`20`20AE`09`20`20`20`20`2018`20`20D0`20`20
  208. V`2000011
  209. X`09PUSHAB`20`204(SP)`09`09`09`09`20;4(SP)`09`09`09`09`20`20`20`20`20`20`09`20
  210. V`20`20`20`09`09`0904`20`20`20AE`20`209F`20`20`2000015
  211. X`09PUSHAB`20`20W`5EU.12`09`09`09`09`20;U.12`09`09`09`09`20`20`20`20`20`20`09
  212. V`20`20`20`20`09`09`20`20`20`20`20`200000'`20`20CF`20`209F`20`20`2000018
  213. X`09CALLS`20`20`20#3,`20G`5ESMG$SET_CURSOR_ABS`09`20;#3,`20SMG$SET_CURSOR_ABS
  214. V`09`20`20`20`20`20`20`09`20`20`20`2000000000G`20`2000`09`20`20`20`20`2003`20
  215. V`20FB`20`20`200001C
  216. X`09PUSHAB`20`20W`5EU.12`09`09`09`09`20;U.12`09`09`09`09`20`20`20`20`20`20`2007
  217. V77`20`09`09`20`20`20`20`20`200000'`20`20CF`20`209F`20`20`2000023
  218. X`09CALLS`20`20`20#1,`20G`5ESMG$END_DISPLAY_UPDATE`09`20;#1,`20SMG$END_DISPLAY_
  219. VUPDATE`09`20`20`20`20`20`20`09`20`20`20`2000000000G`20`2000`09`20`20`20`20`200
  220. V1`20`20FB`20`20`2000027
  221. X1$:`09MOVL`20`20`20`20W`5EU.23,`20R0`09`09`09`20;U.23,`20R0`09`09`09`20`20`20
  222. V`20`20`20`200779`20`09`20`20`20`20`20`20`2050`20`20`20`20`200000'`20`20CF`20
  223. V`20D0`20`20`200002E
  224. X`09RET`20`20`20`20`20`09`09`09`09`20;`09`09`09`09`20`20`20`20`20`20`09`20`20
  225. V`20`20`09`09`09`09`2004`20`20`2000033
  226. X
  227. X;`20Routine`20Size:`20`2052`20bytes,`20`20`20`20Routine`20Base:`20`20$CODE$
  228. V`20+`200D43
  229. X
  230. X
  231. X;`20`20`200781`20`201`09
  232. X;`20`20`200782`20`201`09ROUTINE`20UNSOLICITED_INPUT`20=
  233. X;`20`20`200783`20`202`09`20`20`20`20BEGIN
  234. X;`20`20`200784`20`202`09`20`20`20`20LOCAL
  235. X;`20`20`200785`20`202`09`09KEYSTROKE`20:`20WORD;
  236. X;`20`20`200786`20`202`09
  237. X;`20`20`200787`20`202`09`20`20`20`20SMG$READ_KEYSTROKE(KEYBOARD1,KEYSTROKE);
  238. X;`20`20`200788`20`202`09`20`20`20`20SELECT`20.KEYSTROKE`20OF
  239. X;`20`20`200789`20`202`09`09SET
  240. X;`20`20`200790`20`202`09`09`5BSMG$K_TRM_CTRLZ`5D:`20`20$EXIT(CODE=SS$_NORMAL);
  241. V
  242. X;`20`20`200791`20`202`09`09`5BSMG$K_TRM_CTRLW`5D:`20`20SMG$REPAINT_SCREEN(PAST
  243. VE1);
  244. X;`20`20`200792`20`202`09`09TES;
  245. X;`20`20`200793`20`202`09`20`20`20`20RETURN`20SS$_NORMAL
  246. X;`20`20`200794`20`201`09`20`20`20`20END;
  247. X
  248. X
  249. X
  250. X`09.EXTRN`20`20SYS$EXIT
  251. X
  252. X;UNSOLICITED_INPUT
  253. XU.2:`09.WORD`20`20`20`5EM<R2>`09`09`09`09`20;Save`20R2`09`09`09`20`20`20`20
  254. V`20`20`200782`20`09`09`09`20`20`20`20`20`20`200004`20`20`2000000
  255. X`09SUBL2`20`20`20#4,`20SP`09`09`09`09`20;#4,`20SP`09`09`09`20`20`20`20`20`20
  256. V`09`20`20`20`20`09`20`20`20`20`20`20`205E`09`20`20`20`20`2004`20`20C2`20`20
  257. V`2000002
  258. X`09PUSHL`20`20`20SP`09`09`09`09`20;SP`09`09`09`09`20`20`20`20`20`20`200787`20
  259. V`09`09`09`20`20`20`20`205E`20`20DD`20`20`2000005
  260. X`09PUSHAB`20`20W`5EU.14`09`09`09`09`20;U.14`09`09`09`09`20`20`20`20`20`20`09
  261. V`20`20`20`20`09`09`20`20`20`20`20`200000'`20`20CF`20`209F`20`20`2000007
  262. X`09CALLS`20`20`20#2,`20G`5ESMG$READ_KEYSTROKE`09`20;#2,`20SMG$READ_KEYSTROKE
  263. V`09`20`20`20`20`20`20`09`20`20`20`2000000000G`20`2000`09`20`20`20`20`2002`20
  264. V`20FB`20`20`200000B
  265. X`09MOVZWL`20`20(SP),`20R2`09`09`09`20;KEYSTROKE,`20R2`09`09`09`20`20`20`20`20
  266. V`20`200788`20`09`20`20`20`20`20`20`2052`09`20`20`20`20`206E`20`203C`20`20`2000
  267. V012
  268. X`09CMPW`20`20`20`20R2,`20#26`09`09`09`09`20;R2,`20#26`09`09`09`20`20`20`20`20
  269. V`20`200790`20`09`20`20`20`20`20`20`201A`09`20`20`20`20`2052`20`20B1`20`20`2000
  270. V015
  271. X`09BNEQ`20`20`20`201$`09`09`09`09`20;1$`09`09`09`09`20`20`20`20`20`20`09`20
  272. V`20`20`20`09`09`09`20`20`20`20`2009`20`2012`20`20`2000018
  273. X`09PUSHL`20`20`20#1`09`09`09`09`20;#1`09`09`09`09`20`20`20`20`20`20`09`20`20
  274. V`20`20`09`09`09`20`20`20`20`2001`20`20DD`20`20`200001A
  275. X`09CALLS`20`20`20#1,`20G`5ESYS$EXIT`09`09`09`20;#1,`20SYS$EXIT`09`09`09`20`20
  276. V`20`20`20`20`09`20`20`20`2000000000G`20`2000`09`20`20`20`20`2001`20`20FB`20
  277. V`20`200001C
  278. X1$:`09CMPW`20`20`20`20R2,`20#23`09`09`09`09`20;R2,`20#23`09`09`09`20`20`20`20
  279. V`20`20`200791`20`09`20`20`20`20`20`20`2017`09`20`20`20`20`2052`20`20B1`20`20
  280. V`2000023
  281. X`09BNEQ`20`20`20`202$`09`09`09`09`20;2$`09`09`09`09`20`20`20`20`20`20`09`20
  282. V`20`20`20`09`09`09`20`20`20`20`200B`20`2012`20`20`2000026
  283. X`09PUSHAB`20`20W`5EU.13`09`09`09`09`20;U.13`09`09`09`09`20`20`20`20`20`20`09
  284. V`20`20`20`20`09`09`20`20`20`20`20`200000'`20`20CF`20`209F`20`20`2000028
  285. X`09CALLS`20`20`20#1,`20G`5ESMG$REPAINT_SCREEN`09`20;#1,`20SMG$REPAINT_SCREEN
  286. V`09`20`20`20`20`20`20`09`20`20`20`2000000000G`20`2000`09`20`20`20`20`2001`20
  287. V`20FB`20`20`200002C
  288. X2$:`09MOVL`20`20`20`20#1,`20R0`09`09`09`09`20;#1,`20R0`09`09`09`20`20`20`20
  289. V`20`20`200793`20`09`20`20`20`20`20`20`2050`09`20`20`20`20`2001`20`20D0`20`20
  290. V`2000033
  291. X`09RET`20`20`20`20`20`09`09`09`09`20;`09`09`09`09`20`20`20`20`20`20`09`20`20
  292. V`20`20`09`09`09`09`2004`20`20`2000036
  293. X
  294. X;`20Routine`20Size:`20`2055`20bytes,`20`20`20`20Routine`20Base:`20`20$CODE$
  295. V`20+`200D77
  296. X
  297. X
  298. X;`20`20`200795`20`201`09
  299. X;`20`20`200796`20`201`09
  300. X;`20`20`200797`20`201`09ROUTINE`20GET_VALUES(PID,PROCESS_NAME`20:`20REF`20$BBL
  301. VOCK`20)`20=
  302. X;`20`20`200798`20`202`09`20`20`20`20BEGIN
  303. X;`20`20`200799`20`202`09`20`20`20`20BUILTIN`20AP;
  304. X;`20`20`200800`20`202`09`20`20`20`20LOCAL
  305. X;`20`20`200801`20`202`09`09STATUS;
  306. X;`20`20`200802`20`202`09`20`20`20`20!+
  307. X;`20`20`200803`20`202`09`20`20`20`20!`20The`20call`20to`20kernel`20mode`20just
  308. V`20passes`20on`20the`20argument`20list
  309. X;`20`20`200804`20`202`09`20`20`20`20!`20as`20it`20was`20sent`20to`20us.
  310. X;`20`20`200805`20`202`09`20`20`20`20!-
  311. X;`20`20`200806`20`202`09`20`20`20`20STATUS`20=`20$CMKRNL(ROUTIN=GET_KERNEL_MOD
  312. VE,ARGLST=.AP);
  313. X;`20`20`200807`20`202`09
  314. X;`20`20`200808`20`202`09`20`20`20`20IF`20.STATUS`20THEN
  315. X;`20`20`200809`20`203`09`09BEGIN
  316. X;`20`20`200810`20`203`09`09!+
  317. X;`20`20`200811`20`203`09`09!`20Re-calculate`20all`20the`20process`20minimums
  318. X;`20`20`200812`20`203`09`09!-
  319. X;`20`20`200813`20`203`09`09MIN_ASTCNT`20=`20MINU(.MIN_ASTCNT,.ASTCNT);
  320. X;`20`20`200814`20`203`09`09MIN_BIOCNT`20=`20MINU(.MIN_BIOCNT,.BIOCNT);
  321. X;`20`20`200815`20`203`09`09MIN_BYTCNT`20=`20MINU(.MIN_BYTCNT,.BYTCNT);
  322. X;`20`20`200816`20`203`09`09MIN_DIOCNT`20=`20MINU(.MIN_DIOCNT,.DIOCNT);
  323. X;`20`20`200817`20`203`09`09MIN_ENQCNT`20=`20MINU(.MIN_ENQCNT,.ENQCNT);
  324. X;`20`20`200818`20`203`09`09MIN_FILCNT`20=`20MINU(.MIN_FILCNT,.FILCNT);
  325. X;`20`20`200819`20`203`09`09MIN_PAGFILCNT`20=`20MINU(.MIN_PAGFILCNT,.PAGFILCNT)
  326. V;
  327. X;`20`20`200820`20`203`09`09MAX_PRCCNT`20=`20MAXU(.MAX_PRCCNT,.PRCCNT);
  328. X;`20`20`200821`20`203`09`09MIN_TQCNT`20`20=`20MINU(.MIN_TQCNT,.TQCNT);
  329. X;`20`20`200822`20`203`09`09!+
  330. X;`20`20`200823`20`203`09`09!`20Every`205th`20time`20thru`20this`20loop,`20kick
  331. V`20off`20the`20GETJPIW
  332. X;`20`20`200824`20`203`09`09!`20to`20get`20the`20image`20name`20of`20the`20targ
  333. Vet`20process
  334. X;`20`20`200825`20`203`09`09!-
  335. X;`20`20`200826`20`203`09`09COUNT`20=`20.COUNT`20+`201;
  336. X;`20`20`200827`20`203`09`09IF`20.COUNT`20GEQ`205`20THEN
  337. X;`20`20`200828`20`204`09`09`20`20`20`20BEGIN
  338. X;`20`20`200829`20`204`09`09`20`20`20`20LOCAL
  339. X;`20`20`200830`20`204`09`09`09ITEM_LIST`20:`20$ITMLST_DECL(ITEMS=1);
  340. X;`20P`200831`20`204`09`09`20`20`20`20$ITMLST_INIT(ITMLST=ITEM_LIST,
  341. X;`20P`200832`20`204`09`09`20`20`20`20(ITMCOD`20=`20JPI$_IMAGNAME,
  342. X;`20P`200833`20`204`09`09`20`20`20`20`20BUFADR`20=`20IMAGNAME,
  343. X;`20P`200834`20`204`09`09`20`20`20`20`20BUFSIZ`20=`20%ALLOCATION(IMAGNAME),
  344. X;`20`20`200835`20`204`09`09`20`20`20`20`20RETLEN`20=`20IMAGNAME_DSC`5BDSC$W_LE
  345. VNGTH`5D));
  346. X;`20`20`200836`20`204`09`09`20`20`20`20$GETJPIW(PIDADR`20=`20EPID,`20ITMLST
  347. V`20=`20ITEM_LIST);
  348. X;`20`20`200837`20`204`09`09`20`20`20`20COUNT`20=`200;
  349. X;`20`20`200838`20`203`09`09`20`20`20`20END;
  350. X;`20`20`200839`20`202`09`09END;
  351. X;`20`20`200840`20`202`09
  352. X;`20`20`200841`20`202`09`20`20`20`20.STATUS
  353. X;`20`20`200842`20`201`09`20`20`20`20END;
  354. X
  355. X
  356. X
  357. X`09.EXTRN`20`20SYS$CMKRNL
  358. X
  359. X;GET_VALUES
  360. XU.6:`09.WORD`20`20`20`5EM<R2,R3>`09`09`09`20;Save`20R2,R3`09`09`09`20`20`20
  361. V`20`20`20`200797`20`09`09`09`20`20`20`20`20`20`20000C`20`20`2000000
  362. X`09MOVAB`20`20`20W`5EU.15,`20R3`09`09`09`20;U.15,`20R3`09`09`09`20`20`20`20
  363. V`20`20`09`20`20`20`20`09`20`20`20`20`20`20`2053`20`20`20`20`200000'`20`20CF
  364. V`20`209E`20`20`2000002
  365. X`09SUBL2`20`20`20#16,`20SP`09`09`09`09`20;#16,`20SP`09`09`09`20`20`20`20`20
  366. V`20`09`20`20`20`20`09`20`20`20`20`20`20`205E`09`20`20`20`20`2010`20`20C2`20
  367. V`20`2000007
  368. X`09PUSHL`20`20`20AP`09`09`09`09`20;AP`09`09`09`09`20`20`20`20`20`20`200806`20
  369. V`09`09`09`20`20`20`20`205C`20`20DD`20`20`200000A
  370. X`09PUSHAB`20`20W`5EU.7`09`09`09`09`20;U.7`09`09`09`09`20`20`20`20`20`20`09`20
  371. V`20`20`20`09`09`20`20`20`20`20`200000V`20`20CF`20`209F`20`20`200000C
  372. X`09CALLS`20`20`20#2,`20G`5ESYS$CMKRNL`09`09`20;#2,`20SYS$CMKRNL`09`09`20`20
  373. V`20`20`20`20`09`20`20`20`2000000000G`20`2000`09`20`20`20`20`2002`20`20FB`20
  374. V`20`2000010
  375. X`09MOVL`20`20`20`20R0,`20R2`09`09`09`09`20;R0,`20STATUS`09`09`09`20`20`20`20
  376. V`20`20`09`20`20`20`20`09`20`20`20`20`20`20`2052`09`20`20`20`20`2050`20`20D0
  377. V`20`20`2000017
  378. X`09BLBS`20`20`20`20R2,`201$`09`09`09`09`20;STATUS,`201$`09`09`09`20`20`20`20
  379. V`20`20`200808`20`09`20`20`20`20`20`20`2003`09`20`20`20`20`2052`20`20E8`20`20
  380. V`200001A
  381. X`09BRW`20`20`20`20`2011$`09`09`09`09`20;11$`09`09`09`09`20`20`20`20`20`20`09
  382. V`20`20`20`20`09`09`09`20`20`2000FB`20`2031`20`20`200001D
  383. X1$:`09MOVL`20`20`20`20196(R3),`20R0`09`09`09`20;MIN_ASTCNT,`20R0`09`09`20`20
  384. V`20`20`20`20`200813`20`09`20`20`20`20`20`20`2050`20`20`20`20`2000C4`20`20`20C3
  385. V`20`20D0`20`20`2000020
  386. X`09CMPL`20`20`20`20R0,`20188(R3)`09`09`09`20;R0,`20ASTCNT`09`09`09`20`20`20
  387. V`20`20`20`09`20`20`20`20`0900BC`20`20`20C3`09`20`20`20`20`2050`20`20D1`20`20
  388. V`2000025
  389. X`09BLEQU`20`20`202$`09`09`09`09`20;2$`09`09`09`09`20`20`20`20`20`20`09`20`20
  390. V`20`20`09`09`09`20`20`20`20`2005`20`201B`20`20`200002A
  391. X`09MOVL`20`20`20`20188(R3),`20R0`09`09`09`20;ASTCNT,`20R0`09`09`09`20`20`20
  392. V`20`20`20`09`20`20`20`20`09`20`20`20`20`20`20`2050`20`20`20`20`2000BC`20`20
  393. V`20C3`20`20D0`20`20`200002C
  394. X2$:`09MOVL`20`20`20`20R0,`20196(R3)`09`09`09`20;R0,`20MIN_ASTCNT`09`09`20`20
  395. V`20`20`20`20`09`20`20`20`20`0900C4`20`20`20C3`09`20`20`20`20`2050`20`20D0`20
  396. V`20`2000031
  397. X`09MOVL`20`20`20`20212(R3),`20R0`09`09`09`20;MIN_BIOCNT,`20R0`09`09`20`20`20
  398. V`20`20`20`200814`20`09`20`20`20`20`20`20`2050`20`20`20`20`2000D4`20`20`20C3
  399. V`20`20D0`20`20`2000036
  400. X`09CMPL`20`20`20`20R0,`20204(R3)`09`09`09`20;R0,`20BIOCNT`09`09`09`20`20`20
  401. V`20`20`20`09`20`20`20`20`0900CC`20`20`20C3`09`20`20`20`20`2050`20`20D1`20`20
  402. V`200003B
  403. X`09BLEQU`20`20`203$`09`09`09`09`20;3$`09`09`09`09`20`20`20`20`20`20`09`20`20
  404. V`20`20`09`09`09`20`20`20`20`2005`20`201B`20`20`2000040
  405. X`09MOVL`20`20`20`20204(R3),`20R0`09`09`09`20;BIOCNT,`20R0`09`09`09`20`20`20
  406. V`20`20`20`09`20`20`20`20`09`20`20`20`20`20`20`2050`20`20`20`20`2000CC`20`20
  407. V`20C3`20`20D0`20`20`2000042
  408. X3$:`09MOVL`20`20`20`20R0,`20212(R3)`09`09`09`20;R0,`20MIN_BIOCNT`09`09`20`20
  409. V`20`20`20`20`09`20`20`20`20`0900D4`20`20`20C3`09`20`20`20`20`2050`20`20D0`20
  410. V`20`2000047
  411. X`09MOVL`20`20`20`20228(R3),`20R0`09`09`09`20;MIN_BYTCNT,`20R0`09`09`20`20`20
  412. V`20`20`20`200815`20`09`20`20`20`20`20`20`2050`20`20`20`20`2000E4`20`20`20C3
  413. V`20`20D0`20`20`200004C
  414. X`09CMPL`20`20`20`20R0,`20220(R3)`09`09`09`20;R0,`20BYTCNT`09`09`09`20`20`20
  415. V`20`20`20`09`20`20`20`20`0900DC`20`20`20C3`09`20`20`20`20`2050`20`20D1`20`20
  416. V`2000051
  417. X`09BLEQU`20`20`204$`09`09`09`09`20;4$`09`09`09`09`20`20`20`20`20`20`09`20`20
  418. V`20`20`09`09`09`20`20`20`20`2005`20`201B`20`20`2000056
  419. X`09MOVL`20`20`20`20220(R3),`20R0`09`09`09`20;BYTCNT,`20R0`09`09`09`20`20`20
  420. V`20`20`20`09`20`20`20`20`09`20`20`20`20`20`20`2050`20`20`20`20`2000DC`20`20
  421. V`20C3`20`20D0`20`20`2000058
  422. X4$:`09MOVL`20`20`20`20R0,`20228(R3)`09`09`09`20;R0,`20MIN_BYTCNT`09`09`20`20
  423. V`20`20`20`20`09`20`20`20`20`0900E4`20`20`20C3`09`20`20`20`20`2050`20`20D0`20
  424. V`20`200005D
  425. X`09MOVL`20`20`20`20244(R3),`20R0`09`09`09`20;MIN_DIOCNT,`20R0`09`09`20`20`20
  426. V`20`20`20`200816`20`09`20`20`20`20`20`20`2050`20`20`20`20`2000F4`20`20`20C3
  427. V`20`20D0`20`20`2000062
  428. X`09CMPL`20`20`20`20R0,`20236(R3)`09`09`09`20;R0,`20DIOCNT`09`09`09`20`20`20
  429. V`20`20`20`09`20`20`20`20`0900EC`20`20`20C3`09`20`20`20`20`2050`20`20D1`20`20
  430. V`2000067
  431. X`09BLEQU`20`20`205$`09`09`09`09`20;5$`09`09`09`09`20`20`20`20`20`20`09`20`20
  432. V`20`20`09`09`09`20`20`20`20`2005`20`201B`20`20`200006C
  433. X`09MOVL`20`20`20`20236(R3),`20R0`09`09`09`20;DIOCNT,`20R0`09`09`09`20`20`20
  434. V`20`20`20`09`20`20`20`20`09`20`20`20`20`20`20`2050`20`20`20`20`2000EC`20`20
  435. V`20C3`20`20D0`20`20`200006E
  436. X5$:`09MOVL`20`20`20`20R0,`20244(R3)`09`09`09`20;R0,`20MIN_DIOCNT`09`09`20`20
  437. V`20`20`20`20`09`20`20`20`20`0900F4`20`20`20C3`09`20`20`20`20`2050`20`20D0`20
  438. V`20`2000073
  439. X`09MOVL`20`20`20`20260(R3),`20R0`09`09`09`20;MIN_ENQCNT,`20R0`09`09`20`20`20
  440. V`20`20`20`200817`20`09`20`20`20`20`20`20`2050`20`20`20`20`200104`20`20`20C3
  441. V`20`20D0`20`20`2000078
  442. X`09CMPL`20`20`20`20R0,`20252(R3)`09`09`09`20;R0,`20ENQCNT`09`09`09`20`20`20
  443. V`20`20`20`09`20`20`20`20`0900FC`20`20`20C3`09`20`20`20`20`2050`20`20D1`20`20
  444. V`200007D
  445. X`09BLEQU`20`20`206$`09`09`09`09`20;6$`09`09`09`09`20`20`20`20`20`20`09`20`20
  446. V`20`20`09`09`09`20`20`20`20`2005`20`201B`20`20`2000082
  447. X`09MOVL`20`20`20`20252(R3),`20R0`09`09`09`20;ENQCNT,`20R0`09`09`09`20`20`20
  448. V`20`20`20`09`20`20`20`20`09`20`20`20`20`20`20`2050`20`20`20`20`2000FC`20`20
  449. V`20C3`20`20D0`20`20`2000084
  450. X6$:`09MOVL`20`20`20`20R0,`20260(R3)`09`09`09`20;R0,`20MIN_ENQCNT`09`09`20`20
  451. V`20`20`20`20`09`20`20`20`20`090104`20`20`20C3`09`20`20`20`20`2050`20`20D0`20
  452. V`20`2000089
  453. X`09MOVL`20`20`20`20276(R3),`20R0`09`09`09`20;MIN_FILCNT,`20R0`09`09`20`20`20
  454. V`20`20`20`200818`20`09`20`20`20`20`20`20`2050`20`20`20`20`200114`20`20`20C3
  455. V`20`20D0`20`20`200008E
  456. X`09CMPL`20`20`20`20R0,`20268(R3)`09`09`09`20;R0,`20FILCNT`09`09`09`20`20`20
  457. V`20`20`20`09`20`20`20`20`09010C`20`20`20C3`09`20`20`20`20`2050`20`20D1`20`20
  458. V`2000093
  459. X`09BLEQU`20`20`207$`09`09`09`09`20;7$`09`09`09`09`20`20`20`20`20`20`09`20`20
  460. V`20`20`09`09`09`20`20`20`20`2005`20`201B`20`20`2000098
  461. X`09MOVL`20`20`20`20268(R3),`20R0`09`09`09`20;FILCNT,`20R0`09`09`09`20`20`20
  462. V`20`20`20`09`20`20`20`20`09`20`20`20`20`20`20`2050`20`20`20`20`20010C`20`20
  463. V`20C3`20`20D0`20`20`200009A
  464. X7$:`09MOVL`20`20`20`20R0,`20276(R3)`09`09`09`20;R0,`20MIN_FILCNT`09`09`20`20
  465. V`20`20`20`20`09`20`20`20`20`090114`20`20`20C3`09`20`20`20`20`2050`20`20D0`20
  466. V`20`200009F
  467. X`09MOVL`20`20`20`20292(R3),`20R0`09`09`09`20;MIN_PAGFILCNT,`20R0`09`09`20`20
  468. V`20`20`20`20`200819`20`09`20`20`20`20`20`20`2050`20`20`20`20`200124`20`20`20C3
  469. V`20`20D0`20`20`20000A4
  470. X`09CMPL`20`20`20`20R0,`20284(R3)`09`09`09`20;R0,`20PAGFILCNT`09`09`09`20`20
  471. V`20`20`20`20`09`20`20`20`20`09011C`20`20`20C3`09`20`20`20`20`2050`20`20D1`20
  472. V`20`20000A9
  473. X`09BLEQU`20`20`208$`09`09`09`09`20;8$`09`09`09`09`20`20`20`20`20`20`09`20`20
  474. V`20`20`09`09`09`20`20`20`20`2005`20`201B`20`20`20000AE
  475. X`09MOVL`20`20`20`20284(R3),`20R0`09`09`09`20;PAGFILCNT,`20R0`09`09`09`20`20
  476. V`20`20`20`20`09`20`20`20`20`09`20`20`20`20`20`20`2050`20`20`20`20`20011C`20
  477. V`20`20C3`20`20D0`20`20`20000B0
  478. X8$:`09MOVL`20`20`20`20R0,`20292(R3)`09`09`09`20;R0,`20MIN_PAGFILCNT`09`09`20
  479. V`20`20`20`20`20`09`20`20`20`20`090124`20`20`20C3`09`20`20`20`20`2050`20`20D0
  480. V`20`20`20000B5
  481. X`09MOVL`20`20`20`20308(R3),`20R0`09`09`09`20;MAX_PRCCNT,`20R0`09`09`20`20`20
  482. V`20`20`20`200820`20`09`20`20`20`20`20`20`2050`20`20`20`20`200134`20`20`20C3
  483. V`20`20D0`20`20`20000BA
  484. X`09CMPL`20`20`20`20R0,`20300(R3)`09`09`09`20;R0,`20PRCCNT`09`09`09`20`20`20
  485. V`20`20`20`09`20`20`20`20`09012C`20`20`20C3`09`20`20`20`20`2050`20`20D1`20`20
  486. V`20000BF
  487. X`09BGEQU`20`20`209$`09`09`09`09`20;9$`09`09`09`09`20`20`20`20`20`20`09`20`20
  488. V`20`20`09`09`09`20`20`20`20`2005`20`201E`20`20`20000C4
  489. X`09MOVL`20`20`20`20300(R3),`20R0`09`09`09`20;PRCCNT,`20R0`09`09`09`20`20`20
  490. V`20`20`20`09`20`20`20`20`09`20`20`20`20`20`20`2050`20`20`20`20`20012C`20`20
  491. V`20C3`20`20D0`20`20`20000C6
  492. X9$:`09MOVL`20`20`20`20R0,`20308(R3)`09`09`09`20;R0,`20MAX_PRCCNT`09`09`20`20
  493. V`20`20`20`20`09`20`20`20`20`090134`20`20`20C3`09`20`20`20`20`2050`20`20D0`20
  494. V`20`20000CB
  495. X`09MOVL`20`20`20`20324(R3),`20R0`09`09`09`20;MIN_TQCNT,`20R0`09`09`09`20`20
  496. V`20`20`20`20`200821`20`09`20`20`20`20`20`20`2050`20`20`20`20`200144`20`20`20C3
  497. V`20`20D0`20`20`20000D0
  498. X`09CMPL`20`20`20`20R0,`20316(R3)`09`09`09`20;R0,`20TQCNT`09`09`09`20`20`20`20
  499. V`20`20`09`20`20`20`20`09013C`20`20`20C3`09`20`20`20`20`2050`20`20D1`20`20`2000
  500. V0D5
  501. X`09BLEQU`20`20`2010$`09`09`09`09`20;10$`09`09`09`09`20`20`20`20`20`20`09`20
  502. V`20`20`20`09`09`09`20`20`20`20`2005`20`201B`20`20`20000DA
  503. X`09MOVL`20`20`20`20316(R3),`20R0`09`09`09`20;TQCNT,`20R0`09`09`09`20`20`20`20
  504. V`20`20`09`20`20`20`20`09`20`20`20`20`20`20`2050`20`20`20`20`20013C`20`20`20C3
  505. V`20`20D0`20`20`20000DC
  506. X10$:`09MOVL`20`20`20`20R0,`20324(R3)`09`09`09`20;R0,`20MIN_TQCNT`09`09`09`20
  507. V`20`20`20`20`20`09`20`20`20`20`090144`20`20`20C3`09`20`20`20`20`2050`20`20D0
  508. V`20`20`20000E1
  509. X`09INCL`20`20`20`20(R3)`09`09`09`09`20;COUNT`09`09`09`09`20`20`20`20`20`20`200
  510. V826`20`09`09`09`20`20`20`20`2063`20`20D6`20`20`20000E6
  511. X`09CMPL`20`20`20`20(R3),`20#5`09`09`09`20;COUNT,`20#5`09`09`09`20`20`20`20`20
  512. V`20`200827`20`09`20`20`20`20`20`20`2005`09`20`20`20`20`2063`20`20D1`20`20`2000
  513. V0E8
  514. X`09BLSS`20`20`20`2011$`09`09`09`09`20;11$`09`09`09`09`20`20`20`20`20`20`09`20
  515. V`20`20`20`09`09`09`20`20`20`20`202E`20`2019`20`20`20000EB
  516. X`09MOVAB`20`20`20(SP),`20R0`09`09`09`20;ITEM_LIST,`20$$ITMBLKPTR`09`20`20`20
  517. V`20`20`20`200835`20`09`20`20`20`20`20`20`2050`09`20`20`20`20`206E`20`209E`20
  518. V`20`20000ED
  519. X`09MOVL`20`20`20`20#34013264,`20(R0)+`09`09`20;#34013264,`20($$ITMBLKPTR)+`09
  520. V`20`20`20`20`20`20`09`20`20`20`20`09`20`20`20`20`20`20`2080`2002070050`20`20
  521. V`208F`20`20D0`20`20`20000F0
  522. X`09MOVAB`20`20`20396(R3),`20(R0)+`09`09`09`20;IMAGNAME,`20($$ITMBLKPTR)+`09
  523. V`20`20`20`20`20`20`09`20`20`20`20`09`20`20`20`20`20`20`2080`20`20`20`20`20018C
  524. V`20`20`20C3`20`209E`20`20`20000F7
  525. X`09MOVAB`20`20`20476(R3),`20(R0)+`09`09`09`20;IMAGNAME_DSC,`20($$ITMBLKPTR)+
  526. V`09`20`20`20`20`20`20`09`20`20`20`20`09`20`20`20`20`20`20`2080`20`20`20`20`200
  527. V1DC`20`20`20C3`20`209E`20`20`20000FC
  528. X`09CLRL`20`20`20`20(R0)+`09`09`09`09`20;($$ITMBLKPTR)+`09`09`20`20`20`20`20
  529. V`20`09`20`20`20`20`09`09`09`20`20`20`20`2080`20`20D4`20`20`2000101
  530. X`09CLRQ`20`20`20`20-(SP)`09`09`09`09`20;-(SP)`09`09`09`09`20`20`20`20`20`20
  531. V`200836`20`09`09`09`20`20`20`20`207E`20`207C`20`20`2000103
  532. X`09CLRL`20`20`20`20-(SP)`09`09`09`09`20;-(SP)`09`09`09`09`20`20`20`20`20`20
  533. V`09`20`20`20`20`09`09`09`20`20`20`20`207E`20`20D4`20`20`2000105
  534. X`09PUSHAB`20`2012(SP)`09`09`09`09`20;ITEM_LIST`09`09`09`20`20`20`20`20`20`09
  535. V`20`20`20`20`09`09`090C`20`20`20AE`20`209F`20`20`2000107
  536. X`09CLRL`20`20`20`20-(SP)`09`09`09`09`20;-(SP)`09`09`09`09`20`20`20`20`20`20
  537. V`09`20`20`20`20`09`09`09`20`20`20`20`207E`20`20D4`20`20`200010A
  538. X`09PUSHAB`20`20332(R3)`09`09`09`09`20;EPID`09`09`09`09`20`20`20`20`20`20`09
  539. V`20`20`20`20`09`09`20`20`20`20`20`20014C`20`20`20C3`20`209F`20`20`200010C
  540. X`09CLRL`20`20`20`20-(SP)`09`09`09`09`20;-(SP)`09`09`09`09`20`20`20`20`20`20
  541. V`09`20`20`20`20`09`09`09`20`20`20`20`207E`20`20D4`20`20`2000110
  542. X`09CALLS`20`20`20#7,`20G`5ESYS$GETJPIW`09`09`20;#7,`20SYS$GETJPIW`09`09`20`20
  543. V`20`20`20`20`09`20`20`20`2000000000G`20`2000`09`20`20`20`20`2007`20`20FB`20
  544. V`20`2000112
  545. X`09CLRL`20`20`20`20(R3)`09`09`09`09`20;COUNT`09`09`09`09`20`20`20`20`20`20`200
  546. V837`20`09`09`09`20`20`20`20`2063`20`20D4`20`20`2000119
  547. X11$:`09MOVL`20`20`20`20R2,`20R0`09`09`09`09`20;STATUS,`20R0`09`09`09`20`20`20
  548. V`20`20`20`200842`20`09`20`20`20`20`20`20`2050`09`20`20`20`20`2052`20`20D0`20
  549. V`20`200011B
  550. X`09RET`20`20`20`20`20`09`09`09`09`20;`09`09`09`09`20`20`20`20`20`20`09`20`20
  551. V`20`20`09`09`09`09`2004`20`20`200011E
  552. X
  553. X;`20Routine`20Size:`20`20287`20bytes,`20`20`20`20Routine`20Base:`20`20$CODE$
  554. V`20+`200DAE
  555. X
  556. X
  557. X;`20`20`200843`20`201`09
  558. X;`20`20`200844`20`201`09ROUTINE`20GET_KERNEL_MODE(PID,PROCESS_NAME`20:`20REF
  559. V`20$BBLOCK)`20=
  560. X;`20`20`200845`20`202`09`20`20`20`20BEGIN
  561. X;`20`20`200846`20`202`09`20`20`20`20BUILTIN`20FP;
  562. X;`20`20`200847`20`202`09`20`20`20`20LOCAL
  563. X;`20`20`200848`20`202`09`09STATUS,`09`09`09`09`20`20`20`20!`20General`20status
  564. V`20longword
  565. X;`20`20`200849`20`202`09`09IPID,`09`09`09`09`20`20`20`20!`20Returned`20by`20EX
  566. VE$NAMPID
  567. X;`20`20`200850`20`202`09`09PCB`20:`20REF`20$BBLOCK,`09`09`20`20`20`20!`20Retur
  568. Vned`20by`20EXE$NAMPID
  569. X;`20`20`200851`20`202`09`09PHD`20:`20REF`20$BBLOCK,`09`09`20`20`20`20!`20Point
  570. Ver`20to`20process`20header
  571. X;`20`20`200852`20`202`09`09JIB`20:`20REF`20$BBLOCK;`09`09`20`20`20`20!`20Point
  572. Ver`20to`20job`20info`20block
  573. X;`20`20`200853`20`202`09
  574. X;`20`20`200854`20`202`09`20`20`20`20.FP`20=`20CONDITION_HANDLER;`09`09`20`20
  575. V`20`20!`20Establish`20a`20kernel`20handler
  576. X;`20`20`200855`20`202`09!+
  577. X;`20`20`200856`20`202`09!`20Note`20that`20this`20call`20to`20EXE$NAMPID`20depe
  578. Vnds`20on`20the`20call`20frame`20being
  579. X;`20`20`200857`20`202`09!`20set`20up`20as`20follows:
  580. X;`20`20`200858`20`202`09!
  581. X;`20`20`200859`20`202`09!`20`20`204(AP)`20-`20EPID`20value`20(or`20zero)
  582. X;`20`20`200860`20`202`09!`20`20`208(AP)`20-`20Pointer`20to`20process`20name
  583. V`20string`20descriptor
  584. X;`20`20`200861`20`202`09!-
  585. X;`20`20`200862`20`202`09`20`20`20`20STATUS`20=`20EXE$NAMPID(;IPID,PCB);`09`20
  586. V`20`20`20!`20This`20returns`20at`20IPL$_SYNCH
  587. X;`20`20`200863`20`202`09`20`20`20`20IF`20NOT`20.STATUS`20THEN`09`09`09`20`20
  588. V`20`20!`20Status`20check..
  589. X;`20`20`200864`20`203`09`09BEGIN`09`09`09`09`20`20`20`20!`20If`20error
  590. X;`20`20`200865`20`203`09`09SETIPL(0);`09`09`09`20`20`20`20!`20Drop`20our`20IPL
  591. V`20to`20normal
  592. X;`20`20`200866`20`203`09`09RETURN`20.STATUS;`09`09`09`20`20`20`20!`20And`20ret
  593. Vurn`20the`20error`20code
  594. X;`20`20`200867`20`202`09`09END;
  595. X;`20`20`200868`20`202`09!+
  596. X;`20`20`200869`20`202`09!`20Get`20all`20the`20values`20out`20of`20the`20Proces
  597. Vs`20Control`20Block
  598. X;`20`20`200870`20`202`09!-
  599. X;`20`20`200871`20`202`09`20`20`20`20EPID`20`20`20`20=`20.PCB`5BPCB$L_EPID`5D;
  600. V`09`09`20`20`20`20!`20Get`20this`20for`20future`20reference
  601. X;`20`20`200872`20`202`09`20`20`20`20PRI`09`20`20`20`20=`2031`20-`20.PCB`5BPCB$
  602. VB_PRI`5D;
  603. X;`20`20`200873`20`202`09`20`20`20`20STATE`20`20`20=`20.PCB`5BPCB$W_STATE`5D;
  604. X;`20`20`200874`20`202`09`20`20`20`20PRIB`20`20`20`20=`2031`20-`20.PCB`5BPCB$B_
  605. VPRIB`5D;
  606. X;`20`20`200875`20`202`09`20`20`20`20ASTCNT`20`20=`20.PCB`5BPCB$W_ASTCNT`5D;
  607. X;`20`20`200876`20`202`09`20`20`20`20BIOCNT`20`20=`20.PCB`5BPCB$W_BIOCNT`5D;
  608. X;`20`20`200877`20`202`09`20`20`20`20BIOLM`20`20`20=`20.PCB`5BPCB$W_BIOLM`5D;
  609. X;`20`20`200878`20`202`09`20`20`20`20DIOCNT`20`20=`20.PCB`5BPCB$W_DIOCNT`5D;
  610. X;`20`20`200879`20`202`09`20`20`20`20DIOLM`20`20`20=`20.PCB`5BPCB$W_DIOLM`5D;
  611. X;`20`20`200880`20`202`09`20`20`20`20PRCCNT`20`20=`20.PCB`5BPCB$W_PRCCNT`5D;
  612. X;`20`20`200881`20`202`09`20`20`20`20EFWM`20`20`20`20=`20.PCB`5BPCB$L_EFWM`5D;
  613. X;`20`20`200882`20`202`09`20`20`20`20EFCS`20`20`20`20=`20.PCB`5BPCB$L_EFCS`5D;
  614. X;`20`20`200883`20`202`09`20`20`20`20EFCU`20`20`20`20=`20.PCB`5BPCB$L_EFCU`5D;
  615. X;`20`20`200884`20`202`09`20`20`20`20UIC`09`20`20`20`20=`20.PCB`5BPCB$L_UIC`5D;
  616. V
  617. X;`20`20`200885`20`202`09`20`20`20`20WSSIZE`20`20=`20.PCB`5BPCB$L_PPGCNT`5D`20+
  618. V`20.PCB`5BPCB$L_GPGCNT`5D`20;
  619. X;`20`20`200886`20`202`09`20`20`20`20CH$MOVE(PCB$S_LNAME,PCB`5BPCB$T_LNAME`5D,P
  620. VRCNAM);
  621. X;`20`20`200887`20`202`09!+
  622. X;`20`20`200888`20`202`09!`20Get`20the`20values`20out`20of`20the`20Job`20Inform
  623. Vation`20Block
  624. X;`20`20`200889`20`202`09!-
  625. X;`20`20`200890`20`202`09`20`20`20`20JIB`09=`20.PCB`5BPCB$L_JIB`5D;
  626. X;`20`20`200891`20`202`09`20`20`20`20IF`20.JIB`20NEQ`200`20THEN
  627. X;`20`20`200892`20`203`09`09BEGIN
  628. X;`20`20`200893`20`203`09`09BYTCNT`09`20`20`20`20=`20.JIB`5BJIB$L_BYTCNT`5D;
  629. X;`20`20`200894`20`203`09`09BYTLM`09`20`20`20`20=`20.JIB`5BJIB$L_BYTLM`5D;
  630. X;`20`20`200895`20`203`09`09FILCNT`09`20`20`20`20=`20.JIB`5BJIB$W_FILCNT`5D;
  631. X;`20`20`200896`20`203`09`09FILLM`09`20`20`20`20=`20.JIB`5BJIB$W_FILLM`5D;
  632. X;`20`20`200897`20`203`09`09TQCNT`09`20`20`20`20=`20.JIB`5BJIB$W_TQCNT`5D;
  633. X;`20`20`200898`20`203`09`09TQLM`09`20`20`20`20=`20.JIB`5BJIB$W_TQLM`5D;
  634. X;`20`20`200899`20`203`09`09PGFLQUOTA`20`20`20=`20.JIB`5BJIB$L_PGFLQUOTA`5D;
  635. X;`20`20`200900`20`203`09`09PAGFILCNT`20`20`20=`20.JIB`5BJIB$L_PGFLCNT`5D;
  636. X;`20`20`200901`20`203`09`09ENQCNT`09`20`20`20`20=`20.JIB`5BJIB$W_ENQCNT`5D;
  637. X;`20`20`200902`20`203`09`09ENQLM`09`20`20`20`20=`20.JIB`5BJIB$W_ENQLM`5D;
  638. X;`20`20`200903`20`202`09`09END;
  639. X;`20`20`200904`20`202`09!+
  640. X;`20`20`200905`20`202`09!`20Get`20all`20the`20values`20out`20of`20the`20Proces
  641. Vs`20HeaDer
  642. X;`20`20`200906`20`202`09!-
  643. X;`20`20`200907`20`202`09`20`20`20`20PHD`20=`20.PCB`5BPCB$L_PHD`5D;
  644. X;`20`20`200908`20`202`09`20`20`20`20IF`20.PCB`5BPCB$V_RES`5D`20AND`20(.PHD`20N
  645. VEQ`200)`20THEN
  646. X;`20`20`200909`20`203`09`09BEGIN
  647. X;`20`20`200910`20`203`09`09CPUTIM`20`20=`20.PHD`5BPHD$L_CPUTIM`5D;
  648. X;`20`20`200911`20`203`09`09PRCLM`20`20`20=`20.PHD`5BPHD$W_PRCLM`5D;
  649. X;`20`20`200912`20`203`09`09ASTLM`20`20`20=`20.PHD`5BPHD$W_ASTLM`5D;
  650. X;`20`20`200913`20`203`09`09PAGEFLTS=`20.PHD`5BPHD$L_PAGEFLTS`5D;
  651. X;`20`20`200914`20`203`09`09DIRIO`09=`20.PHD`5BPHD$L_DIOCNT`5D;
  652. X;`20`20`200915`20`203`09`09BUFIO`09=`20.PHD`5BPHD$L_BIOCNT`5D;
  653. X;`20`20`200916`20`204`09`09VIRTPAGES`20=`20(.PHD`5BPHD$L_FREP0VA`5D+
  654. X;`20`20`200917`20`203`09`09`09`20`20`20`20(%X'80000000'-.PHD`5BPHD$L_FREP1VA
  655. V`5D))/512;
  656. X;`20`20`200918`20`203`09`09USP`09=`20.PHD`5BPHD$L_USP`5D;
  657. X;`20`20`200919`20`203`09`09UPC`09=`20.PHD`5BPHD$L_PC`5D;
  658. X;`20`20`200920`20`203`09`09UPSL`09=`20.PHD`5BPHD$L_PSL`5D;
  659. X;`20`20`200921`20`202`09`09END;
  660. X;`20`20`200922`20`202`09
  661. X;`20`20`200923`20`202`09`20`20`20`20SETIPL`20(0);
  662. X;`20`20`200924`20`202`09`20`20`20`20RETURN`20.STATUS;
  663. X;`20`20`200925`20`201`09`20`20`20`20END;
  664. X
  665. X
  666. X
  667. X
  668. X
  669. X;GET_KERNEL_MODE
  670. XU.7:`09.WORD`20`20`20`5EM<R2,R3,R4,R5,R6,R7,R8>`09`20;Save`20R2,R3,R4,R5,R6,R7
  671. V,R8`09`20`20`20`20`20`20`200844`20`09`09`09`20`20`20`20`20`20`2001FC`20`20`200
  672. V0000
  673. X`09MOVAB`20`20`20W`5EU.89,`20R8`09`09`09`20;U.89,`20R8`09`09`09`20`20`20`20
  674. V`20`20`09`20`20`20`20`09`20`20`20`20`20`20`2058`20`20`20`20`200000'`20`20CF
  675. V`20`209E`20`20`2000002
  676. X`09MOVAB`20`20`20W`5EU.8,`20(FP)`09`09`09`20;U.8,`20(FP)`09`09`09`20`20`20`20
  677. V`20`20`200854`20`09`20`20`20`20`20`20`206D`20`20`20`20`200000V`20`20CF`20`209E
  678. V`20`20`2000007
  679. X`09JSB`20`20`20`20`20G`5EEXE$NAMPID`09`09`09`20;EXE$NAMPID`09`09`09`20`20`20
  680. V`20`20`20`200862`20`09`09`20`2000000000G`20`2000`20`2016`20`20`200000C
  681. X`09MOVL`20`20`20`20R0,`20R7`09`09`09`09`20;R0,`20STATUS`09`09`09`20`20`20`20
  682. V`20`20`09`20`20`20`20`09`20`20`20`20`20`20`2057`09`20`20`20`20`2050`20`20D0
  683. V`20`20`2000012
  684. X`09MOVL`20`20`20`20R4,`20R6`09`09`09`09`20;R4,`20R6`09`09`09`20`20`20`20`20
  685. V`20`09`20`20`20`20`09`20`20`20`20`20`20`2056`09`20`20`20`20`2054`20`20D0`20
  686. V`20`2000015
  687. X`09BLBS`20`20`20`20R7,`201$`09`09`09`09`20;STATUS,`201$`09`09`09`20`20`20`20
  688. V`20`20`200863`20`09`20`20`20`20`20`20`2003`09`20`20`20`20`2057`20`20E8`20`20
  689. V`2000018
  690. X`09BRW`20`20`20`20`203$`09`09`09`09`20;3$`09`09`09`09`20`20`20`20`20`20`09`20
  691. V`20`20`20`09`09`09`20`20`2000FF`20`2031`20`20`200001B
  692. X1$:`09MOVL`20`20`20`20100(R6),`20-280(R8)`09`09`20;100(PCB),`20EPID`09`09`20
  693. V`20`20`20`20`20`200871`20`09FEE8`20`20`20C8`0964`20`20`20A6`20`20D0`20`20`2000
  694. V01E
  695. X`09MOVZBL`20`2028(R6),`20(R8)`09`09`09`20;28(PCB),`20PRI`09`09`09`20`20`20`20
  696. V`20`20`200872`20`09`20`20`20`20`20`20`2068`091C`20`20`20A6`20`209A`20`20`20000
  697. V24
  698. X`09SUBL3`20`20`20(R8),`20#31,`20(R8)`09`09`09`20;PRI,`20#31,`20PRI`09`09`09
  699. V`20`20`20`20`20`20`09`20`20`20`20`09`20`20`20`20`20`20`201F`09`20`20`20`20`206
  700. V8`20`20C3`20`20`2000028
  701. X`09`09`09`09`09`09`20;`09`09`09`09`09`20`20`20`20`09`09`09`20`20`20`20`2068
  702. V`20`20`20`20`20`20`200002B
  703. X`09MOVZWL`20`2026(R6),`20-8(R8)`09`09`09`20;26(PCB),`20STATE`09`09`20`20`20
  704. V`20`20`20`200873`20`09`20`20F8`20`20`20A8`091A`20`20`20A6`20`203C`20`20`200002
  705. VC
  706. X`09MOVZBL`20`2029(R6),`208(R8)`09`09`09`20;29(PCB),`20PRIB`09`09`09`20`20`20
  707. V`20`20`20`200874`20`09`20`2008`20`20`20A8`091D`20`20`20A6`20`209A`20`20`200003
  708. V1
  709. X`09SUBL3`20`20`208(R8),`20#31,`208(R8)`09`09`20;PRIB,`20#31,`20PRIB`09`09`20
  710. V`20`20`20`20`20`09`20`20`20`20`09`20`20`20`20`20`20`201F`0908`20`20`20A8`20
  711. V`20C3`20`20`2000036
  712. X`09`09`09`09`09`09`20;`09`09`09`09`09`20`20`20`20`09`09`0908`20`20`20A8`20`20
  713. V`20`20`20`20`200003A
  714. X`09MOVZWL`20`2056(R6),`20-424(R8)`09`09`20;56(PCB),`20ASTCNT`09`09`20`20`20
  715. V`20`20`20`200875`20`09FE58`20`20`20C8`0938`20`20`20A6`20`203C`20`20`200003C
  716. X`09MOVZWL`20`2058(R6),`20-408(R8)`09`09`20;58(PCB),`20BIOCNT`09`09`20`20`20
  717. V`20`20`20`200876`20`09FE68`20`20`20C8`093A`20`20`20A6`20`203C`20`20`2000042
  718. X`09MOVZWL`20`2060(R6),`20-404(R8)`09`09`20;60(PCB),`20BIOLM`09`09`20`20`20`20
  719. V`20`20`200877`20`09FE6C`20`20`20C8`093C`20`20`20A6`20`203C`20`20`2000048
  720. X`09MOVZWL`20`2062(R6),`20-376(R8)`09`09`20;62(PCB),`20DIOCNT`09`09`20`20`20
  721. V`20`20`20`200878`20`09FE88`20`20`20C8`093E`20`20`20A6`20`203C`20`20`200004E
  722. X`09MOVZWL`20`2064(R6),`20-372(R8)`09`09`20;64(PCB),`20DIOLM`09`09`20`20`20`20
  723. V`20`20`200879`20`09FE8C`20`20`20C8`0940`20`20`20A6`20`203C`20`20`2000054
  724. X`09MOVZWL`20`2066(R6),`20-312(R8)`09`09`20;66(PCB),`20PRCCNT`09`09`20`20`20
  725. V`20`20`20`200880`20`09FEC8`20`20`20C8`0942`20`20`20A6`20`203C`20`20`200005A
  726. X`09MOVL`20`20`20`2076(R6),`20-272(R8)`09`09`20;76(PCB),`20EFWM`09`09`09`20`20
  727. V`20`20`20`20`200881`20`09FEF0`20`20`20C8`094C`20`20`20A6`20`20D0`20`20`2000060
  728. V
  729. X`09MOVL`20`20`20`2080(R6),`20-264(R8)`09`09`20;80(PCB),`20EFCS`09`09`09`20`20
  730. V`20`20`20`20`200882`20`09FEF8`20`20`20C8`0950`20`20`20A6`20`20D0`20`20`2000066
  731. V
  732. X`09MOVL`20`20`20`2084(R6),`20-256(R8)`09`09`20;84(PCB),`20EFCU`09`09`09`20`20
  733. V`20`20`20`20`200883`20`09FF00`20`20`20C8`0954`20`20`20A6`20`20D0`20`20`200006C
  734. V
  735. X`09MOVL`20`20`20`20196(R6),`20-248(R8)`09`09`20;196(PCB),`20UIC`09`09`09`20
  736. V`20`20`20`20`20`200884`20`09FF08`20`20`20C8`20`20`20`20`2000C4`20`20`20C6`20
  737. V`20D0`20`20`2000072
  738. X`09ADDL3`20`20`20116(R6),`20120(R6),`2044(R8)`09`20;116(PCB),`20120(PCB),`20WS
  739. VSIZE`09`20`20`20`20`20`20`200885`20`09`20`2078`20`20`20A6`0974`20`20`20A6`20
  740. V`20C1`20`20`2000079
  741. X`09`09`09`09`09`09`20;`09`09`09`09`09`20`20`20`20`09`09`092C`20`20`20A8`20`20
  742. V`20`20`20`20`200007E
  743. X`09MOVC3`20`20`20#16,`20312(R6),`20-40(R8)`09`09`20;#16,`20312(PCB),`20PRCNAM
  744. V`09`09`20`20`20`20`20`20`200886`20`090138`20`20`20C6`09`20`20`20`20`2010`20
  745. V`2028`20`20`2000080
  746. X`09`09`09`09`09`09`20;`09`09`09`09`09`20`20`20`20`09`09`09D8`20`20`20A8`20`20
  747. V`20`20`20`20`2000085
  748. X`09MOVL`20`20`20`20124(R6),`20R0`09`09`09`20;124(PCB),`20JIB`09`09`09`20`20
  749. V`20`20`20`20`200890`20`09`20`20`20`20`20`20`2050`097C`20`20`20A6`20`20D0`20
  750. V`20`2000087
  751. X`09BEQL`20`20`20`202$`09`09`09`09`20;2$`09`09`09`09`20`20`20`20`20`20`200891
  752. V`20`09`09`09`20`20`20`20`2036`20`2013`20`20`200008B
  753. X`09MOVQ`20`20`20`2032(R0),`20-392(R8)`09`09`20;32(JIB),`20BYTCNT`09`09`20`20
  754. V`20`20`20`20`200894`20`09FE78`20`20`20C8`0920`20`20`20A0`20`207D`20`20`200008D
  755. V
  756. X`09MOVZWL`20`2048(R0),`20-344(R8)`09`09`20;48(JIB),`20FILCNT`09`09`20`20`20
  757. V`20`20`20`200895`20`09FEA8`20`20`20C8`0930`20`20`20A0`20`203C`20`20`2000093
  758. X`09MOVZWL`20`2050(R0),`20-340(R8)`09`09`20;50(JIB),`20FILLM`09`09`20`20`20`20
  759. V`20`20`200896`20`09FEAC`20`20`20C8`0932`20`20`20A0`20`203C`20`20`2000099
  760. X`09MOVZWL`20`2052(R0),`20-296(R8)`09`09`20;52(JIB),`20TQCNT`09`09`20`20`20`20
  761. V`20`20`200897`20`09FED8`20`20`20C8`0934`20`20`20A0`20`203C`20`20`200009F
  762. X`09MOVZWL`20`2054(R0),`20-292(R8)`09`09`20;54(JIB),`20TQLM`09`09`09`20`20`20
  763. V`20`20`20`200898`20`09FEDC`20`20`20C8`0936`20`20`20A0`20`203C`20`20`20000A5
  764. X`09MOVL`20`20`20`2056(R0),`20-324(R8)`09`09`20;56(JIB),`20PGFLQUOTA`09`09`20
  765. V`20`20`20`20`20`200899`20`09FEBC`20`20`20C8`0938`20`20`20A0`20`20D0`20`20`2000
  766. V0AB
  767. X`09MOVL`20`20`20`2060(R0),`20-328(R8)`09`09`20;60(JIB),`20PAGFILCNT`09`09`20
  768. V`20`20`20`20`20`200900`20`09FEB8`20`20`20C8`093C`20`20`20A0`20`20D0`20`20`2000
  769. V0B1
  770. X`09MOVZWL`20`2076(R0),`20-360(R8)`09`09`20;76(JIB),`20ENQCNT`09`09`20`20`20
  771. V`20`20`20`200901`20`09FE98`20`20`20C8`094C`20`20`20A0`20`203C`20`20`20000B7
  772. X`09MOVZWL`20`2078(R0),`20-356(R8)`09`09`20;78(JIB),`20ENQLM`09`09`20`20`20`20
  773. V`20`20`200902`20`09FE9C`20`20`20C8`094E`20`20`20A0`20`203C`20`20`20000BD
  774. X2$:`09MOVL`20`20`20`20108(R6),`20R0`09`09`09`20;108(PCB),`20PHD`09`09`09`20
  775. V`20`20`20`20`20`200907`20`09`20`20`20`20`20`20`2050`096C`20`20`20A6`20`20D0
  776. V`20`20`20000C3
  777. X`09BLBC`20`20`20`2036(R6),`203$`09`09`09`20;36(PCB),`203$`09`09`09`20`20`20
  778. V`20`20`20`200908`20`09`20`20`20`20`20`20`2052`0924`20`20`20A6`20`20E9`20`20
  779. V`20000C7
  780. X`09BEQL`20`20`20`203$`09`09`09`09`20;3$`09`09`09`09`20`20`20`20`20`20`09`20
  781. V`20`20`20`09`09`09`20`20`20`20`2050`20`2013`20`20`20000CB
  782. X`09MOVL`20`20`20`20172(R0),`2012(R8)`09`09`09`20;172(PHD),`20CPUTIM`09`09`20
  783. V`20`20`20`20`20`200910`20`09`20`200C`20`20`20A8`20`20`20`20`2000AC`20`20`20C0
  784. V`20`20D0`20`20`20000CD
  785. X`09MOVZWL`20`20178(R0),`20-308(R8)`09`09`20;178(PHD),`20PRCLM`09`09`20`20`20
  786. V`20`20`20`200911`20`09FECC`20`20`20C8`20`20`20`20`2000B2`20`20`20C0`20`203C
  787. V`20`20`20000D3
  788. X`09MOVZWL`20`20180(R0),`20-420(R8)`09`09`20;180(PHD),`20ASTLM`09`09`20`20`20
  789. V`20`20`20`200912`20`09FE5C`20`20`20C8`20`20`20`20`2000B4`20`20`20C0`20`203C
  790. V`20`20`20000DA
  791. X`09MOVL`20`20`20`20192(R0),`2036(R8)`09`09`09`20;192(PHD),`20PAGEFLTS`09`09
  792. V`20`20`20`20`20`20`200913`20`09`20`2024`20`20`20A8`20`20`20`20`2000C0`20`20
  793. V`20C0`20`20D0`20`20`20000E1
  794. X`09MOVL`20`20`20`20204(R0),`2020(R8)`09`09`09`20;204(PHD),`20DIRIO`09`09`20
  795. V`20`20`20`20`20`200914`20`09`20`2014`20`20`20A8`20`20`20`20`2000CC`20`20`20C0
  796. V`20`20D0`20`20`20000E7
  797. X`09MOVL`20`20`20`20208(R0),`2028(R8)`09`09`09`20;208(PHD),`20BUFIO`09`09`20
  798. V`20`20`20`20`20`200915`20`09`20`201C`20`20`20A8`20`20`20`20`2000D0`20`20`20C0
  799. V`20`20D0`20`20`20000ED
  800. X`09SUBL3`20`20`20164(R0),`20156(R0),`20R1`09`09`20;164(PHD),`20156(PHD),`20R1
  801. V`09`20`20`20`20`20`20`200917`20`09009C`20`20`20C0`20`20`20`20`2000A4`20`20`20C
  802. V0`20`20C3`20`20`20000F3
  803. X`09`09`09`09`09`09`20;`09`09`09`09`09`20`20`20`20`09`09`09`20`20`20`20`2051
  804. V`20`20`20`20`20`20`20000FA
  805. X`09MOVAB`20`20`20-2147483648(R1),`20R1`09`09`20;-2147483648(R1),`20R1`09`09
  806. V`20`20`20`20`20`20`09`20`20`20`20`09`20`20`20`20`20`20`2051`2080000000`20`20
  807. V`20E1`20`209E`20`20`20000FB
  808. X`09DIVL3`20`20`20#512,`20R1,`2056(R8)`09`09`20;#512,`20R1,`20VIRTPAGES`09`09
  809. V`20`20`20`20`20`20`09`20`20`20`20`09`20`20`20`20`20`20`2051`2000000200`20`20
  810. V`208F`20`20C7`20`20`2000102
  811. X`09`09`09`09`09`09`20;`09`09`09`09`09`20`20`20`20`09`09`0938`20`20`20A8`20`20
  812. V`20`20`20`20`2000109
  813. X`09MOVL`20`20`20`2044(R0),`20-240(R8)`09`09`20;44(PHD),`20USP`09`09`09`20`20
  814. V`20`20`20`20`200918`20`09FF10`20`20`20C8`092C`20`20`20A0`20`20D0`20`20`200010B
  815. V
  816. X`09MOVL`20`20`20`20104(R0),`20-232(R8)`09`09`20;104(PHD),`20UPC`09`09`09`20
  817. V`20`20`20`20`20`200919`20`09FF18`20`20`20C8`0968`20`20`20A0`20`20D0`20`20`2000
  818. V111
  819. X`09MOVL`20`20`20`20108(R0),`20-224(R8)`09`09`20;108(PHD),`20UPSL`09`09`20`20
  820. V`20`20`20`20`200920`20`09FF20`20`20`20C8`096C`20`20`20A0`20`20D0`20`20`2000117
  821. V
  822. X3$:`09MTPR`20`20`20`20#0,`20#18`09`09`09`09`20;#0,`20#18`09`09`09`20`20`20`20
  823. V`20`20`200923`20`09`20`20`20`20`20`20`2012`09`20`20`20`20`2000`20`20DA`20`20
  824. V`200011D
  825. X`09MOVL`20`20`20`20R7,`20R0`09`09`09`09`20;STATUS,`20R0`09`09`09`20`20`20`20
  826. V`20`20`200924`20`09`20`20`20`20`20`20`2050`09`20`20`20`20`2057`20`20D0`20`20
  827. V`2000120
  828. X`09RET`20`20`20`20`20`09`09`09`09`20;`09`09`09`09`20`20`20`20`20`20`09`20`20
  829. V`20`20`09`09`09`09`2004`20`20`2000123
  830. X
  831. X;`20Routine`20Size:`20`20292`20bytes,`20`20`20`20Routine`20Base:`20`20$CODE$
  832. V`20+`200ECD
  833. X
  834. X
  835. X;`20`20`200926`20`201`09!+
  836. X;`20`20`200927`20`201`09!`20Note`20that`20the`20condition`20handler`20code`20s
  837. Vhould`20follow`20the`20kernel`20code
  838. X;`20`20`200928`20`201`09!`20since`20it's`20entry`20point`20is`20used`20to`20de
  839. Vtermine`20the`20upper`20range`20of`20the
  840. X;`20`20`200929`20`201`09!`20$LCKPAG`20system`20service`20arguments.`20This`20h
  841. Vandler`20just`20keeps`20us`20from
  842. X;`20`20`200930`20`201`09!`20crashing`20the`20system`20in`20case`20we`20access
  843. V`20violate`20in`20kernel`20mode.
  844. X;`20`20`200931`20`201`09!-
  845. X;`20`20`200932`20`201`09ROUTINE`20CONDITION_HANDLER`20:`20NOVALUE`20=`20$EXIT(
  846. VCODE=1);
  847. X
  848. X
  849. X
  850. X
  851. X
  852. X;CONDITION_HANDLER
  853. XU.8:`09.WORD`20`20`20`5EM<>`09`09`09`09`20;Save`20nothing`09`09`09`20`20`20
  854. V`20`20`20`200932`20`09`09`09`20`20`20`20`20`20`200000`20`20`2000000
  855. X`09PUSHL`20`20`20#1`09`09`09`09`20;#1`09`09`09`09`20`20`20`20`20`20`09`20`20
  856. V`20`20`09`09`09`20`20`20`20`2001`20`20DD`20`20`2000002
  857. X`09CALLS`20`20`20#1,`20G`5ESYS$EXIT`09`09`09`20;#1,`20SYS$EXIT`09`09`09`20`20
  858. V`20`20`20`20`09`20`20`20`2000000000G`20`2000`09`20`20`20`20`2001`20`20FB`20
  859. V`20`2000004
  860. X`09RET`20`20`20`20`20`09`09`09`09`20;`09`09`09`09`20`20`20`20`20`20`09`20`20
  861. V`20`20`09`09`09`09`2004`20`20`200000B
  862. X
  863. X;`20Routine`20Size:`20`2012`20bytes,`20`20`20`20Routine`20Base:`20`20$CODE$
  864. V`20+`200FF1
  865. X
  866. X
  867. X;`20`20`200933`20`201`09
  868. X;`20`20`200934`20`200`09END`20ELUDOM
  869. X
  870. X
  871. X
  872. X
  873. X
  874. X
  875. X;`09`09`09`09`20`20`20`20`20`20`20PSECT`20SUMMARY
  876. X;
  877. X;`09Name`09`09`09`20Bytes`09`09`09`20`20`20`20`20`20`20Attributes
  878. X;
  879. X;`20`20$PLIT$`09`09`09`20`20`20`20`201407`20`20NOVEC,NOWRT,`20`20RD`20,NOEXE,N
  880. VOSHR,`20`20LCL,`20`20REL,`20`20CON,NOPIC,ALIGN(2)
  881. X;`20`20$OWN$`09`09`09`20`20`20`20`20`20688`20`20NOVEC,`20`20WRT,`20`20RD`20,NO
  882. VEXE,NOSHR,`20`20LCL,`20`20REL,`20`20CON,NOPIC,ALIGN(2)
  883. X;`20`20$CODE$`09`09`09`20`20`20`20`204093`20`20NOVEC,NOWRT,`20`20RD`20,`20`20E
  884. VXE,NOSHR,`20`20LCL,`20`20REL,`20`20CON,NOPIC,ALIGN(2)
  885. X
  886. X
  887. X
  888. X
  889. X;`09`09`09`09Library`20Statistics
  890. X;
  891. X;`09`09`09`09`09`20`20`20`20`20--------`20Symbols`20--------`09`20`20`20`20Pag
  892. Ves`09Processing
  893. X;`09File`09`09`09`09`20`20`20`20`20Total`20`20`20`20Loaded`20`20`20Percent`20
  894. V`20`20`20`20`20Mapped`09Time
  895. X;
  896. X;`20`20SYS$COMMON:`5BSYSLIB`5DLIB.L32;4`09`09`20`20`20`20`2039537`20`20`20`20
  897. V`20`20`20105`20`20`20`20`20`20`20`20`200`20`20`20`20`20`202145`20`20`20`20`20
  898. V`20`20`20`20`2000:00.7
  899. X
  900. X
  901. X
  902. X
  903. X
  904. X
  905. X
  906. X;`09`09`09`09`09COMMAND`20QUALIFIERS
  907. X
  908. X;`09BLIS/LIS/MACH=(ASSEM,UNIQUE)/SOURCE=NOHEAD/NOOBJ`20SHOQUOTA
  909. X
  910. X;`20Compilation`20Complete
  911. X
  912. X`09.END`09U.104
  913. $ call unpack SHOQUOTA.LIS;1 1360354630 ""
  914. $ v=f$verify(v)
  915. $ exit
  916.