BPXYPEDB — Mapping of process exit data block

                                                      
            BPXYPEDB    ,                                                       
PEDB     DSECT           PEDB - Process Exit Data Block                         
PEDBEYE  DS    1CL0004   Eye catcher - 'PEDB'                                   
PEDBLENGTH DS  1FL2      Length of structure                                    
PEDBVERSION DS 1FL1      Version number                                         
PEDBEXITPOINTID DS 1FL1  Unique value identifying exit point, these    X        
                         constants are defined below                            
PEDBFLAGS DS   0FL4      Flags                                                  
PEDBCREATEDVIAFLAGS DS 0CL0001 Bits indicating what the process is     X        
                         being created via                                      
PEDBVIAFORK EQU X'80'    On = process is being created via fork()               
PEDBVIASPAWN EQU X'40'   On = process is being created via spawn()              
PEDBVIAATTEXEC EQU X'20' On = process is being created via             X        
                         attach_exec()                                          
PEDBVIAATTEXECMVS EQU X'10' On = process is being created via          X        
                         attach_execmvs()                                       
PEDBVIA1STCALLABLE EQU X'08' On = process is being created via the 1st X        
                         callable service from a non-z/OS UNIX address space          
         ORG   PEDBCREATEDVIAFLAGS+X'00000001'                                  
PEDBFLAGS2 DS  0CL0001   2nd flag byte                                          
PEDBVIAMEMTERM EQU X'80' On = process is being terminated via memterm           
PEDBVIAABTERM EQU X'40'  On = process is being terminated via abterm            
         ORG   PEDBFLAGS2+X'00000001'                                           
PEDBFLAGS3 DS  1CL0001   3rd flag byte                                          
PEDBFLAGS4 DS  1CL0001   4th flag byte                                          
PEDBUNIQUEID DS 1BL8     A Unique Id identifying this process's set of X        
                         exits. This Id is the same starting at the    X        
                         pre-process initialization exit all the way   X        
                         to the pre-process term exit. It also happens X        
                         to be TOD when the pre-process initial-       X        
                         zation exit was called.                                
*                                                                               
*      ***************************************************************          
*      *                                                             *          
*      * Information specific to Initiator of the new process        *          
*      * (creator) This section is filled out ONLY when the following*          
*      * exits hit: BPX_PREPROC_INIT - pre-process initialization    *          
*      * BPX_POSPROC_INIT - post process initialization              *          
*      * BPX_IMAGE_INIT - process image change This section is NOT   *          
*      * filled out by the following exits: BPX_PREPROC_TERM -       *          
*      * pre-process termination                                     *          
*      *                                                             *          
*      ***************************************************************          
*                                                                               
*                                                                               
PEDBCREATORINFO DS 0CL0164                                                      
PEDBCREATORPROCID DS 1FL4 Process ID initiating New process                     
PEDBCREATORASID DS 1FL2  ASID of initiating new process                         
PEDBCREATORUSERIDLEN DS 1FL1 Length of the Userid initiating the new   X        
                         process                                                
PEDBCREATORALIASLEN DS 1FL1 Length of the Alias initiating the new     X        
                         process                                                
PEDBCREATORPROGNAMELEN DS 1FL2 Length of the Program Name initiating   X        
                         new process                                            
         DS    1FL2      Reserved                                               
PEDBCREATORJOBNAME DS 1CL0008 Jobname initiating the new process                
PEDBCREATORUSERID DS 1CL0008 Userid initiating the new process                  
PEDBCREATORALIAS DS 1CL0008 Alias initiating the new process                    
PEDBCREATORPROGNAME DS 1CL0128 Program Name of the initiating new      X        
                         process                                                
*                                                                               
*      ***************************************************************          
*      *                                                             *          
*      * New Process / Terminating Process Information (child) This  *          
*      * section is filled out ONLY when the following exits hit:    *          
*      * BPX_POSPROC_INIT - post process initialization              *          
*      * BPX_IMAGE_INIT - process image change BPX_PREPROC_TERM -    *          
*      * pre-process termination This section is NOT filled out by   *          
*      * the following exits: BPX_PREPROC_INIT - pre-process         *          
*      * initialization                                              *          
*      *                                                             *          
*      ***************************************************************          
*                                                                               
*                                                                               
PEDBNEWINFO DS 0CL0164                                                          
PEDBTERMINFO DS 0CL0164                                                         
PEDBNEWPROCID DS 0FL4    Process ID of New process                              
PEDBTERMPROCID DS 1FL4   Process ID for the terminating process                 
PEDBNEWASID DS 0FL2      ASID of new process                                    
PEDBTERMASID DS 1FL2     ASID of the terminating process                        
PEDBNEWUSERIDLEN DS 0FL1 Length of the Userid of the new process                
PEDBTERMUSERIDLEN DS 1FL1 Length of the Userid of the terminating      X        
                         process                                                
PEDBNEWALIASLEN DS 0FL1  Length of the Alias of the new process                 
PEDBTERMALIASLEN DS 1FL1 Length of the Alias of the terminating        X        
                         process                                                
PEDBNEWPROGNAMELEN DS 0FL2 Length of the Program Name of the new       X        
                         process                                                
PEDBTERMPROGNAMELEN DS 1FL2 Length of Program Name of the terminating  X        
                         process                                                
         DS    1FL2      Reserved                                               
PEDBNEWJOBNAME DS 0CL0008 Jobname of new process                                
PEDBTERMJOBNAME DS 1CL0008 Jobname of terminating process                       
PEDBNEWUSERID DS 0CL0008 Userid of the new process                              
PEDBTERMUSERID DS 1CL0008 Userid of the terminating process                     
PEDBNEWALIAS DS 0CL0008  Alias of the new process                               
PEDBTERMALIAS DS 1CL0008 Alias of the terminating process                       
PEDBNEWPROGNAME DS 0CL0128 Program Name of the new process                      
PEDBTERMPROGNAME DS 1CL0128 Program Name of the terminating process             
*                                                                               
*      ***************************************************************          
*      *                                                             *          
*      *                                                             *          
*      ***************************************************************          
*                                                                               
*                                                                               
         DS    1CL0064   Reserved for future use                                
PEDBVER1LEN DS 0C        End of Version 1                                       
PEDB#ID  EQU   C'PEDB'   Eye catcher                                            
PEDB#VER EQU   1         Current version of this control block                  
PEDB#VER01 EQU 1         Version 1 of control block                             
PEDB#LEN01 EQU 412       Version 1 of PEDB control block len                    
PEDB#LEN EQU   412       Length of PEDB                                         
*                                                                               
*    Constants to fill in PEDBExitPointId field                                 
*                                                                               
*                                                                               
PEDB_BPX_PREPROC_INIT EQU 1 Identifies that this this structure was    X        
                         built for the pre-process initiation exit              
PEDB_BPX_POSPROC_INIT EQU 2 Identifies that this this structure was    X        
                         built for the post process initiation exit             
PEDB_BPX_IMAGE_INIT EQU 3 Identifies that this this structure was      X        
                         built for the process image change exit                
PEDB_BPX_PREPROC_TERM EQU 4 Identifies that this this structure was    X        
                         built for the pre-process termination                  
PEDB_LEN EQU   *-PEDB