Open64 (mfef90, whirl2f, and IR tools)  TAG: version-openad; SVN changeset: 916
cwh_dst.i File Reference
This graph shows which files directly or indirectly include this file:

Go to the source code of this file.

Classes

struct  type_trans
struct  ty_dst

Defines

#define DST_NAME_TABLE_SIZE   64 /* Increment size of the dir and file list */
#define STRUCT_DST_SIZE_CHANGE   512
#define INNER_DST_SIZE_CHANGE   128
#define GET_NEXT_ELEMENT_ST(c, s)   cwh_auxst_next_element(c,s,l_COMLIST)
#define GET_NEXT_ALTENTRY(c, s)   cwh_auxst_next_element(c,s,l_ALTENTRY)
#define GET_MODIFIED_NAME(s)   cwh_auxst_stem_name(s)
#define GET_NEXT_COMMON(p, c)   cwh_auxst_next_element(p,c,l_DST_COMLIST)
#define GET_NEXT_PARAMETER(p, c)   cwh_auxst_next_element(p,c,l_DST_PARMLIST)
#define IS_DOPE_TY(t)   cwh_types_is_dope(t)
#define GET_DOPE_BASE_TY(t)   cwh_types_dope_basic_TY(t)
#define IS_ALTENTRY(s)   ST_auxst_is_altentry(s)
#define GET_ST_LINENUM(s)   cwh_auxst_srcpos_val(s)
#define GET_DOPE_BOUNDS(t)   cwh_types_dope_dims_FLD(t)
#define GET_MAIN_ST()   cwh_stab_main_ST()

Typedefs

typedef struct type_trans type_trans
typedef struct ty_dst TYIDX

Enumerations

enum  str_knd {
  s_NONE, s_WORD, s_BYTE, s_TWO_BYTE,
  s_CHAR
}

Functions

static DST_FILE_IDX cwh_dst_enter_files (void)
static DST_DIR_IDX DST_write_directories (void)
static DST_FILE_IDX DST_write_files (void)
static void DST_directory_of (char *file_path, char **dir_name, UINT32 *dir_length)
static mUINT16 DST_get_ordinal_num (char *the_name, char ***the_list, mUINT16 *the_next, mUINT16 *the_size)
static DST_INFO_IDX cwh_dst_basetype (TY_IDX ty)
static DST_INFO_IDX cwh_dst_mk_type (TY_IDX ty)
static DST_INFO_IDX cwh_dst_mk_func (ST *st)
static void cwh_dst_mk_var (ST *st, DST_INFO_IDX parent)
static void cwh_dst_mk_const (ST *st, DST_INFO_IDX parent)
static DST_INFO_IDX cwh_dst_mk_subroutine_type (TY_IDX ty)
static char * cwh_dst_get_command_line_options (void)
static INT32 DST_set_assoc_idx (INT32 dummy, DST_DW_tag tag, DST_flag flag, DST_ATTR_IDX iattr, DST_INFO_IDX inode)
static DST_INFO_IDX cwh_dst_array_type (TY_IDX ty)
static DST_INFO_IDX cwh_dst_subrange (ARB_HANDLE ar)
static DST_INFO_IDX cwh_dst_member (FLD_HANDLE f, DST_INFO_IDX p)
static DST_INFO_IDX cwh_dst_struct_type (TY_IDX ty)
static DST_INFO_IDX cwh_dst_pointer_type (TY_IDX ty)
static DST_INFO_IDX cwh_dst_mk_common (ST *st)
static DST_INFO_IDX cwh_dst_mk_formal (ST *st)
static DST_INFO_IDX cwh_dst_mk_variable (ST *st)
static DST_INFO_IDX cwh_dst_mk_common_inclusion (ST *com, DST_IDX c)
static BOOL cwh_dst_is_character_TY (TY_IDX ty)
static DST_INFO_IDX cwh_dst_substring_type (TY_IDX ty)
static DST_INFO_IDX cwh_dst_dope_type (TY_IDX ty, ST *st, mINT64 ofst, DST_INFO_IDX p, BOOL ptr, DST_INFO_IDX *dope_ty)
static DST_INFO_IDX cwh_dst_mk_dope_bound (ST *dp, mINT64 offset, DST_INFO_IDX t, DST_INFO_IDX p, BOOL comp)
static void cwh_dst_dope_bounds (TY_IDX td, ST *st, mINT64 offset, DST_INFO_IDX aa, DST_INFO_IDX p, BOOL comp)
static DST_INFO_IDX cwh_dst_struct_has_DST (TY_IDX ty)
static void cwh_dst_struct_set_DST (TY_IDX ty, DST_INFO_IDX i)
static void cwh_dst_struct_clear_DSTs (void)
static BOOL cwh_dst_has_dope (TY_IDX ty)
static void cwh_dst_inner_add_DST (DST_INFO_IDX i)
static void cwh_dst_inner_clear_DSTs (void)
static void cwh_dst_inner_read_DSTs (DST_INFO_IDX parent)
static enum str_knd cwh_dst_stride_kind (TY_IDX ty)
static void cwh_dst_mk_MAIN (ST *mn, DST_INFO_IDX en_idx)
static char Get_ST_Id (ST_IDX st, INT *level, INT *index)

