LTTV is now alive : needs testing
[lttv.git] / ltt / branches / poly / ltt / event.c
index e5c451111ca37e93749f987ac3612cbceb14cb91..52344487c8a48403c0d369fa6a01b41bcbf5c912 100644 (file)
  * MA 02111-1307, USA.
  */
 
+#ifdef HAVE_CONFIG_H
+#include <config.h>
+#endif
+
 #include <stdio.h>
 #include <string.h>
 #include <stdlib.h>
+#include <glib.h>
 
 #include <asm/types.h>
 #include <linux/byteorder/swab.h>
@@ -28,7 +33,7 @@
 #include "ltt-private.h"
 #include <ltt/event.h>
 #include <ltt/trace.h>
-
+#include <ltt/ltt-types.h>
 
 LttEvent *ltt_event_new()
 {
@@ -41,6 +46,8 @@ void ltt_event_destroy(LttEvent *event)
 }
 
 
+#if 0
+/* Use get_field_type_size instead */
 /*****************************************************************************
  *Function name
  *    ltt_event_refresh_fields   : refresh fields of an event 
@@ -49,12 +56,13 @@ void ltt_event_destroy(LttEvent *event)
  *    offsetParent    : offset from the parent
  *    fld             : field
  *    evD             : event data
+ *    reverse_byte_order : 1 or 0
  *Return value
  *    int             : size of the field
  ****************************************************************************/
 
 int ltt_event_refresh_fields(int offsetRoot,int offsetParent, 
-                            LttField * fld, void *evD)
+                            LttField * fld, void *evD, gboolean reverse_byte_order)
 {
   int size, size1, element_number, i, offset1, offset2;
   LttType * type = fld->field_type;
@@ -66,14 +74,14 @@ int ltt_event_refresh_fields(int offsetRoot,int offsetParent,
         size = 0;
         for(i=0;i<element_number;i++){
           size += ltt_event_refresh_fields(offsetRoot+size,size, 
-             fld->child[0], evD+size);
+             fld->child[0], evD+size, reverse_byte_order);
         }
       }else size = fld->field_size;
       break;
 
     case LTT_SEQUENCE:
       size1 = fld->sequ_number_size;
-      element_number = getIntNumber(size1,evD);
+      element_number = getIntNumber(reverse_byte_order,size1,evD);
       type->element_number = element_number;
       if(fld->element_size > 0){
         size = element_number * fld->element_size;
@@ -81,14 +89,14 @@ int ltt_event_refresh_fields(int offsetRoot,int offsetParent,
         size = 0;
         for(i=0;i<element_number;i++){
           size += ltt_event_refresh_fields(offsetRoot+size+size1,size+size1, 
-                   fld->child[0], evD+size+size1);
+                   fld->child[0], evD+size+size1, reverse_byte_order);
         }      
         size += size1;
       }
       break;
 
     case LTT_STRING:
-      size = strlen((char*)evD) + 1; //include end : '\0'
+      size = strlen((gchar*)evD) + 1; //include end : '\0'
       break;
 
     case LTT_STRUCT:
@@ -98,7 +106,7 @@ int ltt_event_refresh_fields(int offsetRoot,int offsetParent,
         offset2 = 0;
         for(i=0;i<element_number;i++){
           size=ltt_event_refresh_fields(offset1,offset2,
-                                        fld->child[i],evD+offset2);
+                               fld->child[i],evD+offset2, reverse_byte_order);
           offset1 += size;
           offset2 += size;
         }      
@@ -166,6 +174,8 @@ int ltt_event_refresh_fields(int offsetRoot,int offsetParent,
 
   return size;
 }
+#endif //0
+
 
 /*****************************************************************************
  *Function name
@@ -177,7 +187,7 @@ int ltt_event_refresh_fields(int offsetRoot,int offsetParent,
  *    unsigned              : event type id
  ****************************************************************************/
 
-unsigned ltt_event_eventtype_id(LttEvent *e)
+unsigned ltt_event_eventtype_id(const LttEvent *e)
 {
   return (unsigned) e->event_id;
 }
