LNGBK Back to Index page
 
Prolog 
Control Block Contents 
   LNGBK DSECT
Storage Layout 
Cross Reference (Contains links to field and bit definitions)
Programming Interface Information:
This information is NOT intended to be
used as Programming Interfaces of z/VM.


  LNGBK Prolog Top of page
 
 NAME       : HCPLNGBK
 DESCRIPTION: Language Information Block
 DSECT      : LNGBK
 FUNCTION   : Contains information about the message repository.
 LOCATED BY : SYSLANG   LNGBK chain anchor
              VMDLANG   Pointer to the LNGBK
              LNGNEXT   Forward pointer
              LNGBACK   Backward pointer
 CREATED BY : HCPNLS    At initialization for the default
              MESSAGE repository (HCPMES).
              HCPNLS    When the first user is connected
              to a message repository.
 DELETED BY : HCPNLS    When the user count of the message repository
              is zero the associated LNGBK is deleted.
 REFERENCES : HCPICRBK - Indirect Call Request Block
 SERIALIZED :
              Created and destroyed only when the SYSLNGLK lock
              is held exclusive.
              Searched only when the LNGLOCK lock is held shared.
 RELOCATION CONSIDERATIONS : None
 
 
  LNGBK Control Block Content Top of page
 

 LNGBK DSECT Top of page
Hex Dec Type/Val Lng Label (dup) Comments ---- ---- --------- ---- -------------- -------- 0000 0 Structure LNGBK Language Information Block 0000 0 Address 4 LNGNEXT Address of next LNGBK 0004 4 Address 4 LNGBACK Address of previous LNGBK Notes : If there is only one LNGBK, then this field will have the same address as "LNGNEXT" in it. 0008 8 Dbl-Word 8 LNGLOCK (3) Purge LNGBK lock. If both the LNGBK queue lock (SYSLNGBK), and the LNGBK lock (LNGLOCK), must be acquired, one must acquire them in this order: SYSLNGBK, then LNGLOCK 0020 32 Signed 2 LNGPAGE Total number of repository pages 0022 34 Bitstring 1 LNGFLAG Language flag byte 1... .... LNGDBCS X'80' LNGDBCS Double-byte character set. Notes : LNGDBCS is originally set by the compiler if the language uses the double-byte character set. .... ...1 LNGSKIP X'01' LNGSKIP For HCPERM: skip this LNGBK at the moment because it is being manipulated, therefore is not complete, and we don't want to get into a deadly embrace of multiple acquisitions of the LNGLOCK. 0023 35 Bitstring 1 * Reserved 0024 36 Address 4 LNGIMGBK Address of imgbk 0028 40 Character 5 LNGLANG Language identifier 002D 45 Character 3 LNGCOMP Component identifier 0030 48 Signed 4 LNGCNT User count 0034 52 Address 4 LNGLBX Address of LBXBK 0038 56 Address 4 * Reserved 003C 60 Address 4 LNGEPADR Virtual address of LNGEPNAM. For its real address, use the page pointers in the LBXBK. 0040 64 Bitstring 16 LNGICR (0) The ICRBK fields 0040 64 Character 8 LNGEPNAM Associated epname 0048 72 Address 4 LNGADDRL Address of ICLBK 004C 76 Bitstring 1 LNGATTR Attributes of epname .1.. .... ICRRLONG X'40' ICRRLONG Caller is LONGREG ..1. .... ICRELONG X'20' ICRELONG Callee is LONGREG ...1 .... ICRESTA X'10' ICRESTA callee uses static savearea .... 1... ICRRMP X'08' ICRRMP caller MP capable .... .1.. ICRERES X'04' ICRERES callee Resident .... ..1. ICREMP X'02' ICREMP callee MP capable .... ...1 ICRTRC X'01' ICRTRC issue TRACE instruction 004D 77 Bitstring 1 LNGF1 Attributes .... ...1 ICRNLOSS X'01' ICRNLOSS HCPCALL TYPE=INDIRECT must not result in loss of control 004E 78 Bitstring 1 * (2) Reserved 0050 80 Dbl-Word 8 LNGUSRD1 Reserved for non-IBM use 0058 88 Dbl-Word 8 LNGUSRD2 Reserved for non-IBM use 0060 96 Signed 4 LNGUSRF1 Reserved for non-IBM use 0064 100 Signed 4 LNGUSRF2 Reserved for non-IBM use 0068 104 Signed 2 LNGUSRH1 Reserved for non-IBM use 006A 106 Signed 2 LNGUSRH2 Reserved for non-IBM use 006C 108 Bitstring 1 LNGUSRX1 Reserved for non-IBM use 006D 109 Bitstring 1 LNGUSRX2 Reserved for non-IBM use 006E 110 Bitstring 1 LNGUSRX3 Reserved for non-IBM use 006F 111 Bitstring 1 LNGUSRX4 Reserved for non-IBM use 0000000E LNGSIZE (*-LNGBK+7)/8 Size of the LNGBK
 
 
  LNGBK Storage Layout Top of page
 
          
