NAME       : LGRFCLBK
 DESCRIPTION: Relocation mapping for HCPFCLBK
 DSECT      : $FCLBK
 FUNCTION   : LGRFCLBK describes those fields of the FCLBK 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 HCPFCLBK 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.

 $FCLBK DSECT
Top of page

Hex   Dec Type/Val   Lng Label (dup)    Comments
---- ---- --------- ---- -------------- --------
0000    0 Structure      $FCLBK         Relocation mapping for HCPFCLBK
          00000001       $FCL_VER       1 Mapping version number
0000    0 Signed       2 $FCL_HDRL      Header length (in bytes)
0002    2 Signed       2 $FCL_BITL      Length of mapped bits (in bytes)
0004    4 Signed       4 *              Reserved for future use
          00000008       $FCL_HDLN      *-$FCLBK Length of header (bytes)
      Bit map: Contains the FCLBK flags that are subject to
               relocation. These bits are defined sequentially,
               regardless of how they are defined in HCPFCLBK.
               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 $FCL_BITS (0)  Bit map area
0008    8 Bitstring    1 $FCL0
          1... ....      $FCLPNSET      X'80' $FCLPNSET FCLPFLAG
          .1.. ....      $FCLBRSET      X'40' $FCLBRSET FCLPFLAG
          ..1. ....      $FCLLNSET      X'20' $FCLLNSET FCLPFLAG
          ...1 ....      $FCLBPSET      X'10' $FCLBPSET FCLPFLAG
          .... 1...      $FCLSCSET      X'08' $FCLSCSET FCLPFLAG
          .... .1..      $FCLILOAD      X'04' $FCLILOAD FCLIPLOP
          .... ..1.      $FCLIDUMP      X'02' $FCLIDUMP FCLIPLOP
          .... ...1      $FCLISTOP      X'01' $FCLISTOP FCLIPLOP
0009    9 Bitstring    1 $FCL1
          1... ....      $FCLIATTN      X'80' $FCLIATTN FCLIPLOP
          .1.. ....      $FCLHEX        X'40' $FCLHEX FCLSCFLG
          00000002       $FCL_BLEN      *-$FCL_BITS Length of bit map
                                        area
      Data:    Contains all HCPFCLBK 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.
               together with new flag bytes as required.
000A   10 Bitstring    1 $FCL_DATA (0)  Start of data map
000A   10 Bitstring    4 $FCLSCA        -> RDO offset to SCP data
                                        (original input)
000E   14 Bitstring    4 $FCLBPS        BOOT PROGRAM SELECTOR
0012   18 Bitstring    8 $FCLPTNM       PORT NAME
001A   26 Bitstring    8 $FCLLUN        LUN
0022   34 Bitstring    8 $FCLBRLBA      BOOT RECORD LOGICAL BLOCK ADDR
002A   42 Bitstring    4 $FCLSCL        Length of SCP Data (input)
002E   46 Bitstring    4 $FCLSCU        Length of SCP Data (UTF-8)
          00000032       $FCL_LEN       *-$FCLBK Total length, in bytes
          00000007       $FCL_SZ        ($FCL_LEN+7)/8 Size in
                                        doublewords

          
*** $FCLBK - Relocation mapping for HCPFCLBK
*
*     +-------------+-------------+---------------------------+
*   0 | $FCL_HDRL   | $FCL_BITL   |///////////////////////////|
*     +------+------+-------------+-------------+-------------+
*   8 |$FCL0 |$FCL1 |         $FCLSCA           |  $FCLBPS-   |
*     +------+------+---------------------------+-------------+
*  10 |   -(00E)    |               $FCLPTNM-                 |
*     +-------------+-----------------------------------------+
*  18 |   -(012)    |                $FCLLUN-                 |
*     +-------------+-----------------------------------------+
*  20 |   -(01A)    |               $FCLBRLBA-                |
*     +-------------+---------------------------+-------------+
*  28 |   -(022)    |         $FCLSCL           |  $FCLSCU-   |
*     +-------------+---------------------------+-------------+
*  30 |   -(02E)    | 32
*     +-------------+
*
*** $FCLBK - Relocation mapping for HCPFCLBK

 
Symbol         Dspl Value
-------------- ---- -----
$FCL_BITL      0002
$FCL_BITS      0008
$FCL_BLEN      0009 00000002
$FCL_DATA      000A
$FCL_HDLN      0004 00000008
$FCL_HDRL      0000
$FCL_LEN       002E 00000032
$FCL_SZ        002E 00000007
$FCL_VER       0000 00000001
$FCLBPS        000E
$FCLBPSET      0008 10
$FCLBRLBA      0022
$FCLBRSET      0008 40
$FCLHEX        0009 40
$FCLIATTN      0009 80
$FCLIDUMP      0008 02
$FCLILOAD      0008 04
$FCLISTOP      0008 01
$FCLLNSET      0008 20
$FCLLUN        001A
$FCLPNSET      0008 80
$FCLPTNM       0012
$FCLSCA        000A
$FCLSCL        002A
$FCLSCSET      0008 08
$FCLSCU        002E
$FCL0          0008
$FCL1          0009