/* This file is part of the Linux Trace Toolkit viewer
- * Copyright (C) 2003-2004 Xiangxiu Yang, Mathieu Desnoyers
+ * Copyright (C) 2003-2004 Xiangxiu Yang
+ * 2005 Mathieu Desnoyers
*
- * This program is free software; you can redistribute it and/or modify
- * it under the terms of the GNU General Public License Version 2 as
- * published by the Free Software Foundation;
+ * This library is free software; you can redistribute it and/or
+ * modify it under the terms of the GNU Lesser General Public
+ * License Version 2.1 as published by the Free Software Foundation.
*
- * This program is distributed in the hope that it will be useful,
+ * This library is distributed in the hope that it will be useful,
* but WITHOUT ANY WARRANTY; without even the implied warranty of
- * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
- * GNU General Public License for more details.
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
+ * Lesser General Public License for more details.
*
- * You should have received a copy of the GNU General Public License
- * along with this program; if not, write to the Free Software
- * Foundation, Inc., 59 Temple Place - Suite 330, Boston,
- * MA 02111-1307, USA.
+ * You should have received a copy of the GNU Lesser General Public
+ * License along with this library; if not, write to the
+ * Free Software Foundation, Inc., 59 Temple Place - Suite 330,
+ * Boston, MA 02111-1307, USA.
*/
#ifdef HAVE_CONFIG_H
sizeof(int8_t), sizeof(int16_t), sizeof(int32_t), sizeof(int64_t),
sizeof(short) };
+static unsigned floatSizes[] = {
+ 0, 0, sizeof(float), sizeof(double), 0, sizeof(float), sizeof(double) };
+
+
typedef enum _intSizesNames { SIZE_INT8, SIZE_INT16, SIZE_INT32,
SIZE_INT64, SIZE_SHORT, INT_SIZES_NUMBER }
intSizesNames;
+static char * typeNames[] = {
+ "int_fixed", "uint_fixed", "pointer", "char", "uchar", "short", "ushort",
+ "int", "uint", "long", "ulong", "size_t", "ssize_t", "off_t", "float",
+ "string", "enum", "array", "sequence", "struct", "union", "none" };
-static unsigned floatSizes[] = {
- 0, 0, sizeof(float), sizeof(double), 0, sizeof(float), sizeof(double) };
#define FLOAT_SIZES_NUMBER 7
/*****************************************************************************
*Function name
- * ltt_eventtype_type : get the type of the event type
+ * ltt_type_name : get the name of the type
*Input params
- * et : an event type
+ * t : a type
*Return value
- * LttType * : the type of the event type
+ * GQuark : the name of the type
****************************************************************************/
-LttType *ltt_eventtype_type(LttEventType *et)
+GQuark ltt_type_name(LttType *t)
{
- if(unlikely(!et->root_field)) return NULL;
- else return et->root_field->field_type;
+ return g_quark_from_static_string(typeNames[t->type_class]);
}
/*****************************************************************************
*Function name
- * ltt_eventtype_field : get the root filed of the event type
+ * ltt_field_name : get the name of the field
*Input params
- * et : an event type
+ * f : a field
*Return value
- * LttField * : the root filed of the event type
+ * char * : the name of the type
****************************************************************************/
-LttField *ltt_eventtype_field(LttEventType *et)
+GQuark ltt_field_name(LttField *f)
{
- return et->root_field;
+ return f->name;
}
-/*****************************************************************************
- *Function name
- * ltt_type_name : get the name of the type
- *Input params
- * t : a type
- *Return value
- * char * : the name of the type
- ****************************************************************************/
-GQuark ltt_type_name(LttType *t)
-{
- return t->element_name;
-}
/*****************************************************************************
*Function name
* returns 0 if erroneous, and show a critical warning message.
****************************************************************************/
-size_t ltt_type_size(LttTrace * trace, LttType *t)
+guint ltt_type_size(LttTrace * trace, LttType *t)
{
- size_t size;
+ guint size;
switch(t->type_class) {
-
+ case LTT_INT_FIXED:
+ case LTT_UINT_FIXED:
+ case LTT_CHAR:
+ case LTT_UCHAR:
+ case LTT_SHORT:
+ case LTT_USHORT:
case LTT_INT:
case LTT_UINT:
- case LTT_SEQUENCE:
case LTT_ENUM:
if(likely(t->size < INT_SIZES_NUMBER))
size = intSizes[t->size];
case LTT_ULONG:
case LTT_SIZE_T:
case LTT_SSIZE_T:
+ case LTT_SEQUENCE:
case LTT_OFF_T:
case LTT_STRING:
case LTT_ARRAY:
case LTT_STRUCT:
case LTT_UNION:
+ case LTT_NONE:
goto error;
break;
}
LttType *ltt_type_element_type(LttType *t)
{
LttType *element_type;
+ LttField *field;
if(unlikely(t->type_class != LTT_ARRAY && t->type_class != LTT_SEQUENCE))
element_type = NULL;
- else
- element_type = t->element_type[0];
+ else {
+ if(t->type_class == LTT_ARRAY)
+ field = &g_array_index(t->fields, LttField, 0);
+ else
+ field = &g_array_index(t->fields, LttField, 1);
+ element_type = ltt_field_type(field);
+ }
return element_type;
}
/*****************************************************************************
*Function name
- * ltt_type_element_number : obtain the number of elements for arrays
+ * ltt_type_element_number : obtain the number of elements for enums
*Input params
- * t : a type
+ * t : a type
*Return value
* unsigned : the number of elements for arrays
****************************************************************************/
-
unsigned ltt_type_element_number(LttType *t)
{
unsigned ret = 0;
- if(likely(t->type_class == LTT_ARRAY))
- ret = t->element_number;
+ if(likely(t->type_class == LTT_ENUM))
+ // Permits non full enums ret = g_hash_table_size(t->enum_map);
+ ret = (unsigned)(t->highest_value - t->lowest_value);
return ret;
}
unsigned ret = 0;
if(likely(t->type_class == LTT_STRUCT || t->type_class == LTT_UNION))
- ret =t->element_number;
+ ret = t->fields->len;
return ret;
}
-/*****************************************************************************
- *Function name
- * ltt_type_member_type : obtain the type of a data member in a structure
- * or union.
- *Input params
- * t : a type
- * i : index of the member
- *Return value
- * LttType * : the type of structure member
- ****************************************************************************/
-
-LttType *ltt_type_member_type(LttType *t, unsigned i, GQuark *name)
-{
- LttType *member_type = NULL;
-
- if(unlikely( (t->type_class != LTT_STRUCT
- && t->type_class != LTT_UNION)
- ||
- (i >= t->element_number)
- )) {
- *name = 0;
- } else {
- *name = t->element_type[i]->element_name;
- member_type = t->element_type[i];
- }
-
- return member_type;
-}
/*****************************************************************************
*Function name
* char * : symbolic string associated with a value
****************************************************************************/
-GQuark ltt_enum_string_get(LttType *t, unsigned i)
+GQuark ltt_enum_string_get(LttType *t, gulong i)
{
- if(likely(t->type_class == LTT_ENUM && i < t->element_number))
- return t->enum_strings[i];
+ if(likely(t->type_class == LTT_ENUM))
+ return (GQuark)g_hash_table_lookup(t->enum_map, (gpointer)i);
else
return 0;
}
-
+#if 0
/*****************************************************************************
*Function name
* ltt_field_element : obtain the field of nested elements for arrays and
return nest;
}
+#endif//0
+
+/*****************************************************************************
+ *Function name
+ * ltt_field_member_by_name : obtain the field of data members for structure
+ *Input params
+ * f : a field
+ * name : name of the field
+ *Return value
+ * LttField * : the field of the nested element
+ ****************************************************************************/
+
+LttField *ltt_field_member_by_name(LttField *f, GQuark name)
+{
+ LttField *field_member;
+
+ g_assert(f->field_type.type_class == LTT_STRUCT ||
+ f->field_type.type_class == LTT_UNION);
+
+ field_member = g_datalist_id_get_data(&f->field_type.fields_by_name, name);
+
+ return field_member;
+}
+
/*****************************************************************************
*Function name
* LttField * : the field of the nested element
****************************************************************************/
-LttField *ltt_field_member(LttField *f, unsigned i)
+LttField *ltt_field_member(LttField *f, guint i)
{
LttField *field_member;
- g_assert(f->field_type->type_class == LTT_STRUCT ||
- f->field_type->type_class == LTT_UNION);
- g_assert(i < f->field_type->element_number);
-#if 0
- if(unlikely( f->field_type->type_class != LTT_STRUCT
- && f->field_type->type_class != LTT_UNION)
- || i >= f->field_type->element_number )
- field_member = NULL;
- else
-#endif //0
- field_member = f->child[i];
+ g_assert(f->field_type.type_class == LTT_STRUCT ||
+ f->field_type.type_class == LTT_UNION);
+ g_assert(i < f->field_type.fields->len);
+
+ field_member = &g_array_index(f->field_type.fields, LttField, i);
return field_member;
}
LttType *ltt_field_type(LttField *f)
{
if(unlikely(!f))return NULL;
- return f->field_type;
+ return &f->field_type;
}
int ltt_field_size(LttField * f)
if(unlikely(!f))return 0;
return f->field_size;
}
+
+
+/*****************************************************************************
+ *Function name
+ * ltt_eventtype_num_fields : get the number of fields of the event
+ *Input params
+ * e : an instance of an event type
+ *Return value
+ * guint : number of fields
+ ****************************************************************************/
+
+guint ltt_eventtype_num_fields(LttEventType *event_type)
+{
+ if(unlikely(!event_type)) return 0;
+
+ return event_type->fields->len;
+
+}
+/*****************************************************************************
+ *Function name
+ * ltt_eventtype_field : get the i th field of the event
+ *Input params
+ * e : an instance of an event type
+ * i : field index
+ *Return value
+ * LttField * : The requested field, or NULL
+ ****************************************************************************/
+
+LttField *ltt_eventtype_field(LttEventType *event_type, guint i)
+{
+ if(unlikely(!event_type)) return NULL;
+
+ if(i >= event_type->fields->len) return NULL;
+
+ return &g_array_index(event_type->fields, LttField, i);
+
+}
+
+/*****************************************************************************
+ *Function name
+ * ltt_eventtype_field_by_name : get a field of the event
+ *Input params
+ * e : an instance of an event type
+ * name : field name
+ *Return value
+ * LttField * : The requested field, or NULL
+ ****************************************************************************/
+
+LttField *ltt_eventtype_field_by_name(LttEventType *event_type, GQuark name)
+{
+ if(unlikely(!event_type)) return NULL;
+
+ return (LttField*)g_datalist_id_get_data(&event_type->fields_by_name, name);
+
+}
+
+