#include <stdio.h>
#include <stdlib.h>
#include <assert.h>
#include "defs.h"
#include "stab.h"
#include "wn.h"
#include "wn_simp.h"
#include "opcode.h"
#include "wn_util.h"
#include "ir_reader.h"
#include "region_util.h"

Include dependency graph for wn_util.cxx:

Functions
static WN_STACK *	WN_InitStack (void)
WN *	WN_Pop (WN_STACK *wns)
void	WN_Push (WN wn, WN_STACK wns)
static void	WN_FreeStack (WN_STACK *wns)
WN_ITER *	WN_WALK_TreeIter (WN *wn)
WN_ITER *	WN_WALK_SCFIter (WN *wn)
WN_ITER *	WN_WALK_StmtIter (WN *wn)
WN_ITER *	WN_WALK_TreeNext (WN_ITER *wni)
WN_ITER *	WN_WALK_StmtNext (WN_ITER *wni)
WN_ITER *	WN_WALK_SCFNext (WN_ITER *wni)
void	WN_WALK_Abort (WN_ITER *wni)
void	WN_INSERT_BlockBefore (WN blck, WN wn, WN *in)
void	WN_INSERT_BlockAfter (WN blck, WN wn, WN *in)
WN *	WN_COPY_Tree (WN *wn)
void	WN_COPY_All_Maps (WN dst, WN src)
WN *	WN_COPY_Tree_With_Map (WN *wn)
void	WN_DELETE_Tree (WN *tree)
void	WN_DELETE_FromBlock (WN blck, WN wn)
WN *	WN_EXTRACT_FromBlock (WN parent, WN item)
WN *	WN_EXTRACT_ItemsFromBlock (WN parent, WN first_item, WN *last_item)
static void	wn_loop_get_st_ofst (const WN *var, ST_IDX &var_st, WN_OFFSET &var_offset)
static BOOL	wn_loop_ref_matches_var (const WN *ref, ST_IDX st, WN_OFFSET ofst)
static OPCODE	wn_loop_reverse_compare (OPCODE comparison)
WN *	WN_LOOP_InductionVariable (const WN *loop)
WN *	WN_LOOP_LowerBound (const WN *loop)
WN *	WN_LOOP_UpperBound (const WN loop, OPCODE compare)
WN *	WN_LOOP_Increment (const WN loop, BOOL is_incr)
WN *	WN_LOOP_TripCount (const WN *loop)
static TY_IDX	field_type (const WN *wn)
TY_IDX	WN_object_ty (const WN *wn)
INT32	WN_object_size (const WN *wn)
static BOOL	Pragma_is_Parallel_Region (WN_PRAGMA_ID pragma)
static BOOL	Pragma_is_Work_Sharing (WN_PRAGMA_ID pragma)
void	Add_Pragma_To_MP_Regions (WN_VECTOR wnv, WN_PRAGMA_ID pragma_id, ST st, WN_OFFSET ofst, WN_MAP parent_map, BOOL make_compiler_generated)

Function Documentation

void Add_Pragma_To_MP_Regions	(	WN_VECTOR *	wnv,
		WN_PRAGMA_ID	pragma_id,
		ST *	st,
		WN_OFFSET	ofst,
		WN_MAP	parent_map,
		BOOL	make_compiler_generated
	)

Definition at line 1338 of file wn_util.cxx.

References FALSE, FmtAssert, Is_True, NULL, OPC_PRAGMA, OPC_REGION, Pragma_is_Parallel_Region(), Pragma_is_Work_Sharing(), REGION_is_mp(), ST_name(), TRUE, WN_CreatePragma(), WN_first(), WN_INSERT_BlockBefore(), WN_MAP_Set, WN_next(), WN_offset(), WN_opcode(), WN_pragma(), WN_PRAGMA_FIRSTPRIVATE, WN_PRAGMA_LASTLOCAL, WN_PRAGMA_LOCAL, WN_PRAGMA_SHARED, WN_region_pragmas, WN_set_pragma_compiler_generated, and WN_st().

