home *** CD-ROM | disk | FTP | other *** search
/ OS/2 Shareware BBS: 10 Tools / 10-Tools.zip / tolkit45.zip / os2tk45 / inc / gas.inc < prev    next >
Text File  |  1999-03-15  |  12KB  |  267 lines

  1. ;       SCCSID = @(#)gas.inc    6.2 91/03/18
  2. ;       SCCSID = @(#)gas.inc    6.2 91/03/18
  3. ; ****************************************************************************
  4. ; *                                                                          *
  5. ; *                 This file is IBM unique.                                 *
  6. ; *                 IBM Confidential                                         *
  7. ; *                 Copyright (c) IBM Corporation  1981, 1990                *
  8. ; *                 All Rights Reserved                                      *
  9. ; *                                                                          *
  10. ; ****************************************************************************
  11. ;
  12. ; @PEN - added 32 bit log record declarations(LOGHEAD32) for CP20 DCR 1152
  13. ;
  14. ;
  15. ;   logging facility devhlp call equate
  16. ;
  17. LOGERROR             EQU    0001H    ; Log data in 16 bit format(LOGHEAD)
  18. LOGERROR32           EQU    0090H    ; Log data in 32 bit format(LOGHEAD32)
  19.  
  20. ;
  21. ;   packet ids
  22. ;
  23. STDERROR             EQU    0001H    ; Packet id - OS/2 Standard Error
  24. SNAGENALERT          EQU    0002H    ; Packet id - SNA Generic Alert Subvector
  25.  
  26. ;
  27. ;   Status Field Definitions
  28. ;
  29. PROCLOGNOTIFY        EQU    00000001h ; Room for Proc Name, Log and Alert
  30.  
  31. ;
  32. ;   logging facility structure for 16 bit log packets
  33. ;
  34.  
  35. LOGHEAD STRUC
  36.         dw      1                    ; Number of log packets
  37.         dw      ?                    ; Length of log packet
  38.         dw      ?                    ; Packet id -  sna gen alert
  39.         db      'OS/2    '           ; Originator name
  40.         db      'GA  '               ; Ascii selector
  41.         dd      0                    ; Reserved
  42.         dd      PROCLOGNOTIFY        ; Status (Process Name, Log, Notify)
  43.         dd      0                    ; Time field
  44.         dd      0                    ; Date field
  45.         db      260 dup(0)           ; Process Name Field
  46. LOGHEAD ENDS
  47.  
  48. ;
  49. ;   logging facility structure for 32 bit log packets(CP20 DCR 1152)
  50. ;
  51.  
  52. LOGHEAD32 STRUC
  53.         dw      1                    ; Packet version number(1 is for 32 bit)
  54.         dw      1                    ; Number of log packets
  55.         dw      ?                    ; Length of log packet
  56.         dw      ?                    ; Packet id -  sna gen alert
  57.         dd      0                    ; Status (No Process Name)
  58.         db      'GA  '               ; Qualifier name
  59.         dd      0                    ; Reserved
  60.         dd      0                    ; Time field
  61.         dd      0                    ; Date field
  62.         db      'OS/2    '           ; Originator name
  63.         db      12 dup(0)            ; Formatting DLL name(none)
  64. LOGHEAD32 ENDS
  65.  
  66. ;
  67. ;   generic alert subvectors
  68. ;
  69. ;
  70.  
  71. ;   vector/subvector keys
  72. ;
  73. GAS_GEN_ALERT         EQU   92H      ; Generic Alert
  74. GAS_PROB_CAUSE        EQU   93H      ; Probable Causes
  75. GAS_USER_CAUSE        EQU   94H      ; User Caused
  76. GAS_INST_CAUSE        EQU   95H      ; Install Caused
  77. GAS_FAIL_CAUSE        EQU   96H      ; Failure Caused
  78. ;
  79. ;   alert types
  80. ;
  81. GAS_PERM_LOSS         EQU   01H      ; Permanent loss of availability
  82. GAS_TEMP_LOSS         EQU   02H      ; Temporary loss of avaibability
  83. GAS_PERF_LOSS         EQU   03H      ; Performance < acceptable level
  84. GAS_IMPENDING         EQU   11H      ; Impending problem
  85. GAS_UNKNOWN           EQU   12H      ; Unknown severity
  86. ;
  87. ;   alert description codes
  88. ;
  89. GAS_ADC_DEVOUTERROR   EQU   0012H    ; JT output device error
  90. GAS_ADC_PRINTER       EQU   0112H    ; Output device error (printer)
  91. GAS_ADC_DSKFAIL       EQU   1113H    ; I/O device error (disk failure)
  92. GAS_ADC_DSKOPER       EQU   1213H    ; I/O device error (operation error)
  93. GAS_ADC_DEVCOMERROR   EQU   0233H    ; JT unable to communicate with device
  94. GAS_ADC_DEVNOTREADY   EQU   1090H    ; JT device not ready
  95. GAS_ADC_PRTNOTREADY   EQU   1190H    ; operatore intervention required (printer)
  96. GAS_ADC_PRTOUTOFPAPER EQU   0292H    ; stock exhausted (printer)
  97. ;
  98. ;   probable causes description codes
  99. ;
  100. GAS_PCD_COMSTARTSTOP  EQU   0120H    ; JT Start/Stop Communications
  101. GAS_PCD_DEVOUTERROR   EQU   0062H    ; JT Output Device
  102. GAS_PCD_PRINTER       EQU   1062H    ; Output device (printer)
  103. GAS_PCD_DASD          EQU   1063H    ; I/O device (dasd device)
  104. ;
  105. ;   user causes subfields
  106. ;
  107. GAS_UC_USER           EQU   01H      ; User causes
  108. GAS_UC_RECACT         EQU   81H      ; Recommended action
  109. ;
  110. ;   user cause codes
  111. ;
  112. GAS_UCC_PRTPOWEROFF   EQU   0E02H    ; Printer powered off
  113. GAS_UCC_OUTOFPAPER    EQU   0353H    ; Printer out of paper
  114. GAS_UCC_PRTNOTREADY   EQU   1360H    ; Printer not ready
  115. ;
  116. ;   failure causes subfields
  117. ;
  118. GAS_FC_FAILURE        EQU   01H      ; Failure causes
  119. GAS_FC_RECACT         EQU   81H      ; Recommended action
  120. ;
  121. ;   failure cause codes
  122. ;
  123. GAS_FCC_DASD          EQU   0150H    ; DASD media
  124. GAS_FCC_DEVOUT        EQU   0062H    ; JT Output Device
  125. GAS_FCC_PRINTER       EQU   1062H    ; printer
  126. GAS_FCC_DISKDRV       EQU   1063H    ; Disk drive
  127. ;
  128. ;   recommended action codes
  129. ;
  130. GAS_RAC_ONLINEPD      EQU   0100H    ; Run online problem determination
  131. GAS_RAC_REF_GUIDE     EQU   0110H    ; Refer to operator's guide
  132. GAS_RAC_READY_DEVICE  EQU   0113H    ; Ready the device then retry
  133. GAS_RAC_ADD_PAPER     EQU   0616H    ; Add paper
  134. GAS_RAC_REVIEW_LOG    EQU   0122H    ; Review remote device logs
  135. GAS_RAC_CNTCT_SERV    EQU   0030H    ; Contact service representative
  136.  
  137.  
  138.  
  139. ;
  140. ;   Description of Product Set ID subvector follows
  141. ;
  142.  
  143. PSID_KEY        EQU     10H             ; Product Set ID Key
  144. SW_PID_KEY      EQU     11H             ; Software Product ID Key
  145. SWCLASS_IBM     EQU     04H             ; IBM Software Classification
  146. COMPID_KEY      EQU     02H             ; Component ID Subfield Key
  147. SW_CN_KEY       EQU     06H             ; Software Common Name key
  148.  
  149. PSID_MAJOR      EQU     0F2H            ; '2' Major version
  150. PSID_MINOR      EQU     0F1H            ; '1' Minor version
  151. PSID_RELEASE    EQU     0F0H            ; '0' Version release
  152.  
  153. ; --------------------------------------------------------------------
  154. ;
  155. ;   Product Set ID subvector
  156. ;
  157. ; --------------------------------------------------------------------
  158.  
  159. PSIDS           STRUC
  160. PSIDS_LEN       DB      52              ; Product Set ID length
  161. PSIDS_KEY       DB      PSID_KEY        ; Product Set ID key
  162. PSIDS_RETIRED   DB      0               ; Retired field
  163. PSIDS_SW_LEN    DB      49              ; Software Subvector length
  164. PSIDS_SW_KEY    DB      SW_PID_KEY      ; Software Subvector key
  165. PSIDS_CLASS     DB      SWCLASS_IBM     ; Software class
  166. PSIDS_COMP_LEN  DB      14              ; Component ID Subfield length
  167. PSIDS_COMP_KEY  DB      COMPID_KEY      ; Component ID Subfield key
  168. PSIDS_COMPID    DB      0F5H            ; '5'   Component ID
  169.                 DB      0F6H            ; '6'
  170.                 DB      0F2H            ; '2'
  171.                 DB      0F1H            ; '1'
  172.                 DB      0F0H            ; '0'
  173.                 DB      0F7H            ; '7'
  174.                 DB      0F7H            ; '7'
  175.                 DB      0F0H            ; '0'
  176.                 DB      0F1H            ; '1'
  177. PSIDS_COMPREL   DB      PSID_MAJOR      ; '2'   Release level, major version
  178.                 DB      PSID_MINOR      ; '1'   minor version
  179.                 DB      PSID_RELEASE    ; '0'   version release
  180. PSIDS_CN_LEN    DB      32              ; Software Common Name length
  181. PSIDS_SWCN_KEY  DB      SW_CN_KEY       ; Software Common Name key
  182. PSIDS_SW_CN     DB      0D6H            ; 'O'
  183.                 DB      0E2H            ; 'S'
  184.                 DB      061H            ; '/'
  185.                 DB      0F2H            ; '2'
  186.                 DB      040H            ; ' '
  187.                 DB      0C2H            ; 'B'
  188.                 DB      0C1H            ; 'A'
  189.                 DB      0E2H            ; 'S'
  190.                 DB      0C5H            ; 'E'
  191.                 DB      040H            ; ' '
  192.                 DB      0D6H            ; 'O'
  193.                 DB      0D7H            ; 'P'
  194.                 DB      0C5H            ; 'E'
  195.                 DB      0D9H            ; 'R'
  196.                 DB      0C1H            ; 'A'
  197.                 DB      0E3H            ; 'T'
  198.                 DB      0C9H            ; 'I'
  199.                 DB      0D5H            ; 'N'
  200.                 DB      0C7H            ; 'G'
  201.                 DB      040H            ; ' '
  202.                 DB      0E2H            ; 'S'
  203.                 DB      0E8H            ; 'Y'
  204.                 DB      0E2H            ; 'S'
  205.                 DB      0E3H            ; 'T'
  206.                 DB      0C5H            ; 'E'
  207.                 DB      0D4H            ; 'M'
  208.                 DB      040H            ; ' '
  209.                 DB      040H            ; ' '
  210.                 DB      040H            ; ' '
  211.                 DB      040H            ; ' '
  212. PSIDS   ENDS
  213.  
  214. ; --------------------------------------------------------------------
  215. ;
  216. ;   generic alert subvector
  217. ;
  218. ; --------------------------------------------------------------------
  219. GAS         STRUC
  220. GAS_LEN     DB      0BH                 ; length of G.A. Subvector
  221. GAS_KEY     DB      GAS_GEN_ALERT       ; Generic Alert
  222. GAS_FLAGS   DW      0                   ; Flags = !initiated, !held, !delayed
  223. GAS_TYPE    DB      ?                   ; Alert type
  224. GAS_DESC    DW      ?                   ; Alert description
  225. GAS_ALERTID DD      ?                   ; Alert ID number
  226. GAS         ENDS
  227. ; --------------------------------------------------------------------
  228. ;
  229. ;   probable cause subvector
  230. ;
  231. ; --------------------------------------------------------------------
  232. GAS_PCS         STRUC
  233. GAS_PCS_LEN     DB      4               ; length of P.C. Subvector
  234. GAS_PCS_KEY     DB      GAS_PROB_CAUSE  ; Probable causes
  235. GAS_PCS_DESC    DW      ?               ; Description code
  236. GAS_PCS         ENDS
  237. ; --------------------------------------------------------------------
  238. ;
  239. ;   user cause subvector
  240. ;
  241. ; --------------------------------------------------------------------
  242. GAS_UCS         STRUC
  243. GAS_UCS_LEN     DB      0AH             ; length of U.C. Subvector
  244. GAS_UCS_KEY     DB      GAS_USER_CAUSE  ; User causes
  245. GAS_UCS_SFLEN1  DB      4               ; length of U.C. Subvector
  246. GAS_UCS_SFKEY1  DB      GAS_UC_USER     ; User causes
  247. GAS_UCS_CAUSECD DW      ?               ; Cause code
  248. GAS_UCS_SFLEN2  DB      4               ; length of R.A. Subvector
  249. GAS_UCS_SFKEY2  DB      GAS_UC_RECACT   ; Recommended actions
  250. GAS_UCS_RECACT  DW      ?               ; Recommended action code
  251. GAS_UCS         ENDS
  252. ; --------------------------------------------------------------------
  253. ;
  254. ;   failure causes subvector
  255. ;
  256. ; --------------------------------------------------------------------
  257. GAS_FCS         STRUC
  258. GAS_FCS_LEN     DB      0AH             ; length of F.C. Subvector
  259. GAS_FCS_KEY     DB      GAS_FAIL_CAUSE  ; Failure causes
  260. GAS_FCS_SFLEN1  DB      4               ; length of F.C. Subvector
  261. GAS_FCS_SFKEY1  DB      GAS_FC_FAILURE  ; Failure causes
  262. GAS_FCS_CAUSECD DW      ?               ; Cause code
  263. GAS_FCS_SFLEN2  DB      4               ; length of R.A. Subvector
  264. GAS_FCS_SFKEY2  DB      GAS_FC_RECACT   ; Recommended actions
  265. GAS_FCS_RECACT  DW      ?               ; Recommended action code
  266. GAS_FCS         ENDS
  267.