array.c File Reference

#include <stdlib.h>
#include "genC.h"
#include "newgen_include.h"

Include dependency graph for array.c:

Go to the source code of this file.

Data Structures
struct	_gen_array_chunk_t

Macros
#define	GEN_ARRAY_SIZE_INCREMENT   (50)

Functions
gen_array_t	gen_array_make (size_t size)
	declarations... More...
static void	gen_array_resize (gen_array_t a, int min)
void	gen_array_free (gen_array_t a)
void	gen_array_full_free (gen_array_t a)
void	gen_array_addto (gen_array_t a, size_t i, void *what)
void	gen_array_remove (gen_array_t a, size_t i)
void	gen_array_append (gen_array_t a, void *what)
void	gen_array_dupaddto (gen_array_t a, size_t i, void *what)
void	gen_array_dupappend (gen_array_t a, void *what)
void **	gen_array_pointer (const gen_array_t a)
	Observers... More...
size_t	gen_array_nitems (const gen_array_t a)
size_t	gen_array_size (const gen_array_t a)
void *	gen_array_item (const gen_array_t a, size_t i)
static int	gen_array_cmp (const void *a1, const void *a2)
	Sort: assumes that the items are the first ones. More...
void	gen_array_sort_with_cmp (gen_array_t a, int(*cmp)(const void *, const void *))
void	gen_array_sort (gen_array_t a)
gen_array_t	gen_array_from_list (list ls)
list	list_from_gen_array (gen_array_t a)
string	string_array_join (gen_array_t array, string separator)
	Join a string array with a string separator. More...

Macro Definition Documentation

GEN_ARRAY_SIZE_INCREMENT

#define GEN_ARRAY_SIZE_INCREMENT   (50)

Definition at line 31 of file array.c.

Function Documentation

gen_array_addto()

void gen_array_addto	(	gen_array_t	a,
		size_t	i,
		void *	what
	)

0<=i &&

Definition at line 87 of file array.c.

{
    if (i>=a->size) gen_array_resize(a,i+1);
    message_assert("valid index", /* 0<=i &&  */ i < a->size);
    if (a->array[i]!=(void *)NULL) a->nitems--;
    a->array[i] = what;
    if (a->array[i]!=(void *)NULL) a->nitems++;
}

References _gen_array_chunk_t::array, gen_array_resize(), message_assert, _gen_array_chunk_t::nitems, and _gen_array_chunk_t::size.

Referenced by allocate_task_to_cluster(), atomize_or_associate_for_level(), bottom_level(), cancel_schedule(), DSC(), eov_add_entity_to_eliminate(), gen_array_append(), gen_array_dupaddto(), group_expr_by_level(), initialization(), initialization_clusters(), list_to_array(), move_task_to_cluster(), parse_instrumented_file(), priorities(), schedule_failsafe(), t_level(), topological_sort(), and zeroing_multiple_edges().

Here is the call graph for this function:

Here is the caller graph for this function:

gen_array_append()

void gen_array_append	(	gen_array_t	a,
		void *	what
	)

Definition at line 105 of file array.c.

{
    gen_array_addto(a, a->nitems, what);
}

References gen_array_addto(), and _gen_array_chunk_t::nitems.

Referenced by add_a_file(), capply(), create(), gen_array_dupappend(), get_main(), gpips_parse_arguments(), pips_parse_arguments(), store_call_context(), wpips_parse_arguments(), xml_dim_string(), xml_loop_from_loop(), and xml_loop_from_sequence().

Here is the call graph for this function:

Here is the caller graph for this function:

gen_array_cmp()

static int gen_array_cmp ( const void *  a1, const void *  a2  )

static

Sort: assumes that the items are the first ones.

Definition at line 152 of file array.c.

{
  return strcmp(* (char **) a1, * (char **) a2);
}

Referenced by gen_array_sort().

Here is the caller graph for this function:

gen_array_dupaddto()

void gen_array_dupaddto	(	gen_array_t	a,
		size_t	i,
		void *	what
	)

Definition at line 111 of file array.c.

{
    gen_array_addto(a, i, strdup(what));
}

References gen_array_addto(), and strdup().

Referenced by get_help_topic(), get_help_topics(), mchoose_ok_notify(), and safe_list_files_in_directory().

Here is the call graph for this function:

Here is the caller graph for this function:

gen_array_dupappend()

