add missing functions - see the comment in the file explaining
[asterisk/asterisk.git] / utils / ael_main.c
1 #include <sys/types.h>
2 #include <stdio.h>
3 #include <stdlib.h>
4 #include <string.h>
5 #include <locale.h>
6 #include <ctype.h>
7 #if !defined(SOLARIS) && !defined(__CYGWIN__)
8 #include <err.h>
9 #endif
10 #include <errno.h>
11 #include <regex.h>
12 #include <limits.h>
13
14 /* ast_copy_string */
15 #define AST_API_MODULE
16 #include "asterisk/strings.h"
17
18 /* ensure that _ast_calloc works */
19 #define AST_API_MODULE 
20 #include "asterisk/utils.h"
21
22 #include "asterisk/ast_expr.h"
23 #include "asterisk/logger.h"
24 #include "asterisk/module.h"
25 #include "asterisk/channel.h"
26 #include "asterisk/app.h"
27 #include "asterisk/ael_structs.h"
28
29 #define AST_CONFIG_MAX_PATH 255
30
31 int conts=0, extens=0, priors=0;
32 char last_exten[18000];
33 char ast_config_AST_CONFIG_DIR[AST_CONFIG_MAX_PATH];
34 char ast_config_AST_VAR_DIR[AST_CONFIG_MAX_PATH];
35
36 void ast_cli_register_multiple(void);
37 void ast_register_file_version(void);
38 void ast_unregister_file_version(void);
39 int ast_add_extension2(void *con,
40                                            int replace, const char *extension, int priority, const char *label, const char *callerid,
41                                                 const char *application, void *data, void (*datad)(void *),
42                                            const char *registrar);
43 void pbx_builtin_setvar(void *chan, void *data);
44 void ast_context_create(void **extcontexts, const char *name, const char *registrar);
45 void ast_context_add_ignorepat2(void *con, const char *value, const char *registrar);
46 void ast_context_add_include2(void *con, const char *value, const char *registrar);
47 void ast_context_add_switch2(void *con, const char *value, const char *data, int eval, const char *registrar);
48 void ast_merge_contexts_and_delete(void);
49 void ast_context_verify_includes(void);
50 struct ast_context * ast_walk_contexts(void);
51 void ast_cli_unregister_multiple(void);
52 void ast_context_destroy(void);
53 void ast_log(int level, const char *file, int line, const char *function, const char *fmt, ...);
54 char *ast_process_quotes_and_slashes(char *start, char find, char replace_with);
55 void ast_verbose(const char *fmt, ...);
56 struct ast_app *pbx_findapp(const char *app);
57 static int no_comp = 0;
58 static int use_curr_dir = 0;
59
60
61 struct ast_app *pbx_findapp(const char *app)
62 {
63         return (struct ast_app*)1; /* so as not to trigger an error */
64 }
65
66 void ast_cli_register_multiple(void)
67 {
68         if(!no_comp)
69         printf("Executed ast_cli_register_multiple();\n");
70 }
71
72 void ast_register_file_version(void)
73 {
74         if(!no_comp)
75         printf("Executed ast_register_file_version();\n");
76 }
77
78 void ast_unregister_file_version(void)
79 {
80         if(!no_comp)
81         printf("Executed ast_unregister_file_version();\n");
82
83 }
84 int ast_add_extension2(void *con,
85                                                 int replace, const char *extension, int priority, const char *label, const char *callerid,
86                                                 const char *application, void *data, void (*datad)(void *),
87                                                 const char *registrar)
88 {
89         priors++;
90         if (strcmp(extension,last_exten) != 0) {
91                 extens++;
92                 strcpy(last_exten, extension);
93         }
94         if (!label) {
95                 label = "(null)";
96         }
97         if (!callerid) {
98                 callerid = "(null)";
99         }
100         if (!application) {
101                 application = "(null)";
102         }
103         if(!no_comp)
104         printf("Executed ast_add_extension2(con, rep=%d, exten=%s, priority=%d, label=%s, callerid=%s, appl=%s, data=%s, FREE, registrar=%s);\n",
105                 replace, extension, priority, label, callerid, application, (data?(char*)data:"(null)"), registrar);
106
107         /* since add_extension2 is responsible for the malloc'd data stuff */
108         if( data )
109                 free(data);
110         return 0;
111 }
112
113 void pbx_builtin_setvar(void *chan, void *data)
114 {
115         if(!no_comp)
116         printf("Executed pbx_builtin_setvar(chan, data=%s);\n", (char*)data);
117 }
118         
119
120 void ast_context_create(void **extcontexts, const char *name, const char *registrar)
121 {
122         if(!no_comp)
123         printf("Executed ast_context_create(conts, name=%s, registrar=%s);\n", name, registrar);
124         conts++;
125 }
126
127 void ast_context_add_ignorepat2(void *con, const char *value, const char *registrar)
128 {
129         if(!no_comp)
130         printf("Executed ast_context_add_ignorepat2(con, value=%s, registrar=%s);\n", value, registrar);
131 }
132
133 void ast_context_add_include2(void *con, const char *value, const char *registrar)
134 {
135         if(!no_comp)
136         printf("Executed ast_context_add_include2(con, value=%s, registrar=%s);\n", value, registrar);
137 }
138
139 void ast_context_add_switch2(void *con, const char *value, const char *data, int eval, const char *registrar)
140 {
141         if(!no_comp)
142         printf("Executed ast_context_add_switch2(con, value=%s, data=%s, eval=%d, registrar=%s);\n", value, data, eval, registrar);
143 }
144
145 void ast_merge_contexts_and_delete(void)
146 {
147         if(!no_comp)
148         printf("Executed ast_merge_contexts_and_delete();\n");
149 }
150
151 void ast_context_verify_includes(void)
152 {
153         if(!no_comp)
154         printf("Executed ast_context_verify_includes();\n");
155 }
156
157 struct ast_context * ast_walk_contexts(void)
158 {
159         if(!no_comp)
160         printf("Executed ast_walk_contexts();\n");
161         return 0;
162 }
163
164 void ast_cli_unregister_multiple(void)
165 {
166         if(!no_comp)
167         printf("Executed ast_cli_unregister_multiple();\n");
168 }
169
170 void ast_context_destroy(void)
171 {
172         printf("Executed ast_context_destroy();\n");
173 }
174
175 void ast_log(int level, const char *file, int line, const char *function, const char *fmt, ...)
176 {
177         va_list vars;
178         va_start(vars,fmt);
179
180         printf("LOG: lev:%d file:%s  line:%d func: %s  ",
181                    level, file, line, function);
182         vprintf(fmt, vars);
183         fflush(stdout);
184         va_end(vars);
185 }
186
187 void ast_verbose(const char *fmt, ...)
188 {
189         va_list vars;
190         va_start(vars,fmt);
191
192         printf("VERBOSE: ");
193         vprintf(fmt, vars);
194         fflush(stdout);
195         va_end(vars);
196 }
197
198 char *ast_process_quotes_and_slashes(char *start, char find, char replace_with)
199 {
200         char *dataPut = start;
201         int inEscape = 0;
202         int inQuotes = 0;
203
204         for (; *start; start++) {
205                 if (inEscape) {
206                         *dataPut++ = *start;       /* Always goes verbatim */
207                         inEscape = 0;
208                 } else {
209                         if (*start == '\\') {
210                                 inEscape = 1;      /* Do not copy \ into the data */
211                         } else if (*start == '\'') {
212                                 inQuotes = 1-inQuotes;   /* Do not copy ' into the data */
213                         } else {
214                                 /* Replace , with |, unless in quotes */
215                                 *dataPut++ = inQuotes ? *start : ((*start==find) ? replace_with : *start);
216                         }
217                 }
218         }
219         if (start != dataPut)
220                 *dataPut = 0;
221         return dataPut;
222 }
223
224 extern struct module_symbols mod_data;
225
226
227 int main(int argc, char **argv)
228 {
229         int i;
230         
231         for(i=1;i<argc;i++)
232         {
233                 if( argv[i][0] == '-' && argv[i][1] == 'n' )
234                         no_comp =1;
235                 if( argv[i][0] == '-' && argv[i][1] == 'd' )
236                         use_curr_dir =1;
237         }
238         
239                 
240         if( !no_comp )
241                 printf("\n(You can use the -n option if you aren't interested in seeing all the instructions generated by the compiler)\n\n");
242         if( !use_curr_dir )
243                 printf("\n(You can use the -d option if you want to use the current working directory as the CONFIG_DIR. I will look in this dir for extensions.ael* and its included files)\n\n");
244         
245         if( use_curr_dir )
246         {
247                 strcpy(ast_config_AST_CONFIG_DIR, ".");
248         }
249         else
250         {
251                 strcpy(ast_config_AST_CONFIG_DIR, "/etc/asterisk");
252         }
253         strcpy(ast_config_AST_VAR_DIR, "/var/lib/asterisk");
254         
255         mod_data.load_module(0);
256         
257         ast_log(4, "ael2_parse", __LINE__, "main", "%d contexts, %d extensions, %d priorities\n", conts, extens, priors);
258         
259     return 0;
260 }
261
262 /*
263  * XXX the code below is replicated here from utils.c, because
264  * the #define AST_API_MODULE references functions that are
265  * not available on all platforms.
266  * We hit the problem with strndup (which in turn uses strnlen),
267  * but it is possible that there are more of these issues.
268  *
269  * When utils.c is properly split and functions become available
270  * through a library, this file will just link to the library and
271  * the problem will go away together with the code below.
272  */
273 #ifndef HAVE_STRNLEN
274 size_t strnlen(const char *s, size_t n)
275 {
276         size_t len;   
277
278         for (len=0; len < n; len++)
279                 if (s[len] == '\0')
280                         break;
281
282         return len;
283 }
284 #endif /* !HAVE_STRNLEN */
285
286 #if !defined(HAVE_STRNDUP) && !defined(__AST_DEBUG_MALLOC)
287 char *strndup(const char *s, size_t n)
288 {
289         size_t len = strnlen(s, n);
290         char *new = malloc(len + 1);
291
292         if (!new)
293                 return NULL;
294
295         new[len] = '\0';
296         return memcpy(new, s, len);
297 }
298 #endif /* !defined(HAVE_STRNDUP) && !defined(__AST_DEBUG_MALLOC) */
299