1 /*****************************************************************************\
3 ** Linux Call Router **
5 **---------------------------------------------------------------------------**
6 ** Copyright: Andreas Eversberg **
10 \*****************************************************************************/
15 char trace_string[MAX_TRACE_ELEMENTS * 100 + 400];
17 static const char *spaces = " ";
20 * initializes a new trace
21 * all values will be reset
23 void _start_trace(const char *__file, int __line, int port, struct interface *interface, const char *caller, const char *dialing, int direction, int category, int serial, const char *name)
26 PERROR("trace already started (name=%s) in file %s line %d\n", trace.name, __file, __line);
27 memset(&trace, 0, sizeof(struct trace));
30 SCPY(trace.interface, interface->name);
31 if (caller) if (caller[0])
32 SCPY(trace.caller, caller);
33 if (dialing) if (dialing[0])
34 SCPY(trace.dialing, dialing);
35 trace.direction = direction;
36 trace.category = category;
37 trace.serial = serial;
38 if (name) if (name[0])
39 SCPY(trace.name, name);
41 SCPY(trace.name, "<unknown>");
42 trace.sec = now_tv.tv_sec;
43 trace.usec = now_tv.tv_usec;
48 * adds a new element to the trace
49 * if subelement is given, element will also contain a subelement
50 * if multiple subelements belong to same element, name must be equal for all subelements
52 void _add_trace(const char *__file, int __line, const char *name, const char *sub, const char *fmt, ...)
57 PERROR("trace not started in file %s line %d\n", __file, __line);
59 /* check for required name value */
64 PERROR("trace with name=%s gets element with no string\n", trace.name);
68 /* write name, sub and value */
69 SCPY(trace.element[trace.elements].name, name);
71 SCPY(trace.element[trace.elements].sub, sub);
72 if (fmt) if (fmt[0]) {
74 VUNPRINT(trace.element[trace.elements].value, sizeof(trace.element[trace.elements].value)-1, fmt, args);
78 /* increment elements */
84 * prints trace to socket or log
85 * detail: 1 = brief, 2=short, 3=long
87 static char *print_trace(int detail, int port, char *interface, char *caller, char *dialing, int category)
90 time_t ti = trace.sec;
92 struct mISDNport *mISDNport;
95 trace_string[0] = '\0'; // always clear string
101 if (port >= 0 && trace.port >= 0)
102 if (port != trace.port) return(NULL);
103 if (interface) if (interface[0] && trace.interface[0])
104 if (!!strcasecmp(interface, trace.interface)) return(NULL);
105 if (caller) if (caller[0] && trace.caller[0])
106 if (!!strncasecmp(caller, trace.caller, strlen(trace.caller))) return(NULL);
107 if (dialing) if (dialing[0] && trace.dialing[0])
108 if (!!strncasecmp(dialing, trace.dialing, strlen(trace.dialing))) return(NULL);
109 if (category && trace.category)
110 if (!(category & trace.category)) return(NULL);
114 SCAT(trace_string, "------------------------------------------------------------------------------\n");
115 /* "Port: 1 (BRI PTMP TE)" */
116 if (trace.port >= 0) {
117 mISDNport = mISDNport_first;
119 if (mISDNport->portnum == trace.port)
121 mISDNport = mISDNport->next;
124 SPRINT(buffer, "Port: %d (%s %s %s)", trace.port, (mISDNport->pri)?"PRI":"BRI", (mISDNport->ptp)?"PTP":"PTMP", (mISDNport->ntmode)?"NT":"TE");
125 /* copy interface, if we have a port */
126 if (mISDNport->ifport) if (mISDNport->ifport->interface)
127 SCPY(trace.interface, mISDNport->ifport->interface->name);
129 SPRINT(buffer, "Port: %d (does not exist)\n", trace.port);
130 SCAT(trace_string, buffer);
132 SCAT(trace_string, "Port: ---");
134 if (trace.interface[0]) {
135 /* " Interface: 'Ext'" */
136 SPRINT(buffer, " Interface: '%s'", trace.interface);
137 SCAT(trace_string, buffer);
139 SCAT(trace_string, " Interface: ---");
141 if (trace.caller[0]) {
142 /* " Caller: '021256493'" */
143 SPRINT(buffer, " Caller: '%s'\n", trace.caller);
144 SCAT(trace_string, buffer);
146 SCAT(trace_string, " Caller: ---\n");
148 /* "Time: 25.08.73 05:14:39.282" */
150 SPRINT(buffer, "Time: %02d.%02d.%02d %02d:%02d:%02d.%03d", tm->tm_mday, tm->tm_mon+1, tm->tm_year%100, tm->tm_hour, tm->tm_min, tm->tm_sec, trace.usec/1000);
151 SCAT(trace_string, buffer);
153 if (trace.direction) {
154 /* " Direction: out" */
155 SPRINT(buffer, " Direction: %s", (trace.direction==DIRECTION_OUT)?"OUT":"IN");
156 SCAT(trace_string, buffer);
158 SCAT(trace_string, " Direction: ---");
160 if (trace.dialing[0]) {
161 /* " Dialing: '57077'" */
162 SPRINT(buffer, " Dialing: '%s'\n", trace.dialing);
163 SCAT(trace_string, buffer);
165 SCAT(trace_string, " Dialing: ---\n");
167 SCAT(trace_string, "------------------------------------------------------------------------------\n");
172 SPRINT(buffer, "%02d.%02d.%02d %02d:%02d:%02d.%03d ", tm->tm_mday, tm->tm_mon+1, tm->tm_year%100, tm->tm_hour, tm->tm_min, tm->tm_sec, trace.usec/1000);
173 SCAT(trace_string, buffer);
176 /* "CH(45): CC_SETUP (net->user)" */
177 switch (trace.category) {
179 SCAT(trace_string, "CH");
183 SCAT(trace_string, "EP");
187 SCAT(trace_string, "--");
190 SPRINT(buffer, "(%lu): %s", trace.serial, trace.name[0]?trace.name:"<unknown>");
192 SPRINT(buffer, ": %s", trace.name[0]?trace.name:"<unknown>");
193 SCAT(trace_string, buffer);
198 if (trace.port >= 0) {
199 SPRINT(buffer, " port %d", trace.port);
200 SCAT(trace_string, buffer);
203 while(i < trace.elements) {
204 SPRINT(buffer, " %s", trace.element[i].name);
205 if (i) if (!strcmp(trace.element[i].name, trace.element[i-1].name))
207 SCAT(trace_string, buffer);
208 if (trace.element[i].sub[0])
209 SPRINT(buffer, " %s=", trace.element[i].sub);
212 SCAT(trace_string, buffer);
213 if (strchr(trace.element[i].value, ' '))
214 SPRINT(buffer, "'%s'", trace.element[i].value);
216 SPRINT(buffer, "%s", trace.element[i].value);
217 SCAT(trace_string, buffer);
220 SCAT(trace_string, "\n");
225 SCAT(trace_string, "\n");
227 while(i < trace.elements) {
228 SPRINT(buffer, " %s%s", trace.element[i].name, &spaces[strlen(trace.element[i].name)]);
229 if (i) if (!strcmp(trace.element[i].name, trace.element[i-1].name))
231 SCAT(trace_string, buffer);
232 if (trace.element[i].sub[0])
233 SPRINT(buffer, " : %s%s = ", trace.element[i].sub, &spaces[strlen(trace.element[i].sub)]);
235 SPRINT(buffer, " : ");
236 SCAT(trace_string, buffer);
237 if (strchr(trace.element[i].value, ' '))
238 SPRINT(buffer, "'%s'\n", trace.element[i].value);
240 SPRINT(buffer, "%s\n", trace.element[i].value);
241 SCAT(trace_string, buffer);
249 SCAT(trace_string, "\n");
250 return(trace_string);
256 * this function will put the trace to sockets and logfile, if requested
258 void _end_trace(const char *__file, int __line)
262 struct admin_list *admin;
263 struct admin_queue *response, **responsep; /* response pointer */
266 PERROR("trace not started in file %s line %d\n", __file, __line);
268 if (options.deb || options.log[0]) {
269 string = print_trace(1, -1, NULL, NULL, NULL, 0);
273 debug(NULL, 0, "trace", string);
275 if (options.log[0]) {
276 fp = fopen(options.log, "a");
278 fwrite(string, strlen(string), 1, fp);
288 if (admin->trace.detail) {
289 string = print_trace(admin->trace.detail, admin->trace.port, admin->trace.interface, admin->trace.caller, admin->trace.dialing, admin->trace.category);
291 /* seek to end of response list */
292 response = admin->response;
293 responsep = &admin->response;
295 responsep = &response->next;
296 response = response->next;
299 /* create state response */
300 response = (struct admin_queue *)MALLOC(sizeof(struct admin_queue)+sizeof(admin_message));
304 response->am[0].message = ADMIN_TRACE_RESPONSE;
305 SCPY(response->am[0].u.trace_rsp.text, string);
307 /* attach to response chain */
308 *responsep = response;
309 responsep = &response->next;
314 // fwrite(string, strlen(string), 1, fp);
316 memset(&trace, 0, sizeof(struct trace));