*** LNGBK - Language Information Block
*
*     +---------------------------+---------------------------+
*   0 |         LNGNEXT           |         LNGBACK           |
*     +---------------------------+---------------------------+
*   8 |                                                       |
*     =                       LNGLOCK                         =
*     |                                                       |
*     +-------------+------+------+---------------------------+
*  20 |  LNGPAGE    |:FLAG |//////|         LNGIMGBK          |
*     +-------------+------+------+------+--------------------+
*  28 |             LNGLANG              |      LNGCOMP       |
*     +---------------------------+------+--------------------+
*  30 |          LNGCNT           |          LNGLBX           |
*     +---------------------------+---------------------------+
*  38 |///////////////////////////|         LNGEPADR          |
*     +---------------------------+---------------------------+
*  40 |                       LNGEPNAM                        |
*     +---------------------------+------+------+-------------+
*  48 |         LNGADDRL          |:ATTR |LNGF1 |/////////////|
*     +---------------------------+------+------+-------------+
*  50 |                       LNGUSRD1                        |
*     +-------------------------------------------------------+
*  58 |                       LNGUSRD2                        |
*     +---------------------------+---------------------------+
*  60 |         LNGUSRF1          |         LNGUSRF2          |
*     +-------------+-------------+------+------+------+------+
*  68 |  LNGUSRH1   |  LNGUSRH2   |:USRX1|:USRX2|:USRX3|:USRX4|
*     +-------------+-------------+------+------+------+------+
*  70
*
*** LNGBK - Language Information Block
 
 
  LNGBK Cross Reference Top of page
 
 
Symbol         Dspl Value
-------------- ---- -----
ICRELONG       004C 20
ICREMP         004C 02
ICRERES        004C 04
ICRESTA        004C 10
ICRNLOSS       004D 01
ICRRLONG       004C 40
ICRRMP         004C 08
ICRTRC         004C 01
LNGADDRL       0048
LNGATTR        004C
LNGBACK        0004
LNGCNT         0030
LNGCOMP        002D
LNGDBCS        0022 80
LNGEPADR       003C
LNGEPNAM       0040
LNGFLAG        0022
LNGF1          004D
LNGICR         0040
LNGIMGBK       0024
LNGLANG        0028
LNGLBX         0034
LNGLOCK        0008
LNGNEXT        0000
LNGPAGE        0020
LNGSIZE        006F 0000000E
LNGSKIP        0022 01
LNGUSRD1       0050
LNGUSRD2       0058
LNGUSRF1       0060
LNGUSRF2       0064
LNGUSRH1       0068
LNGUSRH2       006A
LNGUSRX1       006C
LNGUSRX2       006D
LNGUSRX3       006E
LNGUSRX4       006F
 
This information is based on z/VM 7.3.0 Last updated on 22 Jun 2022 at 15:52:15 EDT.
Copyright IBM Corporation, 1990, 2022