starlet/src/pdscdef.h

Go to the documentation of this file.

#ifndef pdscdef_h
#define pdscdef_h

#define PDSC_K_KIND_BOUND 0             
#define PDSC_K_KIND_NULL 8              
#define PDSC_K_KIND_FP_STACK 9          
#define PDSC_K_KIND_FP_REGISTER 10      
#define PDSC_M_HANDLER_VALID 0x10
#define PDSC_M_HANDLER_REINVOKABLE 0x20
#define PDSC_M_HANDLER_DATA_VALID 0x40
#define PDSC_M_BASE_REG_IS_FP 0x80
#define PDSC_M_REI_RETURN 0x100
#define PDSC_M_STACK_RETURN_VALUE 0x200
#define PDSC_M_BASE_FRAME 0x400
#define PDSC_M_TARGET_INVO 0x800
#define PDSC_M_NATIVE 0x1000
#define PDSC_M_NO_JACKET 0x2000
#define PDSC_M_TIE_FRAME 0x4000
#define PDSC_M_FUNC_RETURN 0xF
#define PDSC_M_EXCEPTION_MODE 0x70
#define PDSC_K_EXC_MODE_SIGNAL 0        
#define PDSC_K_EXC_MODE_SIGNAL_ALL 1    
#define PDSC_K_EXC_MODE_SIGNAL_SILENT 2 
#define PDSC_K_EXC_MODE_FULL_IEEE 3     
#define PDSC_K_EXC_MODE_CALLER 4        
#define PDSC_K_NULL_SIZE 16             
#define PDSC_K_BOUND_SIZE 24            
#define PDSC_K_MIN_BOUND_SIZE 24        
#define PDSC_K_MIN_LENGTH_SF 32         
#define PDSC_K_MIN_STACK_SIZE 32        
#define PDSC_K_MAX_STACK_SIZE 48        
#define PDSC_K_MIN_LENGTH_RF 24         
#define PDSC_K_MIN_REGISTER_SIZE 24     
#define PDSC_K_MAX_REGISTER_SIZE 40     
#define PDSC_K_BOUND_ENVIRONMENT_SIZE 32 
        
 struct _pdscdef {
  union  {
    unsigned short int pdsc_w_flags; 
    struct  {
      unsigned pdsc_v_kind : 4;   
      unsigned pdsc_v_handler_valid : 1; 
      unsigned pdsc_v_handler_reinvokable : 1; 
      unsigned pdsc_v_handler_data_valid : 1; 
      unsigned pdsc_v_base_reg_is_fp : 1; 
      unsigned pdsc_v_rei_return : 1; 
      unsigned pdsc_v_stack_return_value : 1; 
      unsigned pdsc_v_base_frame : 1; 
      unsigned pdsc_v_target_invo : 1; 
      unsigned pdsc_v_native : 1; 
      unsigned pdsc_v_no_jacket : 1; 
      unsigned pdsc_v_tie_frame : 1; 
      unsigned pdsc_v_flags_mbz2 : 1; 
    };
  };
  union  {
    short int pdsc_w_rsa_offset;    
    struct  {
      unsigned char pdsc_b_save_fp; 
      unsigned char pdsc_b_save_ra; 
    };
  };
  char pdsc_b_entry_ra;               
  struct  {
    unsigned pdsc_v_func_return : 4; 
    unsigned pdsc_v_exception_mode : 3; 
    unsigned pdsc_v_more_flags_mbz1 : 1;
  };
  short int pdsc_w_signature_offset;  
  union  {
    long long pdsc_q_entry;           
    struct  {
      int pdsc_l_entry;           
    };
  };
  union  {                          
    unsigned int pdsc_l_size;       
    union  {
      long long pdsc_q_proc_value;  
      struct  {
        int pdsc_l_proc_value;  
        int pdsc_l_reserved1;   
      };
    };
  };
  union  {
    struct  {                     
      unsigned int pdsc_l_ireg_mask; 
      unsigned int pdsc_l_freg_mask; 
      long long pdsc_q_stack_handler; 
      long long pdsc_q_stack_handler_data; 
    };
    struct  {                     
      long long pdsc_q_reg_handler; 
      long long pdsc_q_reg_handler_data; 
    };
    union  {                      
      int pdsc_l_environment;
      long long pdsc_q_environment;
    };
  };
};
 
#define PDSC_K_LKP_LENGTH 16            
        
struct _pdsc_lkpdef {           
  union  {
    long long pdsc_q_lkp_entry;       
    struct  {
      void *pdsc_ps_lkp_entry;
    };
  };
  union  {
    long long pdsc_q_lkp_proc_value;  
    struct  {
      void *pdsc_ps_lkp_proc_value;
    };
  };
};
 
#define LKP_K_SIZE 16                   
        
struct _lkpdef {                
  union  {                          
    long long lkp_q_entry;
    void *lkp_ps_entry;
  };
  union  {                          
    long long lkp_q_proc_value;
    void *lkp_ps_proc_value;
  };
};
 
#endif 
 

---