1 /*****************************************************************************\
3 ** Linux Call Router **
5 **---------------------------------------------------------------------------**
6 ** Copyright: Andreas Eversberg **
10 \*****************************************************************************/
15 char trace_string[MAX_TRACE_ELEMENTS * 100 + 400];
17 static char *spaces[11] = {
32 * initializes a new trace
33 * all values will be reset
35 void start_trace(int port, struct interface *interface, char *caller, char *dialing, int direction, int category, int serial, char *name)
38 PERROR("trace already started (name=%s)\n", trace.name);
39 memset(&trace, 0, sizeof(struct trace));
42 SCPY(trace.interface, interface->name);
43 if (caller) if (caller[0])
44 SCPY(trace.caller, caller);
45 if (dialing) if (dialing[0])
46 SCPY(trace.dialing, dialing);
47 trace.direction = direction;
48 trace.category = category;
49 trace.serial = serial;
50 if (name) if (name[0])
51 SCPY(trace.name, name);
52 trace.sec = now_tv.tv_sec;
53 trace.usec = now_tv.tv_usec;
58 * adds a new element to the trace
59 * if subelement is given, element will also contain a subelement
60 * if multiple subelements belong to same element, name must be equal for all subelements
62 void add_trace(char *name, char *sub, const char *fmt, ...)
67 PERROR("trace not started\n");
69 /* check for required name value */
75 PERROR("trace with name=%s gets element with no string\n", trace.name);
79 /* write name, sub and value */
80 SCPY(trace.element[trace.elements].name, name);
82 SCPY(trace.element[trace.elements].sub, sub);
86 VUNPRINT(trace.element[trace.elements].value, sizeof(trace.element[trace.elements].value)-1, fmt, args);
90 /* increment elements */
96 * prints trace to socket or log
97 * detail: 1 = brief, 2=short, 3=long
99 static char *print_trace(int detail, int port, char *interface, char *caller, char *dialing, int category)
102 time_t ti = trace.sec;
104 struct mISDNport *mISDNport;
107 trace_string[0] = '\0'; // always clear string
113 if (port && trace.port)
114 if (port != trace.port) return(NULL);
115 if (interface) if (interface[0] && trace.interface[0])
116 if (!!strcasecmp(interface, trace.interface)) return(NULL);
117 if (caller) if (caller[0] && trace.caller[0])
118 if (!!strncasecmp(caller, trace.caller, strlen(trace.caller))) return(NULL);
119 if (dialing) if (dialing[0] && trace.dialing[0])
120 if (!!strncasecmp(dialing, trace.dialing, strlen(trace.dialing))) return(NULL);
121 if (category && trace.category)
122 if (!(category & trace.category)) return(NULL);
127 SCAT(trace_string, "------------------------------------------------------------------------------\n");
128 /* "Port: 1 (BRI PTMP TE)" */
131 mISDNport = mISDNport_first;
134 if (mISDNport->portnum == trace.port)
136 mISDNport = mISDNport->next;
140 SPRINT(buffer, "Port: %d (%s %s %s)", trace.port, (mISDNport->pri)?"PRI":"BRI", (mISDNport->ptp)?"PTP":"PTMP", (mISDNport->ntmode)?"NT":"TE");
141 /* copy interface, if we have a port */
142 if (mISDNport->ifport) if (mISDNport->ifport->interface)
143 SCPY(trace.interface, mISDNport->ifport->interface->name);
145 SPRINT(buffer, "Port: %d (does not exist)\n", trace.port);
146 SCAT(trace_string, buffer);
148 SCAT(trace_string, "Port: ---");
150 if (trace.interface[0])
152 /* " Interface: 'Ext'" */
153 SPRINT(buffer, " Interface: '%s'", trace.interface);
154 SCAT(trace_string, buffer);
156 SCAT(trace_string, " Interface: ---");
160 /* " Caller: '021256493'" */
161 SPRINT(buffer, " Caller: '%s'\n", trace.caller);
162 SCAT(trace_string, buffer);
164 SCAT(trace_string, " Caller: ---\n");
166 /* "Time: 25.08.73 05:14:39.282" */
168 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);
169 SCAT(trace_string, buffer);
173 /* " Direction: out" */
174 SPRINT(buffer, " Direction: %s", (trace.direction==DIRECTION_OUT)?"OUT":"IN");
175 SCAT(trace_string, buffer);
177 SCAT(trace_string, " Direction: ---");
179 if (trace.dialing[0])
181 /* " Dialing: '57077'" */
182 SPRINT(buffer, " Dialing: '%s'\n", trace.dialing);
183 SCAT(trace_string, buffer);
185 SCAT(trace_string, " Dialing: ---\n");
187 SCAT(trace_string, "------------------------------------------------------------------------------\n");
193 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);
194 SCAT(trace_string, buffer);
197 /* "CH(45): CC_SETUP (net->user)" */
198 switch (trace.category)
200 SCAT(trace_string, "CH");
204 SCAT(trace_string, "EP");
208 SCAT(trace_string, "--");
211 SPRINT(buffer, "(%lu): %s", trace.serial, trace.name[0]?trace.name:"<unknown>");
213 SPRINT(buffer, ": %s", trace.name[0]?trace.name:"<unknown>");
214 SCAT(trace_string, buffer);
221 while(i < trace.elements)
223 SPRINT(buffer, " %s", trace.element[i].name);
224 if (i) if (!strcmp(trace.element[i].name, trace.element[i-1].name))
226 SCAT(trace_string, buffer);
227 if (trace.element[i].sub[0])
228 SPRINT(buffer, " %s=", trace.element[i].sub);
231 SCAT(trace_string, buffer);
232 if (strchr(trace.element[i].value, ' '))
233 SPRINT(buffer, "'%s'", trace.element[i].value);
235 SPRINT(buffer, "%s", trace.element[i].value);
236 SCAT(trace_string, buffer);
239 SCAT(trace_string, "\n");
244 SCAT(trace_string, "\n");
246 while(i < trace.elements)
248 SPRINT(buffer, " %s%s", trace.element[i].name, spaces[strlen(trace.element[i].name)]);
249 if (i) if (!strcmp(trace.element[i].name, trace.element[i-1].name))
251 SCAT(trace_string, buffer);
252 if (trace.element[i].sub[0])
253 SPRINT(buffer, " : %s%s = ", trace.element[i].sub, spaces[strlen(trace.element[i].sub)]);
255 SPRINT(buffer, " : ");
256 SCAT(trace_string, buffer);
257 if (strchr(trace.element[i].value, ' '))
258 SPRINT(buffer, "'%s'\n", trace.element[i].value);
260 SPRINT(buffer, "%s\n", trace.element[i].value);
261 SCAT(trace_string, buffer);
269 SCAT(trace_string, "\n");
270 return(trace_string);
276 * this function will put the trace to sockets and logfile, if requested
282 struct admin_list *admin;
283 struct admin_queue *response, **responsep; /* response pointer */
286 PERROR("trace not started\n");
288 if (options.deb || options.log[0])
290 string = print_trace(1, 0, NULL, NULL, NULL, 0);
295 debug(NULL, 0, "trace", string);
299 fp = fopen(options.log, "a");
302 fwrite(string, strlen(string), 1, fp);
313 if (admin->trace.detail)
315 string = print_trace(admin->trace.detail, admin->trace.port, admin->trace.interface, admin->trace.caller, admin->trace.dialing, admin->trace.category);
318 /* seek to end of response list */
319 response = admin->response;
320 responsep = &admin->response;
323 responsep = &response->next;
324 response = response->next;
327 /* create state response */
328 response = (struct admin_queue *)MALLOC(sizeof(struct admin_queue)+sizeof(admin_message));
332 response->am[0].message = ADMIN_TRACE_RESPONSE;
333 SCPY(response->am[0].u.trace_rsp.text, string);
335 /* attach to response chain */
336 *responsep = response;
337 responsep = &response->next;
342 // fwrite(string, strlen(string), 1, fp);
344 memset(&trace, 0, sizeof(struct trace));