Referenced by cwh_block_add_to_enclosing_regions().

Here is the call graph for this function:

static TY_IDX field_type ( const WN * wn ) [static]

Definition at line 1199 of file wn_util.cxx.

References FLD_get_to_field(), FLD_type(), FLD_HANDLE::Is_Null(), Is_True, WN_field_id(), and WN_ty().

Referenced by parse_kind_selector(), parse_length_selector(), and WN_object_ty().

Here is the call graph for this function:

static BOOL Pragma_is_Parallel_Region ( WN_PRAGMA_ID pragma ) [inline, static]

Definition at line 1285 of file wn_util.cxx.

References FALSE, TRUE, WN_PRAGMA_DOACROSS, WN_PRAGMA_PARALLEL_BEGIN, WN_PRAGMA_PARALLEL_DO, and WN_PRAGMA_PARALLEL_SECTIONS.

Referenced by Add_Pragma_To_MP_Regions().

static BOOL Pragma_is_Work_Sharing ( WN_PRAGMA_ID pragma ) [inline, static]

Definition at line 1304 of file wn_util.cxx.

References FALSE, TRUE, WN_PRAGMA_DOACROSS, WN_PRAGMA_PARALLEL_DO, WN_PRAGMA_PARALLEL_SECTIONS, WN_PRAGMA_PDO_BEGIN, WN_PRAGMA_PSECTION_BEGIN, and WN_PRAGMA_SINGLE_PROCESS_BEGIN.

Referenced by Add_Pragma_To_MP_Regions().

void WN_COPY_All_Maps	(	WN *	dst,
		WN *	src
	)

Definition at line 661 of file wn_util.cxx.

References wn_map_tab::_is_used, Current_Map_Tab, WN_CopyMap(), and WN_MAP_MAX.

Referenced by WN_COPY_Tree_With_Map().

Here is the call graph for this function:

WN* WN_COPY_Tree ( WN * wn )

Definition at line 597 of file wn_util.cxx.

References Is_True, NULL, OPC_BLOCK, OPCODE_operator(), OPERATOR_FIRST, OPERATOR_LAST, WN_COPY_Tree(), WN_CopyNode(), WN_first(), WN_kid(), WN_kid_count(), WN_last(), WN_next(), WN_opcode(), and WN_prev().

Referenced by cleanUpPUInfo(), cwh_addr_adjust_array(), cwh_addr_do_bounds_check(), cwh_addr_extent(), cwh_addr_nonc_recast(), cwh_addr_pstid(), cwh_addr_stid(), cwh_addr_temp_section(), cwh_addr_ubound_from_triplet(), cwh_char_intrin(), cwh_convert_to_ty(), cwh_do_tranformational(), cwh_dope_from_expression(), cwh_dope_store(), cwh_expr_binop_shift(), cwh_expr_compare_char(), cwh_inline_allocate(), cwh_io_conv_array_to_dope(), cwh_io_conv_arrsection_to_dope(), cwh_io_split_io_items(), cwh_io_split_io_statement(), cwh_stk_push_top_item_again(), cwh_stmt_assigned_goto(), cwh_stmt_call_helper(), cwh_stmt_character_icall(), cwh_stmt_computed_goto(), cwh_stmt_insert_conformance_check(), cwh_stmt_select_case_char(), cwh_types_array_temp_TY(), DRA_EC_Array_Portion_Parms(), F90_Size_Walk(), fei_allocate(), fei_arith_goto(), fei_as_ref(), fei_concat(), fei_constant(), fei_doloop(), fei_islg(), fei_logb(), fei_mvbits(), fei_new_select(), fei_new_select_case(), fei_push_arith_con(), fei_set_dv_hdr_fld(), fei_sign_xfer(), fei_stop(), fei_substr(), fei_task_var(), Insert_Call(), MemCtr_Add_Local(), Rewrite_Pragmas_On_Structs(), Rewrite_Structs_In_MPRegion(), WN_COPY_Tree(), WN_Create_Shared_Load(), WN_Create_Shared_Store(), and WN_LOOP_TripCount().

