Commit | Line | Data |
---|---|---|
f204781b | 1 | /* This file is part of the Linux Trace Toolkit viewer |
2 | * Copyright (C) 2003-2004 Michel Dagenais | |
3 | * 2005 Mathieu Desnoyers | |
4 | * | |
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; | |
8 | * | |
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. | |
13 | * | |
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, | |
17 | * MA 02111-1307, USA. | |
18 | */ | |
19 | ||
20 | /* The text dump facility needs to print headers before the trace set and | |
21 | before each trace, to print each event, and to print statistics | |
22 | after each trace. */ | |
23 | ||
24 | #ifdef HAVE_CONFIG_H | |
25 | #include <config.h> | |
26 | #endif | |
27 | ||
28 | #include <lttv/lttv.h> | |
29 | #include <lttv/option.h> | |
30 | #include <lttv/module.h> | |
31 | #include <lttv/hook.h> | |
32 | #include <lttv/attribute.h> | |
33 | #include <lttv/iattribute.h> | |
34 | #include <lttv/stats.h> | |
35 | #include <lttv/filter.h> | |
36 | #include <lttv/print.h> | |
37 | #include <ltt/ltt.h> | |
38 | #include <ltt/event.h> | |
f204781b | 39 | #include <ltt/trace.h> |
f204781b | 40 | #include <stdio.h> |
41 | ||
42 | static gboolean | |
43 | a_field_names, | |
44 | a_state, | |
45 | a_cpu_stats, | |
6d0cdf22 | 46 | a_process_stats, |
47 | a_raw; | |
f204781b | 48 | |
49 | static char | |
6d0cdf22 | 50 | *a_file_name = NULL, |
51 | *a_quark_file_name = NULL; | |
f204781b | 52 | |
53 | static LttvHooks | |
54 | *before_traceset, | |
55 | *after_traceset, | |
56 | *before_trace, | |
6d0cdf22 | 57 | *after_trace, |
f204781b | 58 | *event_hook; |
59 | ||
6d0cdf22 | 60 | static guint a_event_count = 0; |
f204781b | 61 | |
62 | /* Insert the hooks before and after each trace and tracefile, and for each | |
63 | event. Print a global header. */ | |
64 | ||
65 | static FILE *a_file; | |
66 | ||
67 | static GString *a_string; | |
68 | ||
69 | static gboolean write_traceset_header(void *hook_data, void *call_data) | |
70 | { | |
71 | LttvTracesetContext *tc = (LttvTracesetContext *)call_data; | |
72 | ||
f204781b | 73 | if(a_file_name == NULL) a_file = stdout; |
74 | else a_file = fopen(a_file_name, "w"); | |
75 | ||
76 | if(a_file == NULL) g_error("cannot open file %s", a_file_name); | |
77 | ||
78 | /* Print the trace set header */ | |
6d0cdf22 | 79 | if(a_raw) { |
80 | /* TODO : Write a header that will check for ILP size and endianness */ | |
7df20ca4 | 81 | //fputc(HDR_TRACESET, a_file); |
82 | g_assert(lttv_traceset_number(tc->ts) == 1); /* Only one trace in traceset */ | |
6d0cdf22 | 83 | } else { |
84 | fprintf(a_file,"<TRACESET NUM_TRACES=%d/>\n", | |
85 | lttv_traceset_number(tc->ts)); | |
86 | } | |
f204781b | 87 | |
88 | return FALSE; | |
89 | } | |
90 | ||
91 | ||
92 | static gboolean write_traceset_footer(void *hook_data, void *call_data) | |
93 | { | |
94 | LttvTracesetContext *tc = (LttvTracesetContext *)call_data; | |
6d0cdf22 | 95 | GQuark q; |
43ed82b5 | 96 | const gchar *string; |
f204781b | 97 | |
6d0cdf22 | 98 | if(a_raw) { |
f204781b | 99 | |
6d0cdf22 | 100 | } else { |
101 | fprintf(a_file,"</TRACESET>\n"); | |
f204781b | 102 | } |
103 | ||
104 | if(a_file_name != NULL) fclose(a_file); | |
105 | ||
6d0cdf22 | 106 | if(a_raw) { |
107 | if(a_quark_file_name == NULL) { | |
108 | if(a_file_name == NULL) a_file = stdout; | |
109 | else a_file = fopen(a_file_name, "a"); | |
110 | } else { | |
111 | if(a_quark_file_name == NULL) a_file = stdout; | |
112 | else a_file = fopen(a_quark_file_name, "w"); | |
113 | } | |
114 | ||
115 | if(a_file == NULL) g_error("cannot open file %s", a_quark_file_name); | |
116 | ||
117 | fputc(HDR_QUARKS, a_file); | |
118 | q = 1; | |
119 | do { | |
120 | string = g_quark_to_string(q); | |
121 | if(string == NULL) break; | |
122 | fputc(HDR_QUARK, a_file); | |
123 | // increment. fwrite(&q, sizeof(GQuark), 1, a_file); | |
124 | fwrite(string, sizeof(char), strlen(string)+1, a_file); | |
125 | q++; | |
126 | } while(1); | |
127 | ||
128 | if(a_quark_file_name != NULL || a_file_name != NULL) fclose(a_file); | |
129 | ||
130 | } | |
131 | ||
f204781b | 132 | return FALSE; |
133 | } | |
134 | ||
135 | ||
136 | static gboolean write_trace_header(void *hook_data, void *call_data) | |
137 | { | |
138 | LttvTraceContext *tc = (LttvTraceContext *)call_data; | |
6d0cdf22 | 139 | |
140 | if(a_raw) { | |
141 | fputc(HDR_TRACE, a_file); | |
142 | } else { | |
143 | fprintf(a_file,"<TRACE TRACE_NUMBER=%d/>\n", | |
144 | tc->index); | |
145 | } | |
146 | ||
147 | return FALSE; | |
148 | } | |
149 | ||
150 | static gboolean write_trace_footer(void *hook_data, void *call_data) | |
151 | { | |
152 | LttvTraceContext *tc = (LttvTraceContext *)call_data; | |
153 | ||
154 | if(a_raw) { | |
155 | ||
156 | } else { | |
157 | fprintf(a_file,"</TRACE>\n"); | |
158 | } | |
159 | ||
f204781b | 160 | return FALSE; |
161 | } | |
162 | ||
163 | ||
164 | static int for_each_event(void *hook_data, void *call_data) | |
165 | { | |
166 | guint *event_count = (guint*)hook_data; | |
167 | ||
168 | LttvIAttribute *attributes = LTTV_IATTRIBUTE(lttv_global_attributes()); | |
169 | ||
170 | LttvTracefileContext *tfc = (LttvTracefileContext *)call_data; | |
171 | ||
172 | LttvTracefileState *tfs = (LttvTracefileState *)call_data; | |
173 | ||
174 | LttEvent *e; | |
175 | ||
176 | LttvAttributeValue value_filter; | |
177 | ||
178 | /* Only save at LTTV_STATE_SAVE_INTERVAL */ | |
179 | if(likely((*event_count)++ < LTTV_STATE_SAVE_INTERVAL)) | |
180 | return FALSE; | |
181 | else | |
182 | *event_count = 0; | |
183 | ||
184 | guint cpu = tfs->cpu; | |
185 | LttvTraceState *ts = (LttvTraceState*)tfc->t_context; | |
186 | LttvProcessState *process = ts->running_process[cpu]; | |
187 | ||
188 | e = ltt_tracefile_get_event(tfc->tf); | |
189 | ||
6d0cdf22 | 190 | if(a_raw) { |
191 | lttv_state_write_raw(ts, tfs->parent.timestamp, a_file); | |
192 | } else { | |
193 | lttv_state_write(ts, tfs->parent.timestamp, a_file); | |
194 | } | |
f204781b | 195 | |
196 | return FALSE; | |
197 | } | |
198 | ||
199 | ||
200 | static void init() | |
201 | { | |
202 | LttvAttributeValue value; | |
203 | ||
204 | LttvIAttribute *attributes = LTTV_IATTRIBUTE(lttv_global_attributes()); | |
8f318283 | 205 | gboolean retval; |
f204781b | 206 | |
6d0cdf22 | 207 | g_info("Init precomputeState.c"); |
f204781b | 208 | |
209 | a_string = g_string_new(""); | |
210 | ||
211 | a_file_name = NULL; | |
212 | lttv_option_add("output", 'o', | |
213 | "output file where the saved states are to be written", | |
214 | "file name", | |
215 | LTTV_OPT_STRING, &a_file_name, NULL, NULL); | |
216 | ||
6d0cdf22 | 217 | a_quark_file_name = NULL; |
218 | lttv_option_add("qoutput", 'q', | |
219 | "output file where the quarks (tuples integer, string) are to be written", | |
220 | "file name", | |
221 | LTTV_OPT_STRING, &a_quark_file_name, NULL, NULL); | |
222 | ||
223 | lttv_option_add("raw", 'r', | |
224 | "Output in raw binary", | |
225 | "Raw binary", | |
226 | LTTV_OPT_NONE, &a_raw, NULL, NULL); | |
227 | ||
8f318283 BP |
228 | retval= lttv_iattribute_find_by_path(attributes, "hooks/event", |
229 | LTTV_POINTER, &value); | |
230 | g_assert(retval); | |
f204781b | 231 | g_assert((event_hook = *(value.v_pointer)) != NULL); |
6d0cdf22 | 232 | lttv_hooks_add(event_hook, for_each_event, &a_event_count, LTTV_PRIO_DEFAULT); |
f204781b | 233 | |
8f318283 BP |
234 | retval= lttv_iattribute_find_by_path(attributes, "hooks/trace/before", |
235 | LTTV_POINTER, &value); | |
236 | g_assert(retval); | |
f204781b | 237 | g_assert((before_trace = *(value.v_pointer)) != NULL); |
238 | lttv_hooks_add(before_trace, write_trace_header, NULL, LTTV_PRIO_DEFAULT); | |
239 | ||
8f318283 BP |
240 | retval= lttv_iattribute_find_by_path(attributes, "hooks/trace/after", |
241 | LTTV_POINTER, &value); | |
242 | g_assert(retval); | |
6d0cdf22 | 243 | g_assert((after_trace = *(value.v_pointer)) != NULL); |
244 | lttv_hooks_add(after_trace, write_trace_footer, NULL, LTTV_PRIO_DEFAULT); | |
245 | ||
8f318283 BP |
246 | retval= lttv_iattribute_find_by_path(attributes, "hooks/traceset/before", |
247 | LTTV_POINTER, &value); | |
248 | g_assert(retval); | |
f204781b | 249 | g_assert((before_traceset = *(value.v_pointer)) != NULL); |
250 | lttv_hooks_add(before_traceset, write_traceset_header, NULL, | |
251 | LTTV_PRIO_DEFAULT); | |
252 | ||
8f318283 BP |
253 | retval= lttv_iattribute_find_by_path(attributes, "hooks/traceset/after", |
254 | LTTV_POINTER, &value); | |
255 | g_assert(retval); | |
f204781b | 256 | g_assert((after_traceset = *(value.v_pointer)) != NULL); |
257 | lttv_hooks_add(after_traceset, write_traceset_footer, NULL, | |
258 | LTTV_PRIO_DEFAULT); | |
259 | } | |
260 | ||
261 | static void destroy() | |
262 | { | |
6d0cdf22 | 263 | g_info("Destroy precomputeState"); |
f204781b | 264 | |
265 | lttv_option_remove("output"); | |
266 | ||
6d0cdf22 | 267 | lttv_option_remove("qoutput"); |
268 | ||
269 | lttv_option_remove("raw"); | |
270 | ||
f204781b | 271 | g_string_free(a_string, TRUE); |
272 | ||
273 | lttv_hooks_remove_data(event_hook, for_each_event, NULL); | |
274 | ||
275 | lttv_hooks_remove_data(before_trace, write_trace_header, NULL); | |
276 | ||
277 | lttv_hooks_remove_data(before_trace, write_traceset_header, NULL); | |
278 | ||
279 | lttv_hooks_remove_data(before_trace, write_traceset_footer, NULL); | |
280 | } | |
281 | ||
282 | ||
6d0cdf22 | 283 | LTTV_MODULE("precomputeState", "Precompute states", \ |
7df20ca4 | 284 | "Precompute states in a trace, XML or binary output.", \ |
f204781b | 285 | init, destroy, "stats", "batchAnalysis", "option", "print") |
286 |