NAME       : HCPMCRBK
 DESCRIPTION: Machine Check Record Block
 DSECT      : MCRBK
 FUNCTION   : HCPMCRBK contains information relative to a
              machine check incident which (incident) is to be
              reflected to a guest.
 LOCATED BY : Is a mapping of the parameters passed for
              manufacturing a machine check or building the
              message information when communicating a machine
              check incident.
 CREATED BY : Any caller who wants to pass a machine check record
              information.
 DELETED BY : The caller who creates it or the callee. This is
              communicated via MCRFLAG1 in this control block.
 RELOCATION CONSIDERATIONS : None

 MCRBK DSECT
Top of page

Hex   Dec Type/Val   Lng Label (dup)    Comments
---- ---- --------- ---- -------------- --------
0000    0 Structure      MCRBK          Machine Check Record Block
0000    0 Dbl-Word     8 MCRMCIC (0)    Machine Check Interruption Code
0000    0 Signed       4 MCRMCWD0 (0)   MCRMCIC word 0
0000    0 Bitstring    2 MCRMCB01 (0)   MCRMCIC byte 0 and 1
0000    0 Bitstring    1 MCRMCIC0       MCRMCIC byte 0
          1111 1111      MCIPRIM0       X'FF' MCIPRIM0 PRIMARY MACHINE
                                        CHECK BITS - BYTE 0
          1... ....      MCICSD         X'80' MCICSD SYSTEM DAMAGE BIT.
          .1.. ....      MCICPD         X'40' MCICPD PROCESSING DAMAGE
                                        BIT.
          ..1. ....      MCICSR         X'20' MCICSR SYSTEM RECOVERY BIT.
          ...1 ....      MCICITD        X'10' MCICITD INTERVAL TIMER
                                        DAMAGE. (370 GUESTS)
          .... 1...      MCICCD         X'08' MCICCD TIMING (CLOCK)
                                        FACILITY DAMAGE.
          .... .1..      MCICED         X'04' MCICED EXTERNAL DAMAGE.
          .... ...1      MCICDG         X'01' MCICDG DEGRADATION BIT.
0001    1 Bitstring    1 MCRMCIC1       MCRMCIC byte 1
          1111 ....      MCIPRIM1       X'F0' MCIPRIM1 PRIMARY MACHINE
                                        CHECK BITS - BYTE 1
          1... ....      MCICW          X'80' MCICW WARNING BIT.
          .1.. ....      MCICCRW        X'40' MCICCRW PENDING-CRW REPORT.
          ..1. ....      MCICSP         X'20' MCICSP SERVICE PROCESSOR
                                        DAMAGE.
          ...1 ....      MCICCSD        X'10' MCICCSD CHANNEL-SUBSYSTEM
                                        DAMAGE.
          .... ..1.      MCICBU         X'02' MCICBU 'BACKED UP' BIT.
          .... ...1      MCICDL         X'01' MCICDL 'DELAYED' BIT. (370
                                        GUESTS)
0002    2 Bitstring    1 MCRMCIC2       MCRMCIC byte 2
          1... ....      MCICSE         X'80' MCICSE STORAGE ERROR
                                        UNCORRECTED.
          .1.. ....      MCICSC         X'40' MCICSC STORAGE ERROR
                                        CORRECTED.
          ..1. ....      MCICKE         X'20' MCICKE STORAGE-KEY ERROR
                                        UNCORRECTED.
          ...1 ....      MCICSDG        X'10' MCICSDG STORAGE
                                        DEGRADATION. MODIFIES STORAGE
                                        ERROR CORRECTED.
          .... 1...      MCICVWP        X'08' MCICVWP BITS 12-15 OF MC
                                        OLD PSW VALID.
          .... .1..      MCICVMS        X'04' MCICVMS SYSTEM MASK & KEY
                                        OF MC OLD PSW VALID.
          .... ..1.      MCICVPM        X'02' MCICVPM PROGRAM MASK & CC
                                        OF MC OLD PSW VALID.
          .... ...1      MCICVIA        X'01' MCICVIA INSTR ADDR OF MC
                                        OLD PSW IS VALID.
0003    3 Bitstring    1 MCRMCIC3       MCRMCIC byte 3
          1... ....      MCICVFA        X'80' MCICVFA FAILING STORAGE
                                        ADDRESS IS VALID.
          ..1. ....      MCICVED        X'20' MCICVED EXTERNAL-DAMAGE
                                        CODE IS VALID.
          ...1 ....      MCICVFP        X'10' MCICVFP FP REGISTERS STORED
                                        ARE VALID.
          .... 1...      MCICVGR        X'08' MCICVGR GP REGISTERS STORED
                                        ARE VALID.
          .... .1..      MCICVCR        X'04' MCICVCR CONTROL REGISTERS
                                        STORED VALID.
          .... ..1.      MCICVLG        X'02' MCICVLG EXTENDED LOGOUT
                                        AREA IS VALID.
          .... ...1      MCICVST        X'01' MCICVST INST. MODIFIED
                                        STORAGE IS VALID.
0004    4 Signed       4 MCRMCWD1 (0)   MCRMCIC word 1
0004    4 Bitstring    1 MCRMCIC4       MCRMCIC byte 4
          1... ....      MCICIE         X'80' MCICIE INDIRECT STORAGE
                                        ERROR
          .1.. ....      MCICVAR        X'40' MCICVAR ACCESS REGISTERS
                                        STORED ARE VALID
          ..1. ....      MCICDA         X'20' MCICDA DELAYED ACCESS
                                        EXCEPTION BIT
0005    5 Bitstring    1 MCRMCIC5       MCRMCIC byte 5
          ..1. ....      MCICVTPR       X'20' MCICVTPR TOD programmable
                                        register validity
          ...1 ....      MCICVXFP       X'10' MCICVXFP Additional FP
                                        Registers Validity (ESA390) FP
                                        Control Register Validity (zArch)
          .... 1...      MCICAR         X'08' MCICAR Ancillary Report Bit
          .... ..1.      MCICVCT        X'02' MCICVCT CPU TIMER STORED IS
                                        VALID.
          .... ...1      MCICVCC        X'01' MCICVCC CLOCK COMPARATOR
                                        STORED IS VALID.
0006    6 Bitstring    1 MCRMCIC6       MCRMCIC byte 6
0007    7 Bitstring    1 MCRMCIC7       MCRMCIC byte 7
0008    8 Signed       4 *
000C   12 Signed       4 MCREDC (0)     Machine check external-damage
                                        code
000C   12 Bitstring    1 MCREDCB0       MCREDC byte 0
          .... ....      MCEXTD0        X'00' MCEXTD0 No bits defined
000D   13 Bitstring    1 MCREDCB1       MCREDC byte 1
          .... ....      MCEXTD1        X'00' MCEXTD1 No bits defined
000E   14 Bitstring    1 MCREDCB2       MCREDC byte 2
          ...1 ....      MCEXTDSC       X'10' MCEXTDSC Bit 19 - ETR Sync
                                        check
000F   15 Bitstring    1 MCREDCB3       MCREDC byte 3
          1... ....      MCEXTDSS       X'80' MCEXTDSS Bit 24 - STP Sync
                                        Check
          .1.. ....      MCEXTDIC       X'40' MCEXTDIC Bit 25 - Island
                                        Condition
          ..1. ....      MCEXTDCC       X'20' MCEXTDCC Bit 26 - CTN
                                        Configuration Change
          ...1 ....      MCEXTDCS       X'10' MCEXTDCS Bit 27 - STP Clock
                                        Source Error
0010   16 Signed       4 MCRMCICX       Machine check interruption code
                                        extension
0014   20 Bitstring    1 MCRFLAG1       Flag byte 1
          1... ....      MCRREAL        X'80' MCRREAL Failing storage
                                        address is real. If this bit is
                                        zero the failing storage address
                                        (if specified) is absolute. This
                                        bit is meaningful only when the
                                        MCRNULLA bit is 0.
          .1.. ....      MCRRELST       X'40' MCRRELST MCRBK storage is
                                        to be released by the guest
                                        machine service routines when
                                        this machine check is presented.
          ..1. ....      MCRNULLA       X'20' MCRNULLA Indicates that
                                        MCRFSAD/MCRGFAD contains a null
                                        address
0015   21 Bitstring    1 *              Reserved for IBM use.
0016   22 Bitstring    1 *              Reserved for IBM use.
0017   23 Bitstring    1 *              Reserved for IBM use
0018   24 Dbl-Word     8 MCRFLOG (2)    Fixed logout area
0028   40 Dbl-Word     8 MCRGFAD (0)    64 bit failing storage addr
0028   40 Signed       4 MCR64HI        High order 32 bits of 64 bit addr
002C   44 Signed       4 MCRFSAD        Guest failing storage address
          0000002C       MCR64LO        MCRFSAD Low order 32 bits of 64
                                        bit addr
          00000030       MCRLEN         *-MCRBK MCRBK block size in bytes
          00000006       MCRSIZE        (MCRLEN+7)/8 MCRBK block size in
                                        doublewords
0018   24 Dbl-Word     8 MCRFASIT       Failing-storage internal ASIT
0000    0 Bitstring    2 *
0002    2 Bitstring    4 MCRMCB25       MCRMCIC bytes 2-5
0006    6 Bitstring    2 *

          
*** MCRBK - Machine Check Record Block
*
*     +------+------+------+------+------+------+------+------+
*   0 |:MCIC0|:MCIC1|:MCIC2|:MCIC3|:MCIC4|:MCIC5|:MCIC6|:MCIC7|
*     +------+------+------+------+------+------+------+------+
*   8 |///////////////////////////|:EDCB0|:EDCB1|:EDCB2|:EDCB3|
*     +---------------------------+------+------+------+------+
*  10 |         MCRMCICX          |:FLAG1|//////|//////|//////|
*     +---------------------------+------+------+------+------+
*  18 |                       MCRFLOG                         |
*     |                                                       |
*     +---------------------------+---------------------------+
*  28 |         MCR64HI           |         MCRFSAD           |
*     +---------------------------+---------------------------+
*  30
*
*** MCRBK - Machine Check Record Block
          
*** Overlay for MCRFLOG in MCRBK
*
*     +-------------------------------------------------------+
*  18 |                       MCRFASIT                        |
*     +-------------------------------------------------------+
*  20
*
*** Overlay for MCRFLOG in MCRBK
          
*** Overlay for MCRMCIC in MCRBK
*
*     +-------------+---------------------------+-------------+
*   0 |/////////////|         MCRMCB25          |/////////////|
*     +-------------+---------------------------+-------------+
*   8
*
*** Overlay for MCRMCIC in MCRBK

 
Symbol         Dspl Value
-------------- ---- -----
MCEXTDCC       000F 20
MCEXTDCS       000F 10
MCEXTDIC       000F 40
MCEXTDSC       000E 10
MCEXTDSS       000F 80
MCEXTD0        000C 00
MCEXTD1        000D 00
MCICAR         0005 08
MCICBU         0001 02
MCICCD         0000 08
MCICCRW        0001 40
MCICCSD        0001 10
MCICDA         0004 20
MCICDG         0000 01
MCICDL         0001 01
MCICED         0000 04
MCICIE         0004 80
MCICITD        0000 10
MCICKE         0002 20
MCICPD         0000 40
MCICSC         0002 40
MCICSD         0000 80
MCICSDG        0002 10
MCICSE         0002 80
MCICSP         0001 20
MCICSR         0000 20
MCICVAR        0004 40
MCICVCC        0005 01
MCICVCR        0003 04
MCICVCT        0005 02
MCICVED        0003 20
MCICVFA        0003 80
MCICVFP        0003 10
MCICVGR        0003 08
MCICVIA        0002 01
MCICVLG        0003 02
MCICVMS        0002 04
MCICVPM        0002 02
MCICVST        0003 01
MCICVTPR       0005 20
MCICVWP        0002 08
MCICVXFP       0005 10
MCICW          0001 80
MCIPRIM0       0000 FF
MCIPRIM1       0001 F0
MCREDC         000C
MCREDCB0       000C
MCREDCB1       000D
MCREDCB2       000E
MCREDCB3       000F
MCRFASIT       0018
MCRFLAG1       0014
MCRFLOG        0018
MCRFSAD        002C
MCRGFAD        0028
MCRLEN         002C 00000030
MCRMCB01       0000
MCRMCB25       0002
MCRMCIC        0000
MCRMCICX       0010
MCRMCIC0       0000
MCRMCIC1       0001
MCRMCIC2       0002
MCRMCIC3       0003
MCRMCIC4       0004
MCRMCIC5       0005
MCRMCIC6       0006
MCRMCIC7       0007
MCRMCWD0       0000
MCRMCWD1       0004
MCRNULLA       0014 20
MCRREAL        0014 80
MCRRELST       0014 40
MCRSIZE        002C 00000006
MCR64HI        0028
MCR64LO        002C 0000002C