Here is the call graph for this function:

WN* WN_COPY_Tree_With_Map ( WN * wn )

Definition at line 675 of file wn_util.cxx.

References Is_True, NULL, OPC_BLOCK, OPCODE_operator(), OPERATOR_FIRST, OPERATOR_LAST, WN_COPY_All_Maps(), WN_COPY_Tree_With_Map(), WN_CopyNode(), WN_first(), WN_kid(), WN_kid_count(), WN_last(), WN_next(), WN_opcode(), and WN_prev().

Referenced by WN_COPY_Tree_With_Map().

Here is the call graph for this function:

void WN_DELETE_FromBlock	(	WN *	blck,
		WN *	wn
	)

Definition at line 765 of file wn_util.cxx.

References FALSE, Is_True, NULL, OPCODE_is_scf(), OPCODE_is_stmt(), TRUE, WN_DELETE_Tree(), WN_first(), WN_last(), WN_next(), WN_opcode(), and WN_prev().

Referenced by Delete_Dist_Reshape_Pragmas(), ANL_LOOP_CONSTRUCT::Remove_Stmt_In_Block(), Rewrite_Pragmas_On_Structs(), and Rewrite_Structs_In_MPRegion().

Here is the call graph for this function:

void WN_DELETE_Tree ( WN * tree )

Definition at line 739 of file wn_util.cxx.

References next, NULL, OPC_BLOCK, WN_Delete, WN_DELETE_Tree(), WN_first(), WN_kid(), WN_kid_count(), WN_next(), and WN_opcode().

Referenced by arrsection_to_array(), cwh_addr_adjust_array(), cwh_addr_do_bounds_check(), cwh_addr_fixup_nseq(), cwh_addr_nonc_recast(), cwh_addr_temp_section(), cwh_dope_from_expression(), cwh_expr_extract_arrayexp(), cwh_stab_add_pragma(), cwh_stmt_conformance_checks_walk(), cwh_stmt_insert_conformance_check(), cwh_stmt_select_char(), cwh_types_mk_namelist_item_TY(), F90_Rank_Walk(), F90_Size_Walk(), fei_allocate(), fei_doloop(), fei_fcd(), fei_near(), fei_new_select(), fei_static_simple_reloc_init(), Rewrite_Structs_In_MPRegion(), simple_intrinsic(), simple_intrinsic_nt(), TCON_from_stack(), WN_DELETE_FromBlock(), and WN_DELETE_Tree().

Here is the call graph for this function:

WN* WN_EXTRACT_FromBlock	(	WN *	parent,
		WN *	item
	)

Definition at line 813 of file wn_util.cxx.

References Is_True, NULL, OPC_BLOCK, WN_first(), WN_last(), WN_next(), WN_opcode(), and WN_prev().

Referenced by WN_EXTRACT_ItemsFromBlock().

Here is the call graph for this function:

WN* WN_EXTRACT_ItemsFromBlock	(	WN *	parent,
		WN *	first_item,
		WN *	last_item
	)

Definition at line 846 of file wn_util.cxx.

References Is_True, NULL, OPC_BLOCK, WN_EXTRACT_FromBlock(), WN_first(), WN_last(), WN_next(), WN_opcode(), and WN_prev().

Here is the call graph for this function:

static void WN_FreeStack ( WN_STACK * wns ) [static]

Definition at line 115 of file wn_util.cxx.

References Malloc_Mem_Pool, MEM_POOL_FREE, and WN_STACK_stack.

Referenced by WN_WALK_Abort(), WN_WALK_SCFNext(), WN_WALK_StmtNext(), and WN_WALK_TreeNext().

