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