Variables

static DST_INFO_IDX base_types [MTYPE_LAST+5]
static type_trans ate_types []
static DST_INFO_IDX current_scope_idx = DST_INVALID_INIT
static DST_INFO_IDX comp_unit_idx = DST_INVALID_INIT
static DST_FILE_IDX file_name_idx = DST_INVALID_INIT
static DST_DIR_IDX incl_dir_idx = DST_INVALID_INIT
static char * current_working_dir
static char * current_host_dir
static char ** dir_list
static mUINT16 next_dir_idx = 0
static mUINT16 dir_list_size = 0
static char ** file_list
static mUINT16 next_file_idx = 0
static mUINT16 file_list_size = 0
STTop_ST
BOOL Top_ST_has_dope
BOOL Making_FLD_DST
static INT32 Struct_Current_Size = 0
static TYIDXStruct_DSTs = NULL
static INT32 Struct_Top = -1
static DST_INFO_IDXInner_DSTs
static INT32 Inner_Current_Size = 0
static INT32 Inner_Top = -1

Define Documentation

#define DST_NAME_TABLE_SIZE   64 /* Increment size of the dir and file list */

Definition at line 96 of file cwh_dst.i.

Referenced by DST_get_ordinal_num().

#define GET_DOPE_BASE_TY (   t)    cwh_types_dope_basic_TY(t)

Definition at line 174 of file cwh_dst.i.

Referenced by cwh_dst_dope_bounds(), cwh_dst_dope_type(), and cwh_dst_struct_has_DST().

#define GET_DOPE_BOUNDS (   t)    cwh_types_dope_dims_FLD(t)

Definition at line 177 of file cwh_dst.i.

Referenced by cwh_dst_dope_bounds(), and cwh_dst_has_dope().

#define GET_MAIN_ST ( )    cwh_stab_main_ST()

Definition at line 178 of file cwh_dst.i.

Referenced by cwh_dst_enter_pu().

#define GET_MODIFIED_NAME (   s)    cwh_auxst_stem_name(s)

Definition at line 170 of file cwh_dst.i.

Referenced by cwh_dst_mk_func().

#define GET_NEXT_ALTENTRY (   c,
  s 
)    cwh_auxst_next_element(c,s,l_ALTENTRY)

Definition at line 169 of file cwh_dst.i.

Referenced by cwh_dst_enter_pu().

#define GET_NEXT_COMMON (   p,
  c 
)    cwh_auxst_next_element(p,c,l_DST_COMLIST)

Definition at line 171 of file cwh_dst.i.

Referenced by cwh_dst_enter_pu().

#define GET_NEXT_ELEMENT_ST (   c,
  s 
)    cwh_auxst_next_element(c,s,l_COMLIST)

Definition at line 168 of file cwh_dst.i.

Referenced by cwh_dst_mk_common().

#define GET_NEXT_PARAMETER (   p,
  c 
)    cwh_auxst_next_element(p,c,l_DST_PARMLIST)

Definition at line 172 of file cwh_dst.i.

Referenced by cwh_dst_enter_pu().

#define INNER_DST_SIZE_CHANGE   128

Definition at line 150 of file cwh_dst.i.

Referenced by cwh_dst_inner_add_DST().

#define IS_ALTENTRY (   s)    ST_auxst_is_altentry(s)