@@ -191,13 +201,27 @@ unsigned ltt_event_eventtype_id(LttEvent *e)
  *    LttFacility *     : the facility of the event
  ****************************************************************************/
 
-LttFacility *ltt_event_facility(LttEvent *e)
+LttFacility *ltt_event_facility(const LttEvent *e)
 {
   LttTrace * trace = e->tracefile->trace;
   unsigned id = e->event_id;
   return ltt_trace_facility_by_id(trace,id);
 }
 
+/*****************************************************************************
+ *Function name
+ *    ltt_event_facility_id : get the facility id of the event
+ *Input params
+ *    e                  : an instance of an event type   
+ *Return value
+ *    unsigned          : the facility of the event
+ ****************************************************************************/
+
+unsigned ltt_event_facility_id(const LttEvent *e)
+{
+  return e->facility_id;
+}
+
 /*****************************************************************************
  *Function name
  *    ltt_event_eventtype : get the event type of the event
@@ -207,11 +231,11 @@ LttFacility *ltt_event_facility(LttEvent *e)
  *    LttEventType *     : the event type of the event
  ****************************************************************************/
 
-LttEventType *ltt_event_eventtype(LttEvent *e)
+LttEventType *ltt_event_eventtype(const LttEvent *e)
 {
   LttFacility* facility = ltt_event_facility(e);
   if(!facility) return NULL;
-  return facility->events[e->event_id - facility->base_id];
+  return &g_array_index(facility->events, LttEventType, e->event_id);
 }
 
 /*****************************************************************************
@@ -231,16 +255,9 @@ LttField *ltt_event_field(LttEvent *e)
   field = event_type->root_field;
   if(unlikely(!field)) return NULL;
 
-  //check if the field need refresh
-  if(likely(e->which_block != event_type->latest_block ||
-            e->which_event != event_type->latest_event)){
-
-    event_type->latest_block = e->which_block;
-    event_type->latest_event = e->which_event;
-    
-    if(unlikely(field->field_fixed != 1))
-      ltt_event_refresh_fields(0, 0, field, e->data);
-  }
+  get_field_type_size(e->tracefile, event_type, 0, 0,
+      field, e->data);
+  
   return field;
 }
 
@@ -253,7 +270,7 @@ LttField *ltt_event_field(LttEvent *e)
  *    LttTime       : the time of the event
  ****************************************************************************/
 
-LttTime ltt_event_time(LttEvent *e)
+LttTime ltt_event_time(const LttEvent *e)
 {
   return e->event_time;
 }
@@ -267,83 +284,56 @@ LttTime ltt_event_time(LttEvent *e)
  *    LttCycleCount  : the cycle count of the event
  ****************************************************************************/
 
-LttCycleCount ltt_event_cycle_count(LttEvent *e)
+LttCycleCount ltt_event_cycle_count(const LttEvent *e)
 {
-  return e->event_cycle_count;
+  return e->tsc;
 }
 
+
+
 /*****************************************************************************
  *Function name
- *    ltt_event_position : get the event's position
+ *    ltt_event_position_get : get the event position data
  *Input params
  *    e                  : an instance of an event type   
  *    ep                 : a pointer to event's position structure
+ *    tf                 : tracefile pointer
+ *    block              : current block
+ *    offset             : current offset
+ *    tsc                : current tsc
  ****************************************************************************/
-
-void ltt_event_position(LttEvent *e, LttEventPosition *ep)
+void ltt_event_position_get(LttEventPosition *ep, LttTracefile **tf,
+        guint *block, guint *offset, guint64 *tsc)
 {
-  ep->block_num         = e->which_block;
-  ep->event_num         = e->which_event;
-  ep->event_time        = e->event_time;
-  ep->event_cycle_count = e->event_cycle_count;
-  ep->heart_beat_number = e->tracefile->cur_heart_beat_number;
-  ep->old_position      = TRUE;
-  ep->event_offset      = e->data - e->tracefile->buffer - EVENT_HEADER_SIZE ;
-  ep->tf                = e->tracefile;
-  ep->overflow_nsec     = e->overflow_nsec;
-  /* This is a workaround for fast position seek */
-  ep->last_event_pos = e->last_event_pos;
-  ep->prev_block_end_time = e->prev_block_end_time;
-  ep->prev_event_time = e->prev_event_time;
-  ep->pre_cycle_count = e->pre_cycle_count;
-  ep->count = e->count;
-  /* end of workaround */
+  *tf = ep->tracefile;
+  *block = ep->block;
+  *offset = ep->offset;
+  *tsc = ep->tsc;
 }
 
