2 * Copyright (C) 1995-2008 University of Karlsruhe. All right reserved.
4 * This file is part of libFirm.
6 * This file may be distributed and/or modified under the terms of the
7 * GNU General Public License version 2 as published by the Free Software
8 * Foundation and appearing in the file LICENSE.GPL included in the
9 * packaging of this file.
11 * Licensees holding valid libFirm Professional Edition licenses may use
12 * this file in accordance with the libFirm Commercial License.
13 * Agreement provided with the Software.
15 * This file is provided AS IS with NO WARRANTY OF ANY KIND, INCLUDING THE
16 * WARRANTY OF DESIGN, MERCHANTABILITY AND FITNESS FOR A PARTICULAR
22 * @brief Statistic events.
23 * @author Sebastian Hack
36 #include "stat_timing.h"
42 #ifndef DISABLE_STATEV
45 #define FIRM_HAVE_REGEX
50 static FILE* stat_ev_file = NULL;
52 int stat_ev_enabled = 0;
53 int stat_ev_timer_sp = 0;
54 timing_ticks_t stat_ev_timer_elapsed[MAX_TIMER];
55 timing_ticks_t stat_ev_timer_start[MAX_TIMER];
57 #ifdef FIRM_HAVE_REGEX
60 static regex_t *filter = NULL;
61 static inline int key_matches(const char *key)
66 return regexec(filter, key, 0, NULL, 0) == 0;
70 static char filter[128] = { '\0' };
71 static inline int key_matches(const char *key)
75 for (i = 0; filter[i] != '\0'; ++i) {
76 if (key[i] != filter[i])
82 #endif /* FIRM_HAVE_REGEX */
85 void stat_ev_printf(char ev, const char *key, const char *fmt, ...)
87 if (!key_matches(key))
90 fprintf(stat_ev_file, "%c;%s", ev, key);
96 ir_vsnprintf(buf, sizeof(buf), fmt, args);
98 fprintf(stat_ev_file, ";%s", buf);
100 fprintf(stat_ev_file, "\n");
103 void stat_ev_begin(const char *prefix, const char *filt)
107 snprintf(buf, sizeof(buf), "%s.ev", prefix);
108 stat_ev_file = fopen(buf, "wt");
110 if (filt && filt[0] != '\0') {
111 #ifdef FIRM_HAVE_REGEX
113 if (regcomp(®ex, filt, REG_EXTENDED) == 0)
116 strncpy(filter, filt, sizeof(filter) - sizeof(filter[0]));
117 #endif /* FIRM_HAVE_REGEX */
120 stat_ev_enabled = stat_ev_file != NULL;
123 void stat_ev_end(void)
126 fclose(stat_ev_file);