static WN_STACK* WN_InitStack ( void ) [static]

-------------------------------------------------------------------

WN utility routines

-------------------------------------------------------------------

Definition at line 66 of file wn_util.cxx.

References Malloc_Mem_Pool, MEM_POOL_Alloc, WN_STACK_size, WN_STACK_sp, and WN_STACK_stack.

Referenced by WN_WALK_SCFIter(), WN_WALK_StmtIter(), and WN_WALK_TreeIter().

void WN_INSERT_BlockAfter	(	WN *	blck,
		WN *	wn,
		WN *	in
	)

Definition at line 469 of file wn_util.cxx.

References FALSE, FmtAssert, NULL, OPC_BLOCK, OPCODE_is_scf(), OPCODE_is_stmt(), OPR_BLOCK, TRUE, wn, WN_Delete, WN_first(), WN_last(), WN_next(), WN_opcode(), WN_operator(), and WN_prev().

Referenced by cwh_block_insert_after(), DRA_EC_Array_Portion_Parms(), DRA_Insert_Pragmas(), Gen_Call_Array(), Gen_Free_Cart(), Insert_Call(), and Rewrite_Pragmas_On_Structs().

Here is the call graph for this function:

void WN_INSERT_BlockBefore	(	WN *	blck,
		WN *	wn,
		WN *	in
	)

Definition at line 346 of file wn_util.cxx.

References FALSE, FmtAssert, NULL, OPC_BLOCK, OPCODE_is_scf(), OPCODE_is_stmt(), OPR_BLOCK, TRUE, wn, WN_Delete, WN_first(), WN_last(), WN_next(), WN_opcode(), WN_operator(), and WN_prev().

Referenced by Add_Pragma_To_MP_Regions(), cwh_stmt_insert_conformance_check(), DRA_EC_Array_Portion_Parms(), Gen_Malloc_Cart(), Insert_Alloca(), MemCtr_Add_Local(), Rewrite_Pragmas_On_Structs(), and Rewrite_Structs_In_MPRegion().

Here is the call graph for this function:

static void wn_loop_get_st_ofst	(	const WN *	var,
		ST_IDX &	var_st,
		WN_OFFSET &	var_offset
	)		`[static]`

Definition at line 891 of file wn_util.cxx.

References OPC_IDNAME, OPR_LDID, OPR_PSTID, OPR_STID, WN_idname_offset(), WN_load_offset(), WN_opcode(), WN_operator(), WN_st_idx(), and WN_store_offset().

Referenced by WN_LOOP_Increment(), WN_LOOP_LowerBound(), wn_loop_ref_matches_var(), and WN_LOOP_UpperBound().

Here is the call graph for this function:

WN* WN_LOOP_Increment	(	const WN *	loop,
		BOOL *	is_incr
	)

Definition at line 1067 of file wn_util.cxx.

References FALSE, NULL, OPR_ADD, OPR_PSTID, OPR_STID, OPR_SUB, TRUE, WN_kid0(), WN_kid1(), wn_loop_get_st_ofst(), WN_LOOP_InductionVariable(), wn_loop_ref_matches_var(), WN_operator(), WN_st_idx(), WN_step, and WN_store_offset().

Referenced by WN_LOOP_TripCount().

Here is the call graph for this function:

WN* WN_LOOP_InductionVariable ( const WN * loop )

Definition at line 958 of file wn_util.cxx.

References NULL, OPC_DO_LOOP, WN_index, and WN_opcode().

Referenced by WN_LOOP_Increment(), WN_LOOP_LowerBound(), and WN_LOOP_UpperBound().

Here is the call graph for this function:

WN* WN_LOOP_LowerBound ( const WN * loop )

Definition at line 977 of file wn_util.cxx.

