1 /*****************************************************************************\
5 **---------------------------------------------------------------------------**
6 ** Copyright: Andreas Eversberg **
8 ** reading interface.conf file and filling structure **
10 \*****************************************************************************/
14 struct interface *interface_first = NULL; /* first interface is current list */
15 struct interface *interface_newlist = NULL; /* first interface in new list */
18 /* set default out_channel */
19 void default_out_channel(struct interface_port *ifport)
21 struct select_channel *selchannel, **selchannelp;
23 selchannel = (struct select_channel *)MALLOC(sizeof(struct select_channel));
26 if (ifport->mISDNport->ntmode)
27 selchannel->channel = CHANNEL_FREE;
29 selchannel->channel = CHANNEL_ANY;
31 ifport->out_channel = selchannel;
33 /* additional channel selection for multipoint NT ports */
34 if (!ifport->mISDNport->ptp && ifport->mISDNport->ntmode) {
35 selchannelp = &(selchannel->next);
36 selchannel = (struct select_channel *)MALLOC(sizeof(struct select_channel));
38 selchannel->channel = CHANNEL_NO; // call waiting
39 *selchannelp = selchannel;
44 /* set default in_channel */
45 void default_in_channel(struct interface_port *ifport)
47 struct select_channel *selchannel;
49 selchannel = (struct select_channel *)MALLOC(sizeof(struct select_channel));
52 selchannel->channel = CHANNEL_FREE;
54 ifport->in_channel = selchannel;
58 /* parse string for a positive number */
59 static int get_number(char *value)
66 SPRINT(text, "%d", val);
68 if (!strcmp(value, text))
75 /* remove element from buffer
76 * and return pointer to next element in buffer */
77 static char *get_seperated(char *buffer)
80 if (*buffer==',' || *buffer<=32) { /* seperate */
82 while((*buffer>'\0' && *buffer<=32) || *buffer==',')
92 * parameter processing
94 static int inter_block(struct interface *interface, char *filename, int line, char *parameter, char *value)
96 struct interface_port *ifport;
99 if (!interface->ifport) {
100 SPRINT(interface_error, "Error in %s (line %d): parameter '%s' expects previous 'port' definition.\n", filename, line, parameter);
103 /* goto end of chain */
104 ifport = interface->ifport;
106 ifport = ifport->next;
109 SPRINT(interface_error, "Error in %s (line %d): parameter '%s' expects no value.\n", filename, line, parameter);
115 static int inter_extension(struct interface *interface, char *filename, int line, char *parameter, char *value)
117 if (interface->external) {
118 SPRINT(interface_error, "Error in %s (line %d): parameter '%s' not allowed, because interface is external interface.\n", filename, line, parameter);
122 SPRINT(interface_error, "Error in %s (line %d): parameter '%s' expects no value.\n", filename, line, parameter);
125 interface->extension = 1;
128 static int inter_extern(struct interface *interface, char *filename, int line, char *parameter, char *value)
130 if (interface->extension) {
131 SPRINT(interface_error, "Error in %s (line %d): parameter '%s' not allowed, because interface is an extension.\n", filename, line, parameter);
135 SPRINT(interface_error, "Error in %s (line %d): parameter '%s' expects no value.\n", filename, line, parameter);
138 interface->external = 1;
141 static int inter_ptp(struct interface *interface, char *filename, int line, char *parameter, char *value)
143 struct interface_port *ifport;
145 /* port in chain ? */
146 if (!interface->ifport) {
147 SPRINT(interface_error, "Error in %s (line %d): parameter '%s' expects previous 'port' definition.\n", filename, line, parameter);
150 if (interface->ifport->ptmp) {
151 SPRINT(interface_error, "Error in %s (line %d): parameter '%s' previously ptmp was given.\n", filename, line, parameter);
154 /* goto end of chain */
155 ifport = interface->ifport;
157 ifport = ifport->next;
160 SPRINT(interface_error, "Error in %s (line %d): parameter '%s' expects no value.\n", filename, line, parameter);
167 static int inter_ptmp(struct interface *interface, char *filename, int line, char *parameter, char *value)
169 struct interface_port *ifport;
171 /* port in chain ? */
172 if (!interface->ifport) {
173 SPRINT(interface_error, "Error in %s (line %d): parameter '%s' expects previous 'port' definition.\n", filename, line, parameter);
176 if (interface->ifport->ptp) {
177 SPRINT(interface_error, "Error in %s (line %d): parameter '%s' previously ptp was given.\n", filename, line, parameter);
180 /* goto end of chain */
181 ifport = interface->ifport;
183 ifport = ifport->next;
186 SPRINT(interface_error, "Error in %s (line %d): parameter '%s' expects no value.\n", filename, line, parameter);
193 static int inter_nt(struct interface *interface, char *filename, int line, char *parameter, char *value)
195 struct interface_port *ifport;
197 /* port in chain ? */
198 if (!interface->ifport) {
199 SPRINT(interface_error, "Error in %s (line %d): parameter '%s' expects previous 'port' definition.\n", filename, line, parameter);
202 /* goto end of chain */
203 ifport = interface->ifport;
205 ifport = ifport->next;
208 SPRINT(interface_error, "Error in %s (line %d): parameter '%s' expects no value.\n", filename, line, parameter);
214 static int inter_tespecial(struct interface *interface, char *filename, int line, char *parameter, char *value)
216 struct interface_port *ifport;
218 /* port in chain ? */
219 if (!interface->ifport) {
220 SPRINT(interface_error, "Error in %s (line %d): parameter '%s' expects previous 'port' definition.\n", filename, line, parameter);
223 /* goto end of chain */
224 ifport = interface->ifport;
226 ifport = ifport->next;
229 SPRINT(interface_error, "Error in %s (line %d): parameter '%s' expects no value.\n", filename, line, parameter);
232 ifport->tespecial = 1;
235 static int inter_tones(struct interface *interface, char *filename, int line, char *parameter, char *value)
237 if (!strcasecmp(value, "yes")) {
238 interface->is_tones = IS_YES;
240 if (!strcasecmp(value, "no")) {
241 interface->is_tones = IS_NO;
243 SPRINT(interface_error, "Error in %s (line %d): parameter '%s' expects value 'yes' or 'no'.\n", filename, line, parameter);
248 static int inter_earlyb(struct interface *interface, char *filename, int line, char *parameter, char *value)
250 if (!strcasecmp(value, "yes")) {
251 interface->is_earlyb = IS_YES;
253 if (!strcasecmp(value, "no")) {
254 interface->is_earlyb = IS_NO;
256 SPRINT(interface_error, "Error in %s (line %d): parameter '%s' expects value 'yes' or 'no'.\n", filename, line, parameter);
261 static int inter_hunt(struct interface *interface, char *filename, int line, char *parameter, char *value)
263 if (!strcasecmp(value, "linear")) {
264 interface->hunt = HUNT_LINEAR;
266 if (!strcasecmp(value, "roundrobin")) {
267 interface->hunt = HUNT_ROUNDROBIN;
269 SPRINT(interface_error, "Error in %s (line %d): parameter '%s' expects value 'linear' or 'roundrobin'.\n", filename, line, parameter);
274 static int inter_port(struct interface *interface, char *filename, int line, char *parameter, char *value)
276 SPRINT(interface_error, "Error in %s (line %d): parameter '%s' is outdated.\nPlease use 'portnum' and decrease port number by 1! Ports are counted from 0 now.\n", filename, line, parameter);
279 static int inter_portnum(struct interface *interface, char *filename, int line, char *parameter, char *value)
281 struct interface_port *ifport, **ifportp;
282 struct interface *searchif;
285 val = get_number(value);
287 SPRINT(interface_error, "Error in %s (line %d): parameter '%s' expects one numeric value.\n", filename, line, parameter);
290 /* check for port already assigned */
291 searchif = interface_newlist;
293 ifport = searchif->ifport;
295 if (ifport->portnum == val) {
296 SPRINT(interface_error, "Error in %s (line %d): port '%d' already used above.\n", filename, line, val);
299 ifport = ifport->next;
301 searchif = searchif->next;
303 /* alloc port substructure */
304 ifport = (struct interface_port *)MALLOC(sizeof(struct interface_port));
306 ifport->interface = interface;
308 ifport->portnum = val;
310 ifportp = &interface->ifport;
312 ifportp = &((*ifportp)->next);
316 static int inter_portname(struct interface *interface, char *filename, int line, char *parameter, char *value)
318 struct interface_port *ifport, **ifportp;
319 struct interface *searchif;
321 /* goto end of chain */
322 ifport = interface->ifport;
325 ifport = ifport->next;
328 /* check for port already assigned, but not for shared loop interface */
329 searchif = interface_newlist;
330 if (!!strcmp(value, options.loopback_lcr))
333 ifport = searchif->ifport;
335 if (!strcasecmp(ifport->portname, value)) {
336 SPRINT(interface_error, "Error in %s (line %d): port '%s' already used above.\n", filename, line, value);
339 ifport = ifport->next;
341 searchif = searchif->next;
344 /* alloc port substructure */
345 ifport = (struct interface_port *)MALLOC(sizeof(struct interface_port));
347 ifport->interface = interface;
349 ifport->portnum = -1; // disable until resolved
350 SCPY(ifport->portname, value);
352 ifportp = &interface->ifport;
354 ifportp = &((*ifportp)->next);
358 static int inter_l1hold(struct interface *interface, char *filename, int line, char *parameter, char *value)
360 struct interface_port *ifport;
362 /* port in chain ? */
363 if (!interface->ifport) {
364 SPRINT(interface_error, "Error in %s (line %d): parameter '%s' expects previous 'port' definition.\n", filename, line, parameter);
367 /* goto end of chain */
368 ifport = interface->ifport;
370 ifport = ifport->next;
371 if (!strcmp(value, "yes")) {
374 if (!strcmp(value, "no")) {
377 SPRINT(interface_error, "Error in %s (line %d): parameter '%s' expecting parameter 'yes' or 'no'.\n", filename, line, parameter);
382 static int inter_l2hold(struct interface *interface, char *filename, int line, char *parameter, char *value)
384 struct interface_port *ifport;
386 /* port in chain ? */
387 if (!interface->ifport) {
388 SPRINT(interface_error, "Error in %s (line %d): parameter '%s' expects previous 'port' definition.\n", filename, line, parameter);
391 /* goto end of chain */
392 ifport = interface->ifport;
394 ifport = ifport->next;
395 if (!strcmp(value, "yes")) {
398 if (!strcmp(value, "no")) {
401 SPRINT(interface_error, "Error in %s (line %d): parameter '%s' expecting parameter 'yes' or 'no'.\n", filename, line, parameter);
406 static int inter_channel_out(struct interface *interface, char *filename, int line, char *parameter, char *value)
408 struct interface_port *ifport;
409 struct select_channel *selchannel, **selchannelp;
413 /* port in chain ? */
414 if (!interface->ifport) {
415 SPRINT(interface_error, "Error in %s (line %d): parameter '%s' expects previous 'port' definition.\n", filename, line, parameter);
418 /* goto end of chain */
419 ifport = interface->ifport;
421 ifport = ifport->next;
425 p = get_seperated(p);
426 if (!strcasecmp(el, "force")) {
427 ifport->channel_force = 1;
428 if (ifport->out_channel) {
429 SPRINT(interface_error, "Error in %s (line %d): value 'force' may only appear as first element in list.\n", filename, line);
433 if (!strcasecmp(el, "any")) {
437 if (!strcasecmp(el, "free")) {
441 if (!strcasecmp(el, "no")) {
445 val = get_number(el);
447 SPRINT(interface_error, "Error in %s (line %d): parameter '%s' expects a comma seperated list of 'force', 'any', 'free', 'no' and any channel number.\n", filename, line, parameter);
451 if (val<1 || val==16 || val>126) {
452 SPRINT(interface_error, "Error in %s (line %d): channel '%d' out of range.\n", filename, line, val);
456 /* add to select-channel list */
457 selchannel = (struct select_channel *)MALLOC(sizeof(struct select_channel));
460 selchannel->channel = val;
462 selchannelp = &ifport->out_channel;
464 selchannelp = &((*selchannelp)->next);
465 *selchannelp = selchannel;
470 static int inter_channel_in(struct interface *interface, char *filename, int line, char *parameter, char *value)
472 struct interface_port *ifport;
473 struct select_channel *selchannel, **selchannelp;
477 /* port in chain ? */
478 if (!interface->ifport) {
479 SPRINT(interface_error, "Error in %s (line %d): parameter '%s' expects previous 'port' definition.\n", filename, line, parameter);
482 /* goto end of chain */
483 ifport = interface->ifport;
485 ifport = ifport->next;
489 p = get_seperated(p);
490 if (ifport->in_channel) if (ifport->in_channel->channel == CHANNEL_FREE) {
491 SPRINT(interface_error, "Error in %s (line %d): parameter '%s' has values behind 'free' keyword. They has no effect.\n", filename, line, parameter);
494 if (!strcasecmp(el, "free")) {
498 val = get_number(el);
500 SPRINT(interface_error, "Error in %s (line %d): parameter '%s' expects a comma seperated list of channel numbers and 'free'.\n", filename, line, parameter);
504 if (val<1 || val==16 || val>126) {
505 SPRINT(interface_error, "Error in %s (line %d): channel '%d' out of range.\n", filename, line, val);
509 /* add to select-channel list */
510 selchannel = (struct select_channel *)MALLOC(sizeof(struct select_channel));
513 selchannel->channel = val;
515 selchannelp = &ifport->in_channel;
517 selchannelp = &((*selchannelp)->next);
518 *selchannelp = selchannel;
523 static int inter_timeouts(struct interface *interface, char *filename, int line, char *parameter, char *value)
525 struct interface_port *ifport;
526 // struct select_channel *selchannel, **selchannelp;
530 /* port in chain ? */
531 if (!interface->ifport) {
532 SPRINT(interface_error, "Error in %s (line %d): parameter '%s' expects previous 'port' definition.\n", filename, line, parameter);
535 /* goto end of chain */
536 ifport = interface->ifport;
538 ifport = ifport->next;
542 SPRINT(interface_error, "Error in %s (line %d): parameter '%s' expects five timeout values.\n", filename, line, parameter);
546 p = get_seperated(p);
547 ifport->tout_setup = atoi(el);
551 p = get_seperated(p);
552 ifport->tout_dialing = atoi(el);
556 p = get_seperated(p);
557 ifport->tout_proceeding = atoi(el);
561 p = get_seperated(p);
562 ifport->tout_alerting = atoi(el);
566 p = get_seperated(p);
567 ifport->tout_disconnect = atoi(el);
570 static int inter_msn(struct interface *interface, char *filename, int line, char *parameter, char *value)
572 struct interface_msn *ifmsn, **ifmsnp;
576 SPRINT(interface_error, "Error in %s (line %d): parameter '%s' expects one MSN number or a list.\n", filename, line, parameter);
579 if (interface->ifscreen_in) {
580 SPRINT(interface_error, "Error in %s (line %d): parameter '%s' not allowed with 'screen_in' parameter.\n", filename, line, parameter);
588 p = get_seperated(p);
589 /* add MSN to list */
590 ifmsn = (struct interface_msn *)MALLOC(sizeof(struct interface_msn));
593 SCPY(ifmsn->msn, el);
595 ifmsnp = &interface->ifmsn;
597 ifmsnp = &((*ifmsnp)->next);
602 static int inter_screen(struct interface_screen **ifscreenp, struct interface *interface, char *filename, int line, char *parameter, char *value)
604 struct interface_screen *ifscreen;
608 SPRINT(interface_error, "Error in %s (line %d): parameter '%s' expects old caller ID and new caller ID.\n", filename, line, parameter);
611 /* add screen entry to list*/
612 ifscreen = (struct interface_screen *)MALLOC(sizeof(struct interface_screen));
614 ifscreen->match_type = -1; /* unchecked */
615 ifscreen->match_present = -1; /* unchecked */
616 ifscreen->result_type = -1; /* unchanged */
617 ifscreen->result_present = -1; /* unchanged */
620 ifscreenp = &((*ifscreenp)->next);
621 *ifscreenp = ifscreen;
622 // printf("interface=%s\n", interface->name);
627 p = get_seperated(p);
628 if (!strcasecmp(el, "unknown")) {
629 if (ifscreen->match_type != -1) {
631 SPRINT(interface_error, "Error in %s (line %d): number type already set earlier.\n", filename, line, parameter);
634 ifscreen->match_type = INFO_NTYPE_UNKNOWN;
636 if (!strcasecmp(el, "subscriber")) {
637 if (ifscreen->match_type != -1)
639 ifscreen->match_type = INFO_NTYPE_SUBSCRIBER;
641 if (!strcasecmp(el, "national")) {
642 if (ifscreen->match_type != -1)
644 ifscreen->match_type = INFO_NTYPE_NATIONAL;
646 if (!strcasecmp(el, "international")) {
647 if (ifscreen->match_type != -1)
649 ifscreen->match_type = INFO_NTYPE_INTERNATIONAL;
651 if (!strcasecmp(el, "allowed")) {
652 if (ifscreen->match_present != -1) {
654 SPRINT(interface_error, "Error in %s (line %d): presentation type already set earlier.\n", filename, line);
657 ifscreen->match_present = INFO_PRESENT_ALLOWED;
659 if (!strcasecmp(el, "restrict") || !strcasecmp(el, "restricted")) {
660 if (ifscreen->match_present != -1)
662 ifscreen->match_present = INFO_PRESENT_RESTRICTED;
664 SCPY(ifscreen->match, el);
665 /* check for % at the end */
666 if (strchr(el, '%')) {
667 if (strchr(el, '%') != el+strlen(el)-1) {
668 SPRINT(interface_error, "Error in %s (line %d): %% joker found, but must at the end.\n", filename, line, parameter);
675 if (ifscreen->match[0] == '\0') {
676 SPRINT(interface_error, "Error in %s (line %d): parameter '%s' expects old caller ID.\n", filename, line, parameter);
682 p = get_seperated(p);
683 if (!strcasecmp(el, "unknown")) {
684 if (ifscreen->result_type != -1)
686 ifscreen->result_type = INFO_NTYPE_UNKNOWN;
688 if (!strcasecmp(el, "subscriber")) {
689 if (ifscreen->result_type != -1)
691 ifscreen->result_type = INFO_NTYPE_SUBSCRIBER;
693 if (!strcasecmp(el, "national")) {
694 if (ifscreen->result_type != -1)
696 ifscreen->result_type = INFO_NTYPE_NATIONAL;
698 if (!strcasecmp(el, "international")) {
699 if (ifscreen->result_type != -1)
701 ifscreen->result_type = INFO_NTYPE_INTERNATIONAL;
703 if (!strcasecmp(el, "present") || !strcasecmp(el, "presented") || !strcasecmp(el, "allowed") || !strcasecmp(el, "allow")) {
704 if (ifscreen->result_present != -1)
706 ifscreen->result_present = INFO_PRESENT_ALLOWED;
708 if (!strcasecmp(el, "restrict") || !strcasecmp(el, "restricted") || !strcasecmp(el, "deny") || !strcasecmp(el, "denied")) {
709 if (ifscreen->result_present != -1)
711 ifscreen->result_present = INFO_PRESENT_RESTRICTED;
713 SCPY(ifscreen->result, el);
714 /* check for % at the end */
715 if (strchr(el, '%')) {
716 if (strchr(el, '%') != el+strlen(el)-1) {
717 SPRINT(interface_error, "Error in %s (line %d): %% joker found, but must at the end.\n", filename, line, parameter);
724 if (ifscreen->result[0] == '\0') {
725 SPRINT(interface_error, "Error in %s (line %d): parameter '%s' expects new caller ID.\n", filename, line, parameter);
730 static int inter_screen_in(struct interface *interface, char *filename, int line, char *parameter, char *value)
732 if (interface->ifmsn) {
733 SPRINT(interface_error, "Error in %s (line %d): parameter '%s' not allowed with 'msn' parameter.\n", filename, line, parameter);
737 return(inter_screen(&interface->ifscreen_in, interface, filename, line, parameter, value));
739 static int inter_screen_out(struct interface *interface, char *filename, int line, char *parameter, char *value)
741 return(inter_screen(&interface->ifscreen_out, interface, filename, line, parameter, value));
743 static int inter_nodtmf(struct interface *interface, char *filename, int line, char *parameter, char *value)
745 struct interface_port *ifport;
747 /* port in chain ? */
748 if (!interface->ifport) {
749 SPRINT(interface_error, "Error in %s (line %d): parameter '%s' expects previous 'port' definition.\n", filename, line, parameter);
752 /* goto end of chain */
753 ifport = interface->ifport;
755 ifport = ifport->next;
759 static int inter_filter(struct interface *interface, char *filename, int line, char *parameter, char *value)
763 /* seperate parameter from filter */
769 while(*p > 0 && *p <= 32)
773 if (!strcasecmp(value, "gain")) {
779 while(*q > 0 && *q <= 32)
782 if (*p == 0 || *q == 0) {
783 SPRINT(interface_error, "Error in %s (line %d): parameter '%s %s' expects two gain values.\n", filename, line, parameter, value);
786 if (atoi(p)<-8 || atoi(p)>8 || atoi(q)<-8 || atoi(q)>8) {
787 SPRINT(interface_error, "Error in %s (line %d): parameter '%s %s' gain values not in range. (-8...8)\n", filename, line, parameter, value);
790 interface->tx_gain = atoi(p);
791 interface->rx_gain = atoi(q);
793 if (!strcasecmp(value, "pipeline")) {
795 SPRINT(interface_error, "Error in %s (line %d): parameter '%s %s' expects pipeline string.\n", filename, line, parameter, value);
798 SCPY(interface->pipeline, p);
800 if (!strcasecmp(value, "blowfish")) {
801 unsigned char key[56];
804 if (!!strncmp(p, "0x", 2)) {
805 SPRINT(interface_error, "Error in %s (line %d): parameter '%s %s' expects blowfish key starting with '0x'.\n", filename, line, parameter, value);
812 SPRINT(interface_error, "Error in %s (line %d): parameter '%s %s' key too long.\n", filename, line, parameter, value);
815 if (*p >= '0' && *p <= '9')
816 key[l] = (*p-'0')<<4;
817 else if (*p >= 'a' && *p <= 'f')
818 key[l] = (*p-'a'+10)<<4;
819 else if (*p >= 'A' && *p <= 'F')
820 key[l] = (*p-'A'+10)<<4;
823 SPRINT(interface_error, "Error in %s (line %d): parameter '%s %s' key has digits out of range. (0...9, a...f)\n", filename, line, parameter, value);
828 SPRINT(interface_error, "Error in %s (line %d): parameter '%s %s' key must end on an 8 bit boundary (two character boundary).\n", filename, line, parameter, value);
831 if (*p >= '0' && *p <= '9')
832 key[l] = (*p-'0')<<4;
833 else if (*p >= 'a' && *p <= 'f')
834 key[l] = (*p-'a'+10)<<4;
835 else if (*p >= 'A' && *p <= 'F')
836 key[l] = (*p-'A'+10)<<4;
843 SPRINT(interface_error, "Error in %s (line %d): parameter '%s %s' key must be at least 4 bytes (8 characters).\n", filename, line, parameter, value);
846 memcpy(interface->bf_key, key, l);
847 interface->bf_len = l;
849 SPRINT(interface_error, "Error in %s (line %d): parameter '%s' has unknown filter '%s'.\n", filename, line, parameter, value);
854 static int inter_dialmax(struct interface *interface, char *filename, int line, char *parameter, char *value)
856 struct interface_port *ifport;
858 /* port in chain ? */
859 if (!interface->ifport) {
860 SPRINT(interface_error, "Error in %s (line %d): parameter '%s' expects previous 'port' definition.\n", filename, line, parameter);
863 /* goto end of chain */
864 ifport = interface->ifport;
866 ifport = ifport->next;
867 ifport->dialmax = atoi(value);
870 static int inter_tones_dir(struct interface *interface, char *filename, int line, char *parameter, char *value)
872 struct interface_port *ifport;
874 /* port in chain ? */
875 if (!interface->ifport) {
876 SPRINT(interface_error, "Error in %s (line %d): parameter '%s' expects previous 'port' definition.\n", filename, line, parameter);
879 /* goto end of chain */
880 ifport = interface->ifport;
882 ifport = ifport->next;
883 SCPY(ifport->tones_dir, value);
886 static int inter_gsm(struct interface *interface, char *filename, int line, char *parameter, char *value)
888 SPRINT(interface_error, "Error in %s (line %d): parameter '%s' is outdated.\nPlease use 'gsm-bs' for base station or 'gsm-ms' for mobile station interface!\n", filename, line, parameter);
891 static int inter_gsm_bs(struct interface *interface, char *filename, int line, char *parameter, char *value)
894 SPRINT(interface_error, "Error in %s (line %d): GSM BS side not compiled in.\n", filename, line);
897 struct interface_port *ifport;
898 struct interface *searchif;
900 searchif = interface_newlist;
902 ifport = searchif->ifport;
904 if (ifport->gsm_bs) {
905 SPRINT(interface_error, "Error in %s (line %d): port '%s' already uses gsm BS side.\n", filename, line, ifport->portname);
908 ifport = ifport->next;
910 searchif = searchif->next;
914 if (inter_portname(interface, filename, line, (char *)"portname", options.loopback_lcr))
917 /* goto end of chain again to set gsmflag */
918 ifport = interface->ifport;
920 ifport = ifport->next;
926 static int inter_gsm_ms(struct interface *interface, char *filename, int line, char *parameter, char *value)
929 SPRINT(interface_error, "Error in %s (line %d): GSM MS side not compiled in.\n", filename, line);
932 struct interface_port *ifport, *searchifport;
933 struct interface *searchif;
936 if (inter_portname(interface, filename, line, (char *)"portname", options.loopback_lcr))
939 /* goto end of chain again to set gsmflag and socket */
940 ifport = interface->ifport;
942 ifport = ifport->next;
946 if (!value || !value[0]) {
947 SPRINT(interface_error, "Error in %s (line %d): Missing MS name and socket name.\n", filename, line);
950 SCPY(ifport->gsm_ms_name, value);
952 /* check if name is used multiple times */
953 searchif = interface_newlist;
955 searchifport = searchif->ifport;
956 while(searchifport) {
957 if (searchifport != ifport
958 && !strcmp(searchifport->gsm_ms_name, ifport->gsm_ms_name)) {
959 SPRINT(interface_error, "Error in %s (line %d): mobile '%s' already uses the given MS name '%s', choose a different one.\n", filename, line, ifport->gsm_ms_name, searchifport->gsm_ms_name);
962 searchifport = searchifport->next;
964 searchif = searchif->next;
970 static int inter_nonotify(struct interface *interface, char *filename, int line, char *parameter, char *value)
972 struct interface_port *ifport;
974 /* port in chain ? */
975 if (!interface->ifport) {
976 SPRINT(interface_error, "Error in %s (line %d): parameter '%s' expects previous 'port' definition.\n", filename, line, parameter);
979 /* goto end of chain */
980 ifport = interface->ifport;
982 ifport = ifport->next;
983 ifport->nonotify = 1;
987 static int inter_ss5(struct interface *interface, char *filename, int line, char *parameter, char *value)
989 struct interface_port *ifport;
992 /* port in chain ? */
993 if (!interface->ifport) {
994 SPRINT(interface_error, "Error in %s (line %d): parameter '%s' expects previous 'port' definition.\n", filename, line, parameter);
997 /* goto end of chain */
998 ifport = interface->ifport;
1000 ifport = ifport->next;
1001 ifport->ss5 |= SS5_ENABLE;
1002 while((element = strsep(&value, " "))) {
1003 if (element[0] == '\0')
1005 if (!strcasecmp(element, "connect"))
1006 ifport->ss5 |= SS5_FEATURE_CONNECT;
1008 if (!strcasecmp(element, "nodisconnect"))
1009 ifport->ss5 |= SS5_FEATURE_NODISCONNECT;
1011 if (!strcasecmp(element, "releaseguardtimer"))
1012 ifport->ss5 |= SS5_FEATURE_RELEASEGUARDTIMER;
1014 if (!strcasecmp(element, "bell"))
1015 ifport->ss5 |= SS5_FEATURE_BELL;
1017 if (!strcasecmp(element, "pulsedialing"))
1018 ifport->ss5 |= SS5_FEATURE_PULSEDIALING;
1020 if (!strcasecmp(element, "delay"))
1021 ifport->ss5 |= SS5_FEATURE_DELAY;
1023 if (!strcasecmp(element, "starrelease"))
1024 ifport->ss5 |= SS5_FEATURE_STAR_RELEASE;
1026 if (!strcasecmp(element, "suppress"))
1027 ifport->ss5 |= SS5_FEATURE_SUPPRESS;
1029 SPRINT(interface_error, "Error in %s (line %d): parameter '%s' does not allow value element '%s'.\n", filename, line, parameter, element);
1036 static int inter_remote(struct interface *interface, char *filename, int line, char *parameter, char *value)
1038 struct interface_port *ifport;
1039 struct interface *searchif;
1042 SPRINT(interface_error, "Error in %s (line %d): parameter '%s' expects application name as value.\n", filename, line, parameter);
1045 searchif = interface_newlist;
1047 ifport = searchif->ifport;
1049 if (ifport->remote && !strcmp(ifport->remote_app, value)) {
1050 SPRINT(interface_error, "Error in %s (line %d): port '%s' already uses remote application '%s'.\n", filename, line, ifport->portname, value);
1053 ifport = ifport->next;
1055 searchif = searchif->next;
1059 if (inter_portname(interface, filename, line, (char *)"portname", options.loopback_lcr))
1062 /* goto end of chain again to set application name */
1063 ifport = interface->ifport;
1065 ifport = ifport->next;
1067 SCPY(ifport->remote_app, value);
1073 static int inter_shutdown(struct interface *interface, char *filename, int line, char *parameter, char *value)
1075 interface->shutdown = 1;
1082 * structure of parameters
1084 struct interface_param interface_param[] = {
1085 { "extension", &inter_extension, "",
1086 "If keyword is given, calls to interface are handled as internal extensions."},
1088 { "extern", &inter_extern, "",
1089 "If keyword is given, this interface will be used for external calls.\n"
1090 "Calls require an external interface, if the routing action 'extern' is used\nwithout specific interface given.\n"
1091 "Calls forwarded by extension's 'settings' also require an external interface."},
1093 {"tones", &inter_tones, "yes | no",
1094 "Interface generates tones during call setup and release, or not.\nBy default only NT-mode ports generate tones."},
1096 {"earlyb", &inter_earlyb, "yes | no",
1097 "Interface receives and bridges tones during call setup and release, or not.\nBy default only TE-mode ports receive tones."},
1099 {"hunt", &inter_hunt, "linear | roundrobin",
1100 "Select the algorithm for selecting port with free channel."},
1102 {"port", &inter_port, "<number>",
1104 {"portnum", &inter_portnum, "<number>",
1105 "Give exactly one port for this interface.\nTo give multiple ports, add more lines with port parameters."},
1106 {"portname", &inter_portname, "<name>",
1107 "Same as 'portnum', but the name is given instead.\nUse 'isdninfo' to list all available ports and names."},
1109 {"block", &inter_block, "",
1110 "If keyword is given, calls on this interface are blocked.\n"
1111 "This parameter must follow a 'port' parameter."},
1113 {"ptp", &inter_ptp, "",
1114 "The given port above is opened as point-to-point.\n"
1115 "This is required on NT-mode ports that are multipoint by default.\n"
1116 "This parameter must follow a 'port' parameter."},
1119 {"ptmp", &inter_ptmp, "",
1120 "The given port above is opened as point-to-multipoint.\n"
1121 "This is required on PRI NT-mode ports that are point-to-point by default.\n"
1122 "This parameter must follow a 'port' parameter."},
1125 {"nt", &inter_nt, "",
1126 "The given port above is opened in NT-mode.\n"
1127 "This is required on interfaces that support both NT-mode and TE-mode.\n"
1128 "This parameter must follow a 'port' parameter."},
1130 {"te-special", &inter_tespecial, "",
1131 "The given port uses a modified TE-mode.\n"
1132 "All information elements that are allowed Network->User will then be\n"
1133 "transmitted User->Network also. This is usefull to pass all informations\n"
1134 "between two interconnected LCRs, like 'redirected number' or 'display'.\n"
1135 "Note that this is not compliant with ISDN protocol.\n"
1136 "This parameter must follow a 'port' parameter."},
1138 {"layer1hold", &inter_l1hold, "yes | no",
1139 "The given port will not release layer 1 after layer 2 is down.\n"
1140 "It is required to keep layer 1 of telephones up, to solve activation problems.\n"
1141 "This parameter must follow a 'port' parameter."},
1143 {"layer2hold", &inter_l2hold, "yes | no",
1144 "The given port will continuously try to establish layer 2 link and hold it.\n"
1145 "It is required for PTP links in most cases, therefore it is default.\n"
1146 "This parameter must follow a 'port' parameter."},
1148 {"channel-out", &inter_channel_out, "[force,][<number>][,...][,free][,any][,no]",
1149 "Channel selection list for all outgoing calls to the interface.\n"
1150 "A free channels is searched in order of appearance.\n"
1151 "This parameter must follow a 'port' parameter.\n"
1152 " force - Forces the selected port with no acceptable alternative (see Q.931).\n"
1153 " -> this will be automatically set for multipoint (ptmp) NT-mode ports\n"
1154 " <number>[,...] - List of channels to search.\n"
1155 " free - Select any free channel\n"
1156 " any - On outgoing calls, signal 'any channel acceptable'. (see DSS1)\n"
1157 " no - Signal 'no channel available' aka 'call waiting'. (see DSS1)"},
1159 {"channel-in", &inter_channel_in, "[<number>][,...][,free]",
1160 "Channel selection list for all incoming calls from the interface.\n"
1161 "A free channels is accepted if in the list.\n"
1162 "If any channel was requested, the first free channel found is selected.\n"
1163 "This parameter must follow a 'port' parameter.\n"
1164 " <number>[,...] - List of channels to accept.\n"
1165 " free - Accept any free channel"},
1167 {"timeouts", &inter_timeouts, "<setup> <dialing> <proceeding> <alerting> <disconnect>",
1168 "Timeout values for call states. They are both for incoming and outgoing states.\n"
1169 "The default is 120 seconds for all states. Use 0 to disable.\n"
1170 "This parameter must follow a 'port' parameter.\n"},
1172 {"msn", &inter_msn, "<default MSN>,[<additional MSN>[,...]]",
1173 "Incoming caller ID is checked against given MSN numbers.\n"
1174 "If the caller ID is not found in this list, it is overwritten by the first MSN"},
1176 {"screen-in", &inter_screen_in, "[options] <old caller ID>[%] [options] <new caller ID>[%]",
1177 "Adds an entry for incoming calls to the caller ID screen list.\n"
1178 "If the given 'old caller ID' matches, it is replaced by the 'new caller ID'\n"
1179 "If '%' is given after old caller ID, it matches even if caller ID has\n"
1180 "additional digits.\n"
1181 "If '%' is given after mew caller ID, additinal digits of the 'old caller ID'\n"
1184 " unknown | subsciber | national | international - Change caller ID type.\n"
1185 " present | restrict - Change presentation of caller ID."},
1187 {"screen-out", &inter_screen_out, "[options] <old caller ID>[%] [options] <new caller ID>[%]",
1188 "Adds an entry for outgoing calls to the caller ID screen list.\n"
1189 "See 'screen-in' for help."},
1191 {"nodtmf", &inter_nodtmf, "",
1192 "Disables DTMF detection for this interface.\n"
1193 "This parameter must follow a 'port' parameter."},
1195 {"filter", &inter_filter, "<filter> <parameters>",
1196 "Adds/appends a filter. Filters are ordered in transmit direction.\n"
1197 "gain <tx-volume> <rx-volume> - Changes volume (-8 .. 8)\n"
1198 "pipeline <string> - Sets echo cancelation pipeline.\n"
1199 "blowfish <key> - Adds encryption. Key must be 4-56 bytes (8-112 hex characters."},
1201 {"dialmax", &inter_dialmax, "<digits>",
1202 "Limits the number of digits in setup/information message."},
1204 {"tones_dir", &inter_tones_dir, "<path>",
1205 "Overrides the given tone_dir in options.conf.\n"
1206 "To used kernel tones in mISDN_dsp.ko, say 'american', 'german', or 'oldgerman'."},
1208 {"gsm", &inter_gsm, "",
1210 {"gsm-bs", &inter_gsm_bs, "",
1211 "Sets up GSM base station interface for using OpenBSC.\n"
1212 "See the default/gsm.conf for configuration for this version."},
1213 {"gsm-ms", &inter_gsm_ms, "[<socket>]",
1214 "Sets up GSM mobile station interface for using Osmocom-BB.\n"
1215 "See the default/gsm.conf for configuration for this version.\n"
1216 "The name of the MS folows the interface name.\n"
1217 "The socket is /tmp/osmocom_l2 by default and need to be changed when multiple\n"
1218 "MS interfaces are used."},
1219 {"nonotify", &inter_nonotify, "",
1220 "Prevents sending notify messages to this interface. A call placed on hold will\n"
1221 "Not affect the remote end (phone or telcom switch).\n"
1222 "This parameter must follow a 'port' parameter."},
1225 {"ccitt5", &inter_ss5, "[<feature> [feature ...]]",
1226 "Interface uses CCITT No. 5 inband signalling rather than D-channel.\n"
1227 "This feature causes CPU load to rise and has no practical intend.\n"
1228 "If you don't know what it is, you don't need it.\n"
1229 "Features apply to protocol behaviour and blueboxing specials, they are:\n"
1230 " connect - Connect incomming call to throughconnect audio, if required.\n"
1231 " nodisconnect - Don't disconnect if incomming exchange disconnects.\n"
1232 " releaseguardtimer - Tries to prevent Blueboxing by a longer release-guard.\n"
1233 " bell - Allow releasing and pulse-dialing via 2600 Hz like old Bell systems.\n"
1234 " pulsedialing - Use pulse dialing on outgoing exchange. (takes long!)\n"
1235 " delay - Use on incomming exchange, to make you feel a delay when blueboxing.\n"
1236 " starrelease - Pulse dialing a star (11 pulses per digit) clears current call.\n"
1237 " suppress - Suppress received tones, as they will be recognized."},
1240 {"remote", &inter_remote, "<application>",
1241 "Sets up an interface that communicates with the remote application.\n"
1242 "Use \"asterisk\" to use chan_lcr as remote application."},
1244 {"shutdown", &inter_shutdown, "",
1245 "Interface will not be loaded when processing interface.conf"},
1247 {NULL, NULL, NULL, NULL}
1252 * read settings from interface.conf
1254 char interface_error[256];
1255 struct interface *read_interfaces(void)
1260 unsigned int line, i;
1262 struct interface *interface = NULL, /* in case no interface */
1263 **interfacep = &interface_newlist;
1264 char parameter[128];
1266 int expecting = 1; /* expecting new interface */
1267 struct interface_param *ifparam;
1269 if (interface_newlist != NULL)
1270 FATAL("list is not empty.\n");
1271 interface_error[0] = '\0';
1272 SPRINT(filename, "%s/interface.conf", CONFIG_DATA);
1274 if (!(fp = fopen(filename,"r"))) {
1275 SPRINT(interface_error, "Cannot open '%s'\n", filename);
1280 while((GETLINE(buffer, fp))) {
1284 while(*p <= 32) { /* skip spaces */
1289 if (*p==0 || *p=='#') /* ignore comments and empty line */
1294 i=0; /* read parameter */
1296 if (i+1 >= sizeof(parameter)) {
1297 SPRINT(interface_error, "Error in %s (line %d): parameter name too long.\n",filename,line);
1300 parameter[i+1] = '\0';
1301 parameter[i++] = *p++;
1304 while(*p <= 32) { /* skip spaces */
1310 if (*p!=0 && *p!='#') { /* missing name */
1311 i=0; /* read until end */
1312 while(*p!=0 && *p!='#') {
1313 if (i+1 >= sizeof(value)) {
1314 SPRINT(interface_error, "Error in %s (line %d): value too long.\n", filename, line);
1321 /* remove trailing spaces from value */
1323 if (value[i-1]==0 || value[i-1]>32)
1330 /* check for interface name as first statement */
1331 if (expecting && parameter[0]!='[') {
1332 SPRINT(interface_error, "Error in %s (line %d): expecting interface name inside [ and ], but got: '%s'.\n", filename, line, parameter);
1337 /* check for new interface */
1338 if (parameter[0] == '[') {
1339 if (parameter[strlen(parameter)-1] != ']') {
1340 SPRINT(interface_error, "Error in %s (line %d): expecting interface name inside [ and ], but got: '%s'.\n", filename, line, parameter);
1343 parameter[strlen(parameter)-1] = '\0';
1345 /* check if interface name already exists */
1346 interface = interface_newlist;
1348 if (!strcasecmp(interface->name, parameter+1)) {
1349 SPRINT(interface_error, "Error in %s (line %d): interface name '%s' already defined above.\n", filename, line, parameter+1);
1352 interface = interface->next;
1355 /* append interface to new list */
1356 interface = (struct interface *)MALLOC(sizeof(struct interface));
1359 /* name interface */
1360 SCPY(interface->name, parameter+1);
1363 *interfacep = interface;
1364 interfacep = &interface->next;
1369 ifparam = interface_param;
1370 while(ifparam->name) {
1371 if (!strcasecmp(parameter, ifparam->name)) {
1372 if (ifparam->func(interface, filename, line, parameter, value))
1381 SPRINT(interface_error, "Error in %s (line %d): unknown parameter: '%s'.\n", filename, line, parameter);
1386 return(interface_newlist);
1388 PERROR_RUNTIME("%s", interface_error);
1390 free_interfaces(interface_newlist);
1391 interface_newlist = NULL;
1397 * freeing chain of interfaces
1399 void free_interfaces(struct interface *interface)
1402 struct interface_port *ifport;
1403 struct select_channel *selchannel;
1404 struct interface_msn *ifmsn;
1405 struct interface_screen *ifscreen;
1408 ifport = interface->ifport;
1410 selchannel = ifport->in_channel;
1413 selchannel = selchannel->next;
1414 FREE(temp, sizeof(struct select_channel));
1417 selchannel = ifport->out_channel;
1420 selchannel = selchannel->next;
1421 FREE(temp, sizeof(struct select_channel));
1425 ifport = ifport->next;
1426 FREE(temp, sizeof(struct interface_port));
1429 ifmsn = interface->ifmsn;
1432 ifmsn = ifmsn->next;
1433 FREE(temp, sizeof(struct interface_msn));
1436 ifscreen = interface->ifscreen_in;
1439 ifscreen = ifscreen->next;
1440 FREE(temp, sizeof(struct interface_screen));
1443 ifscreen = interface->ifscreen_out;
1446 ifscreen = ifscreen->next;
1447 FREE(temp, sizeof(struct interface_screen));
1451 interface = interface->next;
1452 FREE(temp, sizeof(struct interface));
1458 * defaults of ports if not specified by config
1460 static void set_defaults(struct interface_port *ifport)
1462 /* default channel selection list */
1463 if (!ifport->out_channel)
1464 default_out_channel(ifport);
1465 if (!ifport->in_channel)
1466 default_in_channel(ifport);
1467 /* must force the channel on PTMP/NT ports */
1468 if (!ifport->mISDNport->ptp && ifport->mISDNport->ntmode)
1469 ifport->channel_force = 1;
1470 /* default is_tones */
1471 if (ifport->interface->is_tones)
1472 ifport->mISDNport->tones = (ifport->interface->is_tones==IS_YES);
1474 ifport->mISDNport->tones = (ifport->mISDNport->ntmode || ifport->mISDNport->ss5)?1:0;
1475 /* default is_earlyb */
1476 if (ifport->interface->is_earlyb)
1477 ifport->mISDNport->earlyb = (ifport->interface->is_earlyb==IS_YES);
1479 ifport->mISDNport->earlyb = (ifport->mISDNport->ntmode && !ifport->mISDNport->ss5)?0:1;
1480 /* set locally flag */
1481 if (ifport->interface->extension)
1482 ifport->mISDNport->locally = 1;
1484 ifport->mISDNport->locally = 0;
1489 * all links between mISDNport and interface are made
1490 * unused mISDNports are closed, new mISDNports are opened
1491 * also set default select_channel lists
1493 void relink_interfaces(void)
1495 struct mISDNport *mISDNport;
1496 struct interface *interface;
1497 struct interface_port *ifport;
1499 /* unlink all mISDNports */
1500 mISDNport = mISDNport_first;
1502 if (mISDNport->ifport) {
1503 ifport = mISDNport->ifport;
1506 gsm_ms_delete(ifport->gsm_ms_name);
1513 mISDNport->ifport = NULL;
1514 mISDNport = mISDNport->next;
1517 /* relink existing mISDNports */
1518 interface = interface_newlist;
1520 ifport = interface->ifport;
1522 mISDNport = mISDNport_first;
1524 if (!strcmp(mISDNport->name, ifport->portname))
1525 ifport->portnum = mISDNport->portnum; /* same name, so we use same number */
1526 if (mISDNport->portnum == ifport->portnum) {
1527 PDEBUG(DEBUG_ISDN, "Port %d:%s relinking!\n", ifport->portnum, ifport->portname);
1528 ifport->mISDNport = mISDNport;
1529 mISDNport->ifport = ifport;
1530 set_defaults(ifport);
1532 mISDNport = mISDNport->next;
1534 ifport = ifport->next;
1536 interface = interface->next;
1539 /* close unused mISDNports */
1541 mISDNport = mISDNport_first;
1543 if (mISDNport->ifport == NULL) {
1544 PDEBUG(DEBUG_ISDN, "Port %d is not used anymore and will be closed\n", mISDNport->portnum);
1546 mISDNport_close(mISDNport);
1549 mISDNport = mISDNport->next;
1552 /* open and link new mISDNports */
1553 interface = interface_newlist;
1555 ifport = interface->ifport;
1557 if (!ifport->mISDNport) {
1558 if (!interface->shutdown) {
1564 ifport = ifport->next;
1566 interface = interface->next;
1575 void load_port(struct interface_port *ifport)
1577 struct mISDNport *mISDNport;
1580 mISDNport = mISDNport_open(ifport);
1583 ifport->mISDNport = mISDNport;
1584 mISDNport->ifport = ifport;
1585 /* set number and name */
1586 ifport->portnum = mISDNport->portnum;
1587 SCPY(ifport->portname, mISDNport->name);
1589 set_defaults(ifport);
1590 /* load static port instances */
1591 mISDNport_static(mISDNport);
1594 gsm_ms_new(ifport->gsm_ms_name);
1601 ifport->block = 2; /* not available */
1606 * give summary of interface syntax
1608 void doc_interface(void)
1610 struct interface_param *ifparam;
1612 printf("Syntax overview\n");
1613 printf("---------------\n\n");
1615 printf("[<name>]\n");
1616 ifparam = interface_param;
1617 while(ifparam->name) {
1618 if (ifparam->name[0])
1619 printf("%s %s\n", ifparam->name, ifparam->usage);
1623 ifparam = interface_param;
1624 while(ifparam->name) {
1625 if (ifparam->name[0]) {
1626 printf("\nParameter: %s %s\n", ifparam->name, ifparam->usage);
1627 printf("%s\n", ifparam->help);
1635 * out==0: incoming caller id, out==1: outgoing caller id
1637 void do_screen(int out, char *id, int idsize, int *type, int *present, struct interface *interface)
1640 struct interface_msn *ifmsn;
1641 struct interface_screen *ifscreen;
1644 /* screen incoming caller id */
1646 /* check for MSN numbers, use first MSN if no match */
1648 ifmsn = interface->ifmsn;
1652 if (!strcmp(ifmsn->msn, id)) {
1655 ifmsn = ifmsn->next;
1658 start_trace(-1, interface, numberrize_callerinfo(id, *type, options.national, options.international), NULL, DIRECTION_IN, 0, 0, "SCREEN (found in MSN list)");
1659 add_trace("msn", NULL, "%s", id);
1662 if (!ifmsn && msn1) { // not in list, first msn given
1663 start_trace(-1, interface, numberrize_callerinfo(id, *type, options.national, options.international), NULL, DIRECTION_IN, 0, 0, "SCREEN (not found in MSN list)");
1664 add_trace("msn", "given", "%s", id);
1665 add_trace("msn", "used", "%s", msn1);
1667 UNCPY(id, msn1, idsize);
1668 id[idsize-1] = '\0';
1672 /* check screen list */
1674 ifscreen = interface->ifscreen_out;
1676 ifscreen = interface->ifscreen_in;
1678 if (ifscreen->match_type==-1 || ifscreen->match_type==*type)
1679 if (ifscreen->match_present==-1 || ifscreen->match_present==*present) {
1680 if (strchr(ifscreen->match,'%')) {
1681 if (!strncmp(ifscreen->match, id, strchr(ifscreen->match,'%')-ifscreen->match))
1684 if (!strcmp(ifscreen->match, id))
1688 ifscreen = ifscreen->next;
1690 if (ifscreen) { // match
1691 start_trace(-1, interface, numberrize_callerinfo(id, *type, options.national, options.international), NULL, out?DIRECTION_OUT:DIRECTION_IN, 0, 0, "SCREEN (found in screen list)");
1693 case INFO_NTYPE_UNKNOWN:
1694 add_trace("given", "type", "unknown");
1696 case INFO_NTYPE_SUBSCRIBER:
1697 add_trace("given", "type", "subscriber");
1699 case INFO_NTYPE_NATIONAL:
1700 add_trace("given", "type", "national");
1702 case INFO_NTYPE_INTERNATIONAL:
1703 add_trace("given", "type", "international");
1707 case INFO_PRESENT_ALLOWED:
1708 add_trace("given", "present", "allowed");
1710 case INFO_PRESENT_RESTRICTED:
1711 add_trace("given", "present", "restricted");
1713 case INFO_PRESENT_NOTAVAIL:
1714 add_trace("given", "present", "not available");
1717 add_trace("given", "id", "%s", id[0]?id:"<empty>");
1718 if (ifscreen->result_type != -1) {
1719 *type = ifscreen->result_type;
1721 case INFO_NTYPE_UNKNOWN:
1722 add_trace("used", "type", "unknown");
1724 case INFO_NTYPE_SUBSCRIBER:
1725 add_trace("used", "type", "subscriber");
1727 case INFO_NTYPE_NATIONAL:
1728 add_trace("used", "type", "national");
1730 case INFO_NTYPE_INTERNATIONAL:
1731 add_trace("used", "type", "international");
1735 if (ifscreen->result_present != -1) {
1736 *present = ifscreen->result_present;
1738 case INFO_PRESENT_ALLOWED:
1739 add_trace("used", "present", "allowed");
1741 case INFO_PRESENT_RESTRICTED:
1742 add_trace("used", "present", "restricted");
1744 case INFO_PRESENT_NOTAVAIL:
1745 add_trace("used", "present", "not available");
1749 if (strchr(ifscreen->match,'%')) {
1750 SCPY(suffix, strchr(ifscreen->match,'%') - ifscreen->match + id);
1751 UNCPY(id, ifscreen->result, idsize);
1752 id[idsize-1] = '\0';
1753 if (strchr(id,'%')) {
1754 *strchr(id,'%') = '\0';
1755 UNCAT(id, suffix, idsize);
1756 id[idsize-1] = '\0';
1759 UNCPY(id, ifscreen->result, idsize);
1760 id[idsize-1] = '\0';
1762 add_trace("used", "id", "%s", id[0]?id:"<empty>");