added pmp_l1_check option, to avoid l1 checking for group calls on PMP ports
[asterisk/asterisk.git] / channels / misdn_config.c
1 /*
2  * Asterisk -- An open source telephony toolkit.
3  * 
4  * Copyright (C) 2005, Christian Richter
5  *
6  * Christian Richter <crich@beronet.com>
7  *
8  * See http://www.asterisk.org for more information about
9  * the Asterisk project. Please do not directly contact
10  * any of the maintainers of this project for assistance;
11  * the project provides a web site, mailing lists and IRC
12  * channels for your use.
13  *
14  * This program is free software, distributed under the terms of
15  * the GNU General Public License Version 2. See the LICENSE file
16  * at the top of the source tree.
17  *
18  */
19
20 /*!
21  * \file
22  *
23  * \brief chan_misdn configuration management
24  * \author Christian Richter <crich@beronet.com>
25  *
26  * \ingroup channel_drivers
27  */
28
29 #include <stdlib.h>
30 #include <stdio.h>
31 #include <string.h>
32 #include <errno.h>
33
34 #include "chan_misdn_config.h"
35
36 #include <asterisk/config.h>
37 #include <asterisk/channel.h>
38 #include <asterisk/logger.h>
39 #include <asterisk/lock.h>
40 #include <asterisk/pbx.h>
41 #include <asterisk/strings.h>
42 #include <asterisk/utils.h>
43
44 #define AST_LOAD_CFG ast_config_load
45 #define AST_DESTROY_CFG ast_config_destroy
46
47 #define NO_DEFAULT "<>"
48 #define NONE 0
49
50 #define GEN_CFG 1
51 #define PORT_CFG 2
52 #define NUM_GEN_ELEMENTS (sizeof(gen_spec) / sizeof(struct misdn_cfg_spec))
53 #define NUM_PORT_ELEMENTS (sizeof(port_spec) / sizeof(struct misdn_cfg_spec))
54
55 enum misdn_cfg_type {
56         MISDN_CTYPE_STR,
57         MISDN_CTYPE_INT,
58         MISDN_CTYPE_BOOL,
59         MISDN_CTYPE_BOOLINT,
60         MISDN_CTYPE_MSNLIST,
61         MISDN_CTYPE_ASTGROUP
62 };
63
64 struct msn_list {
65         char *msn;
66         struct msn_list *next;
67 };
68
69 union misdn_cfg_pt {
70         char *str;
71         int *num;
72         struct msn_list *ml;
73         ast_group_t *grp;
74         void *any;
75 };
76
77 struct misdn_cfg_spec {
78         char name[BUFFERSIZE];
79         enum misdn_cfg_elements elem;
80         enum misdn_cfg_type type;
81         char def[BUFFERSIZE];
82         int boolint_def;
83 };
84
85 static const struct misdn_cfg_spec port_spec[] = {
86         { "name", MISDN_CFG_GROUPNAME, MISDN_CTYPE_STR, "default", NONE },
87         { "rxgain", MISDN_CFG_RXGAIN, MISDN_CTYPE_INT, "0", NONE },
88         { "txgain", MISDN_CFG_TXGAIN, MISDN_CTYPE_INT, "0", NONE },
89         { "te_choose_channel", MISDN_CFG_TE_CHOOSE_CHANNEL, MISDN_CTYPE_BOOL, "no", NONE },
90         { "pmp_l1_check", MISDN_CFG_PMP_L1_CHECK, MISDN_CTYPE_BOOL, "yes", NONE },
91         { "context", MISDN_CFG_CONTEXT, MISDN_CTYPE_STR, "default", NONE },
92         { "language", MISDN_CFG_LANGUAGE, MISDN_CTYPE_STR, "en", NONE },
93         { "musicclass", MISDN_CFG_MUSICCLASS, MISDN_CTYPE_STR, "default", NONE },
94         { "callerid", MISDN_CFG_CALLERID, MISDN_CTYPE_STR, "", NONE },
95         { "method", MISDN_CFG_METHOD, MISDN_CTYPE_STR, "standard", NONE },
96         { "dialplan", MISDN_CFG_DIALPLAN, MISDN_CTYPE_INT, "0", NONE },
97         { "localdialplan", MISDN_CFG_LOCALDIALPLAN, MISDN_CTYPE_INT, "0", NONE },
98         { "nationalprefix", MISDN_CFG_NATPREFIX, MISDN_CTYPE_STR, "0", NONE },
99         { "internationalprefix", MISDN_CFG_INTERNATPREFIX, MISDN_CTYPE_STR, "00", NONE },
100         { "presentation", MISDN_CFG_PRES, MISDN_CTYPE_INT, "-1", NONE },
101         { "screen", MISDN_CFG_SCREEN, MISDN_CTYPE_INT, "-1", NONE },
102         { "always_immediate", MISDN_CFG_ALWAYS_IMMEDIATE, MISDN_CTYPE_BOOL, "no", NONE },
103         { "immediate", MISDN_CFG_IMMEDIATE, MISDN_CTYPE_BOOL, "no", NONE },
104         { "senddtmf", MISDN_CFG_SENDDTMF, MISDN_CTYPE_BOOL, "no", NONE },
105         { "hold_allowed", MISDN_CFG_HOLD_ALLOWED, MISDN_CTYPE_BOOL, "no", NONE },
106         { "early_bconnect", MISDN_CFG_EARLY_BCONNECT, MISDN_CTYPE_BOOL, "yes", NONE },
107         { "echocancel", MISDN_CFG_ECHOCANCEL, MISDN_CTYPE_BOOLINT, "0", 128 },
108         { "echocancelwhenbridged", MISDN_CFG_ECHOCANCELWHENBRIDGED, MISDN_CTYPE_BOOL, "no", NONE },
109         { "echotraining", MISDN_CFG_ECHOTRAINING, MISDN_CTYPE_BOOLINT, "0", 1 },
110         { "need_more_infos", MISDN_CFG_NEED_MORE_INFOS, MISDN_CTYPE_BOOL, "0", NONE },
111         { "jitterbuffer", MISDN_CFG_JITTERBUFFER, MISDN_CTYPE_INT, "1000", NONE },
112         { "jitterbuffer_upper_threshold", MISDN_CFG_JITTERBUFFER_UPPER_THRESHOLD, MISDN_CTYPE_INT, "600", NONE },
113         { "callgroup", MISDN_CFG_CALLGROUP, MISDN_CTYPE_ASTGROUP, NO_DEFAULT, NONE },
114         { "pickupgroup", MISDN_CFG_PICKUPGROUP, MISDN_CTYPE_ASTGROUP, NO_DEFAULT, NONE },
115         { "msns", MISDN_CFG_MSNS, MISDN_CTYPE_MSNLIST, NO_DEFAULT, NONE }
116 };
117
118 static const struct misdn_cfg_spec gen_spec[] = {
119         { "debug", MISDN_GEN_DEBUG, MISDN_CTYPE_INT, "0", NONE },
120         { "misdn_init", MISDN_GEN_MISDN_INIT, MISDN_CTYPE_STR, "/etc/misdn-init.conf", NONE },
121         { "tracefile", MISDN_GEN_TRACEFILE, MISDN_CTYPE_STR, "/var/log/misdn.trace", NONE },
122         { "bridging", MISDN_GEN_BRIDGING, MISDN_CTYPE_BOOL, "yes", NONE },
123         { "stop_tone_after_first_digit", MISDN_GEN_STOP_TONE, MISDN_CTYPE_BOOL, "yes", NONE },
124         { "append_digits2exten", MISDN_GEN_APPEND_DIGITS2EXTEN, MISDN_CTYPE_BOOL, "yes", NONE },
125         { "dynamic_crypt", MISDN_GEN_DYNAMIC_CRYPT, MISDN_CTYPE_BOOL, "no", NONE },
126         { "crypt_prefix", MISDN_GEN_CRYPT_PREFIX, MISDN_CTYPE_STR, NO_DEFAULT, NONE },
127         { "crypt_keys", MISDN_GEN_CRYPT_KEYS, MISDN_CTYPE_STR, NO_DEFAULT, NONE }
128 };
129
130 /* array of port configs, default is at position 0. */
131 static union misdn_cfg_pt **port_cfg;
132 /* max number of available ports, is set on init */
133 static int max_ports;
134 /* general config */
135 static union misdn_cfg_pt *general_cfg;
136 /* storing the ptp flag separated to save memory */
137 static int *ptp;
138 /* maps enum config elements to array positions */
139 static int *map;
140
141 static ast_mutex_t config_mutex; 
142
143 #define CLI_ERROR(name, value, section) ({ \
144         ast_log(LOG_WARNING, "misdn.conf: \"%s=%s\" (section: %s) invalid or out of range. " \
145                 "Please edit your misdn.conf and then do a \"misdn reload\".\n", name, value, section); \
146 })
147
148 static void _enum_array_map (void)
149 {
150         int i, j;
151
152         for (i = MISDN_CFG_FIRST + 1; i < MISDN_CFG_LAST; ++i) {
153                 if (i == MISDN_CFG_PTP)
154                         continue;
155                 for (j = 0; j < NUM_PORT_ELEMENTS; ++j) {
156                         if (port_spec[j].elem == i) {
157                                 map[i] = j;
158                                 break;
159                         }
160                 }
161         }
162         for (i = MISDN_GEN_FIRST + 1; i < MISDN_GEN_LAST; ++i) {
163                 for (j = 0; j < NUM_GEN_ELEMENTS; ++j) {
164                         if (gen_spec[j].elem == i) {
165                                 map[i] = j;
166                                 break;
167                         }
168                 }
169         }
170 }
171
172 static int get_cfg_position (char *name, int type)
173 {
174         int i;
175
176         switch (type) {
177         case PORT_CFG:
178                 for (i = 0; i < NUM_PORT_ELEMENTS; ++i) {
179                         if (!strcasecmp(name, port_spec[i].name))
180                                 return i;
181                 }
182                 break;
183         case GEN_CFG:
184                 for (i = 0; i < NUM_GEN_ELEMENTS; ++i) {
185                         if (!strcasecmp(name, gen_spec[i].name))
186                                 return i;
187                 }
188         }
189
190         return -1;
191 }
192
193 static inline void misdn_cfg_lock (void)
194 {
195         ast_mutex_lock(&config_mutex);
196 }
197
198 static inline void misdn_cfg_unlock (void)
199 {
200         ast_mutex_unlock(&config_mutex);
201 }
202
203 static void _free_msn_list (struct msn_list* iter)
204 {
205         if (iter->next)
206                 _free_msn_list(iter->next);
207         if (iter->msn)
208                 free(iter->msn);
209         free(iter);
210 }
211
212 static void _free_port_cfg (void)
213 {
214         int i, j;
215         int gn = map[MISDN_CFG_GROUPNAME];
216         union misdn_cfg_pt* free_list[max_ports + 1];
217         
218         memset(free_list, 0, sizeof(free_list));
219         free_list[0] = port_cfg[0];
220         for (i = 1; i <= max_ports; ++i) {
221                 if (port_cfg[i][gn].str) {
222                         /* we always have a groupname in the non-default case, so this is fine */
223                         for (j = 1; j <= max_ports; ++j) {
224                                 if (free_list[j] && free_list[j][gn].str == port_cfg[i][gn].str)
225                                         break;
226                                 else if (!free_list[j]) {
227                                         free_list[j] = port_cfg[i];
228                                         break;
229                                 }
230                         }
231                 }
232         }
233         for (j = 0; free_list[j]; ++j) {
234                 for (i = 0; i < NUM_PORT_ELEMENTS; ++i) {
235                         if (free_list[j][i].any) {
236                                 if (port_spec[i].type == MISDN_CTYPE_MSNLIST)
237                                         _free_msn_list(free_list[j][i].ml);
238                                 else
239                                         free(free_list[j][i].any);
240                         }
241                 }
242         }
243 }
244
245 static void _free_general_cfg (void)
246 {
247         int i;
248
249         for (i = 0; i < NUM_GEN_ELEMENTS; i++) 
250                 if (general_cfg[i].any)
251                         free(general_cfg[i].any);
252 }
253
254 void misdn_cfg_get (int port, enum misdn_cfg_elements elem, void *buf, int bufsize)
255 {
256         int place;
257
258         if ((elem < MISDN_CFG_LAST) && !misdn_cfg_is_port_valid(port)) {
259                 memset(buf, 0, bufsize);
260                 ast_log(LOG_WARNING, "Invalid call to misdn_cfg_get! Port number %d is not valid.\n", port);
261                 return;
262         }
263
264         misdn_cfg_lock();
265         if (elem == MISDN_CFG_PTP) {
266                 if (!memcpy(buf, &ptp[port], (bufsize > ptp[port]) ? sizeof(ptp[port]) : bufsize))
267                         memset(buf, 0, bufsize);
268         } else {
269                 if ((place = map[elem]) < 0) {
270                         memset (buf, 0, bufsize);
271                         ast_log(LOG_WARNING, "Invalid call to misdn_cfg_get! Invalid element (%d) requested.\n", elem);
272                 } else {
273                         if (elem < MISDN_CFG_LAST) {
274                                 switch (port_spec[place].type) {
275                                 case MISDN_CTYPE_STR:
276                                         if (port_cfg[port][place].str) {
277                                                 if (!memccpy(buf, port_cfg[port][place].str, 0, bufsize))
278                                                         memset(buf, 0, 1);
279                                         } else if (port_cfg[0][place].str) {
280                                                 if (!memccpy(buf, port_cfg[0][place].str, 0, bufsize))
281                                                         memset(buf, 0, 1);
282                                         }
283                                         break;
284                                 default:
285                                         if (port_cfg[port][place].any)
286                                                 memcpy(buf, port_cfg[port][place].any, bufsize);
287                                         else if (port_cfg[0][place].any)
288                                                 memcpy(buf, port_cfg[0][place].any, bufsize);
289                                         else
290                                                 memset(buf, 0, bufsize);
291                                 }
292                         } else {
293                                 switch (gen_spec[place].type) {
294                                 case MISDN_CTYPE_STR:
295                                         if (!general_cfg[place].str || !memccpy(buf, general_cfg[place].str, 0, bufsize))
296                                                 memset(buf, 0, 1);
297                                         break;
298                                 default:
299                                         if (general_cfg[place].any)
300                                                 memcpy(buf, general_cfg[place].any, bufsize);
301                                         else
302                                                 memset(buf, 0, bufsize);
303                                 }
304                         }
305                 }
306         }
307         misdn_cfg_unlock();
308 }
309
310 int misdn_cfg_is_msn_valid (int port, char* msn)
311 {
312         int re = 0;
313         struct msn_list *iter;
314
315         if (!misdn_cfg_is_port_valid(port)) {
316                 ast_log(LOG_WARNING, "Invalid call to misdn_cfg_is_msn_valid! Port number %d is not valid.\n", port);
317                 return 0;
318         }
319
320         misdn_cfg_lock();
321         if (port_cfg[port][MISDN_CFG_MSNS-1].ml)
322                 iter = port_cfg[port][MISDN_CFG_MSNS-1].ml;
323         else
324                 iter = port_cfg[0][MISDN_CFG_MSNS-1].ml;
325         for (; iter; iter = iter->next) 
326                 if (*(iter->msn) == '*' || ast_extension_match(iter->msn, msn)) {
327                         re = 1;
328                         break;
329                 }
330         misdn_cfg_unlock();
331
332         return re;
333 }
334
335 int misdn_cfg_is_port_valid (int port)
336 {
337         return (port >= 1 && port <= max_ports);
338 }
339
340 int misdn_cfg_is_group_method (char *group, enum misdn_cfg_method meth)
341 {
342         int i, re = 0;
343         char *method = NULL;
344
345         misdn_cfg_lock();
346         for (i = 1; i <= max_ports; i++) {
347                 if (port_cfg[i] && port_cfg[i][map[MISDN_CFG_GROUPNAME]].str) {
348                         if (!strcasecmp(port_cfg[i][map[MISDN_CFG_GROUPNAME]].str, group))
349                                 method = (port_cfg[i][map[MISDN_CFG_METHOD]].str ? 
350                                                   port_cfg[i][map[MISDN_CFG_METHOD]].str : port_cfg[0][map[MISDN_CFG_METHOD]].str);
351                 }
352         }
353         if (method) {
354                 switch (meth) {
355                 case METHOD_STANDARD:           re = !strcasecmp(method, "standard");
356                                                                         break;
357                 case METHOD_ROUND_ROBIN:        re = !strcasecmp(method, "round_robin");
358                                                                         break;
359                 }
360         }
361         misdn_cfg_unlock();
362
363         return re;
364 }
365
366 void misdn_cfg_get_ports_string (char *ports)
367 {
368         char tmp[16];
369         int l, i;
370         int gn = map[MISDN_CFG_GROUPNAME];
371
372         *ports = 0;
373
374         misdn_cfg_lock();
375         for (i = 1; i <= max_ports; i++) {
376                 if (port_cfg[i][gn].str) {
377                         if (ptp[i])
378                                 sprintf(tmp, "%dptp,", i);
379                         else
380                                 sprintf(tmp, "%d,", i);
381                         strcat(ports, tmp);
382                 }
383         }
384         misdn_cfg_unlock();
385
386         if ((l = strlen(ports)))
387                 ports[l-1] = 0;
388 }
389
390 void misdn_cfg_get_config_string (int port, enum misdn_cfg_elements elem, char* buf, int bufsize)
391 {
392         int place;
393         char tempbuf[BUFFERSIZE] = "";
394         struct msn_list *iter;
395
396         if ((elem < MISDN_CFG_LAST) && !misdn_cfg_is_port_valid(port)) {
397                 *buf = 0;
398                 ast_log(LOG_WARNING, "Invalid call to misdn_cfg_get_config_string! Port number %d is not valid.\n", port);
399                 return;
400         }
401
402         place = map[elem];
403
404         misdn_cfg_lock();
405         if (elem == MISDN_CFG_PTP) {
406                 snprintf(buf, bufsize, " -> ptp: %s", ptp[port] ? "yes" : "no");
407         }
408         else if (elem > MISDN_CFG_FIRST && elem < MISDN_CFG_LAST) {
409                 switch (port_spec[place].type) {
410                 case MISDN_CTYPE_INT:
411                 case MISDN_CTYPE_BOOLINT:
412                         if (port_cfg[port][place].num)
413                                 snprintf(buf, bufsize, " -> %s: %d", port_spec[place].name, *port_cfg[port][place].num);
414                         else if (port_cfg[0][place].num)
415                                 snprintf(buf, bufsize, " -> %s: %d", port_spec[place].name, *port_cfg[0][place].num);
416                         else
417                                 snprintf(buf, bufsize, " -> %s:", port_spec[place].name);
418                         break;
419                 case MISDN_CTYPE_BOOL:
420                         if (port_cfg[port][place].num)
421                                 snprintf(buf, bufsize, " -> %s: %s", port_spec[place].name, *port_cfg[port][place].num ? "yes" : "no");
422                         else if (port_cfg[0][place].num)
423                                 snprintf(buf, bufsize, " -> %s: %s", port_spec[place].name, *port_cfg[0][place].num ? "yes" : "no");
424                         else
425                                 snprintf(buf, bufsize, " -> %s:", port_spec[place].name);
426                         break;
427                 case MISDN_CTYPE_ASTGROUP:
428                         if (port_cfg[port][place].grp)
429                                 snprintf(buf, bufsize, " -> %s: %s", port_spec[place].name, 
430                                                  ast_print_group(tempbuf, sizeof(tempbuf), *port_cfg[port][place].grp));
431                         else if (port_cfg[0][place].grp)
432                                 snprintf(buf, bufsize, " -> %s: %s", port_spec[place].name, 
433                                                  ast_print_group(tempbuf, sizeof(tempbuf), *port_cfg[0][place].grp));
434                         else
435                                 snprintf(buf, bufsize, " -> %s:", port_spec[place].name);
436                         break;
437                 case MISDN_CTYPE_MSNLIST:
438                         if (port_cfg[port][place].ml)
439                                 iter = port_cfg[port][place].ml;
440                         else
441                                 iter = port_cfg[0][place].ml;
442                         if (iter) {
443                                 for (; iter; iter = iter->next)
444                                         sprintf(tempbuf, "%s%s, ", tempbuf, iter->msn);
445                                 tempbuf[strlen(tempbuf)-2] = 0;
446                         }
447                         snprintf(buf, bufsize, " -> msns: %s", *tempbuf ? tempbuf : "none");
448                         break;
449                 case MISDN_CTYPE_STR:
450                         if ( port_cfg[port][place].str) {
451                                 snprintf(buf, bufsize, " -> %s: %s", port_spec[place].name, port_cfg[port][place].str);
452                         } else if (port_cfg[0][place].str) {
453                                 snprintf(buf, bufsize, " -> %s: %s", port_spec[place].name, port_cfg[0][place].str);
454                         } else {
455                                 snprintf(buf, bufsize, " -> %s:", port_spec[place].name);
456                         }
457                         break;
458                 }
459         } else if (elem > MISDN_GEN_FIRST && elem < MISDN_GEN_LAST) {
460                 switch (gen_spec[place].type) {
461                 case MISDN_CTYPE_INT:
462                 case MISDN_CTYPE_BOOLINT:
463                         if (general_cfg[place].num)
464                                 snprintf(buf, bufsize, " -> %s: %d", gen_spec[place].name, *general_cfg[place].num);
465                         else
466                                 snprintf(buf, bufsize, " -> %s:", gen_spec[place].name);
467                         break;
468                 case MISDN_CTYPE_BOOL:
469                         if (general_cfg[place].num)
470                                 snprintf(buf, bufsize, " -> %s: %s", gen_spec[place].name, *general_cfg[place].num ? "yes" : "no");
471                         else
472                                 snprintf(buf, bufsize, " -> %s:", gen_spec[place].name);
473                         break;
474                 case MISDN_CTYPE_STR:
475                         if ( general_cfg[place].str) {
476                                 snprintf(buf, bufsize, " -> %s: %s", gen_spec[place].name, general_cfg[place].str);
477                         } else {
478                                 snprintf(buf, bufsize, " -> %s:", gen_spec[place].name);
479                         }
480                         break;
481                 default:
482                         snprintf(buf, bufsize, " -> type of %s not handled yet", gen_spec[place].name);
483                         break;
484                 }
485         } else {
486                 *buf = 0;
487                 ast_log(LOG_WARNING, "Invalid call to misdn_cfg_get_config_string! Invalid config element (%d) requested.\n", elem);
488         }
489         misdn_cfg_unlock();
490 }
491
492 int misdn_cfg_get_next_port (int port)
493 {
494         int p = -1;
495         int gn = map[MISDN_CFG_GROUPNAME];
496         
497         misdn_cfg_lock();
498         for (port++; port <= max_ports; port++) {
499                 if (port_cfg[port][gn].str) {
500                         p = port;
501                         break;
502                 }
503         }
504         misdn_cfg_unlock();
505
506         return p;
507 }
508
509 int misdn_cfg_get_next_port_spin (int port)
510 {
511         int p = misdn_cfg_get_next_port(port);
512         return (p > 0) ? p : misdn_cfg_get_next_port(0);
513 }
514
515 static int _parse (union misdn_cfg_pt *dest, char *value, enum misdn_cfg_type type, int boolint_def)
516 {
517         int re = 0;
518         int len, tmp;
519         char *valtmp;
520
521         switch (type) {
522         case MISDN_CTYPE_STR:
523                 if ((len = strlen(value))) {
524                         dest->str = (char *)malloc((len + 1) * sizeof(char));
525                         strncpy(dest->str, value, len);
526                         dest->str[len] = 0;
527                 } else {
528                         dest->str = (char *)malloc( sizeof(char));
529                         dest->str[0] = 0;
530                 }
531                 break;
532         case MISDN_CTYPE_INT:
533                 if (sscanf(value, "%d", &tmp)) {
534                         dest->num = (int *)malloc(sizeof(int));
535                         memcpy(dest->num, &tmp, sizeof(int));
536                 } else
537                         re = -1;
538                 break;
539         case MISDN_CTYPE_BOOL:
540                 dest->num = (int *)malloc(sizeof(int));
541                 *(dest->num) = (ast_true(value) ? 1 : 0);
542                 break;
543         case MISDN_CTYPE_BOOLINT:
544                 dest->num = (int *)malloc(sizeof(int));
545                 if (sscanf(value, "%d", &tmp)) {
546                         memcpy(dest->num, &tmp, sizeof(int));
547                 } else {
548                         *(dest->num) = (ast_true(value) ? boolint_def : 0);
549                 }
550                 break;
551         case MISDN_CTYPE_MSNLIST:
552                 for (valtmp = strsep(&value, ","); valtmp; valtmp = strsep(&value, ",")) {
553                         if ((len = strlen(valtmp))) {
554                                 struct msn_list *ml = (struct msn_list *)malloc(sizeof(struct msn_list));
555                                 ml->msn = (char *)calloc(len+1, sizeof(char));
556                                 strncpy(ml->msn, valtmp, len);
557                                 ml->next = dest->ml;
558                                 dest->ml = ml;
559                         }
560                 }
561                 break;
562         case MISDN_CTYPE_ASTGROUP:
563                 dest->grp = (ast_group_t *)malloc(sizeof(ast_group_t));
564                 *(dest->grp) = ast_get_group(value);
565                 break;
566         }
567
568         return re;
569 }
570
571 static void _build_general_config (struct ast_variable *v)
572 {
573         int pos;
574
575         for (; v; v = v->next) {
576                 if (((pos = get_cfg_position(v->name, GEN_CFG)) < 0) || 
577                         (_parse(&general_cfg[pos], v->value, gen_spec[pos].type, gen_spec[pos].boolint_def) < 0))
578                         CLI_ERROR(v->name, v->value, "general");
579         }
580 }
581
582 static void _build_port_config (struct ast_variable *v, char *cat)
583 {
584         int pos, i;
585         union misdn_cfg_pt cfg_tmp[NUM_PORT_ELEMENTS];
586         int cfg_for_ports[max_ports + 1];
587
588         if (!v || !cat)
589                 return;
590
591         memset(cfg_tmp, 0, sizeof(cfg_tmp));
592         memset(cfg_for_ports, 0, sizeof(cfg_for_ports));
593
594         if (!strcasecmp(cat, "default")) {
595                 cfg_for_ports[0] = 1;
596         }
597
598         if (((pos = get_cfg_position("name", PORT_CFG)) < 0) || 
599                 (_parse(&cfg_tmp[pos], cat, port_spec[pos].type, port_spec[pos].boolint_def) < 0)) {
600                 CLI_ERROR(v->name, v->value, cat);
601                 return;
602         }
603
604         for (; v; v = v->next) {
605                 if (!strcasecmp(v->name, "ports")) {
606                         char *token;
607                         char ptpbuf[BUFFERSIZE] = "";
608                         int start, end;
609                         for (token = strsep(&v->value, ","); token; token = strsep(&v->value, ","), *ptpbuf = 0) { 
610                                 if (!*token)
611                                         continue;
612                                 if (sscanf(token, "%d-%d%s", &start, &end, ptpbuf) >= 2) {
613                                         for (; start <= end; start++) {
614                                                 if (start <= max_ports && start > 0) {
615                                                         cfg_for_ports[start] = 1;
616                                                         ptp[start] = (strstr(ptpbuf, "ptp")) ? 1 : 0;
617                                                 } else
618                                                         CLI_ERROR(v->name, v->value, cat);
619                                         }
620                                 } else {
621                                         if (sscanf(token, "%d%s", &start, ptpbuf)) {
622                                                 if (start <= max_ports && start > 0) {
623                                                         cfg_for_ports[start] = 1;
624                                                         ptp[start] = (strstr(ptpbuf, "ptp")) ? 1 : 0;
625                                                 } else
626                                                         CLI_ERROR(v->name, v->value, cat);
627                                         } else
628                                                 CLI_ERROR(v->name, v->value, cat);
629                                 }
630                         }
631                 } else {
632                         if (((pos = get_cfg_position(v->name, PORT_CFG)) < 0) || 
633                                 (_parse(&cfg_tmp[pos], v->value, port_spec[pos].type, port_spec[pos].boolint_def) < 0))
634                                 CLI_ERROR(v->name, v->value, cat);
635                 }
636         }
637
638         for (i = 0; i < (max_ports + 1); ++i) {
639                 if (cfg_for_ports[i]) {
640                         memcpy(port_cfg[i], cfg_tmp, sizeof(cfg_tmp));
641                 }
642         }
643 }
644
645 void misdn_cfg_update_ptp (void)
646 {
647         char misdn_init[BUFFERSIZE];
648         char line[BUFFERSIZE];
649         FILE *fp;
650         char *tok, *p, *end;
651         int port;
652
653         misdn_cfg_get(0, MISDN_GEN_MISDN_INIT, &misdn_init, sizeof(misdn_init));
654
655         if (misdn_init) {
656                 fp = fopen(misdn_init, "r");
657                 if (fp) {
658                         while(fgets(line, sizeof(line), fp)) {
659                                 if (!strncmp(line, "nt_ptp", 6)) {
660                                         for (tok = strtok_r(line,",=", &p);
661                                                  tok;
662                                                  tok = strtok_r(NULL,",=", &p)) {
663                                                 port = strtol(tok, &end, 10);
664                                                 if (end != tok && misdn_cfg_is_port_valid(port)) {
665                                                         misdn_cfg_lock();
666                                                         ptp[port] = 1;
667                                                         misdn_cfg_unlock();
668                                                 }
669                                         }
670                                 }
671                         }
672                         fclose(fp);
673                 } else {
674                         ast_log(LOG_WARNING,"Couldn't open %s: %s\n", misdn_init, strerror(errno));
675                 }
676         }
677 }
678
679 static void _fill_defaults (void)
680 {
681         int i;
682
683         for (i = 0; i < NUM_PORT_ELEMENTS; ++i) {
684                 if (!port_cfg[0][i].any && strcasecmp(port_spec[i].def, NO_DEFAULT))
685                         _parse(&(port_cfg[0][i]), (char *)port_spec[i].def, port_spec[i].type, port_spec[i].boolint_def);
686         }
687         for (i = 0; i < NUM_GEN_ELEMENTS; ++i) {
688                 if (!general_cfg[i].any && strcasecmp(gen_spec[i].def, NO_DEFAULT))
689                         _parse(&(general_cfg[i]), (char *)gen_spec[i].def, gen_spec[i].type, gen_spec[i].boolint_def);
690         }
691 }
692
693 void misdn_cfg_reload (void)
694 {
695         misdn_cfg_init (0);
696 }
697
698 void misdn_cfg_destroy (void)
699 {
700         misdn_cfg_lock();
701
702         _free_port_cfg();
703         _free_general_cfg();
704
705         free(port_cfg);
706         free(general_cfg);
707         free(ptp);
708         free(map);
709
710         misdn_cfg_unlock();
711         ast_mutex_destroy(&config_mutex);
712 }
713
714 void misdn_cfg_init (int this_max_ports)
715 {
716         char config[] = "misdn.conf";
717         char *cat, *p;
718         int i;
719         struct ast_config *cfg;
720         struct ast_variable *v;
721
722         if (!(cfg = AST_LOAD_CFG(config))) {
723                 ast_log(LOG_WARNING,"no misdn.conf ?\n");
724                 return;
725         }
726
727         misdn_cfg_lock();
728
729         if (this_max_ports) {
730                 /* this is the first run */
731                 max_ports = this_max_ports;
732                 p = (char *)calloc(1, (max_ports + 1) * sizeof(union misdn_cfg_pt *)
733                                                    + (max_ports + 1) * NUM_PORT_ELEMENTS * sizeof(union misdn_cfg_pt));
734                 port_cfg = (union misdn_cfg_pt **)p;
735                 p += (max_ports + 1) * sizeof(union misdn_cfg_pt *);
736                 for (i = 0; i <= max_ports; ++i) {
737                         port_cfg[i] = (union misdn_cfg_pt *)p;
738                         p += NUM_PORT_ELEMENTS * sizeof(union misdn_cfg_pt);
739                 }
740                 general_cfg = (union misdn_cfg_pt *)calloc(1, sizeof(union misdn_cfg_pt *) * NUM_GEN_ELEMENTS);
741                 ptp = (int *)calloc(max_ports + 1, sizeof(int));
742                 map = (int *)calloc(MISDN_GEN_LAST + 1, sizeof(int));
743                 _enum_array_map();
744         }
745         else {
746                 /* misdn reload */
747                 _free_port_cfg();
748                 _free_general_cfg();
749                 memset(port_cfg[0], 0, NUM_PORT_ELEMENTS * sizeof(union misdn_cfg_pt) * (max_ports + 1));
750                 memset(general_cfg, 0, sizeof(union misdn_cfg_pt *) * NUM_GEN_ELEMENTS);
751                 memset(ptp, 0, sizeof(int) * (max_ports + 1));
752         }
753
754         cat = ast_category_browse(cfg, NULL);
755
756         while(cat) {
757                 v = ast_variable_browse(cfg, cat);
758                 if (!strcasecmp(cat,"general")) {
759                         _build_general_config(v);
760                 } else {
761                         _build_port_config(v, cat);
762                 }
763                 cat = ast_category_browse(cfg,cat);
764         }
765
766         _fill_defaults();
767
768         misdn_cfg_unlock();
769         AST_DESTROY_CFG(cfg);
770 }