void gen_array_dupappend	(	gen_array_t	a,
		void *	what
	)

Definition at line 117 of file array.c.

{
    gen_array_append(a, strdup(what));
}

References gen_array_append(), and strdup().

Referenced by db_get_module_list_initial_order(), db_get_module_or_function_list(), gen_array_from_list(), and get_main().

Here is the call graph for this function:

Here is the caller graph for this function:

gen_array_free()

void gen_array_free

(

gen_array_t

a

)

Definition at line 70 of file array.c.

{
  gen_free_area(a->array, a->size*sizeof(void*));
  gen_free_area((void**)a, sizeof(struct _gen_array_chunk_t));
}

References _gen_array_chunk_t::array, gen_free_area(), and _gen_array_chunk_t::size.

Referenced by add_a_file(), BDSC(), bootstrap(), capply(), create(), display_help(), DSC(), dsc_code_parallelization(), eov_free_ctx(), execute_workspace_creation_and_so_on_given_with_options(), full_graph_of_calls(), gen_array_full_free(), get_callees_of(), get_callers_of(), hierarchical_schedule(), hierarchical_schedule_step(), prettyprint_dependence_graph(), prettyprint_dependence_graph_view(), pyps_get_stubs(), sort_list_of_strings(), topological_sort(), xml_Boxes(), xml_Chain_Graph(), xml_loop_from_sequence(), xml_Task(), xml_tasks(), and zeroing_multiple_edges().

Here is the call graph for this function:

Here is the caller graph for this function:

gen_array_from_list()

gen_array_t gen_array_from_list

(

list

ls

)

Parameters

ls

of string

Definition at line 170 of file array.c.

{
    gen_array_t a = gen_array_make(0);
    MAP(STRING, s, gen_array_dupappend(a, s), ls);
    return a;
}

References gen_array_dupappend(), gen_array_make(), MAP, and STRING.

Referenced by get_callees(), get_callers(), and get_stubs().

Here is the call graph for this function:

Here is the caller graph for this function:

gen_array_full_free()

void gen_array_full_free

(

gen_array_t

a

)

what is it?

Definition at line 77 of file array.c.

{
  size_t i;
  for (i=0; i<a->size; i++)
    if (a->array[i])
      free(a->array[i]); /* what is it? */
  gen_array_free(a);
}

References _gen_array_chunk_t::array, free(), gen_array_free(), and _gen_array_chunk_t::size.

Referenced by build_real_resources(), callgraph(), close_help_notify(), continue_create_workspace_notify(), db_save_workspace(), end_select_module_callback(), end_select_module_notify(), epips_select_module(), free_owner_content(), generate_a_directory_menu(), generate_a_menu_with_HPF_output_files(), generate_module_menu(), generate_workspace_menu(), get_main(), get_main_entity_name(), get_module_names(), hbdsc_parallelization(), info(), mchoose_ok_notify(), open_module_if_unique(), open_or_create_workspace(), open_workspace_notify(), process_file_list(), program_points_to(), program_precondition(), remove_module_entity(), select_module_from_menubar_callback(), select_module_notify(), send_the_names_of_the_available_modules_to_emacs(), start_delete_workspace_notify(), tp_some_info(), and unsplit_internal().

Here is the call graph for this function:

Here is the caller graph for this function:

gen_array_item()

void* gen_array_item	(	const gen_array_t	a,
		size_t	i
	)

0<=i &&

Definition at line 143 of file array.c.

{
  message_assert("valid index", /* 0<=i && */ i < a->size);
  return a->array[i];
}

References _gen_array_chunk_t::array, and message_assert.