Definition at line 175 of file cwh_dst.i.

Referenced by cwh_dst_mk_func().

#define STRUCT_DST_SIZE_CHANGE   512

Definition at line 139 of file cwh_dst.i.

Referenced by cwh_dst_struct_set_DST().


Typedef Documentation

typedef struct ty_dst TYIDX
typedef struct type_trans type_trans

Enumeration Type Documentation

enum str_knd
Enumerator:
s_NONE 
s_WORD 
s_BYTE 
s_TWO_BYTE 
s_CHAR 

Definition at line 154 of file cwh_dst.i.


Function Documentation

static DST_INFO_IDX cwh_dst_array_type ( TY_IDX  ty) [static]
static DST_INFO_IDX cwh_dst_basetype ( TY_IDX  ty) [static]
static void cwh_dst_dope_bounds ( TY_IDX  td,
ST st,
mINT64  offset,
DST_INFO_IDX  aa,
DST_INFO_IDX  p,
BOOL  comp 
) [static]
static DST_INFO_IDX cwh_dst_dope_type ( TY_IDX  ty,
ST st,
mINT64  ofst,
DST_INFO_IDX  p,
BOOL  ptr,
DST_INFO_IDX dope_ty 
) [static]
static DST_FILE_IDX cwh_dst_enter_files ( void  ) [static]
static char* cwh_dst_get_command_line_options ( void  ) [static]
static BOOL cwh_dst_has_dope ( TY_IDX  ty) [static]
static void cwh_dst_inner_add_DST ( DST_INFO_IDX  i) [static]
static void cwh_dst_inner_clear_DSTs ( void  ) [static]
static void cwh_dst_inner_read_DSTs ( DST_INFO_IDX  parent) [static]
static BOOL cwh_dst_is_character_TY ( TY_IDX  ty) [static]
static DST_INFO_IDX cwh_dst_member ( FLD_HANDLE  f,
DST_INFO_IDX  p 
) [static]
static DST_INFO_IDX cwh_dst_mk_common ( ST st) [static]
static DST_INFO_IDX cwh_dst_mk_common_inclusion ( ST com,
DST_IDX  c 
) [static]
static void cwh_dst_mk_const ( ST st,
DST_INFO_IDX  parent 
) [static]
static DST_INFO_IDX cwh_dst_mk_dope_bound ( ST dp,
mINT64  offset,
DST_INFO_IDX  t,
DST_INFO_IDX  p,
BOOL  comp 
) [static]
static DST_INFO_IDX cwh_dst_mk_formal ( ST st) [static]
static DST_INFO_IDX cwh_dst_mk_func ( ST st) [static]
static void cwh_dst_mk_MAIN ( ST mn,
DST_INFO_IDX  en_idx 
) [static]
static DST_INFO_IDX cwh_dst_mk_type ( TY_IDX  ty) [static]
static void cwh_dst_mk_var ( ST st,
DST_INFO_IDX  parent 
) [static]
static DST_INFO_IDX cwh_dst_mk_variable ( ST st) [static]
static DST_INFO_IDX cwh_dst_pointer_type ( TY_IDX  ty) [static]
static enum str_knd cwh_dst_stride_kind ( TY_IDX  ty) [static]
static void cwh_dst_struct_clear_DSTs ( void  ) [static]
static DST_INFO_IDX cwh_dst_struct_has_DST ( TY_IDX  ty) [static]
static void cwh_dst_struct_set_DST ( TY_IDX  ty,
DST_INFO_IDX  i 
) [static]
static DST_INFO_IDX cwh_dst_struct_type ( TY_IDX  ty) [static]
static DST_INFO_IDX cwh_dst_subrange ( ARB_HANDLE  ar) [static]
static DST_INFO_IDX cwh_dst_substring_type ( TY_IDX  ty) [static]
static void DST_directory_of ( char *  file_path,
char **  dir_name,
UINT32 dir_length 
) [static]
static mUINT16 DST_get_ordinal_num ( char *  the_name,
char ***  the_list,
mUINT16 the_next,
mUINT16 the_size 
) [static]
static INT32 DST_set_assoc_idx ( INT32  dummy,
DST_DW_tag  tag,
DST_flag  flag,
DST_ATTR_IDX  iattr,
DST_INFO_IDX  inode 
) [static]
static DST_DIR_IDX DST_write_directories ( void  ) [static]
static DST_FILE_IDX DST_write_files ( void  ) [static]
static char Get_ST_Id ( ST_IDX  st,
INT level,
INT index 
) [static]

