X-Git-Url: https://git.lttng.org/?a=blobdiff_plain;f=ltt%2Fbranches%2Fpoly%2Flttv%2FtextDump.c;h=3333823d9095778bf315a75f1e2cc044b4ebe50b;hb=34b048821159dd48a9c5eac32ad5333925da334d;hp=8a425048d85deb56844a252c58d5e3c65a0fb576;hpb=48f6f3c280c4b511fdbdc3a650b2f4aa7040fc97;p=lttv.git diff --git a/ltt/branches/poly/lttv/textDump.c b/ltt/branches/poly/lttv/textDump.c index 8a425048..3333823d 100644 --- a/ltt/branches/poly/lttv/textDump.c +++ b/ltt/branches/poly/lttv/textDump.c @@ -2,350 +2,402 @@ before each trace, to print each event, and to print statistics after each trace. */ -void init(int argc, char **argv) -{ - lttv_attributes *a; - lttv_hooks *before, *after; - - a = lttv_global_attributes(); - before = (lttv_hooks *)lttv_attributes_get_pointer_pathname(a, - "hooks/trace_set/before"); - after = (lttv_hooks *)lttv_attributes_get_pointer_pathname(a, - "hooks/trace_set/after"); - lttv_hooks_add(before, textDump_trace_set_before, NULL); - lttv_hooks_add(after, textDump_trace_set_after, NULL); -} +#include +#include +#include +#include +#include +#include +#include +#include +#include +#include +#include +#include +static gboolean + a_field_names, + a_state, + a_cpu_stats, + a_process_stats; -void destroy() -{ - lttv_attributes *a; - lttv_hooks *before, *after; - - a = lttv_global_attributes(); - before = (lttv_hooks *)lttv_attributes_get_pointer_pathname(a, - "hooks/trace_set/before"); - after = (lttv_hooks *)lttv_attributes_get_pointer_pathname(a, - "hooks/trace_set/after"); - lttv_hooks_remove(before, textDump_trace_set_before, NULL); - lttv_hooks_remove(after, textDump_trace_set_after, NULL); -} +static char + *a_file_name = NULL; -/* Insert the hooks before and after each trace and tracefile, and for each - event. Print a global header. */ +static LttvHooks + *before_traceset, + *after_traceset, + *before_trace, + *before_event; -typedef struct _trace_context { - g_string s; - FILE *fp; - bool mandatory_fields; - lttv_attributes *a; -} trace_context; -static bool textDump_trace_set_before(void *hook_data, void *call_data) -{ - FILE *fp; - int i, j, nb, nbtf; - lttv_trace_set *s; - lttv_attributes *a; - trace_context *c; +void print_field(LttEvent *e, LttField *f, GString *s, gboolean field_names) { - a = lttv_global_attributes(); - s = (lttv_trace_set *)call_data + LttType *type; - /* Get the file pointer */ + LttField *element; - fp = (FILE *)lttv_attributes_get_pointer_pathname(a, "textDump/file"); + char *name; - /* For each trace prepare the contexts and insert the hooks */ + int nb, i; - nb = lttv_trace_set_number(s); - for(i = 0 ; i < nb ; i++) { - c = g_new(trace_context); - a = lttv_trace_set_trace_attributes(s, i); + type = ltt_field_type(f); + switch(ltt_type_class(type)) { + case LTT_INT: + g_string_append_printf(s, " %ld", ltt_event_get_long_int(e,f)); + break; - if(lttv_attributes_get_pointer_pathname(a, "textDump/context") != NULL) { - g_error("Recursive call to TextDump"); - } + case LTT_UINT: + g_string_append_printf(s, " %lu", ltt_event_get_long_unsigned(e,f)); + break; - c->fp = fp; - c->mandatory_fields = TRUE; - c->s = g_string_new(); - c->a = a; - - lttv_attributes_set_pointer_pathname(a, "textDump/context", c); - - h = lttv_attributes_get_hooks(a, "hooks/before"); - lttv_hooks_add(h, textDump_trace_before, c); - h = lttv_attributes_get_hooks(a, "hooks/after"); - lttv_hooks_add(h, textDump_trace_after, c); - h = lttv_attributes_get_hooks(a, "hooks/tacefile/before"); - lttv_hooks_add(h, textDump_tracefile_before, c); - h = lttv_attributes_get_hooks(a, "hooks/tracefile/after"); - lttv_hooks_add(h, textDump_tracefile_after, c); - h = lttv_attributes_get_hooks(a, "hooks/event/selected"); - lttv_hooks_add(h, textDump_event, c); - } + case LTT_FLOAT: + g_string_append_printf(s, " %g", ltt_event_get_double(e,f)); + break; - /* Print the trace set header */ - fprintf(fp,"Trace set contains %d traces\n\n", nb); + case LTT_STRING: + g_string_append_printf(s, " \"%s\"", ltt_event_get_string(e,f)); + break; + + case LTT_ENUM: + g_string_append_printf(s, " %s", ltt_enum_string_get(type, + ltt_event_get_unsigned(e,f)-1)); + break; - return TRUE; + case LTT_ARRAY: + case LTT_SEQUENCE: + g_string_append_printf(s, " {"); + nb = ltt_event_field_element_number(e,f); + element = ltt_field_element(f); + for(i = 0 ; i < nb ; i++) { + ltt_event_field_element_select(e,f,i); + print_field(e, element, s, field_names); + } + g_string_append_printf(s, " }"); + break; + + case LTT_STRUCT: + g_string_append_printf(s, " {"); + nb = ltt_type_member_number(type); + for(i = 0 ; i < nb ; i++) { + element = ltt_field_member(f,i); + if(field_names) { + ltt_type_member_type(type, i, &name); + g_string_append_printf(s, " %s = ", name); + } + print_field(e, element, s, field_names); + } + g_string_append_printf(s, " }"); + break; + } } -/* Remove the hooks before and after each trace and tracefile, and for each - event. Print trace set level statistics. */ +void lttv_event_to_string(LttEvent *e, LttTracefile *tf, GString *s, + gboolean mandatory_fields, gboolean field_names, LttvTracefileState *tfs) +{ + LttFacility *facility; + + LttEventType *event_type; + + LttType *type; + + LttField *field; + + LttTime time; -static bool textDump_trace_set_after(void *hook_data, void *call_data) + g_string_set_size(s,0); + + facility = ltt_event_facility(e); + event_type = ltt_event_eventtype(e); + field = ltt_event_field(e); + + if(mandatory_fields) { + time = ltt_event_time(e); + g_string_append_printf(s,"%s.%s: %ld.%09ld (%s)", + ltt_facility_name(facility), + ltt_eventtype_name(event_type), (long)time.tv_sec, time.tv_nsec, + g_quark_to_string(tfs->cpu_name)); + /* Print the process id and the state/interrupt type of the process */ + g_string_append_printf(s,", %u, %u, %s", tfs->process->pid, + tfs->process->ppid, + g_quark_to_string(tfs->process->state->t)); + } + + if(field) + print_field(e, field, s, field_names); +} + + +static void +print_tree(FILE *fp, GString *indent, LttvAttribute *tree) { - FILE *fp; - int i, j, nb, nbtf; - lttv_trace_set *s; - lttv_attributes *ga, *a; - trace_context *c; + int i, nb, saved_length; - ga = lttv_global_attributes(); - s = (lttv_trace_set *)lttv_attributes_get_pointer_pathname(ga, - "trace_set/main"); + LttvAttribute *subtree; - /* Get the file pointer */ + LttvAttributeName name; - fp = (FILE *)lttv_attributes_get_pointer_pathname(ga, "textDump/file"); + LttvAttributeValue value; - /* For each trace remove the hooks */ + LttvAttributeType type; - nb = lttv_trace_set_number(s); + nb = lttv_attribute_get_number(tree); for(i = 0 ; i < nb ; i++) { - a = lttv_trace_set_trace_attributes(s, i); - c = (trace_context *)lttv_attributes_get_pointer_pathname(a, - "textDump/context"); - lttv_attributes_set_pointer_pathname(a, "textDump/context", NULL); - g_string_free(c->s); - - h = lttv_attributes_get_hooks(a, "hooks/before"); - lttv_hooks_remove(h, textDump_trace_before, c); - h = lttv_attributes_get_hooks(a, "hooks/after"); - lttv_hooks_remove(h, textDump_trace_after, c); - h = lttv_attributes_get_hooks(a, "hooks/tacefile/before"); - lttv_hooks_remove(h, textDump_tracefile_before, c); - h = lttv_attributes_get_hooks(a, "hooks/tracefile/after"); - lttv_hooks_remove(h, textDump_tracefile_after, c); - h = lttv_attributes_get_hooks(a, "hooks/event/selected"); - lttv_hooks_remove(h, textDump_event, c); - g_free(c); + type = lttv_attribute_get(tree, i, &name, &value); + fprintf(fp, "%s%s: ", indent->str, g_quark_to_string(name)); + + switch(type) { + case LTTV_INT: + fprintf(fp, "%d\n", *value.v_int); + break; + case LTTV_UINT: + fprintf(fp, "%u\n", *value.v_uint); + break; + case LTTV_LONG: + fprintf(fp, "%ld\n", *value.v_long); + break; + case LTTV_ULONG: + fprintf(fp, "%lu\n", *value.v_ulong); + break; + case LTTV_FLOAT: + fprintf(fp, "%f\n", (double)*value.v_float); + break; + case LTTV_DOUBLE: + fprintf(fp, "%f\n", *value.v_double); + break; + case LTTV_TIME: + fprintf(fp, "%10u.%09u\n", value.v_time->tv_sec, + value.v_time->tv_nsec); + break; + case LTTV_POINTER: + fprintf(fp, "POINTER\n"); + break; + case LTTV_STRING: + fprintf(fp, "%s\n", *value.v_string); + break; + case LTTV_GOBJECT: + if(LTTV_IS_ATTRIBUTE(*(value.v_gobject))) { + fprintf(fp, "\n"); + subtree = (LttvAttribute *)*(value.v_gobject); + saved_length = indent->len; + g_string_append(indent, " "); + print_tree(fp, indent, subtree); + g_string_truncate(indent, saved_length); + } + else fprintf(fp, "GOBJECT\n"); + break; + case LTTV_NONE: + break; + } } +} - /* Print the trace set statistics */ - fprintf(fp,"Trace set contains %d traces\n\n", nb); +static void +print_stats(FILE *fp, LttvTracesetStats *tscs) +{ + int i, nb, saved_length; - print_stats(fp, ga); + LttvTraceset *ts; - return TRUE; -} + LttvTraceStats *tcs; + GString *indent; -/* Print a trace level header */ + LttSystemDescription *desc; -static bool textDump_trace_before(void *hook_data, void *call_data) -{ - ltt_trace *t; - trace_context *c; + if(tscs->stats == NULL) return; + indent = g_string_new(""); + fprintf(fp, "Traceset statistics:\n\n"); + print_tree(fp, indent, tscs->stats); + + ts = tscs->parent.parent.ts; + nb = lttv_traceset_number(ts); - c = (trace_context *)hook_data; - t = (ltt_trace *)call_data; - fprintf(c->fp,"Start trace\n"); - return TRUE; + for(i = 0 ; i < nb ; i++) { + tcs = (LttvTraceStats *)(LTTV_TRACESET_CONTEXT(tscs)->traces[i]); + desc = ltt_trace_system_description(tcs->parent.parent.t); + fprintf(fp, "Trace on system %s at time %d secs:\n", + ltt_trace_system_description_node_name(desc), + (ltt_trace_system_description_trace_start_time(desc)).tv_sec); + saved_length = indent->len; + g_string_append(indent, " "); + print_tree(fp, indent, tcs->stats); + g_string_truncate(indent, saved_length); + } + g_string_free(indent, TRUE); } -/* Print trace level statistics */ +/* Insert the hooks before and after each trace and tracefile, and for each + event. Print a global header. */ -static bool textDump_trace_after(void *hook_data, void *call_data) -{ - ltt_trace *t; - trace_context *c; - - c = (trace_context *)hook_data; - t = (ltt_trace *)call_data; - fprintf(c->fp,"End trace\n"); - print_stats(c->fp,c->a); - return TRUE; -} +static FILE *a_file; +static GString *a_string; -static bool textDump_tracefile_before(void *hook_data, void *call_data) +static gboolean write_traceset_header(void *hook_data, void *call_data) { - ltt_tracefile *tf; - trace_context *c; + LttvTracesetContext *tc = (LttvTracesetContext *)call_data; + + g_info("TextDump traceset header"); + + if(a_file_name == NULL) a_file = stdout; + else a_file = fopen(a_file_name, "w"); + + if(a_file == NULL) g_error("cannot open file %s", a_file_name); - c = (trace_context *)hook_data; - tf = (ltt_tracefile *)call_data; - fprintf(c->fp,"Start tracefile\n"); - return TRUE; + /* Print the trace set header */ + fprintf(a_file,"Trace set contains %d traces\n\n", + lttv_traceset_number(tc->ts)); + + return FALSE; } -static bool textDump_tracefile_after(void *hook_data, void *call_data) +static gboolean write_traceset_footer(void *hook_data, void *call_data) { - ltt_tracefile *tf; - trace_context *c; + LttvTracesetContext *tc = (LttvTracesetContext *)call_data; - c = (trace_context *)hook_data; - tf = (ltt_tracefile *)call_data; - fprintf(c->fp,"End tracefile\n"); - return TRUE; -} + g_info("TextDump traceset footer"); + fprintf(a_file,"End trace set\n\n"); + + if(LTTV_IS_TRACESET_STATS(tc)) { + print_stats(a_file, (LttvTracesetStats *)tc); + } -/* Print the event content */ + if(a_file_name != NULL) fclose(a_file); -static bool textDump_event(void *hook_data, void *call_data) + return FALSE; +} + + +static gboolean write_trace_header(void *hook_data, void *call_data) { - ltt_event *e; - trace_context *c; - - e = (ltt_event *)call_data; - c = (event_context *)hook_data; - lttv_event_to_string(e,c->s,c->mandatory_fields); - fputs(s, c->fd); - return TRUE; + LttvTraceContext *tc = (LttvTraceContext *)call_data; + + LttSystemDescription *system = ltt_trace_system_description(tc->t); + + fprintf(a_file," Trace from %s in %s\n%s\n\n", + ltt_trace_system_description_node_name(system), + ltt_trace_system_description_domain_name(system), + ltt_trace_system_description_description(system)); + return FALSE; } -static void print_stats(FILE *fp, lttv_attributes *a) +static int write_event_content(void *hook_data, void *call_data) { - int i, j, k, nb, nbc; + LttvTracefileContext *tfc = (LttvTracefileContext *)call_data; - lttv_attributes *sa, *ra; - lttv_attribute *reports, *content; - lttv_key *key, *previous_key, null_key; + LttvTracefileState *tfs = (LttvTracefileState *)call_data; - null_key = lttv_key_new_pathname(""); - sa = (lttv_attributes *)lttv_attributes_get_pointer_pathname(a,"stats"); - reports = lttv_attributes_array_get(sa); - nb= lttv_attributes_number(sa); + LttEvent *e; - for(i = 0 ; i < nb ; i++) { - ra = (lttv_attributes *)reports[i].v.p; - key = reports[i].key; - g_assert(reports[i].t == LTTV_POINTER); - - /* CHECK maybe have custom handlers registered for some specific reports */ - - print_key(fp,key); - - content = lttv_attributes_array_get(ra); - nbc = lttv_attributes_number(ra); - lttv_attribute_array_sort_lexicographic(content, nbc, NULL, 0); - previous_key = nullKey; - for(j = 0 ; j < nbc ; j++) { - key = content[j].key; - for(k = 0 ; lttv_key_index(previous_key,k) == lttv_index(key,k) ; k++) - for(; k < lttv_key_number(key) ; k++) { - for(l = 0 ; l < k ; l++) fprintf(fp," "); - fprintf(fp, "%s", lttv_string_id_to_string(lttv_index(key,k))); - if(k == lttv_key_number(key)) { - switch(content[j].t) { - case LTTV_INTEGER: - fprintf(fp," %d\n", content[j].v.i); - break; - case LTTV_TIME: - fprintf(fp," %d.%09d\n", content[j].v.t.tv_sec, - content[j].v.t.tv_nsec); - break; - case LTTV_DOUBLE: - fprintf(fp," %g\n", content[j].v.d); - break; - case LTTV_POINTER: - fprintf(fp," pointer\n"); - break; - } - } - else fprintf(fp,"\n"); - } - } - lttv_attribute_array_destroy(content); + e = tfc->e; + + lttv_event_to_string(e, tfc->tf, a_string, TRUE, a_field_names, tfs); + g_string_append_printf(a_string,"\n"); + + if(a_state) { + g_string_append_printf(a_string, " %s", + g_quark_to_string(tfs->process->state->s)); } - lttv_attribute_array_destroy(reports); - lttv_key_destroy(null_key); + + fputs(a_string->str, a_file); + return FALSE; } -void lttv_event_to_string(ltt_event *e, lttv_string *s, bool mandatory_fields) +G_MODULE_EXPORT void init(LttvModule *self, int argc, char **argv) { - ltt_facility *facility; - ltt_eventtype *eventtype; - ltt_type *type; - ltt_field *field; - ltt_time time; - - g_string_set_size(s,0); + LttvAttributeValue value; + + LttvIAttribute *attributes = LTTV_IATTRIBUTE(lttv_global_attributes()); + + g_info("Init textDump.c"); + + lttv_module_require(self, "libbatchAnalysis", argc, argv); + + a_string = g_string_new(""); + + a_file_name = NULL; + lttv_option_add("output", 'o', + "output file where the text is written", + "file name", + LTTV_OPT_STRING, &a_file_name, NULL, NULL); + + a_field_names = FALSE; + lttv_option_add("field_names", 'l', + "write the field names for each event", + "", + LTTV_OPT_NONE, &a_field_names, NULL, NULL); + + a_state = FALSE; + lttv_option_add("process_state", 's', + "write the pid and state for each event", + "", + LTTV_OPT_NONE, &a_state, NULL, NULL); + + a_cpu_stats = FALSE; + lttv_option_add("cpu_stats", 's', + "write the per cpu statistics", + "", + LTTV_OPT_NONE, &a_cpu_stats, NULL, NULL); + + a_process_stats = FALSE; + lttv_option_add("process_stats", 's', + "write the per process statistics", + "", + LTTV_OPT_NONE, &a_process_stats, NULL, NULL); + + g_assert(lttv_iattribute_find_by_path(attributes, "hooks/event/before", + LTTV_POINTER, &value)); + g_assert((before_event = *(value.v_pointer)) != NULL); + lttv_hooks_add(before_event, write_event_content, NULL); + + g_assert(lttv_iattribute_find_by_path(attributes, "hooks/trace/before", + LTTV_POINTER, &value)); + g_assert((before_trace = *(value.v_pointer)) != NULL); + lttv_hooks_add(before_trace, write_trace_header, NULL); + + g_assert(lttv_iattribute_find_by_path(attributes, "hooks/traceset/before", + LTTV_POINTER, &value)); + g_assert((before_traceset = *(value.v_pointer)) != NULL); + lttv_hooks_add(before_traceset, write_traceset_header, NULL); + + g_assert(lttv_iattribute_find_by_path(attributes, "hooks/traceset/after", + LTTV_POINTER, &value)); + g_assert((after_traceset = *(value.v_pointer)) != NULL); + lttv_hooks_add(after_traceset, write_traceset_footer, NULL); +} - facility = lttv_event_facility(e); - eventtype = ltt_event_eventtype(e); - field = ltt_event_field(e); - if(mandatory_fields) { - time = ltt_event_time(e); - g_string_append_printf(s,"%s.%s: %ld.%ld",ltt_facility_name(facility), - ltt_eventtype_name(eventtype), (long)time.tv_sec, time.tv_nsec); - } +G_MODULE_EXPORT void destroy() +{ + g_info("Destroy textDump"); - print_field(e,f,s); -} + lttv_option_remove("output"); -void print_field(ltt_event *e, ltt_field *f, lttv_string *s) { - ltt_type *type; - ltt_field *element; + lttv_option_remove("field_names"); - int nb, i; + lttv_option_remove("process_state"); - type = ltt_field_type(f); - switch(ltt_type_class(type)) { - case LTT_INT: - g_string_append_printf(s, " %ld", ltt_event_get_long_int(e,f)); - break; + lttv_option_remove("cpu_stats"); - case LTT_UINT: - g_string_append_printf(s, " %lu", ltt_event_get_long_unsigned(e,f)); - break; + lttv_option_remove("process_stats"); - case LTT_FLOAT: - g_string_append_printf(s, " %g", ltt_event_get_double(e,f)); - break; + g_string_free(a_string, TRUE); - case LTT_STRING: - g_string_append_printf(s, " \"%s\"", ltt_event_get_string(e,f)); - break; + lttv_hooks_remove_data(before_event, write_event_content, NULL); - case LTT_ENUM: - g_string_append_printf(s, " %s", ltt_enum_string_get(type, - event_get_unsigned(e,f)); - break; + lttv_hooks_remove_data(before_trace, write_trace_header, NULL); - case LTT_ARRAY: - case LTT_SEQUENCE: - g_string_append_printf(s, " {"); - nb = ltt_event_field_element_number(e,f); - element = ltt_field_element(f); - for(i = 0 ; i < nb ; i++) { - ltt_event_field_element_select(e,f,i); - print_field(e,element,s); - } - g_string_append_printf(s, " }"); - break; + lttv_hooks_remove_data(before_trace, write_traceset_header, NULL); - case LTT_STRUCT: - g_string_append_printf(s, " {"); - nb = ltt_type_member_number(type); - for(i = 0 ; i < nb ; i++) { - element = ltt_field_member(f,i); - print_field(e,element,s); - } - g_string_append_printf(s, " }"); - break; - } + lttv_hooks_remove_data(before_trace, write_traceset_footer, NULL); }