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 */
65 PERROR("trace with name=%s gets element with no string\n", trace.name);
69 /* write name, sub and value */
70 SCPY(trace.element[trace.elements].name, name);
72 SCPY(trace.element[trace.elements].sub, sub);
76 VUNPRINT(trace.element[trace.elements].value, sizeof(trace.element[trace.elements].value)-1, fmt, args);
80 /* increment elements */
86 * prints trace to socket or log
87 * detail: 1 = brief, 2=short, 3=long
89 static char *print_trace(int detail, int port, char *interface, char *caller, char *dialing, int category)
92 time_t ti = trace.sec;
94 struct mISDNport *mISDNport;
97 trace_string[0] = '\0'; // always clear string
103 if (port >= 0 && trace.port >= 0)
104 if (port != trace.port) return(NULL);
105 if (interface) if (interface[0] && trace.interface[0])
106 if (!!strcasecmp(interface, trace.interface)) return(NULL);
107 if (caller) if (caller[0] && trace.caller[0])
108 if (!!strncasecmp(caller, trace.caller, strlen(trace.caller))) return(NULL);
109 if (dialing) if (dialing[0] && trace.dialing[0])
110 if (!!strncasecmp(dialing, trace.dialing, strlen(trace.dialing))) return(NULL);
111 if (category && trace.category)
112 if (!(category & trace.category)) return(NULL);
117 SCAT(trace_string, "------------------------------------------------------------------------------\n");
118 /* "Port: 1 (BRI PTMP TE)" */
121 mISDNport = mISDNport_first;
124 if (mISDNport->portnum == trace.port)
126 mISDNport = mISDNport->next;
130 SPRINT(buffer, "Port: %d (%s %s %s)", trace.port, (mISDNport->pri)?"PRI":"BRI", (mISDNport->ptp)?"PTP":"PTMP", (mISDNport->ntmode)?"NT":"TE");
131 /* copy interface, if we have a port */
132 if (mISDNport->ifport) if (mISDNport->ifport->interface)
133 SCPY(trace.interface, mISDNport->ifport->interface->name);
135 SPRINT(buffer, "Port: %d (does not exist)\n", trace.port);
136 SCAT(trace_string, buffer);
138 SCAT(trace_string, "Port: ---");
140 if (trace.interface[0])
142 /* " Interface: 'Ext'" */
143 SPRINT(buffer, " Interface: '%s'", trace.interface);
144 SCAT(trace_string, buffer);
146 SCAT(trace_string, " Interface: ---");
150 /* " Caller: '021256493'" */
151 SPRINT(buffer, " Caller: '%s'\n", trace.caller);
152 SCAT(trace_string, buffer);
154 SCAT(trace_string, " Caller: ---\n");
156 /* "Time: 25.08.73 05:14:39.282" */
158 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);
159 SCAT(trace_string, buffer);
163 /* " Direction: out" */
164 SPRINT(buffer, " Direction: %s", (trace.direction==DIRECTION_OUT)?"OUT":"IN");
165 SCAT(trace_string, buffer);
167 SCAT(trace_string, " Direction: ---");
169 if (trace.dialing[0])
171 /* " Dialing: '57077'" */
172 SPRINT(buffer, " Dialing: '%s'\n", trace.dialing);
173 SCAT(trace_string, buffer);
175 SCAT(trace_string, " Dialing: ---\n");
177 SCAT(trace_string, "------------------------------------------------------------------------------\n");
183 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);
184 SCAT(trace_string, buffer);
187 /* "CH(45): CC_SETUP (net->user)" */
188 switch (trace.category)
190 SCAT(trace_string, "CH");
194 SCAT(trace_string, "EP");
198 SCAT(trace_string, "--");
201 SPRINT(buffer, "(%lu): %s", trace.serial, trace.name[0]?trace.name:"<unknown>");
203 SPRINT(buffer, ": %s", trace.name[0]?trace.name:"<unknown>");
204 SCAT(trace_string, buffer);
212 SPRINT(buffer, " port %d", trace.port);
213 SCAT(trace_string, buffer);
216 while(i < trace.elements)
218 SPRINT(buffer, " %s", trace.element[i].name);
219 if (i) if (!strcmp(trace.element[i].name, trace.element[i-1].name))
221 SCAT(trace_string, buffer);
222 if (trace.element[i].sub[0])
223 SPRINT(buffer, " %s=", trace.element[i].sub);
226 SCAT(trace_string, buffer);
227 if (strchr(trace.element[i].value, ' '))
228 SPRINT(buffer, "'%s'", trace.element[i].value);
230 SPRINT(buffer, "%s", trace.element[i].value);
231 SCAT(trace_string, buffer);
234 SCAT(trace_string, "\n");
239 SCAT(trace_string, "\n");
241 while(i < trace.elements)
243 SPRINT(buffer, " %s%s", trace.element[i].name, &spaces[strlen(trace.element[i].name)]);
244 if (i) if (!strcmp(trace.element[i].name, trace.element[i-1].name))
246 SCAT(trace_string, buffer);
247 if (trace.element[i].sub[0])
248 SPRINT(buffer, " : %s%s = ", trace.element[i].sub, &spaces[strlen(trace.element[i].sub)]);
250 SPRINT(buffer, " : ");
251 SCAT(trace_string, buffer);
252 if (strchr(trace.element[i].value, ' '))
253 SPRINT(buffer, "'%s'\n", trace.element[i].value);
255 SPRINT(buffer, "%s\n", trace.element[i].value);
256 SCAT(trace_string, buffer);
264 SCAT(trace_string, "\n");
265 return(trace_string);
271 * this function will put the trace to sockets and logfile, if requested
273 void _end_trace(const char *__file, int __line)
277 struct admin_list *admin;
278 struct admin_queue *response, **responsep; /* response pointer */
281 PERROR("trace not started in file %s line %d\n", __file, __line);
283 if (options.deb || options.log[0])
285 string = print_trace(1, -1, NULL, NULL, NULL, 0);
290 debug(NULL, 0, "trace", string);
294 fp = fopen(options.log, "a");
297 fwrite(string, strlen(string), 1, fp);
308 if (admin->trace.detail)
310 string = print_trace(admin->trace.detail, admin->trace.port, admin->trace.interface, admin->trace.caller, admin->trace.dialing, admin->trace.category);
313 /* seek to end of response list */
314 response = admin->response;
315 responsep = &admin->response;
318 responsep = &response->next;
319 response = response->next;
322 /* create state response */
323 response = (struct admin_queue *)MALLOC(sizeof(struct admin_queue)+sizeof(admin_message));
327 response->am[0].message = ADMIN_TRACE_RESPONSE;
328 SCPY(response->am[0].u.trace_rsp.text, string);
330 /* attach to response chain */
331 *responsep = response;
332 responsep = &response->next;
337 // fwrite(string, strlen(string), 1, fp);
339 memset(&trace, 0, sizeof(struct trace));