-LttEventPosition * ltt_event_position_new()
-{
-  return g_new(LttEventPosition, 1);
-}
 
 /*****************************************************************************
  *Function name
- *    ltt_event_position_get : get the block number and index of the event
+ *    ltt_event_position : get the event's position
  *Input params
- *    ep                     : a pointer to event's position structure
- *    block_number           : the block number of the event
- *    index_in_block         : the index of the event within the block
+ *    e                  : an instance of an event type   
+ *    ep                 : a pointer to event's position structure
  ****************************************************************************/
 
-void ltt_event_position_get(LttEventPosition *ep,
-    unsigned *block_number, unsigned *index_in_block, LttTracefile ** tf)
+void ltt_event_position(LttEvent *e, LttEventPosition *ep)
 {
-  *block_number   = ep->block_num;
-  *index_in_block = ep->event_num;
-  *tf             = ep->tf;
+  ep->tracefile = e->tracefile;
+  ep->block = e->block;
+  ep->offset = e->offset;
+  ep->tsc = e->tsc;
 }
 
-/*****************************************************************************
- *Function name
- *    ltt_event_position_set : set the block number and index of the event
- *    It does put the old_position gboolean to FALSE, as it is impossible
- *    to know the quick position to seek in the tracefile.
- *Input params
- *    ep                     : a pointer to event's position structure
- *    block_number           : the block number of the event
- *    index_in_block         : the index of the event within the block
- ****************************************************************************/
-
-void ltt_event_position_set(LttEventPosition *ep,
-    unsigned block_number, unsigned index_in_block)
+LttEventPosition * ltt_event_position_new()
 {
-  if(ep->block_num != block_number || ep->event_num != index_in_block)
-    ep->old_position = FALSE;
-
-  ep->block_num = block_number;
-  ep->event_num = index_in_block;
-  
+  return g_new(LttEventPosition, 1);
 }
 
+
 /*****************************************************************************
  * Function name
  *    ltt_event_position_compare : compare two positions
@@ -361,58 +351,23 @@ void ltt_event_position_set(LttEventPosition *ep,
 gint ltt_event_position_compare(const LttEventPosition *ep1,
                                 const LttEventPosition *ep2)
 {
-  if(ep1->tf != ep2->tf)
-    g_error("ltt_event_position_compare on different tracefiles makes no sense");
   if(ep1 == NULL && ep2 == NULL)
       return 0;
   if(ep1 != NULL && ep2 == NULL)
       return -1;
   if(ep1 == NULL && ep2 != NULL)
       return 1;
-    
-  if(ep1->block_num < ep2->block_num)
-    return -1;
-  if(ep1->block_num > ep2->block_num)
-    return 1;
-  if(ep1->event_num < ep2->event_num)
-    return -1;
-  if(ep1->event_num > ep2->event_num)
-    return 1;
-  return 0;
-}
 
-/*****************************************************************************
- * Function name
- *    ltt_event_event_position_compare : compare two positions, one in event,
- *    other in position opaque structure.
- * Input params
- *    event                  : a pointer to event structure
- *    ep                     : a pointer to event's position structure
- * Return
- *    -1 is event < ep
- *    1 if event > ep
- *    0 if event == ep
- ****************************************************************************/
-
-gint ltt_event_event_position_compare(const LttEvent *event,
-                                      const LttEventPosition *ep)
-{
-  if(event == NULL && ep == NULL)
-      return 0;
-  if(event != NULL && ep == NULL)
-      return -1;
-  if(event == NULL && ep != NULL)
-      return 1;
-
-  g_assert(event->tracefile == ep->tf);
-  if(event->which_block < ep->block_num)
+   if(ep1->tracefile != ep2->tracefile)
+    g_error("ltt_event_position_compare on different tracefiles makes no sense");
+   
+  if(ep1->block < ep2->block)
     return -1;
-  if(event->which_block > ep->block_num)
+  if(ep1->block > ep2->block)
     return 1;
-  if(event->which_event < ep->event_num)
+  if(ep1->offset < ep2->offset)
     return -1;
-  if(event->which_event > ep->event_num)
+  if(ep1->offset > ep2->offset)
     return 1;
   return 0;
 }