Referenced by allocate_task_to_cluster(), atomize_or_associate_for_level(), BDSC(), bootstrap(), bottom_level(), callgraph(), cancel_schedule(), continue_create_workspace_notify(), create_workspace(), critical_path_length(), display_help(), DSC(), DSRW(), end_idle_clusters(), end_select_module_callback(), end_select_module_notify(), eov_get_replaced_enity(), epips_select_module(), full_graph_of_calls(), gen_array_index(), generate_a_directory_menu(), generate_a_menu_with_HPF_output_files(), generate_module_menu(), generate_workspace_menu(), generic_program_pointer_values(), get_main_entity_name(), get_module_names(), group_expr_by_level(), hierarchical_schedule(), hierarchical_schedule_step(), info(), initialization_clusters(), max_start_time_cluster(), mchoose(), MCW(), min_start_time_cluster(), move_task_to_cluster(), open_module_if_unique(), open_or_create_workspace(), open_workspace_notify(), parse_instrumented_file(), pips_get_workspace_list(), print_sdg_task(), print_SDGs(), priorities(), process_file_list(), program_points_to(), program_precondition(), ready_node(), remove_module_entity(), schedule_failsafe(), schoose(), select_task_with_highest_priority(), send_the_names_of_the_available_modules_to_emacs(), step_compile_generated_module(), step_install(), t_level(), tlevel_decrease(), topological_sort(), tp_some_info(), update_list_from_array(), update_parallel_task(), update_priority_values(), workspace_language(), xml_array_in_task(), xml_Boxes(), xml_Call(), xml_Chain_Graph(), xml_loop_from_sequence(), xml_Task(), xml_task(), xml_tasks_with_motif(), and zeroing_multiple_edges().

gen_array_make()

gen_array_t gen_array_make

(

size_t

size

)

declarations...

default size

number of items stored

Definition at line 40 of file array.c.

{
    gen_array_t a;
    size_t i;
    if (size<=0) size= GEN_ARRAY_SIZE_INCREMENT; /* default size */
    a = (gen_array_t) malloc(sizeof(struct _gen_array_chunk_t));
    message_assert("array ok", a);
    a->size = size;
    a->nitems = 0; /* number of items stored */
    a->array = (void**) malloc(size*sizeof(void*));
    message_assert("malloc ok", a->array);
    for (i=0; i<size; i++) a->array[i] = (void*) NULL;
    return a;
}

References _gen_array_chunk_t::array, GEN_ARRAY_SIZE_INCREMENT, malloc(), message_assert, _gen_array_chunk_t::nitems, and _gen_array_chunk_t::size.

Referenced by add_a_file(), capply(), continue_create_workspace_notify(), create(), db_get_module_list(), db_get_module_list_initial_order(), db_get_module_or_function_list(), display_help(), dsc_code_parallelization(), eov_add_entity_to_eliminate(), gen_array_from_list(), generate_a_directory_menu(), generate_a_menu_with_HPF_output_files(), generate_workspace_menu(), get_main(), gpips_parse_arguments(), group_expr_by_level(), hbdsc_parallelization(), initialization(), mchoose_ok_notify(), open_or_create_workspace(), open_workspace_notify(), parse_instrumented_file(), pips_parse_arguments(), prettyprint_dependence_graph(), prettyprint_dependence_graph_view(), print_xml_code_with_explicit_motif(), schedule_failsafe(), sequence_dependence_graph(), sort_list_of_strings(), start_delete_workspace_notify(), topological_sort(), wpips_parse_arguments(), xml_Boxes(), xml_Chain_Graph(), xml_loop_from_sequence(), xml_Task(), xml_tasks(), xml_tasks_with_motif(), and zeroing_multiple_edges().

Here is the call graph for this function:

Here is the caller graph for this function:

gen_array_nitems()

size_t gen_array_nitems

(

const gen_array_t

a

)

Definition at line 131 of file array.c.

{
    return a->nitems;
}

References _gen_array_chunk_t::nitems.

Referenced by __attribute__(), bootstrap(), callgraph(), continue_create_workspace_notify(), create_workspace(), display_help(), end_select_module_callback(), end_select_module_notify(), epips_select_module(), full_graph_of_calls(), gen_array_index(), generate_a_directory_menu(), generate_module_menu(), generate_workspace_menu(), generic_program_pointer_values(), get_main_entity_name(), get_module_names(), info(), mchoose(), open_module_if_unique(), open_or_create_workspace(), open_workspace_notify(), perform(), pips_get_workspace_list(), pips_main(), prettyprint_dependence_graph(), prettyprint_dependence_graph_view(), print_sdg_task(), print_SDGs(), priorities(), process_file_list(), program_points_to(), program_precondition(), remove_module_entity(), schoose(), select_module_from_menubar_callback(), select_module_notify(), send_the_names_of_the_available_modules_to_emacs(), sort_list_of_strings(), start_delete_workspace_notify(), step_compile_generated_module(), step_install(), tp_some_info(), unsplit_internal(), workspace_language(), xml_array_in_task(), xml_Boxes(), xml_Chain_Graph(), xml_loop_from_sequence(), xml_tasks(), xml_tasks_with_motif(), and zeroing_multiple_edges().