Variable Documentation

type_trans ate_types[] [static]
Initial value:
 {
 4, "BAD",       0,             
 4, "UNK",       0,                     
 1, "INTEGER_1", DW_ATE_signed,         
 2, "INTEGER_2", DW_ATE_signed,         
 4, "INTEGER_4", DW_ATE_signed,         
 8, "INTEGER_8", DW_ATE_signed,         
 1, "INTEGER*1", DW_ATE_unsigned,       
 2, "INTEGER*2", DW_ATE_unsigned,       
 4, "INTEGER*4", DW_ATE_unsigned,       
 8, "INTEGER*8", DW_ATE_unsigned,       
 4, "REAL_4",    DW_ATE_float,          
 8, "REAL_8",    DW_ATE_float,          
 10,"UNK",       DW_ATE_float,          
 16,"REAL_16",   DW_ATE_float,          
 1 ,"CHAR" ,     DW_ATE_signed_char,    
 16,"REAL_16",   DW_ATE_float,          
 1, "UNK",       DW_ATE_unsigned_char,                  
 8, "COMPLEX_4", DW_ATE_complex_float,  
 16,"COMPLEX_8", DW_ATE_complex_float,  
 32,"COMPLEX_16",DW_ATE_complex_float,  
 1, "VOID",      0,                     
 1, "LOGICAL_1", DW_ATE_boolean,        
 2, "LOGICAL_2", DW_ATE_boolean,        
 4, "LOGICAL_4", DW_ATE_boolean,        
 8, "LOGICAL_8", DW_ATE_boolean,        

}

Definition at line 52 of file cwh_dst.i.

Referenced by cwh_dst_basetype().

char* current_host_dir [static]

Definition at line 90 of file cwh_dst.i.

Referenced by cwh_dst_init_file().

char* current_working_dir [static]

Definition at line 89 of file cwh_dst.i.

char** dir_list [static]

Definition at line 97 of file cwh_dst.i.

Referenced by DST_write_directories(), and DST_write_files().

mUINT16 dir_list_size = 0 [static]

Definition at line 99 of file cwh_dst.i.

Referenced by DST_write_files().

char** file_list [static]

Definition at line 104 of file cwh_dst.i.

Referenced by cwh_dst_enter_path(), cwh_dst_filename_from_filenum(), and DST_write_files().

mUINT16 file_list_size = 0 [static]

Definition at line 106 of file cwh_dst.i.

Referenced by cwh_dst_enter_path().

Definition at line 85 of file cwh_dst.i.

Referenced by cwh_dst_write().

Definition at line 86 of file cwh_dst.i.

Referenced by cwh_dst_write().

INT32 Inner_Current_Size = 0 [static]

Definition at line 151 of file cwh_dst.i.

Referenced by cwh_dst_inner_add_DST().

Definition at line 148 of file cwh_dst.i.

Referenced by cwh_dst_inner_add_DST(), and cwh_dst_inner_read_DSTs().

INT32 Inner_Top = -1 [static]
mUINT16 next_dir_idx = 0 [static]

Definition at line 98 of file cwh_dst.i.

Referenced by DST_write_directories(), and DST_write_files().

mUINT16 next_file_idx = 0 [static]

Definition at line 105 of file cwh_dst.i.

Referenced by cwh_dst_enter_path(), cwh_dst_filename_from_filenum(), and DST_write_files().

INT32 Struct_Current_Size = 0 [static]

Definition at line 140 of file cwh_dst.i.

Referenced by cwh_dst_struct_set_DST().

TYIDX* Struct_DSTs = NULL [static]

Definition at line 141 of file cwh_dst.i.

Referenced by cwh_dst_struct_has_DST(), and cwh_dst_struct_set_DST().

INT32 Struct_Top = -1 [static]

Definition at line 126 of file cwh_dst.i.

Referenced by cwh_dst_member(), cwh_dst_mk_common(), and cwh_dst_mk_var().

 All Classes Namespaces Files Functions Variables Typedefs Enumerations Enumerator Friends Defines