References NULL, OPR_PSTID, OPR_STID, start, WN_kid0(), wn_loop_get_st_ofst(), WN_LOOP_InductionVariable(), WN_operator(), WN_st_idx(), WN_start, and WN_store_offset().

Referenced by WN_LOOP_TripCount().

Here is the call graph for this function:

static BOOL wn_loop_ref_matches_var	(	const WN *	ref,
		ST_IDX	st,
		WN_OFFSET	ofst
	)		`[static]`

Definition at line 920 of file wn_util.cxx.

References wn_loop_get_st_ofst().

Referenced by WN_LOOP_Increment(), and WN_LOOP_UpperBound().

Here is the call graph for this function:

static OPCODE wn_loop_reverse_compare ( OPCODE comparison ) [static]

Definition at line 933 of file wn_util.cxx.

References FALSE, FmtAssert, OPCODE_desc(), OPCODE_operator(), OPCODE_rtype(), OPR_EQ, OPR_GE, OPR_GT, OPR_LE, OPR_LT, and OPR_NE.

Referenced by WN_LOOP_UpperBound().

Here is the call graph for this function:

WN* WN_LOOP_TripCount ( const WN * loop )

Definition at line 1134 of file wn_util.cxx.

References MTYPE_is_integral, MTYPE_V, NULL, OPC_DO_LOOP, OPCODE_desc(), OPCODE_operator(), OPR_ADD, OPR_DIV, OPR_GT, OPR_LT, OPR_SUB, TRUE, WN_COPY_Tree(), WN_CreateExp2(), WN_LOOP_Increment(), WN_LOOP_LowerBound(), WN_LOOP_UpperBound(), WN_opcode(), WN_rtype(), and WN_Simplifier_Enable().

Here is the call graph for this function:

WN* WN_LOOP_UpperBound	(	const WN *	loop,
		OPCODE *	compare
	)

Definition at line 1019 of file wn_util.cxx.

References NULL, OPCODE_is_compare(), OPCODE_UNKNOWN, WN_end, WN_kid0(), WN_kid1(), wn_loop_get_st_ofst(), WN_LOOP_InductionVariable(), wn_loop_ref_matches_var(), wn_loop_reverse_compare(), and WN_opcode().

Referenced by WN_LOOP_TripCount().

Here is the call graph for this function:

INT32 WN_object_size ( const WN * wn )

Definition at line 1245 of file wn_util.cxx.

References FALSE, FmtAssert, MTYPE_size_min, OPR_ILDBITS, OPR_ILOAD, OPR_ILOADX, OPR_INTCONST, OPR_ISTBITS, OPR_ISTORE, OPR_ISTOREX, OPR_LDBITS, OPR_LDID, OPR_MLOAD, OPR_MSTORE, OPR_PARM, OPR_PSTID, OPR_PSTORE, OPR_STBITS, OPR_STID, WN_const_val(), WN_desc(), WN_kid1(), WN_kid2(), WN_operator(), and WN_rtype().

Here is the call graph for this function:

TY_IDX WN_object_ty ( const WN * wn )

Definition at line 1218 of file wn_util.cxx.

References field_type(), Is_True, KIND_POINTER, KIND_STRUCT, OPCODE_is_load(), OPCODE_is_store(), OPR_LDBITS, OPR_LDID, OPR_PSTID, OPR_STBITS, OPR_STID, TY_kind(), TY_pointed(), Ty_Table, WN_field_id(), WN_opcode(), WN_operator(), and WN_ty().

Referenced by WN_Create_Shared_Load().

Here is the call graph for this function:

WN* WN_Pop ( WN_STACK * wns ) [inline]

Definition at line 85 of file wn_util.cxx.

References NULL, WN_STACK_sp, and WN_STACK_stack.

Referenced by WN_WALK_SCFNext(), WN_WALK_StmtNext(), and WN_WALK_TreeNext().

void WN_Push	(	WN *	wn,
		WN_STACK *	wns
	)		`[inline]`