gen_array_pointer()

void** gen_array_pointer

(

const gen_array_t

a

)

Observers...

Definition at line 125 of file array.c.

{
    return a->array;
}

References _gen_array_chunk_t::array.

Referenced by prettyprint_dependence_graph(), prettyprint_dependence_graph_view(), and xml_Chain_Graph().

Here is the caller graph for this function:

gen_array_remove()

void gen_array_remove	(	gen_array_t	a,
		size_t	i
	)

0<=i &&

Definition at line 97 of file array.c.

{
  message_assert("valid index", /* 0<=i && */ i < a->size);
  if (a->array[i]!=(void *)NULL) a->nitems--;
  a->array[i] = (void *)NULL;
}

References _gen_array_chunk_t::array, message_assert, and _gen_array_chunk_t::nitems.

gen_array_resize()

static void gen_array_resize ( gen_array_t  a, int  min  )

static

int nsize = a->size+GEN_ARRAY_SIZE_INCREMENT, i;

Definition at line 56 of file array.c.

{
  int N = GEN_ARRAY_SIZE_INCREMENT;
  size_t nsize = ((min%N)==0)?min:((int)(min/N) +1)*N;
  size_t i;
  /* int nsize = a->size+GEN_ARRAY_SIZE_INCREMENT, i;*/
  a->array = (void**) realloc(a->array, nsize*sizeof(void*));
  message_assert("realloc ok", a->array);
  for (i=a->size; i<nsize; i++) 
    a->array[i] = (void*) NULL;
  a->size = nsize;
}

References _gen_array_chunk_t::array, GEN_ARRAY_SIZE_INCREMENT, int, message_assert, min, and _gen_array_chunk_t::size.

Referenced by gen_array_addto().

Here is the caller graph for this function:

gen_array_size()

size_t gen_array_size

(

const gen_array_t

a

)

Definition at line 137 of file array.c.

{
    return a->size;
}

References _gen_array_chunk_t::size.

Referenced by t_level().

Here is the caller graph for this function:

gen_array_sort()

void gen_array_sort

(

gen_array_t

a

)

Definition at line 164 of file array.c.

{
  gen_array_sort_with_cmp(a, gen_array_cmp);
}

References gen_array_cmp(), and gen_array_sort_with_cmp().

Referenced by db_get_module_or_function_list(), safe_list_files_in_directory(), and sort_list_of_strings().

Here is the call graph for this function:

Here is the caller graph for this function:

gen_array_sort_with_cmp()

void gen_array_sort_with_cmp	(	gen_array_t	a,
		int(*)(const void *, const void *)	cmp
	)

Definition at line 158 of file array.c.

{
  qsort(a->array, a->nitems, sizeof(void *), cmp);
}

References _gen_array_chunk_t::array, and _gen_array_chunk_t::nitems.

Referenced by gen_array_sort().

Here is the caller graph for this function:

list_from_gen_array()

list list_from_gen_array

(

gen_array_t

a

)

Definition at line 178 of file array.c.

{
  list ls = NIL;
  GEN_ARRAY_FOREACH(string, s, a)
    ls = CONS(string, strdup(s), ls);
  return ls;
}

References CONS, GEN_ARRAY_FOREACH, NIL, and strdup().

Here is the call graph for this function:

string_array_join()

string string_array_join	(	gen_array_t	array,
		string	separator
	)

Join a string array with a string separator.

Parameters

array	is the string array
separator	is the string separator

Returns

a string in a concatenate buffer, so it needs to be strdup()ed quickly if it is expected to last some time in the caller...

It is similar to the join() string method in Python. Using the function with ["foo", "bar", "daurade"] and "," should return the string "foo,bar,daurade".

Definition at line 198 of file array.c.

{
  string join = "";
  bool first_iteration = true;
 
  GEN_ARRAY_FOREACH(string, s, array)
  {
    if (! first_iteration)
      join = concatenate(join, separator, NULL);
    else
      first_iteration = false;
    join = concatenate(join, s, NULL);
  }
 
  return join;
}

References array, concatenate(), and GEN_ARRAY_FOREACH.

Referenced by get_callees_of(), get_callers_of(), info(), pyps_get_stubs(), and safe_concurrent_apply().

Here is the call graph for this function:

Here is the caller graph for this function: