1 /* This file is part of the Linux Trace Toolkit viewer
2 * Copyright (C) 2003-2004 Michel Dagenais
3 * 2005 Mathieu Desnoyers
5 * This program is free software; you can redistribute it and/or modify
6 * it under the terms of the GNU General Public License Version 2 as
7 * published by the Free Software Foundation;
9 * This program is distributed in the hope that it will be useful,
10 * but WITHOUT ANY WARRANTY; without even the implied warranty of
11 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
12 * GNU General Public License for more details.
14 * You should have received a copy of the GNU General Public License
15 * along with this program; if not, write to the Free Software
16 * Foundation, Inc., 59 Temple Place - Suite 330, Boston,
22 * Event printing routines.
29 #include <lttv/lttv.h>
30 #include <lttv/option.h>
31 #include <lttv/module.h>
32 #include <lttv/hook.h>
33 #include <lttv/attribute.h>
34 #include <lttv/iattribute.h>
35 #include <lttv/stats.h>
36 #include <lttv/filter.h>
37 #include <lttv/print.h>
39 #include <ltt/event.h>
40 #include <ltt/trace.h>
43 #include <ltt/ltt-private.h>
47 static inline void print_enum_events(LttEvent
*e
, struct marker_field
*f
,
48 guint64 value
, GString
*s
, LttvTracefileState
*tfs
)
50 LttTracefile
*tf
= tfs
->parent
.tf
;
51 struct marker_info
*info
= marker_get_info_from_id(tf
->mdata
, e
->event_id
);
52 LttvTraceState
*ts
= (LttvTraceState
*)(tfs
->parent
.t_context
);
54 if (tf
->name
== LTT_CHANNEL_KERNEL
) {
55 if (info
->name
== LTT_EVENT_SYSCALL_ENTRY
56 && f
->name
== LTT_FIELD_SYSCALL_ID
) {
57 g_string_append_printf(s
, " [%s]",
58 g_quark_to_string(ts
->syscall_names
[value
]));
59 } else if ((info
->name
== LTT_EVENT_SOFT_IRQ_ENTRY
60 || info
->name
== LTT_EVENT_SOFT_IRQ_EXIT
61 || info
->name
== LTT_EVENT_SOFT_IRQ_RAISE
)
62 && f
->name
== LTT_FIELD_SOFT_IRQ_ID
) {
63 g_string_append_printf(s
, " [%s]",
64 g_quark_to_string(ts
->soft_irq_names
[value
]));
65 } else if (info
->name
== LTT_EVENT_KPROBE
66 && f
->name
== LTT_FIELD_IP
) {
67 #if (__SIZEOF_LONG__ == 4)
68 GQuark symbol
= (GQuark
)g_hash_table_lookup(ts
->kprobe_hash
,
69 (gconstpointer
)&value
);
71 GQuark symbol
= (GQuark
)g_hash_table_lookup(ts
->kprobe_hash
,
72 (gconstpointer
)value
);
75 g_string_append_printf(s
, " [%s]", g_quark_to_string(symbol
));
80 void lttv_print_field(LttEvent
*e
, struct marker_field
*f
, GString
*s
,
81 gboolean field_names
, LttvTracefileState
*tfs
)
89 case LTT_TYPE_SIGNED_INT
:
93 g_string_append_printf(s
, "%s = ", g_quark_to_string(name
));
95 value
= ltt_event_get_long_int(e
,f
);
96 //g_string_append_printf(s, "%lld", value);
97 g_string_append_printf(s
, f
->fmt
->str
, value
);
98 //g_string_append_printf(s, type->fmt, ltt_event_get_long_int(e,f));
99 print_enum_events(e
, f
, value
, s
, tfs
);
102 case LTT_TYPE_UNSIGNED_INT
:
106 g_string_append_printf(s
, "%s = ", g_quark_to_string(name
));
108 value
= ltt_event_get_long_unsigned(e
,f
);
109 //g_string_append_printf(s, "%llu", value);
110 g_string_append_printf(s
, f
->fmt
->str
, value
);
111 print_enum_events(e
, f
, value
, s
, tfs
);
112 //g_string_append_printf(s, type->fmt, ltt_event_get_long_unsigned(e,f));
119 unsigned car
= ltt_event_get_unsigned(e
,f
);
121 name
= ltt_field_name(f
);
123 g_string_append_printf(s
, "%s = ", g_quark_to_string(name
));
127 name
= ltt_field_name(f
);
129 g_string_append_printf(s
, "%s = ", g_quark_to_string(name
));
131 //g_string_append_printf(s, "%c", car);
132 g_string_append_printf(s
, type
->fmt
, car
);
134 g_string_append_printf(s
, "\\%x", car
);
140 name
= ltt_field_name(f
);
142 g_string_append_printf(s
, "%s = ", g_quark_to_string(name
));
144 //g_string_append_printf(s, "%g", ltt_event_get_double(e,f));
145 g_string_append_printf(s
, type
->fmt
, ltt_event_get_double(e
,f
));
149 case LTT_TYPE_POINTER
:
153 g_string_append_printf(s
, "%s = ", g_quark_to_string(name
));
155 g_string_append_printf(s
, "0x%" PRIx64
, ltt_event_get_long_unsigned(e
,f
));
156 //g_string_append_printf(s, type->fmt, ltt_event_get_long_unsigned(e,f));
159 case LTT_TYPE_STRING
:
163 g_string_append_printf(s
, "%s = ", g_quark_to_string(name
));
165 g_string_append_printf(s
, "\"%s\"", ltt_event_get_string(e
,f
));
171 GQuark value
= ltt_enum_string_get(type
, ltt_event_get_unsigned(e
,f
));
173 name
= ltt_field_name(f
);
175 g_string_append_printf(s
, "%s = ", g_quark_to_string(name
));
178 g_string_append_printf(s
, "%s", g_quark_to_string(value
));
180 g_string_append_printf(s
, "%lld", ltt_event_get_long_int(e
,f
));
187 name
= ltt_field_name(f
);
189 g_string_append_printf(s
, "%s = ", g_quark_to_string(name
));
191 // g_string_append_printf(s, "{ ");
193 g_string_append_printf(s
, type
->header
);//tested, works fine.
196 nb
= ltt_event_field_element_number(e
,f
);
197 for(i
= 0 ; i
< nb
; i
++) {
198 LttField
*child
= ltt_event_field_element_select(e
,f
,i
);
199 lttv_print_field(e
, child
, s
, field_names
, i
);
201 g_string_append_printf(s
,type
->separator
);
203 //g_string_append_printf(s, " }");
205 g_string_append_printf(s
, type
->footer
);//tested, works fine.
210 name
= ltt_field_name(f
);
212 g_string_append_printf(s
, "%s = ", g_quark_to_string(name
));
214 // g_string_append_printf(s, "{ ");
216 g_string_append_printf(s
, type
->header
);
218 nb
= ltt_type_member_number(type
);
219 for(i
= 0 ; i
< nb
; i
++) {
221 element
= ltt_field_member(f
,i
);
222 lttv_print_field(e
, element
, s
, field_names
, i
);
224 g_string_append_printf(s
,type
->separator
);
226 //g_string_append_printf(s, " }");
228 g_string_append_printf(s
, type
->footer
);
233 name
= ltt_field_name(f
);
235 g_string_append_printf(s
, "%s = ", g_quark_to_string(name
));
237 // g_string_append_printf(s, "{ ");
238 g_string_append_printf(s
, type
->header
);
240 nb
= ltt_type_member_number(type
);
241 for(i
= 0 ; i
< nb
; i
++) {
243 element
= ltt_field_member(f
,i
);
244 lttv_print_field(e
, element
, s
, field_names
, i
);
246 g_string_append_printf(s
, type
->separator
);
248 // g_string_append_printf(s, " }");
249 g_string_append_printf(s
, type
->footer
);
252 case LTT_TYPE_COMPACT
:
253 g_error("compact type printing not implemented");
260 void lttv_event_to_string(LttEvent
*e
, GString
*s
,
261 gboolean mandatory_fields
, gboolean field_names
, LttvTracefileState
*tfs
)
263 struct marker_field
*field
;
264 struct marker_info
*info
;
268 guint cpu
= tfs
->cpu
;
269 LttvTraceState
*ts
= (LttvTraceState
*)tfs
->parent
.t_context
;
270 LttvProcessState
*process
= ts
->running_process
[cpu
];
272 s
= g_string_set_size(s
,0);
274 info
= marker_get_info_from_id(tfs
->parent
.tf
->mdata
, e
->event_id
);
276 if(mandatory_fields
) {
277 time
= ltt_event_time(e
);
278 g_string_append_printf(s
,"%s.%s: %ld.%09ld (%s/%s_%u)",
279 g_quark_to_string(ltt_tracefile_name(tfs
->parent
.tf
)),
280 g_quark_to_string(info
->name
),
281 (long)time
.tv_sec
, time
.tv_nsec
,
283 ltt_trace_name(ltt_tracefile_get_trace(tfs
->parent
.tf
))),
284 g_quark_to_string(ltt_tracefile_name(tfs
->parent
.tf
)),
286 /* Print the process id and the state/interrupt type of the process */
287 g_string_append_printf(s
,", %u, %u, %s, %s, %u, 0x%" PRIx64
", %s",
290 g_quark_to_string(process
->name
),
291 g_quark_to_string(process
->brand
),
292 process
->ppid
, process
->current_function
,
293 g_quark_to_string(process
->state
->t
));
296 if(marker_get_num_fields(info
) == 0) return;
297 g_string_append_printf(s
, " ");
298 g_string_append_printf(s
, "{ ");
299 for (field
= marker_get_field(info
, 0);
300 field
!= marker_get_field(info
, marker_get_num_fields(info
));
302 if(field
!= marker_get_field(info
, 0))
303 g_string_append_printf(s
, ", ");
304 lttv_print_field(e
, field
, s
, field_names
, tfs
);
306 g_string_append_printf(s
, " }");
313 static void destroy()
317 LTTV_MODULE("print", "Print events", \
318 "Produce a detailed text printout of events", \