Definition at line 97 of file wn_util.cxx.

References Malloc_Mem_Pool, MEM_POOL_Realloc, size, WN_STACK_size, WN_STACK_sp, and WN_STACK_stack.

Referenced by WN_WALK_SCFNext(), WN_WALK_StmtNext(), and WN_WALK_TreeNext().

void WN_WALK_Abort ( WN_ITER * wni )

Definition at line 332 of file wn_util.cxx.

References FmtAssert, free(), NULL, WN_FreeStack(), and WN_ITER_stack.

Here is the call graph for this function:

WN_ITER* WN_WALK_SCFIter ( WN * wn )

Definition at line 144 of file wn_util.cxx.

References FmtAssert, OPCODE_is_scf(), OPERATOR_FIRST, OPERATOR_LAST, wn, WN_InitStack(), WN_ITER_stack, WN_ITER_wn, WN_opcode(), and WN_operator().

Here is the call graph for this function:

WN_ITER* WN_WALK_SCFNext ( WN_ITER * wni )

Definition at line 279 of file wn_util.cxx.

References free(), NULL, OPCODE_is_scf(), OPR_BLOCK, WN_FreeStack(), WN_ITER_stack, WN_ITER_wn, WN_kid(), WN_kid_count(), WN_last(), WN_opcode(), WN_operator(), WN_Pop(), WN_prev(), and WN_Push().

Here is the call graph for this function:

WN_ITER* WN_WALK_StmtIter ( WN * wn )

Definition at line 165 of file wn_util.cxx.

References FmtAssert, OPCODE_is_scf(), OPCODE_is_stmt(), OPERATOR_FIRST, OPERATOR_LAST, wn, WN_InitStack(), WN_ITER_stack, WN_ITER_wn, WN_opcode(), and WN_operator().

Referenced by Accumulate_Stmt_PUinfo(), Adjust_Srcpos_Range(), cwh_stab_distrib_pragmas(), and Remove_Skips().

Here is the call graph for this function:

WN_ITER* WN_WALK_StmtNext ( WN_ITER * wni )

Definition at line 232 of file wn_util.cxx.

References free(), NULL, OPCODE_is_scf(), OPR_BLOCK, WN_FreeStack(), WN_ITER_stack, WN_ITER_wn, WN_kid(), WN_kid_count(), WN_last(), WN_opcode(), WN_operator(), WN_Pop(), WN_prev(), and WN_Push().

Referenced by Adjust_Srcpos_Range(), cwh_stab_distrib_pragmas(), and Remove_Skips().

Here is the call graph for this function:

WN_ITER* WN_WALK_TreeIter ( WN * wn )

Definition at line 125 of file wn_util.cxx.

References FmtAssert, OPERATOR_FIRST, OPERATOR_LAST, wn, WN_InitStack(), WN_ITER_stack, WN_ITER_wn, and WN_operator().

Referenced by Accumulate_Expr_PUinfo(), DRA_Mangle_All(), DRA_Processing(), ANL_VARLIST::Insert_Var_Refs(), True_Bound(), WN_num_var_refs(), WN_Rename_Duplicate_Labels(), and WN_Tree_Has_Duplicate_Labels().

Here is the call graph for this function:

WN_ITER* WN_WALK_TreeNext ( WN_ITER * wni )

Definition at line 194 of file wn_util.cxx.

References free(), NULL, OPR_BLOCK, WN_FreeStack(), WN_ITER_stack, WN_ITER_wn, WN_kid(), WN_kid_count(), WN_last(), WN_operator(), WN_Pop(), WN_prev(), and WN_Push().

Referenced by DRA_Mangle_All(), DRA_Processing(), ANL_VARLIST::Insert_Var_Refs(), True_Bound(), WN_num_var_refs(), WN_Rename_Duplicate_Labels(), and WN_Tree_Has_Duplicate_Labels().

Here is the call graph for this function:

Functions

Function Documentation