Merge Steve Murphy's (murf) complete re-implementation of AEL, which is now no longer...
[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 #else
10 #define quad_t int64_t
11 #endif
12 #include <errno.h>
13 #include <regex.h>
14 #include <limits.h>
15 #include <asterisk/ast_expr.h>
16 #include <asterisk/logger.h>
17 #include <asterisk/module.h>
18 #include <asterisk/channel.h>
19 #include <asterisk/app.h>
20 #include "asterisk/ael_structs.h"
21 #define AST_CONFIG_MAX_PATH 255
22
23 int conts=0, extens=0, priors=0;
24 char last_exten[18000];
25 char ast_config_AST_CONFIG_DIR[AST_CONFIG_MAX_PATH];
26 char ast_config_AST_VAR_DIR[AST_CONFIG_MAX_PATH];
27
28 void ast_cli_register_multiple(void);
29 void ast_register_file_version(void);
30 void ast_unregister_file_version(void);
31 int ast_add_extension2(void *con,
32                                            int replace, const char *extension, int priority, const char *label, const char *callerid,
33                                                 const char *application, void *data, void (*datad)(void *),
34                                            const char *registrar);
35 void pbx_builtin_setvar(void *chan, void *data);
36 void ast_context_create(void **extcontexts, const char *name, const char *registrar);
37 void ast_context_add_ignorepat2(void *con, const char *value, const char *registrar);
38 void ast_context_add_include2(void *con, const char *value, const char *registrar);
39 void ast_context_add_switch2(void *con, const char *value, const char *data, int eval, const char *registrar);
40 void ast_merge_contexts_and_delete(void);
41 void ast_context_verify_includes(void);
42 struct ast_context * ast_walk_contexts(void);
43 void ast_cli_unregister_multiple(void);
44 void ast_context_destroy(void);
45 void ast_log(int level, const char *file, int line, const char *function, const char *fmt, ...);
46 char *ast_process_quotes_and_slashes(char *start, char find, char replace_with);
47 void ast_verbose(const char *fmt, ...);
48 struct ast_app *pbx_findapp(const char *app);
49 static int no_comp = 0;
50 static int use_curr_dir = 0;
51
52
53 struct ast_app *pbx_findapp(const char *app)
54 {
55         return (struct ast_app*)1; /* so as not to trigger an error */
56 }
57
58
59 void ast_copy_string(char *dst, const char *src, size_t size)
60 {
61         while (*src && size) {
62                 *dst++ = *src++;
63                 size--;
64         }
65         if (__builtin_expect(!size, 0))
66                 dst--;
67         *dst = '\0';
68 }
69
70 void ast_cli_register_multiple(void)
71 {
72         if(!no_comp)
73         printf("Executed ast_cli_register_multiple();\n");
74 }
75
76 void ast_register_file_version(void)
77 {
78         if(!no_comp)
79         printf("Executed ast_register_file_version();\n");
80 }
81
82 void ast_unregister_file_version(void)
83 {
84         if(!no_comp)
85         printf("Executed ast_unregister_file_version();\n");
86
87 }
88 int ast_add_extension2(void *con,
89                                                 int replace, const char *extension, int priority, const char *label, const char *callerid,
90                                                 const char *application, void *data, void (*datad)(void *),
91                                                 const char *registrar)
92 {
93         priors++;
94         if (strcmp(extension,last_exten) != 0) {
95                 extens++;
96                 strcpy(last_exten, extension);
97         }
98         if (!label) {
99                 label = "(null)";
100         }
101         if (!callerid) {
102                 callerid = "(null)";
103         }
104         if (!application) {
105                 application = "(null)";
106         }
107         if(!no_comp)
108         printf("Executed ast_add_extension2(con, rep=%d, exten=%s, priority=%d, label=%s, callerid=%s, appl=%s, data=%s, FREE, registrar=%s);\n",
109                 replace, extension, priority, label, callerid, application, (data?(char*)data:"(null)"), registrar);
110
111         /* since add_extension2 is responsible for the malloc'd data stuff */
112         if( data )
113                 free(data);
114         return 0;
115 }
116
117 void pbx_builtin_setvar(void *chan, void *data)
118 {
119         if(!no_comp)
120         printf("Executed pbx_builtin_setvar(chan, data=%s);\n", (char*)data);
121 }
122         
123
124 void ast_context_create(void **extcontexts, const char *name, const char *registrar)
125 {
126         if(!no_comp)
127         printf("Executed ast_context_create(conts, name=%s, registrar=%s);\n", name, registrar);
128         conts++;
129 }
130
131 void ast_context_add_ignorepat2(void *con, const char *value, const char *registrar)
132 {
133         if(!no_comp)
134         printf("Executed ast_context_add_ignorepat2(con, value=%s, registrar=%s);\n", value, registrar);
135 }
136
137 void ast_context_add_include2(void *con, const char *value, const char *registrar)
138 {
139         if(!no_comp)
140         printf("Executed ast_context_add_include2(con, value=%s, registrar=%s);\n", value, registrar);
141 }
142
143 void ast_context_add_switch2(void *con, const char *value, const char *data, int eval, const char *registrar)
144 {
145         if(!no_comp)
146         printf("Executed ast_context_add_switch2(con, value=%s, data=%s, eval=%d, registrar=%s);\n", value, data, eval, registrar);
147 }
148
149 void ast_merge_contexts_and_delete(void)
150 {
151         if(!no_comp)
152         printf("Executed ast_merge_contexts_and_delete();\n");
153 }
154
155 void ast_context_verify_includes(void)
156 {
157         if(!no_comp)
158         printf("Executed ast_context_verify_includes();\n");
159 }
160
161 struct ast_context * ast_walk_contexts(void)
162 {
163         if(!no_comp)
164         printf("Executed ast_walk_contexts();\n");
165         return 0;
166 }
167
168 void ast_cli_unregister_multiple(void)
169 {
170         if(!no_comp)
171         printf("Executed ast_cli_unregister_multiple();\n");
172 }
173
174 void ast_context_destroy(void)
175 {
176         printf("Executed ast_context_destroy();\n");
177 }
178
179 void ast_log(int level, const char *file, int line, const char *function, const char *fmt, ...)
180 {
181         va_list vars;
182         va_start(vars,fmt);
183
184         printf("LOG: lev:%d file:%s  line:%d func: %s  ",
185                    level, file, line, function);
186         vprintf(fmt, vars);
187         fflush(stdout);
188         va_end(vars);
189 }
190
191 void ast_verbose(const char *fmt, ...)
192 {
193         va_list vars;
194         va_start(vars,fmt);
195
196         printf("VERBOSE: ");
197         vprintf(fmt, vars);
198         fflush(stdout);
199         va_end(vars);
200 }
201
202 char *ast_process_quotes_and_slashes(char *start, char find, char replace_with)
203 {
204         char *dataPut = start;
205         int inEscape = 0;
206         int inQuotes = 0;
207
208         for (; *start; start++) {
209                 if (inEscape) {
210                         *dataPut++ = *start;       /* Always goes verbatim */
211                         inEscape = 0;
212                 } else {
213                         if (*start == '\\') {
214                                 inEscape = 1;      /* Do not copy \ into the data */
215                         } else if (*start == '\'') {
216                                 inQuotes = 1-inQuotes;   /* Do not copy ' into the data */
217                         } else {
218                                 /* Replace , with |, unless in quotes */
219                                 *dataPut++ = inQuotes ? *start : ((*start==find) ? replace_with : *start);
220                         }
221                 }
222         }
223         if (start != dataPut)
224                 *dataPut = 0;
225         return dataPut;
226 }
227
228 extern struct module_symbols mod_data;
229
230
231 int main(int argc, char **argv)
232 {
233         int i;
234         
235         for(i=1;i<argc;i++)
236         {
237                 if( argv[i][0] == '-' && argv[i][1] == 'n' )
238                         no_comp =1;
239                 if( argv[i][0] == '-' && argv[i][1] == 'd' )
240                         use_curr_dir =1;
241         }
242         
243                 
244         if( !no_comp )
245                 printf("\n(You can use the -n option if you aren't interested in seeing all the instructions generated by the compiler)\n\n");
246         if( !use_curr_dir )
247                 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");
248         
249         if( use_curr_dir )
250         {
251                 strcpy(ast_config_AST_CONFIG_DIR, ".");
252         }
253         else
254         {
255                 strcpy(ast_config_AST_CONFIG_DIR, "/etc/asterisk");
256         }
257         strcpy(ast_config_AST_VAR_DIR, "/var/lib/asterisk");
258         
259         mod_data.load_module(0);
260         
261         ast_log(4, "ael2_parse", __LINE__, "main", "%d contexts, %d extensions, %d priorities\n", conts, extens, priors);
262         
263     return 0;
264 }