@@ -446,23 +401,8 @@ void ltt_event_position_copy(LttEventPosition *dest,
  ****************************************************************************/
 
 unsigned ltt_event_cpu_id(LttEvent *e)
-{ 
-  char * c1, * c2, * c3;
-  c1 = strrchr(e->tracefile->name,'\\');
-  c2 = strrchr(e->tracefile->name,'/');
-  if(c1 == NULL && c2 == NULL){
-    return (unsigned)atoi(e->tracefile->name);
-  }else if(c1 == NULL){
-    c2++;
-    return (unsigned)atoi(c2);    
-  }else if(c2 == NULL){
-    c1++;
-    return (unsigned)atoi(c1);    
-  }else{
-    c3 = (c1 > c2) ? c1 : c2;
-    c3++;
-    return (unsigned)atoi(c3);        
-  }
+{
+  return e->tracefile->cpu_num;
 }
 
 /*****************************************************************************
@@ -491,8 +431,7 @@ void *ltt_event_data(LttEvent *e)
  *Return value
  *    unsigned       : the number of elements for an array/sequence field
  ****************************************************************************/
-
-unsigned ltt_event_field_element_number(LttEvent *e, LttField *f)
+guint64 ltt_event_field_element_number(LttEvent *e, LttField *f)
 {
   if(f->field_type->type_class != LTT_ARRAY &&
      f->field_type->type_class != LTT_SEQUENCE)
@@ -500,7 +439,8 @@ unsigned ltt_event_field_element_number(LttEvent *e, LttField *f)
   
   if(f->field_type->type_class == LTT_ARRAY)
     return f->field_type->element_number;
-  return (unsigned)  getIntNumber(f->sequ_number_size, e + f->offset_root);
+  return ltt_get_uint(LTT_GET_BO(e->tracefile), f->sequ_number_size,
+      e + f->offset_root);
 }
 
 /*****************************************************************************
@@ -508,173 +448,152 @@ unsigned ltt_event_field_element_number(LttEvent *e, LttField *f)
  *    ltt_event_field_element_select
  *                   : Set the currently selected element for a sequence or
  *                     array field
+ *                     O(1) if fields are of fixed size, else O(n) if fields are
+ *                     of variable size.
  *Input params
  *    e              : an instance of an event type
  *    f              : a field of the instance
- *    i              : the ith element
+ *    i              : the ith element (0, ...)
  ****************************************************************************/
-
 void ltt_event_field_element_select(LttEvent *e, LttField *f, unsigned i)
 {
   unsigned element_number;
-  LttField *fld;
+  LttField *field;
   unsigned int k;
-  int size;
-  void *evD;
+  size_t size;
+  LttEventType *event_type;
  
   if(f->field_type->type_class != LTT_ARRAY &&
      f->field_type->type_class != LTT_SEQUENCE)
     return ;
 
   element_number  = ltt_event_field_element_number(e,f);
-  /* Sanity check for i : 1..n only, and must be lower or equal element_number
+  event_type = ltt_event_eventtype(e);
+  /* Sanity check for i : 0..n-1 only, and must be lower or equal element_number
    */
-  if(element_number < i || i == 0) return;
+  if(i >= element_number) return;
+  
+  field = f->child[0];
   
-  fld = f->child[0];
+  if(f->field_type->type_class == LTT_SEQUENCE)
+    size = f->sequ_number_size;
+  else
+    size = 0;
   
-  evD = e->data + f->offset_root;
-  size = 0;
-  for(k=0;k<i;k++){
-    size += ltt_event_refresh_fields(f->offset_root+size,size, fld, evD+size);
+  if(field->fixed_size == FIELD_FIXED) {
+      size += field->field_size * i;
+
+      get_field_type_size(e->tracefile, event_type,
+                  f->offset_root+size, size, field, e->data);
+
+  } else {
+    for(k=0;k<=i;k++){
+      size += get_field_type_size(e->tracefile, event_type,
+                  f->offset_root+size, size, field, e->data);
+    }
   }
-  f->current_element = i - 1;
+  f->current_element = i;
 }
 
 /*****************************************************************************
  * These functions extract data from an event after architecture specific
  * conversions
  ****************************************************************************/
-
-unsigned ltt_event_get_unsigned(LttEvent *e, LttField *f)
+guint32 ltt_event_get_unsigned(LttEvent *e, LttField *f)
 {
-  int revFlag = e->tracefile->trace->my_arch_endian == 
-                e->tracefile->trace->system_description->endian ? 0:1;
+  gboolean reverse_byte_order = LTT_GET_BO(e->tracefile);
+
   LttTypeEnum t = f->field_type->type_class;
 
   g_assert(t == LTT_UINT || t == LTT_ENUM);
 
   if(f->field_size == 1){
     guint8 x = *(guint8 *)(e->data + f->offset_root);
-    return (unsigned int) x;    
+    return (guint32) x;    
   }else if(f->field_size == 2){
-    guint16 x = *(guint16 *)(e->data + f->offset_root);
-    if(e->tracefile->trace->my_arch_endian == LTT_LITTLE_ENDIAN)
-      return (unsigned int) (revFlag ? GUINT16_FROM_BE(x): x);    
-    else
-      return (unsigned int) (revFlag ? GUINT16_FROM_LE(x): x);          
+    return (guint32)ltt_get_uint16(reverse_byte_order, e->data + f->offset_root);
   }else if(f->field_size == 4){
-    guint32 x = *(guint32 *)(e->data + f->offset_root);
-    if(e->tracefile->trace->my_arch_endian == LTT_LITTLE_ENDIAN)
-      return (unsigned int) (revFlag ? GUINT32_FROM_BE(x): x);    
-    else
-      return (unsigned int) (revFlag ? GUINT32_FROM_LE(x): x);    
-  }else if(f->field_size == 8){
+    return (guint32)ltt_get_uint32(reverse_byte_order, e->data + f->offset_root);
+  }
+#if 0
+  else if(f->field_size == 8){
     guint64 x = *(guint64 *)(e->data + f->offset_root);
     if(e->tracefile->trace->my_arch_endian == LTT_LITTLE_ENDIAN)
       return (unsigned int) (revFlag ? GUINT64_FROM_BE(x): x);    
     else
       return (unsigned int) (revFlag ? GUINT64_FROM_LE(x): x);    
   }
+#endif //0
   g_critical("ltt_event_get_unsigned : field size %i unknown", f->field_size);
   return 0;
 }
 
-int ltt_event_get_int(LttEvent *e, LttField *f)
+gint32 ltt_event_get_int(LttEvent *e, LttField *f)
 {
-  int revFlag = e->tracefile->trace->my_arch_endian == 
-                e->tracefile->trace->system_description->endian ? 0:1;
+  gboolean reverse_byte_order = LTT_GET_BO(e->tracefile);
 
   g_assert(f->field_type->type_class == LTT_INT);
 
   if(f->field_size == 1){
     gint8 x = *(gint8 *)(e->data + f->offset_root);
-    return (int) x;    
+    return (gint32) x;    
   }else if(f->field_size == 2){
-    gint16 x = *(gint16 *)(e->data + f->offset_root);
-    if(e->tracefile->trace->my_arch_endian == LTT_LITTLE_ENDIAN)
-      return (int) (revFlag ? GINT16_FROM_BE(x): x);    
-    else
-      return (int) (revFlag ? GINT16_FROM_LE(x): x);    
+    return (gint32)ltt_get_int16(reverse_byte_order, e->data + f->offset_root);
   }else if(f->field_size == 4){
-    gint32 x = *(gint32 *)(e->data + f->offset_root);
-    if(e->tracefile->trace->my_arch_endian == LTT_LITTLE_ENDIAN)
-      return (int) (revFlag ? GINT32_FROM_BE(x): x);    
-    else
-      return (int) (revFlag ? GINT32_FROM_LE(x): x);    
-  }else if(f->field_size == 8){
+    return (gint32)ltt_get_int32(reverse_byte_order, e->data + f->offset_root);
+  }
+#if 0
+  else if(f->field_size == 8){
     gint64 x = *(gint64 *)(e->data + f->offset_root);
     if(e->tracefile->trace->my_arch_endian == LTT_LITTLE_ENDIAN)
       return (int) (revFlag ? GINT64_FROM_BE(x): x);    
     else
       return (int) (revFlag ? GINT64_FROM_LE(x): x);    
   }
+#endif //0
   g_critical("ltt_event_get_int : field size %i unknown", f->field_size);
   return 0;
 }
 
-unsigned long ltt_event_get_long_unsigned(LttEvent *e, LttField *f)
+guint64 ltt_event_get_long_unsigned(LttEvent *e, LttField *f)
 {
-  int revFlag = e->tracefile->trace->my_arch_endian == 
-                e->tracefile->trace->system_description->endian ? 0:1;
+  gboolean reverse_byte_order = LTT_GET_BO(e->tracefile);
+
   LttTypeEnum t = f->field_type->type_class;
 
   g_assert(t == LTT_UINT || t == LTT_ENUM);
 
   if(f->field_size == 1){
     guint8 x = *(guint8 *)(e->data + f->offset_root);
-    return (unsigned long) x;    
+    return (guint64) x;    
   }else if(f->field_size == 2){
-    guint16 x = *(guint16 *)(e->data + f->offset_root);
-    if(e->tracefile->trace->my_arch_endian == LTT_LITTLE_ENDIAN)
-      return (unsigned long) (revFlag ? GUINT16_FROM_BE(x): x);  
-    else
-      return (unsigned long) (revFlag ? GUINT16_FROM_LE(x): x);    
+    return (guint64)ltt_get_uint16(reverse_byte_order, e->data + f->offset_root);
   }else if(f->field_size == 4){
-    guint32 x = *(guint32 *)(e->data + f->offset_root);
-    if(e->tracefile->trace->my_arch_endian == LTT_LITTLE_ENDIAN)
-      return (unsigned long) (revFlag ? GUINT32_FROM_BE(x): x);    
-    else
-      return (unsigned long) (revFlag ? GUINT32_FROM_LE(x): x);    
+    return (guint64)ltt_get_uint32(reverse_byte_order, e->data + f->offset_root);
   }else if(f->field_size == 8){
-    guint64 x = *(guint64 *)(e->data + f->offset_root);
-    if(e->tracefile->trace->my_arch_endian == LTT_LITTLE_ENDIAN)
-      return (unsigned long) (revFlag ? GUINT64_FROM_BE(x): x);    
-    else
-      return (unsigned long) (revFlag ? GUINT64_FROM_LE(x): x);    
+    return ltt_get_uint64(reverse_byte_order, e->data + f->offset_root);
   }
   g_critical("ltt_event_get_long_unsigned : field size %i unknown", f->field_size);
   return 0;
 }
 
-long int ltt_event_get_long_int(LttEvent *e, LttField *f)
+gint64 ltt_event_get_long_int(LttEvent *e, LttField *f)
 {
-  int revFlag = e->tracefile->trace->my_arch_endian == 
-                e->tracefile->trace->system_description->endian ? 0:1;
+  //int revFlag = e->tracefile->trace->my_arch_endian == 
+  //              e->tracefile->trace->system_description->endian ? 0:1;
+  gboolean reverse_byte_order = LTT_GET_BO(e->tracefile);
 
   g_assert( f->field_type->type_class == LTT_INT);
 
   if(f->field_size == 1){
     gint8 x = *(gint8 *)(e->data + f->offset_root);
-    return (long) x;    
+    return (gint64) x;    
   }else if(f->field_size == 2){
-    gint16 x = *(gint16 *)(e->data + f->offset_root);
-    if(e->tracefile->trace->my_arch_endian == LTT_LITTLE_ENDIAN)
-      return (long) (revFlag ? GINT16_FROM_BE(x): x);    
-    else
-      return (long) (revFlag ? GINT16_FROM_LE(x): x);    
+    return (gint64)ltt_get_int16(reverse_byte_order, e->data + f->offset_root);
   }else if(f->field_size == 4){
-    gint32 x = *(gint32 *)(e->data + f->offset_root);
-    if(e->tracefile->trace->my_arch_endian == LTT_LITTLE_ENDIAN)
-      return (long) (revFlag ? GINT32_FROM_BE(x): x);    
-    else
-      return (long) (revFlag ? GINT32_FROM_LE(x): x);    
+    return (gint64)ltt_get_int32(reverse_byte_order, e->data + f->offset_root);
   }else if(f->field_size == 8){
-    gint64 x = *(gint64 *)(e->data + f->offset_root);
-    if(e->tracefile->trace->my_arch_endian == LTT_LITTLE_ENDIAN)
-      return (long) (revFlag ? GINT64_FROM_BE(x): x);    
-    else
-      return (long) (revFlag ? GINT64_FROM_LE(x): x);    
+    return ltt_get_int64(reverse_byte_order, e->data + f->offset_root);
   }
   g_critical("ltt_event_get_long_int : field size %i unknown", f->field_size);
   return 0;
@@ -682,12 +601,11 @@ long int ltt_event_get_long_int(LttEvent *e, LttField *f)
 
 float ltt_event_get_float(LttEvent *e, LttField *f)
 {
-  int revFlag = e->tracefile->trace->my_arch_endian == 
-                e->tracefile->trace->system_description->endian ? 0:1;
+  gboolean reverse_byte_order = LTT_GET_BO(e->tracefile);
 
   g_assert(f->field_type->type_class == LTT_FLOAT && f->field_size == 4);
 
-  if(revFlag == 0) return *(float *)(e->data + f->offset_root);
+  if(reverse_byte_order == 0) return *(float *)(e->data + f->offset_root);
   else{
     guint32 aInt;
     memcpy((void*)&aInt, e->data + f->offset_root, 4);
@@ -698,12 +616,11 @@ float ltt_event_get_float(LttEvent *e, LttField *f)
 
 double ltt_event_get_double(LttEvent *e, LttField *f)
 {
-  int revFlag = e->tracefile->trace->my_arch_endian == 
-                e->tracefile->trace->system_description->endian ? 0:1;
+  gboolean reverse_byte_order = LTT_GET_BO(e->tracefile);
 
   g_assert(f->field_type->type_class == LTT_FLOAT && f->field_size == 8);
 
-  if(revFlag == 0) return *(double *)(e->data + f->offset_root);
+  if(reverse_byte_order == 0) return *(double *)(e->data + f->offset_root);
   else{
     guint64 aInt;
     memcpy((void*)&aInt, e->data + f->offset_root, 8);
@@ -716,10 +633,141 @@ double ltt_event_get_double(LttEvent *e, LttField *f)
  * The string obtained is only valid until the next read from
  * the same tracefile.
  ****************************************************************************/
-
 char *ltt_event_get_string(LttEvent *e, LttField *f)
 {
   g_assert(f->field_type->type_class == LTT_STRING);
 
-  return (char*)g_strdup((char*)(e->data + f->offset_root));
+  return (gchar*)g_strdup((gchar*)(e->data + f->offset_root));
+}
+
+
+/*****************************************************************************
+ *Function name
+ *    get_field_type_size : set the fixed and dynamic sizes of the field type
+ *    from the data read.
+ *Input params 
+ *    tf              : tracefile
+ *    event_type      : event type
+ *    offset_root     : offset from the root
+ *    offset_parent   : offset from the parent
+ *    field           : field
+ *    data            : a pointer to the event data.
+ *Returns the field type size.
+ ****************************************************************************/
+size_t get_field_type_size(LttTracefile *tf, LttEventType *event_type,
+    off_t offset_root, off_t offset_parent,
+    LttField *field, void *data)
+{
+  size_t size = 0;
+  guint i;
+  LttType *type;
+  
+  g_assert(field->fixed_root != FIELD_UNKNOWN);
+  g_assert(field->fixed_parent != FIELD_UNKNOWN);
+  g_assert(field->fixed_size != FIELD_UNKNOWN);
+
+  field->offset_root = offset_root;
+  field->offset_parent = offset_parent;
+  
+  type = field->field_type;
+
+  switch(type->type_class) {
+    case LTT_INT:
+    case LTT_UINT:
+    case LTT_FLOAT:
+    case LTT_ENUM:
+    case LTT_POINTER:
+    case LTT_LONG:
+    case LTT_ULONG:
+    case LTT_SIZE_T:
+    case LTT_SSIZE_T:
+    case LTT_OFF_T:
+      g_assert(field->fixed_size == FIELD_FIXED);
+      size = field->field_size;
+      break;
+    case LTT_SEQUENCE:
+      {
+        gint seqnum = ltt_get_uint(LTT_GET_BO(tf),
+                        field->sequ_number_size,
+                        data + offset_root);
+
+        if(field->child[0]->fixed_size == FIELD_FIXED) {
+          size = field->sequ_number_size + 
+            (seqnum * get_field_type_size(tf, event_type,
+                                          offset_root, offset_parent,
+                                          field->child[0], data));
+        } else {
+          size += field->sequ_number_size;
+          for(i=0;i<seqnum;i++) {
+            size_t child_size;
+            child_size = get_field_type_size(tf, event_type,
+                                    offset_root, offset_parent,
+                                    field->child[0], data);
+            offset_root += child_size;
+            offset_parent += child_size;
+            size += child_size;
+          }
+        }
+        field->field_size = size;
+      }
+      break;
+    case LTT_STRING:
+      size = strlen((char*)(data+offset_root)) + 1;// length + \0
+      field->field_size = size;
+      break;
+    case LTT_ARRAY:
+      if(field->fixed_size == FIELD_FIXED)
+        size = field->field_size;
+      else {
+        for(i=0;i<field->field_type->element_number;i++) {
+          size_t child_size;
+          child_size = get_field_type_size(tf, event_type,
+                                  offset_root, offset_parent,
+                                  field->child[0], data);
+          offset_root += child_size;
+          offset_parent += child_size;
+          size += child_size;
+        }
+        field->field_size = size;
+      }
+      break;
+    case LTT_STRUCT:
+      if(field->fixed_size == FIELD_FIXED)
+        size = field->field_size;
+      else {
+        size_t current_root_offset = offset_root;
+        size_t current_offset = 0;
+        size_t child_size = 0;
+        for(i=0;i<type->element_number;i++) {
+          child_size = get_field_type_size(tf,
+                     event_type, current_root_offset, current_offset, 
+                     field->child[i], data);
+          current_offset += child_size;
+          current_root_offset += child_size;
+          
+        }
+        size = current_offset;
+        field->field_size = size;
+      }
+      break;
+    case LTT_UNION:
+      if(field->fixed_size == FIELD_FIXED)
+        size = field->field_size;
+      else {
+        size_t current_root_offset = field->offset_root;
+        size_t current_offset = 0;
+        for(i=0;i<type->element_number;i++) {
+          size = get_field_type_size(tf, event_type,
+                 current_root_offset, current_offset, 
+                 field->child[i], data);
+          size = max(size, field->child[i]->field_size);
+        }
+        field->field_size = size;
+      }
+      break;
+  }
+
+  return size;
 }
+
+
This page took 0.032555 seconds and 4 git commands to generate.