X-Git-Url: http://info.iut-bm.univ-fcomte.fr/pub/gitweb/simgrid.git/blobdiff_plain/e7173457dce01a608824b72d2e4ff62572d51d13..81c638173fb96d986d183561433ac408f0ea5fcf:/src/mc/mc_object_info.h diff --git a/src/mc/mc_object_info.h b/src/mc/mc_object_info.h index c44f0badb7..3516885c2f 100644 --- a/src/mc/mc_object_info.h +++ b/src/mc/mc_object_info.h @@ -1,210 +1,22 @@ -/* Copyright (c) 2007-2014. The SimGrid Team. +/* Copyright (c) 2007-2015. The SimGrid Team. * All rights reserved. */ /* This program is free software; you can redistribute it and/or modify it * under the terms of the license (GNU LGPL) which comes with this package. */ -/** file - * Debug information for the MC. - */ - #ifndef SIMGRID_MC_OBJECT_INFO_H #define SIMGRID_MC_OBJECT_INFO_H -#include - -#include - -#include -#include -#include - -#include - -#include "mc_forward.h" -#include "mc_location.h" -#include "mc_process.h" -#include "../smpi/private.h" - -// ***** Type - -typedef int e_mc_type_type; - -namespace simgrid { -namespace mc { - -/** Represents a type in the program - * - * It is currently used to represent members of structs and unions as well. - */ -class Type { -public: - Type(); - Type(Type const& type) = default; - Type& operator=(Type const&) = default; - Type(Type&& type) = default; - Type& operator=(Type&&) = default; - - e_mc_type_type type; - Dwarf_Off id; /* Offset in the section (in hexadecimal form) */ - std::string name; /* Name of the type */ - int byte_size; /* Size in bytes */ - int element_count; /* Number of elements for array type */ - std::string type_id; /* DW_AT_type id */ - std::vector members; /* if DW_TAG_structure_type, DW_TAG_class_type, DW_TAG_union_type*/ - int is_pointer_type; - - // Location (for members) is either of: - simgrid::mc::DwarfExpression location_expression; - - mc_type_t subtype; // DW_AT_type - mc_type_t full_type; // The same (but more complete) type - - bool has_offset_location() const - { - return location_expression.size() == 1 && - location_expression[0].atom == DW_OP_plus_uconst; - } - - // TODO, check if this shortcut is really necessary - int offset() const - { - xbt_assert(this->has_offset_location()); - return this->location_expression[0].number; - } - - void offset(int new_offset) - { - Dwarf_Op op; - op.atom = DW_OP_plus_uconst; - op.number = new_offset; - this->location_expression = { op }; - } -}; - -} -} - -// ***** Object info - -/** Bit field of options */ -typedef int mc_object_info_flags; -#define MC_OBJECT_INFO_NONE 0 -#define MC_OBJECT_INFO_EXECUTABLE 1 - -namespace simgrid { -namespace mc { - -class ObjectInformation { -public: - ObjectInformation(); - ~ObjectInformation(); - ObjectInformation(ObjectInformation const&) = delete; - ObjectInformation& operator=(ObjectInformation const&) = delete; +#include +#include - mc_object_info_flags flags; - char* file_name; - const void* start; - const void *end; - char *start_exec; - char *end_exec; // Executable segment - char *start_rw; - char *end_rw; // Read-write segment - char *start_ro; - char *end_ro; // read-only segment - xbt_dict_t subprograms; // xbt_dict_t - xbt_dynar_t global_variables; // xbt_dynar_t - xbt_dict_t types; // xbt_dict_t - xbt_dict_t full_types_by_name; // xbt_dict_t (full defined type only) +#include - // Here we sort the minimal information for an efficient (and cache-efficient) - // lookup of a function given an instruction pointer. - // The entries are sorted by low_pc and a binary search can be used to look them up. - xbt_dynar_t functions_index; +#include "mc_forward.hpp" +#include "mc_memory_map.h" - bool executable() const - { - return this->flags & MC_OBJECT_INFO_EXECUTABLE; - } - - bool privatized() const - { - return this->executable() && smpi_privatize_global_variables; - } - - void* base_address() const; - - mc_frame_t find_function(const void *ip) const; - mc_variable_t find_variable(const char* name) const; - -}; - -} -} - -XBT_INTERNAL std::shared_ptr MC_find_object_info( +XBT_PRIVATE std::shared_ptr MC_find_object_info( std::vector const& maps, const char* name, int executable); -XBT_INTERNAL void MC_post_process_object_info(mc_process_t process, mc_object_info_t info); - -XBT_INTERNAL void MC_dwarf_get_variables(mc_object_info_t info); -XBT_INTERNAL void MC_dwarf_get_variables_libdw(mc_object_info_t info); -XBT_INTERNAL const char* MC_dwarf_attrname(int attr); -XBT_INTERNAL const char* MC_dwarf_tagname(int tag); - -XBT_INTERNAL void* mc_member_resolve(const void* base, mc_type_t type, mc_type_t member, mc_address_space_t snapshot, int process_index); - -namespace simgrid { -namespace mc { - -class Variable { -public: - Variable(); - ~Variable(); - Variable(Variable const&) = delete; - Variable& operator=(Variable const&) = delete; - - Dwarf_Off dwarf_offset; /* Global offset of the field. */ - int global; - std::string name; - std::string type_id; - mc_type_t type; - - // Use either of: - s_mc_location_list_t location_list; - void* address; - - size_t start_scope; - mc_object_info_t object_info; - -}; - -class Frame { -public: - Frame(); - ~Frame(); - Frame(Frame const&) = delete; - Frame& operator=(Frame&) = delete; - - int tag; - std::string name; - void *low_pc; - void *high_pc; - s_mc_location_list_t frame_base; - xbt_dynar_t /* */ variables; /* Cannot use dict, there may be several variables with the same name (in different lexical blocks)*/ - unsigned long int id; /* DWARF offset of the subprogram */ - xbt_dynar_t /* */ scopes; - Dwarf_Off abstract_origin_id; - mc_object_info_t object_info; -}; - -} -} - - - -struct s_mc_function_index_item { - void* low_pc, *high_pc; - mc_frame_t function; -}; +XBT_PRIVATE void MC_post_process_object_info(simgrid::mc::Process* process, simgrid::mc::ObjectInformation* info); #endif