NAME       : LGRIUCVB
 DESCRIPTION: Relocation mapping for HCPIUCVB
 DSECT      : $IUCVB
 FUNCTION   : LGRIUCVB describes those fields of the IUCVB that
              will be migrated to the destination system during
              guest relocation.
 LOCATED BY : This is a mapping of the RDODATA area within the
              RDOBK during guest relocation.
 RELOCATION CONSIDERATIONS : This control block is used during live guest
              relocation.  It is used to relocate a control block
              defined in a corresponding HCP COPY file.  Any
              fields or bits defined in HCPIUCVB which are
              required on the destination system must be defined
              here, and code must be added to migrate the field
              or bit during a relocation.

 $IUCVB DSECT
Top of page

Hex   Dec Type/Val   Lng Label (dup)    Comments
---- ---- --------- ---- -------------- --------
0000    0 Structure      $IUCVB         Relocation mapping for HCPIUCVB
          00000001       $IUC_VER       1 Mapping version number
0000    0 Signed       2 $IUC_HDRL      Header length (in bytes)
0002    2 Signed       2 $IUC_BITL      Length of mapped bits (in bytes)
0004    4 Signed       4 *              Reserved for future use
          00000008       $IUC_HDLN      *-$IUCVB Length of header (bytes)
      Bit map: Contains the IUCVB flags that are subject to
               relocation. These bits are defined sequentially,
               regardless of how they are defined in HCPIUCVB.
               This yields a consistent mapping that ensures
               compatibility when a guest is relocated between
               systems at differing service levels.
               Names in the comments column indicate the control
               block byte which contains the flag. This name is
               subject to change if the flag definition changes.
         ====> NEVER change bits which already exist here.
         ====> NEVER change the order of bits in this section.
         ====> ALWAYS add new bits at the end of this section,
               together with new flag bytes as required.
0008    8 Signed       2 $IUC_BITS (0)  Bit map area
0008    8 Bitstring    1 $IUC0
          1... ....      $IUCVBMAX      X'80' $IUCVBMAX IUCVBWIN
          .1.. ....      $IUCVBFRE      X'40' $IUCVBFRE IUCVBWIN
          ..1. ....      $IUCVWAIT      X'20' $IUCVWAIT IUCVSTAT
          ...1 ....      $IUCIDENT      X'10' $IUCIDENT IUCVSTAT
          .... 1...      $IUCCPBUF      X'08' $IUCCPBUF IUCVSTAT
          .... .1..      $IUCBROUT      X'04' $IUCBROUT IUCVSTAT
          .... ..1.      $IUCBUFA       X'02' $IUCBUFA IUCVSTAT
          .... ...1      $IUCBUFC       X'01' $IUCBUFC IUCVSTAT
0009    9 Bitstring    1 $IUC1
          1... ....      $IUCANYLI      X'80' $IUCANYLI IUCANYFL
          .1.. ....      $IUCANYLR      X'40' $IUCANYLR IUCANYFL
          ..1. ....      $IUCANYGI      X'20' $IUCANYGI IUCANYFL
          ...1 ....      $IUCANYGR      X'10' $IUCANYGR IUCANYFL
          .... 1...      $IUCANYWI      X'08' $IUCANYWI IUCANYFL
          .... .1..      $IUCANYWR      X'04' $IUCANYWR IUCANYFL
          .... ..1.      $IUCANYRE      X'02' $IUCANYRE IUCANYFL
          .... ...1      $IUCANYGT      X'01' $IUCANYGT IUCANYFL
000A   10 Bitstring    1 $IUC2
          1... ....      $IUCSNDN       X'80' $IUCSNDN IUCAPIN
          .1.. ....      $IUCSNDP       X'40' $IUCSNDP IUCAPIN
          ..1. ....      $IUCRPYN       X'20' $IUCRPYN IUCAPIN
          ...1 ....      $IUCRPYP       X'10' $IUCRPYP IUCAPIN
          .... 1...      $IUCICTRL      X'08' $IUCICTRL IUCAPIN
          .... .1..      $IUCCLPC       X'04' $IUCCLPC IUCTLIN
          .... ..1.      $IUCCLCC       X'02' $IUCCLCC IUCTLIN
          .... ...1      $IUCCLPS       X'01' $IUCCLPS IUCTLIN
000B   11 Bitstring    1 $IUC3
          1... ....      $IUCCLPQ       X'80' $IUCCLPQ IUCTLIN
          .1.. ....      $IUCCLPR       X'40' $IUCCLPR IUCTLIN
          00000004       $IUC_BLEN      *-$IUC_BITS Length of bit map
                                        area
      Data:    Contains all HCPIUCVB data that is subject to
               relocation, except for flag bits, which are
               handled separately.
               All fields are defined as XLnn to avoid alignment
               warnings and to pack the data efficiently.
         ====> NEVER change fields which already exist here.
         ====> NEVER change the order of fields in this section.
         ====> ALWAYS add new fields at the end of this section.
000C   12 Bitstring    1 $IUC_DATA (0)  Start of data map
000C   12 Bitstring    4 $IUCVMB        ADDRESS OF VMDBK
0010   16 Bitstring    4 $IUCBFAD1      ADDRESS OF EXTERNAL BUFFER
0014   20 Bitstring    4 $IUCBFAD2      2ND PAGE OF EXTERNAL BUFFER
0018   24 Bitstring    2 $IUCBFLN1      LENGTH OF BUFF IN 1ST PAGE - 1
001A   26 Bitstring    2 $IUCBFLN2      LENGTH OF BUFF IN 2ND PAGE - 1
001C   28 Bitstring    4 $IUCCBFA1      ADDRESS OF EXTERNAL CNTL BUFFER
0020   32 Bitstring    4 $IUCCBFA2      2ND PAGE OF EXTERNAL CNTL BUFFER
0024   36 Bitstring    2 $IUCCBFL1      LENGTH OF CNTL BUFF IN 1ST PAGE
0026   38 Bitstring    2 $IUCCBFL2      LENGTH OF CNTL BUFF IN 2ND PAGE
0028   40 Bitstring    4 $IUCVCCT       -> RDO offset to $CCTBK
002C   44 Bitstring    2 $IUCMXCN       MAX NUM OF CONN FROM DIR OR DFLT
002E   46 Bitstring    4 $IUCPNDHD      -> RDO offset to $IPRML
0032   50 Bitstring    2 $IUCTOTCN      TOTAL NUMBER OF CONNECTIONS
0034   52 Bitstring    4 $IUCIBFA1      FIRST PAGE-INTERRUPT BUFFER EXT
0038   56 Bitstring    4 $IUCIBFA2      SECOND PAGE-INTERRUPT BUFFER EXT
003C   60 Bitstring    2 $IUCIBFL1      INTERRUPT BUFFER EXT LEN - PG 1
003E   62 Bitstring    2 $IUCIBFL2      INTERRUPT BUFFER EXT LEN - PG 2
0040   64 Bitstring    2 $IUCAPBCT      Count of appl buffers in complex
0042   66 Bitstring    2 $IUCTLBCT      Count of ctl buffers in complex
          00000044       $IUC_LEN       *-$IUCVB Total length, in bytes
          00000009       $IUC_SZ        ($IUC_LEN+7)/8 Size in
                                        doublewords

          
*** $IUCVB - Relocation mapping for HCPIUCVB
*
*     +-------------+-------------+---------------------------+
*   0 | $IUC_HDRL   | $IUC_BITL   |///////////////////////////|
*     +------+------+------+------+---------------------------+
*   8 |$IUC0 |$IUC1 |$IUC2 |$IUC3 |         $IUCVMB           |
*     +------+------+------+------+---------------------------+
*  10 |        $IUCBFAD1          |        $IUCBFAD2          |
*     +-------------+-------------+---------------------------+
*  18 | $IUCBFLN1   | $IUCBFLN2   |        $IUCCBFA1          |
*     +-------------+-------------+-------------+-------------+
*  20 |        $IUCCBFA2          | $IUCCBFL1   | $IUCCBFL2   |
*     +---------------------------+-------------+-------------+
*  28 |         $IUCVCCT          |  $IUCMXCN   | $IUCPNDHD-  |
*     +-------------+-------------+-------------+-------------+
*  30 |   -(02E)    | $IUCTOTCN   |        $IUCIBFA1          |
*     +-------------+-------------+-------------+-------------+
*  38 |        $IUCIBFA2          | $IUCIBFL1   | $IUCIBFL2   |
*     +-------------+-------------+-------------+-------------+
*  40 | $IUCAPBCT   | $IUCTLBCT   | 44
*     +-------------+-------------+
*
*** $IUCVB - Relocation mapping for HCPIUCVB

 
Symbol         Dspl Value
-------------- ---- -----
$IUC_BITL      0002
$IUC_BITS      0008
$IUC_BLEN      000B 00000004
$IUC_DATA      000C
$IUC_HDLN      0004 00000008
$IUC_HDRL      0000
$IUC_LEN       0042 00000044
$IUC_SZ        0042 00000009
$IUC_VER       0000 00000001
$IUCANYGI      0009 20
$IUCANYGR      0009 10
$IUCANYGT      0009 01
$IUCANYLI      0009 80
$IUCANYLR      0009 40
$IUCANYRE      0009 02
$IUCANYWI      0009 08
$IUCANYWR      0009 04
$IUCAPBCT      0040
$IUCBFAD1      0010
$IUCBFAD2      0014
$IUCBFLN1      0018
$IUCBFLN2      001A
$IUCBROUT      0008 04
$IUCBUFA       0008 02
$IUCBUFC       0008 01
$IUCCBFA1      001C
$IUCCBFA2      0020
$IUCCBFL1      0024
$IUCCBFL2      0026
$IUCCLCC       000A 02
$IUCCLPC       000A 04
$IUCCLPQ       000B 80
$IUCCLPR       000B 40
$IUCCLPS       000A 01
$IUCCPBUF      0008 08
$IUCIBFA1      0034
$IUCIBFA2      0038
$IUCIBFL1      003C
$IUCIBFL2      003E
$IUCICTRL      000A 08
$IUCIDENT      0008 10
$IUCMXCN       002C
$IUCPNDHD      002E
$IUCRPYN       000A 20
$IUCRPYP       000A 10
$IUCSNDN       000A 80
$IUCSNDP       000A 40
$IUCTLBCT      0042
$IUCTOTCN      0032
$IUCVBFRE      0008 40
$IUCVBMAX      0008 80
$IUCVCCT       0028
$IUCVMB        000C
$IUCVWAIT      0008 20
$IUC0          0008
$IUC1          0009
$IUC2          000A
$IUC3          000B