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 gsm interface */
329 searchif = interface_newlist;
330 #if defined WITH_GSM_BS || defined WITH_GSM_MS
331 if (!strcmp(value, gsm->conf.interface_lcr))
335 ifport = searchif->ifport;
337 if (!strcasecmp(ifport->portname, value)) {
338 SPRINT(interface_error, "Error in %s (line %d): port '%s' already used above.\n", filename, line, value);
341 ifport = ifport->next;
343 searchif = searchif->next;
346 /* alloc port substructure */
347 ifport = (struct interface_port *)MALLOC(sizeof(struct interface_port));
349 ifport->interface = interface;
351 ifport->portnum = -1; // disable until resolved
352 SCPY(ifport->portname, value);
354 ifportp = &interface->ifport;
356 ifportp = &((*ifportp)->next);
360 static int inter_l1hold(struct interface *interface, char *filename, int line, char *parameter, char *value)
362 struct interface_port *ifport;
364 /* port in chain ? */
365 if (!interface->ifport) {
366 SPRINT(interface_error, "Error in %s (line %d): parameter '%s' expects previous 'port' definition.\n", filename, line, parameter);
369 /* goto end of chain */
370 ifport = interface->ifport;
372 ifport = ifport->next;
373 if (!strcmp(value, "yes")) {
376 if (!strcmp(value, "no")) {
379 SPRINT(interface_error, "Error in %s (line %d): parameter '%s' expecting parameter 'yes' or 'no'.\n", filename, line, parameter);
384 static int inter_l2hold(struct interface *interface, char *filename, int line, char *parameter, char *value)
386 struct interface_port *ifport;
388 /* port in chain ? */
389 if (!interface->ifport) {
390 SPRINT(interface_error, "Error in %s (line %d): parameter '%s' expects previous 'port' definition.\n", filename, line, parameter);
393 /* goto end of chain */
394 ifport = interface->ifport;
396 ifport = ifport->next;
397 if (!strcmp(value, "yes")) {
400 if (!strcmp(value, "no")) {
403 SPRINT(interface_error, "Error in %s (line %d): parameter '%s' expecting parameter 'yes' or 'no'.\n", filename, line, parameter);
408 static int inter_channel_out(struct interface *interface, char *filename, int line, char *parameter, char *value)
410 struct interface_port *ifport;
411 struct select_channel *selchannel, **selchannelp;
415 /* port in chain ? */
416 if (!interface->ifport) {
417 SPRINT(interface_error, "Error in %s (line %d): parameter '%s' expects previous 'port' definition.\n", filename, line, parameter);
420 /* goto end of chain */
421 ifport = interface->ifport;
423 ifport = ifport->next;
427 p = get_seperated(p);
428 if (!strcasecmp(el, "force")) {
429 ifport->channel_force = 1;
430 if (ifport->out_channel) {
431 SPRINT(interface_error, "Error in %s (line %d): value 'force' may only appear as first element in list.\n", filename, line);
435 if (!strcasecmp(el, "any")) {
439 if (!strcasecmp(el, "free")) {
443 if (!strcasecmp(el, "no")) {
447 val = get_number(el);
449 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);
453 if (val<1 || val==16 || val>126) {
454 SPRINT(interface_error, "Error in %s (line %d): channel '%d' out of range.\n", filename, line, val);
458 /* add to select-channel list */
459 selchannel = (struct select_channel *)MALLOC(sizeof(struct select_channel));
462 selchannel->channel = val;
464 selchannelp = &ifport->out_channel;
466 selchannelp = &((*selchannelp)->next);
467 *selchannelp = selchannel;
472 static int inter_channel_in(struct interface *interface, char *filename, int line, char *parameter, char *value)
474 struct interface_port *ifport;
475 struct select_channel *selchannel, **selchannelp;
479 /* port in chain ? */
480 if (!interface->ifport) {
481 SPRINT(interface_error, "Error in %s (line %d): parameter '%s' expects previous 'port' definition.\n", filename, line, parameter);
484 /* goto end of chain */
485 ifport = interface->ifport;
487 ifport = ifport->next;
491 p = get_seperated(p);
492 if (ifport->in_channel) if (ifport->in_channel->channel == CHANNEL_FREE) {
493 SPRINT(interface_error, "Error in %s (line %d): parameter '%s' has values behind 'free' keyword. They has no effect.\n", filename, line, parameter);
496 if (!strcasecmp(el, "free")) {
500 val = get_number(el);
502 SPRINT(interface_error, "Error in %s (line %d): parameter '%s' expects a comma seperated list of channel numbers and 'free'.\n", filename, line, parameter);
506 if (val<1 || val==16 || val>126) {
507 SPRINT(interface_error, "Error in %s (line %d): channel '%d' out of range.\n", filename, line, val);
511 /* add to select-channel list */
512 selchannel = (struct select_channel *)MALLOC(sizeof(struct select_channel));
515 selchannel->channel = val;
517 selchannelp = &ifport->in_channel;
519 selchannelp = &((*selchannelp)->next);
520 *selchannelp = selchannel;
525 static int inter_timeouts(struct interface *interface, char *filename, int line, char *parameter, char *value)
527 struct interface_port *ifport;
528 // struct select_channel *selchannel, **selchannelp;
532 /* port in chain ? */
533 if (!interface->ifport) {
534 SPRINT(interface_error, "Error in %s (line %d): parameter '%s' expects previous 'port' definition.\n", filename, line, parameter);
537 /* goto end of chain */
538 ifport = interface->ifport;
540 ifport = ifport->next;
544 SPRINT(interface_error, "Error in %s (line %d): parameter '%s' expects five timeout values.\n", filename, line, parameter);
548 p = get_seperated(p);
549 ifport->tout_setup = atoi(el);
553 p = get_seperated(p);
554 ifport->tout_dialing = atoi(el);
558 p = get_seperated(p);
559 ifport->tout_proceeding = atoi(el);
563 p = get_seperated(p);
564 ifport->tout_alerting = atoi(el);
568 p = get_seperated(p);
569 ifport->tout_disconnect = atoi(el);
572 static int inter_msn(struct interface *interface, char *filename, int line, char *parameter, char *value)
574 struct interface_msn *ifmsn, **ifmsnp;
578 SPRINT(interface_error, "Error in %s (line %d): parameter '%s' expects one MSN number or a list.\n", filename, line, parameter);
581 if (interface->ifscreen_in) {
582 SPRINT(interface_error, "Error in %s (line %d): parameter '%s' not allowed with 'screen_in' parameter.\n", filename, line, parameter);
590 p = get_seperated(p);
591 /* add MSN to list */
592 ifmsn = (struct interface_msn *)MALLOC(sizeof(struct interface_msn));
595 SCPY(ifmsn->msn, el);
597 ifmsnp = &interface->ifmsn;
599 ifmsnp = &((*ifmsnp)->next);
604 static int inter_screen(struct interface_screen **ifscreenp, struct interface *interface, char *filename, int line, char *parameter, char *value)
606 struct interface_screen *ifscreen;
610 SPRINT(interface_error, "Error in %s (line %d): parameter '%s' expects old caller ID and new caller ID.\n", filename, line, parameter);
613 /* add screen entry to list*/
614 ifscreen = (struct interface_screen *)MALLOC(sizeof(struct interface_screen));
616 ifscreen->match_type = -1; /* unchecked */
617 ifscreen->match_present = -1; /* unchecked */
618 ifscreen->result_type = -1; /* unchanged */
619 ifscreen->result_present = -1; /* unchanged */
622 ifscreenp = &((*ifscreenp)->next);
623 *ifscreenp = ifscreen;
624 // printf("interface=%s\n", interface->name);
629 p = get_seperated(p);
630 if (!strcasecmp(el, "unknown")) {
631 if (ifscreen->match_type != -1) {
633 SPRINT(interface_error, "Error in %s (line %d): number type already set earlier.\n", filename, line, parameter);
636 ifscreen->match_type = INFO_NTYPE_UNKNOWN;
638 if (!strcasecmp(el, "subscriber")) {
639 if (ifscreen->match_type != -1)
641 ifscreen->match_type = INFO_NTYPE_SUBSCRIBER;
643 if (!strcasecmp(el, "national")) {
644 if (ifscreen->match_type != -1)
646 ifscreen->match_type = INFO_NTYPE_NATIONAL;
648 if (!strcasecmp(el, "international")) {
649 if (ifscreen->match_type != -1)
651 ifscreen->match_type = INFO_NTYPE_INTERNATIONAL;
653 if (!strcasecmp(el, "allowed")) {
654 if (ifscreen->match_present != -1) {
656 SPRINT(interface_error, "Error in %s (line %d): presentation type already set earlier.\n", filename, line);
659 ifscreen->match_present = INFO_PRESENT_ALLOWED;
661 if (!strcasecmp(el, "restrict") || !strcasecmp(el, "restricted")) {
662 if (ifscreen->match_present != -1)
664 ifscreen->match_present = INFO_PRESENT_RESTRICTED;
666 SCPY(ifscreen->match, el);
667 /* check for % at the end */
668 if (strchr(el, '%')) {
669 if (strchr(el, '%') != el+strlen(el)-1) {
670 SPRINT(interface_error, "Error in %s (line %d): %% joker found, but must at the end.\n", filename, line, parameter);
677 if (ifscreen->match[0] == '\0') {
678 SPRINT(interface_error, "Error in %s (line %d): parameter '%s' expects old caller ID.\n", filename, line, parameter);
684 p = get_seperated(p);
685 if (!strcasecmp(el, "unknown")) {
686 if (ifscreen->result_type != -1)
688 ifscreen->result_type = INFO_NTYPE_UNKNOWN;
690 if (!strcasecmp(el, "subscriber")) {
691 if (ifscreen->result_type != -1)
693 ifscreen->result_type = INFO_NTYPE_SUBSCRIBER;
695 if (!strcasecmp(el, "national")) {
696 if (ifscreen->result_type != -1)
698 ifscreen->result_type = INFO_NTYPE_NATIONAL;
700 if (!strcasecmp(el, "international")) {
701 if (ifscreen->result_type != -1)
703 ifscreen->result_type = INFO_NTYPE_INTERNATIONAL;
705 if (!strcasecmp(el, "present") || !strcasecmp(el, "presented") || !strcasecmp(el, "allowed") || !strcasecmp(el, "allow")) {
706 if (ifscreen->result_present != -1)
708 ifscreen->result_present = INFO_PRESENT_ALLOWED;
710 if (!strcasecmp(el, "restrict") || !strcasecmp(el, "restricted") || !strcasecmp(el, "deny") || !strcasecmp(el, "denied")) {
711 if (ifscreen->result_present != -1)
713 ifscreen->result_present = INFO_PRESENT_RESTRICTED;
715 SCPY(ifscreen->result, el);
716 /* check for % at the end */
717 if (strchr(el, '%')) {
718 if (strchr(el, '%') != el+strlen(el)-1) {
719 SPRINT(interface_error, "Error in %s (line %d): %% joker found, but must at the end.\n", filename, line, parameter);
726 if (ifscreen->result[0] == '\0') {
727 SPRINT(interface_error, "Error in %s (line %d): parameter '%s' expects new caller ID.\n", filename, line, parameter);
732 static int inter_screen_in(struct interface *interface, char *filename, int line, char *parameter, char *value)
734 if (interface->ifmsn) {
735 SPRINT(interface_error, "Error in %s (line %d): parameter '%s' not allowed with 'msn' parameter.\n", filename, line, parameter);
739 return(inter_screen(&interface->ifscreen_in, interface, filename, line, parameter, value));
741 static int inter_screen_out(struct interface *interface, char *filename, int line, char *parameter, char *value)
743 return(inter_screen(&interface->ifscreen_out, interface, filename, line, parameter, value));
745 static int inter_nodtmf(struct interface *interface, char *filename, int line, char *parameter, char *value)
747 struct interface_port *ifport;
749 /* port in chain ? */
750 if (!interface->ifport) {
751 SPRINT(interface_error, "Error in %s (line %d): parameter '%s' expects previous 'port' definition.\n", filename, line, parameter);
754 /* goto end of chain */
755 ifport = interface->ifport;
757 ifport = ifport->next;
761 static int inter_filter(struct interface *interface, char *filename, int line, char *parameter, char *value)
765 /* seperate parameter from filter */
771 while(*p > 0 && *p <= 32)
775 if (!strcasecmp(value, "gain")) {
781 while(*q > 0 && *q <= 32)
784 if (*p == 0 || *q == 0) {
785 SPRINT(interface_error, "Error in %s (line %d): parameter '%s %s' expects two gain values.\n", filename, line, parameter, value);
788 if (atoi(p)<-8 || atoi(p)>8 || atoi(q)<-8 || atoi(q)>8) {
789 SPRINT(interface_error, "Error in %s (line %d): parameter '%s %s' gain values not in range. (-8...8)\n", filename, line, parameter, value);
792 interface->tx_gain = atoi(p);
793 interface->rx_gain = atoi(q);
795 if (!strcasecmp(value, "pipeline")) {
797 SPRINT(interface_error, "Error in %s (line %d): parameter '%s %s' expects pipeline string.\n", filename, line, parameter, value);
800 SCPY(interface->pipeline, p);
802 if (!strcasecmp(value, "blowfish")) {
803 unsigned char key[56];
806 if (!!strncmp(p, "0x", 2)) {
807 SPRINT(interface_error, "Error in %s (line %d): parameter '%s %s' expects blowfish key starting with '0x'.\n", filename, line, parameter, value);
814 SPRINT(interface_error, "Error in %s (line %d): parameter '%s %s' key too long.\n", filename, line, parameter, value);
817 if (*p >= '0' && *p <= '9')
818 key[l] = (*p-'0')<<4;
819 else if (*p >= 'a' && *p <= 'f')
820 key[l] = (*p-'a'+10)<<4;
821 else if (*p >= 'A' && *p <= 'F')
822 key[l] = (*p-'A'+10)<<4;
825 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);
830 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);
833 if (*p >= '0' && *p <= '9')
834 key[l] = (*p-'0')<<4;
835 else if (*p >= 'a' && *p <= 'f')
836 key[l] = (*p-'a'+10)<<4;
837 else if (*p >= 'A' && *p <= 'F')
838 key[l] = (*p-'A'+10)<<4;
845 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);
848 memcpy(interface->bf_key, key, l);
849 interface->bf_len = l;
851 SPRINT(interface_error, "Error in %s (line %d): parameter '%s' has unknown filter '%s'.\n", filename, line, parameter, value);
856 static int inter_dialmax(struct interface *interface, char *filename, int line, char *parameter, char *value)
858 struct interface_port *ifport;
860 /* port in chain ? */
861 if (!interface->ifport) {
862 SPRINT(interface_error, "Error in %s (line %d): parameter '%s' expects previous 'port' definition.\n", filename, line, parameter);
865 /* goto end of chain */
866 ifport = interface->ifport;
868 ifport = ifport->next;
869 ifport->dialmax = atoi(value);
872 static int inter_tones_dir(struct interface *interface, char *filename, int line, char *parameter, char *value)
874 struct interface_port *ifport;
876 /* port in chain ? */
877 if (!interface->ifport) {
878 SPRINT(interface_error, "Error in %s (line %d): parameter '%s' expects previous 'port' definition.\n", filename, line, parameter);
881 /* goto end of chain */
882 ifport = interface->ifport;
884 ifport = ifport->next;
885 SCPY(ifport->tones_dir, value);
888 static int inter_gsm(struct interface *interface, char *filename, int line, char *parameter, char *value)
890 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);
893 static int inter_gsm_bs(struct interface *interface, char *filename, int line, char *parameter, char *value)
896 SPRINT(interface_error, "Error in %s (line %d): GSM BS side not compiled in.\n", filename, line);
899 struct interface_port *ifport;
900 struct interface *searchif;
904 SPRINT(interface_error, "Error in %s (line %d): GSM is not activated.\n", filename, line);
907 searchif = interface_newlist;
909 ifport = searchif->ifport;
911 if (ifport->gsm_bs) {
912 SPRINT(interface_error, "Error in %s (line %d): port '%s' already uses gsm BS side.\n", filename, line, ifport->portname);
915 ifport = ifport->next;
917 searchif = searchif->next;
921 if (inter_portname(interface, filename, line, (char *)"portname", gsm->conf.interface_lcr))
924 /* goto end of chain again to set gsmflag */
925 ifport = interface->ifport;
927 ifport = ifport->next;
933 static int inter_gsm_ms(struct interface *interface, char *filename, int line, char *parameter, char *value)
936 SPRINT(interface_error, "Error in %s (line %d): GSM MS side not compiled in.\n", filename, line);
939 struct interface_port *ifport, *searchifport;
940 struct interface *searchif;
945 SPRINT(interface_error, "Error in %s (line %d): GSM is not activated.\n", filename, line);
950 if (inter_portname(interface, filename, line, (char *)"portname", gsm->conf.interface_lcr))
953 /* goto end of chain again to set gsmflag and socket */
954 ifport = interface->ifport;
956 ifport = ifport->next;
960 element = strsep(&value, " ");
961 if (!element || !element[0]) {
962 SPRINT(interface_error, "Error in %s (line %d): Missing MS name and socket name.\n", filename, line);
965 SCPY(ifport->gsm_ms_name, element);
966 element = strsep(&value, " ");
967 if (!element || !element[0]) {
968 SPRINT(interface_error, "Error in %s (line %d): Missing socket name after MS name.\n", filename, line);
971 SCPY(ifport->gsm_ms_socket, element);
973 /* check if socket is used multiple times */
974 searchif = interface_newlist;
976 searchifport = searchif->ifport;
977 while(searchifport) {
978 if (searchifport != ifport
979 && !strcmp(searchifport->gsm_ms_socket, ifport->gsm_ms_socket)) {
980 SPRINT(interface_error, "Error in %s (line %d): mobile '%s' already uses the given socket '%s', choose a different one.\n", filename, line, ifport->gsm_ms_name, searchifport->gsm_ms_socket);
983 searchifport = searchifport->next;
985 searchif = searchif->next;
991 static int inter_nonotify(struct interface *interface, char *filename, int line, char *parameter, char *value)
993 struct interface_port *ifport;
995 /* port in chain ? */
996 if (!interface->ifport) {
997 SPRINT(interface_error, "Error in %s (line %d): parameter '%s' expects previous 'port' definition.\n", filename, line, parameter);
1000 /* goto end of chain */
1001 ifport = interface->ifport;
1003 ifport = ifport->next;
1004 ifport->nonotify = 1;
1008 static int inter_ss5(struct interface *interface, char *filename, int line, char *parameter, char *value)
1010 struct interface_port *ifport;
1013 /* port in chain ? */
1014 if (!interface->ifport) {
1015 SPRINT(interface_error, "Error in %s (line %d): parameter '%s' expects previous 'port' definition.\n", filename, line, parameter);
1018 /* goto end of chain */
1019 ifport = interface->ifport;
1021 ifport = ifport->next;
1022 ifport->ss5 |= SS5_ENABLE;
1023 while((element = strsep(&value, " "))) {
1024 if (element[0] == '\0')
1026 if (!strcasecmp(element, "connect"))
1027 ifport->ss5 |= SS5_FEATURE_CONNECT;
1029 if (!strcasecmp(element, "nodisconnect"))
1030 ifport->ss5 |= SS5_FEATURE_NODISCONNECT;
1032 if (!strcasecmp(element, "releaseguardtimer"))
1033 ifport->ss5 |= SS5_FEATURE_RELEASEGUARDTIMER;
1035 if (!strcasecmp(element, "bell"))
1036 ifport->ss5 |= SS5_FEATURE_BELL;
1038 if (!strcasecmp(element, "pulsedialing"))
1039 ifport->ss5 |= SS5_FEATURE_PULSEDIALING;
1041 if (!strcasecmp(element, "delay"))
1042 ifport->ss5 |= SS5_FEATURE_DELAY;
1044 if (!strcasecmp(element, "starrelease"))
1045 ifport->ss5 |= SS5_FEATURE_STAR_RELEASE;
1047 if (!strcasecmp(element, "suppress"))
1048 ifport->ss5 |= SS5_FEATURE_SUPPRESS;
1050 SPRINT(interface_error, "Error in %s (line %d): parameter '%s' does not allow value element '%s'.\n", filename, line, parameter, element);
1060 * structure of parameters
1062 struct interface_param interface_param[] = {
1063 { "extension", &inter_extension, "",
1064 "If keyword is given, calls to interface are handled as internal extensions."},
1066 { "extern", &inter_extern, "",
1067 "If keyword is given, this interface will be used for external calls.\n"
1068 "Calls require an external interface, if the routing action 'extern' is used\nwithout specific interface given.\n"
1069 "Calls forwarded by extension's 'settings' also require an external interface."},
1071 {"tones", &inter_tones, "yes | no",
1072 "Interface generates tones during call setup and release, or not.\nBy default only NT-mode ports generate tones."},
1074 {"earlyb", &inter_earlyb, "yes | no",
1075 "Interface receives and bridges tones during call setup and release, or not.\nBy default only TE-mode ports receive tones."},
1077 {"hunt", &inter_hunt, "linear | roundrobin",
1078 "Select the algorithm for selecting port with free channel."},
1080 {"port", &inter_port, "<number>",
1082 {"portnum", &inter_portnum, "<number>",
1083 "Give exactly one port for this interface.\nTo give multiple ports, add more lines with port parameters."},
1084 {"portname", &inter_portname, "<name>",
1085 "Same as 'portnum', but the name is given instead.\nUse 'isdninfo' to list all available ports and names."},
1087 {"block", &inter_block, "",
1088 "If keyword is given, calls on this interface are blocked.\n"
1089 "This parameter must follow a 'port' parameter."},
1091 {"ptp", &inter_ptp, "",
1092 "The given port above is opened as point-to-point.\n"
1093 "This is required on NT-mode ports that are multipoint by default.\n"
1094 "This parameter must follow a 'port' parameter."},
1097 {"ptmp", &inter_ptmp, "",
1098 "The given port above is opened as point-to-multipoint.\n"
1099 "This is required on PRI NT-mode ports that are point-to-point by default.\n"
1100 "This parameter must follow a 'port' parameter."},
1103 {"nt", &inter_nt, "",
1104 "The given port above is opened in NT-mode.\n"
1105 "This is required on interfaces that support both NT-mode and TE-mode.\n"
1106 "This parameter must follow a 'port' parameter."},
1108 {"te-special", &inter_tespecial, "",
1109 "The given port uses a modified TE-mode.\n"
1110 "All information elements that are allowed Network->User will then be\n"
1111 "transmitted User->Network also. This is usefull to pass all informations\n"
1112 "between two interconnected LCRs, like 'redirected number' or 'display'.\n"
1113 "Note that this is not compliant with ISDN protocol.\n"
1114 "This parameter must follow a 'port' parameter."},
1116 {"layer1hold", &inter_l1hold, "yes | no",
1117 "The given port will not release layer 1 after layer 2 is down.\n"
1118 "It is required to keep layer 1 of telephones up, to solve activation problems.\n"
1119 "This parameter must follow a 'port' parameter."},
1121 {"layer2hold", &inter_l2hold, "yes | no",
1122 "The given port will continuously try to establish layer 2 link and hold it.\n"
1123 "It is required for PTP links in most cases, therefore it is default.\n"
1124 "This parameter must follow a 'port' parameter."},
1126 {"channel-out", &inter_channel_out, "[force,][<number>][,...][,free][,any][,no]",
1127 "Channel selection list for all outgoing calls to the interface.\n"
1128 "A free channels is searched in order of appearance.\n"
1129 "This parameter must follow a 'port' parameter.\n"
1130 " force - Forces the selected port with no acceptable alternative (see Q.931).\n"
1131 " -> this will be automatically set for multipoint (ptmp) NT-mode ports\n"
1132 " <number>[,...] - List of channels to search.\n"
1133 " free - Select any free channel\n"
1134 " any - On outgoing calls, signal 'any channel acceptable'. (see DSS1)\n"
1135 " no - Signal 'no channel available' aka 'call waiting'. (see DSS1)"},
1137 {"channel-in", &inter_channel_in, "[<number>][,...][,free]",
1138 "Channel selection list for all incoming calls from the interface.\n"
1139 "A free channels is accepted if in the list.\n"
1140 "If any channel was requested, the first free channel found is selected.\n"
1141 "This parameter must follow a 'port' parameter.\n"
1142 " <number>[,...] - List of channels to accept.\n"
1143 " free - Accept any free channel"},
1145 {"timeouts", &inter_timeouts, "<setup> <dialing> <proceeding> <alerting> <disconnect>",
1146 "Timeout values for call states. They are both for incoming and outgoing states.\n"
1147 "The default is 120 seconds for all states. Use 0 to disable.\n"
1148 "This parameter must follow a 'port' parameter.\n"},
1150 {"msn", &inter_msn, "<default MSN>,[<additional MSN>[,...]]",
1151 "Incoming caller ID is checked against given MSN numbers.\n"
1152 "If the caller ID is not found in this list, it is overwritten by the first MSN"},
1154 {"screen-in", &inter_screen_in, "[options] <old caller ID>[%] [options] <new caller ID>[%]",
1155 "Adds an entry for incoming calls to the caller ID screen list.\n"
1156 "If the given 'old caller ID' matches, it is replaced by the 'new caller ID'\n"
1157 "If '%' is given after old caller ID, it matches even if caller ID has\n"
1158 "additional digits.\n"
1159 "If '%' is given after mew caller ID, additinal digits of the 'old caller ID'\n"
1162 " unknown | subsciber | national | international - Change caller ID type.\n"
1163 " present | restrict - Change presentation of caller ID."},
1165 {"screen-out", &inter_screen_out, "[options] <old caller ID>[%] [options] <new caller ID>[%]",
1166 "Adds an entry for outgoing calls to the caller ID screen list.\n"
1167 "See 'screen-in' for help."},
1169 {"nodtmf", &inter_nodtmf, "",
1170 "Disables DTMF detection for this interface.\n"
1171 "This parameter must follow a 'port' parameter."},
1173 {"filter", &inter_filter, "<filter> <parameters>",
1174 "Adds/appends a filter. Filters are ordered in transmit direction.\n"
1175 "gain <tx-volume> <rx-volume> - Changes volume (-8 .. 8)\n"
1176 "pipeline <string> - Sets echo cancelation pipeline.\n"
1177 "blowfish <key> - Adds encryption. Key must be 4-56 bytes (8-112 hex characters."},
1179 {"dialmax", &inter_dialmax, "<digits>",
1180 "Limits the number of digits in setup/information message."},
1182 {"tones_dir", &inter_tones_dir, "<path>",
1183 "Overrides the given tone_dir in options.conf.\n"
1184 "To used kernel tones in mISDN_dsp.ko, say 'american', 'german', or 'oldgerman'."},
1186 {"gsm", &inter_gsm, "",
1188 {"gsm-bs", &inter_gsm_bs, "",
1189 "Sets up GSM base station interface for using OpenBSC.\n"
1190 "See the default/gsm.conf for configuration for this version."},
1191 {"gsm-ms", &inter_gsm_ms, "[<socket>]",
1192 "Sets up GSM mobile station interface for using Osmocom-BB.\n"
1193 "See the default/gsm.conf for configuration for this version.\n"
1194 "The name of the MS folows the interface name.\n"
1195 "The socket is /tmp/osmocom_l2 by default and need to be changed when multiple\n"
1196 "MS interfaces are used."},
1197 {"nonotify", &inter_nonotify, "",
1198 "Prevents sending notify messages to this interface. A call placed on hold will\n"
1199 "Not affect the remote end (phone or telcom switch).\n"
1200 "This parameter must follow a 'port' parameter."},
1203 {"ccitt5", &inter_ss5, "[<feature> [feature ...]]",
1204 "Interface uses CCITT No. 5 inband signalling rather than D-channel.\n"
1205 "This feature causes CPU load to rise and has no practical intend.\n"
1206 "If you don't know what it is, you don't need it.\n"
1207 "Features apply to protocol behaviour and blueboxing specials, they are:\n"
1208 " connect - Connect incomming call to throughconnect audio, if required.\n"
1209 " nodisconnect - Don't disconnect if incomming exchange disconnects.\n"
1210 " releaseguardtimer - Tries to prevent Blueboxing by a longer release-guard.\n"
1211 " bell - Allow releasing and pulse-dialing via 2600 Hz like old Bell systems.\n"
1212 " pulsedialing - Use pulse dialing on outgoing exchange. (takes long!)\n"
1213 " delay - Use on incomming exchange, to make you feel a delay when blueboxing.\n"
1214 " starrelease - Pulse dialing a star (11 pulses per digit) clears current call.\n"
1215 " suppress - Suppress received tones, as they will be recognized."},
1218 {NULL, NULL, NULL, NULL}
1223 * read settings from interface.conf
1225 char interface_error[256];
1226 struct interface *read_interfaces(void)
1231 unsigned int line, i;
1233 struct interface *interface = NULL, /* in case no interface */
1234 **interfacep = &interface_newlist;
1235 char parameter[128];
1237 int expecting = 1; /* expecting new interface */
1238 struct interface_param *ifparam;
1240 if (interface_newlist != NULL)
1241 FATAL("list is not empty.\n");
1242 interface_error[0] = '\0';
1243 SPRINT(filename, "%s/interface.conf", CONFIG_DATA);
1245 if (!(fp = fopen(filename,"r"))) {
1246 SPRINT(interface_error, "Cannot open '%s'\n", filename);
1251 while((GETLINE(buffer, fp))) {
1255 while(*p <= 32) { /* skip spaces */
1260 if (*p==0 || *p=='#') /* ignore comments and empty line */
1265 i=0; /* read parameter */
1267 if (i+1 >= sizeof(parameter)) {
1268 SPRINT(interface_error, "Error in %s (line %d): parameter name too long.\n",filename,line);
1271 parameter[i+1] = '\0';
1272 parameter[i++] = *p++;
1275 while(*p <= 32) { /* skip spaces */
1281 if (*p!=0 && *p!='#') { /* missing name */
1282 i=0; /* read until end */
1283 while(*p!=0 && *p!='#') {
1284 if (i+1 >= sizeof(value)) {
1285 SPRINT(interface_error, "Error in %s (line %d): value too long.\n", filename, line);
1292 /* remove trailing spaces from value */
1294 if (value[i-1]==0 || value[i-1]>32)
1301 /* check for interface name as first statement */
1302 if (expecting && parameter[0]!='[') {
1303 SPRINT(interface_error, "Error in %s (line %d): expecting interface name inside [ and ], but got: '%s'.\n", filename, line, parameter);
1308 /* check for new interface */
1309 if (parameter[0] == '[') {
1310 if (parameter[strlen(parameter)-1] != ']') {
1311 SPRINT(interface_error, "Error in %s (line %d): expecting interface name inside [ and ], but got: '%s'.\n", filename, line, parameter);
1314 parameter[strlen(parameter)-1] = '\0';
1316 /* check if interface name already exists */
1317 interface = interface_newlist;
1319 if (!strcasecmp(interface->name, parameter+1)) {
1320 SPRINT(interface_error, "Error in %s (line %d): interface name '%s' already defined above.\n", filename, line, parameter+1);
1323 interface = interface->next;
1326 /* append interface to new list */
1327 interface = (struct interface *)MALLOC(sizeof(struct interface));
1330 /* name interface */
1331 SCPY(interface->name, parameter+1);
1334 *interfacep = interface;
1335 interfacep = &interface->next;
1340 ifparam = interface_param;
1341 while(ifparam->name) {
1342 if (!strcasecmp(parameter, ifparam->name)) {
1343 if (ifparam->func(interface, filename, line, parameter, value))
1352 SPRINT(interface_error, "Error in %s (line %d): unknown parameter: '%s'.\n", filename, line, parameter);
1357 return(interface_newlist);
1359 PERROR_RUNTIME("%s", interface_error);
1361 free_interfaces(interface_newlist);
1362 interface_newlist = NULL;
1368 * freeing chain of interfaces
1370 void free_interfaces(struct interface *interface)
1373 struct interface_port *ifport;
1374 struct select_channel *selchannel;
1375 struct interface_msn *ifmsn;
1376 struct interface_screen *ifscreen;
1379 ifport = interface->ifport;
1381 selchannel = ifport->in_channel;
1384 selchannel = selchannel->next;
1385 FREE(temp, sizeof(struct select_channel));
1388 selchannel = ifport->out_channel;
1391 selchannel = selchannel->next;
1392 FREE(temp, sizeof(struct select_channel));
1396 ifport = ifport->next;
1397 FREE(temp, sizeof(struct interface_port));
1400 ifmsn = interface->ifmsn;
1403 ifmsn = ifmsn->next;
1404 FREE(temp, sizeof(struct interface_msn));
1407 ifscreen = interface->ifscreen_in;
1410 ifscreen = ifscreen->next;
1411 FREE(temp, sizeof(struct interface_screen));
1414 ifscreen = interface->ifscreen_out;
1417 ifscreen = ifscreen->next;
1418 FREE(temp, sizeof(struct interface_screen));
1422 interface = interface->next;
1423 FREE(temp, sizeof(struct interface));
1429 * defaults of ports if not specified by config
1431 static void set_defaults(struct interface_port *ifport)
1433 /* default channel selection list */
1434 if (!ifport->out_channel)
1435 default_out_channel(ifport);
1436 if (!ifport->in_channel)
1437 default_in_channel(ifport);
1438 /* must force the channel on PTMP/NT ports */
1439 if (!ifport->mISDNport->ptp && ifport->mISDNport->ntmode)
1440 ifport->channel_force = 1;
1441 /* default is_tones */
1442 if (ifport->interface->is_tones)
1443 ifport->mISDNport->tones = (ifport->interface->is_tones==IS_YES);
1445 ifport->mISDNport->tones = (ifport->mISDNport->ntmode || ifport->mISDNport->ss5)?1:0;
1446 /* default is_earlyb */
1447 if (ifport->interface->is_earlyb)
1448 ifport->mISDNport->earlyb = (ifport->interface->is_earlyb==IS_YES);
1450 ifport->mISDNport->earlyb = (ifport->mISDNport->ntmode && !ifport->mISDNport->ss5)?0:1;
1451 /* set locally flag */
1452 if (ifport->interface->extension)
1453 ifport->mISDNport->locally = 1;
1455 ifport->mISDNport->locally = 0;
1460 * all links between mISDNport and interface are made
1461 * unused mISDNports are closed, new mISDNports are opened
1462 * also set default select_channel lists
1464 void relink_interfaces(void)
1466 struct mISDNport *mISDNport;
1467 struct interface *interface;
1468 struct interface_port *ifport;
1470 /* unlink all mISDNports */
1471 mISDNport = mISDNport_first;
1473 mISDNport->ifport = NULL;
1474 mISDNport = mISDNport->next;
1477 /* relink existing mISDNports */
1478 interface = interface_newlist;
1480 ifport = interface->ifport;
1482 mISDNport = mISDNport_first;
1484 if (!strcmp(mISDNport->name, ifport->portname))
1485 ifport->portnum = mISDNport->portnum; /* same name, so we use same number */
1486 if (mISDNport->portnum == ifport->portnum) {
1487 PDEBUG(DEBUG_ISDN, "Port %d:%s relinking!\n", ifport->portnum, ifport->portname);
1488 ifport->mISDNport = mISDNport;
1489 mISDNport->ifport = ifport;
1490 set_defaults(ifport);
1492 mISDNport = mISDNport->next;
1494 ifport = ifport->next;
1496 interface = interface->next;
1499 /* close unused mISDNports */
1501 mISDNport = mISDNport_first;
1503 if (mISDNport->ifport == NULL) {
1504 PDEBUG(DEBUG_ISDN, "Port %d is not used anymore and will be closed\n", mISDNport->portnum);
1505 /* remove all port objects and destroy port */
1508 gsm_ms_delete(ifport->gsm_ms_name);
1510 mISDNport_close(mISDNport);
1513 mISDNport = mISDNport->next;
1516 /* open and link new mISDNports */
1517 interface = interface_newlist;
1519 ifport = interface->ifport;
1521 if (!ifport->mISDNport) {
1524 ifport = ifport->next;
1526 interface = interface->next;
1535 void load_port(struct interface_port *ifport)
1537 struct mISDNport *mISDNport;
1540 mISDNport = mISDNport_open(ifport);
1543 ifport->mISDNport = mISDNport;
1544 mISDNport->ifport = ifport;
1545 /* set number and name */
1546 ifport->portnum = mISDNport->portnum;
1547 SCPY(ifport->portname, mISDNport->name);
1549 set_defaults(ifport);
1550 /* load static port instances */
1551 mISDNport_static(mISDNport);
1554 gsm_ms_new(ifport->gsm_ms_name, ifport->gsm_ms_socket);
1557 ifport->block = 2; /* not available */
1562 * give summary of interface syntax
1564 void doc_interface(void)
1566 struct interface_param *ifparam;
1568 printf("Syntax overview\n");
1569 printf("---------------\n\n");
1571 printf("[<name>]\n");
1572 ifparam = interface_param;
1573 while(ifparam->name) {
1574 if (ifparam->name[0])
1575 printf("%s %s\n", ifparam->name, ifparam->usage);
1579 ifparam = interface_param;
1580 while(ifparam->name) {
1581 if (ifparam->name[0]) {
1582 printf("\nParameter: %s %s\n", ifparam->name, ifparam->usage);
1583 printf("%s\n", ifparam->help);
1591 * out==0: incoming caller id, out==1: outgoing caller id
1593 void do_screen(int out, char *id, int idsize, int *type, int *present, struct interface *interface)
1596 struct interface_msn *ifmsn;
1597 struct interface_screen *ifscreen;
1600 /* screen incoming caller id */
1602 /* check for MSN numbers, use first MSN if no match */
1604 ifmsn = interface->ifmsn;
1608 if (!strcmp(ifmsn->msn, id)) {
1611 ifmsn = ifmsn->next;
1614 start_trace(-1, interface, numberrize_callerinfo(id, *type, options.national, options.international), NULL, DIRECTION_IN, 0, 0, "SCREEN (found in MSN list)");
1615 add_trace("msn", NULL, "%s", id);
1618 if (!ifmsn && msn1) { // not in list, first msn given
1619 start_trace(-1, interface, numberrize_callerinfo(id, *type, options.national, options.international), NULL, DIRECTION_IN, 0, 0, "SCREEN (not found in MSN list)");
1620 add_trace("msn", "given", "%s", id);
1621 add_trace("msn", "used", "%s", msn1);
1623 UNCPY(id, msn1, idsize);
1624 id[idsize-1] = '\0';
1628 /* check screen list */
1630 ifscreen = interface->ifscreen_out;
1632 ifscreen = interface->ifscreen_in;
1634 if (ifscreen->match_type==-1 || ifscreen->match_type==*type)
1635 if (ifscreen->match_present==-1 || ifscreen->match_present==*present) {
1636 if (strchr(ifscreen->match,'%')) {
1637 if (!strncmp(ifscreen->match, id, strchr(ifscreen->match,'%')-ifscreen->match))
1640 if (!strcmp(ifscreen->match, id))
1644 ifscreen = ifscreen->next;
1646 if (ifscreen) { // match
1647 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)");
1649 case INFO_NTYPE_UNKNOWN:
1650 add_trace("given", "type", "unknown");
1652 case INFO_NTYPE_SUBSCRIBER:
1653 add_trace("given", "type", "subscriber");
1655 case INFO_NTYPE_NATIONAL:
1656 add_trace("given", "type", "national");
1658 case INFO_NTYPE_INTERNATIONAL:
1659 add_trace("given", "type", "international");
1663 case INFO_PRESENT_ALLOWED:
1664 add_trace("given", "present", "allowed");
1666 case INFO_PRESENT_RESTRICTED:
1667 add_trace("given", "present", "restricted");
1669 case INFO_PRESENT_NOTAVAIL:
1670 add_trace("given", "present", "not available");
1673 add_trace("given", "id", "%s", id[0]?id:"<empty>");
1674 if (ifscreen->result_type != -1) {
1675 *type = ifscreen->result_type;
1677 case INFO_NTYPE_UNKNOWN:
1678 add_trace("used", "type", "unknown");
1680 case INFO_NTYPE_SUBSCRIBER:
1681 add_trace("used", "type", "subscriber");
1683 case INFO_NTYPE_NATIONAL:
1684 add_trace("used", "type", "national");
1686 case INFO_NTYPE_INTERNATIONAL:
1687 add_trace("used", "type", "international");
1691 if (ifscreen->result_present != -1) {
1692 *present = ifscreen->result_present;
1694 case INFO_PRESENT_ALLOWED:
1695 add_trace("used", "present", "allowed");
1697 case INFO_PRESENT_RESTRICTED:
1698 add_trace("used", "present", "restricted");
1700 case INFO_PRESENT_NOTAVAIL:
1701 add_trace("used", "present", "not available");
1705 if (strchr(ifscreen->match,'%')) {
1706 SCPY(suffix, strchr(ifscreen->match,'%') - ifscreen->match + id);
1707 UNCPY(id, ifscreen->result, idsize);
1708 id[idsize-1] = '\0';
1709 if (strchr(id,'%')) {
1710 *strchr(id,'%') = '\0';
1711 UNCAT(id, suffix, idsize);
1712 id[idsize-1] = '\0';
1715 UNCPY(id, ifscreen->result, idsize);
1716 id[idsize-1] = '\0';
1718 add_trace("used", "id", "%s", id[0]?id:"<empty>");