Merged revisions 89534 via svnmerge from
[asterisk/asterisk.git] / res / res_config_odbc.c
1 /*
2  * Asterisk -- An open source telephony toolkit.
3  *
4  * Copyright (C) 1999 - 2005, Digium, Inc.
5  *
6  * Mark Spencer <markster@digium.com>
7  *
8  * Copyright (C) 2004 - 2005 Anthony Minessale II <anthmct@yahoo.com>
9  *
10  * See http://www.asterisk.org for more information about
11  * the Asterisk project. Please do not directly contact
12  * any of the maintainers of this project for assistance;
13  * the project provides a web site, mailing lists and IRC
14  * channels for your use.
15  *
16  * This program is free software, distributed under the terms of
17  * the GNU General Public License Version 2. See the LICENSE file
18  * at the top of the source tree.
19  */
20
21 /*! \file
22  *
23  * \brief odbc+odbc plugin for portable configuration engine
24  *
25  * \author Mark Spencer <markster@digium.com>
26  * \author Anthony Minessale II <anthmct@yahoo.com>
27  *
28  * \arg http://www.unixodbc.org
29  */
30
31 /*** MODULEINFO
32         <depend>unixodbc</depend>
33         <depend>ltdl</depend>
34         <depend>res_odbc</depend>
35  ***/
36
37 #include "asterisk.h"
38
39 ASTERISK_FILE_VERSION(__FILE__, "$Revision$")
40
41 #include "asterisk/file.h"
42 #include "asterisk/channel.h"
43 #include "asterisk/pbx.h"
44 #include "asterisk/config.h"
45 #include "asterisk/module.h"
46 #include "asterisk/lock.h"
47 #include "asterisk/res_odbc.h"
48 #include "asterisk/utils.h"
49
50 struct custom_prepare_struct {
51         const char *sql;
52         const char *extra;
53         va_list ap;
54 };
55
56 static SQLHSTMT custom_prepare(struct odbc_obj *obj, void *data)
57 {
58         int res, x = 1;
59         struct custom_prepare_struct *cps = data;
60         const char *newparam, *newval;
61         SQLHSTMT stmt;
62         va_list ap;
63
64         va_copy(ap, cps->ap);
65
66         res = SQLAllocHandle(SQL_HANDLE_STMT, obj->con, &stmt);
67         if ((res != SQL_SUCCESS) && (res != SQL_SUCCESS_WITH_INFO)) {
68                 ast_log(LOG_WARNING, "SQL Alloc Handle failed!\n");
69                 return NULL;
70         }
71
72         res = SQLPrepare(stmt, (unsigned char *)cps->sql, SQL_NTS);
73         if ((res != SQL_SUCCESS) && (res != SQL_SUCCESS_WITH_INFO)) {
74                 ast_log(LOG_WARNING, "SQL Prepare failed![%s]\n", cps->sql);
75                 SQLFreeHandle (SQL_HANDLE_STMT, stmt);
76                 return NULL;
77         }
78
79         while ((newparam = va_arg(ap, const char *))) {
80                 newval = va_arg(ap, const char *);
81                 SQLBindParameter(stmt, x++, SQL_PARAM_INPUT, SQL_C_CHAR, SQL_CHAR, strlen(newval), 0, (void *)newval, 0, NULL);
82         }
83         va_end(ap);
84
85         if (!ast_strlen_zero(cps->extra))
86                 SQLBindParameter(stmt, x++, SQL_PARAM_INPUT, SQL_C_CHAR, SQL_CHAR, strlen(cps->extra), 0, (void *)cps->extra, 0, NULL);
87         return stmt;
88 }
89
90 /*!
91  * \brief Excute an SQL query and return ast_variable list
92  * \param database
93  * \param table
94  * \param ap list containing one or more field/operator/value set.
95  *
96  * Select database and preform query on table, prepare the sql statement
97  * Sub-in the values to the prepared statement and execute it. Return results
98  * as a ast_variable list.
99  *
100  * \retval var on success
101  * \retval NULL on failure
102 */
103 static struct ast_variable *realtime_odbc(const char *database, const char *table, va_list ap)
104 {
105         struct odbc_obj *obj;
106         SQLHSTMT stmt;
107         char sql[1024];
108         char coltitle[256];
109         char rowdata[2048];
110         char *op;
111         const char *newparam, *newval;
112         char *stringp;
113         char *chunk;
114         SQLSMALLINT collen;
115         int res;
116         int x;
117         struct ast_variable *var=NULL, *prev=NULL;
118         SQLULEN colsize;
119         SQLSMALLINT colcount=0;
120         SQLSMALLINT datatype;
121         SQLSMALLINT decimaldigits;
122         SQLSMALLINT nullable;
123         SQLLEN indicator;
124         va_list aq;
125         struct custom_prepare_struct cps = { .sql = sql };
126
127         va_copy(cps.ap, ap);
128         va_copy(aq, ap);
129
130         if (!table)
131                 return NULL;
132
133         obj = ast_odbc_request_obj(database, 0);
134
135         if (!obj) {
136                 ast_log(LOG_ERROR, "No database handle available with the name of '%s' (check res_odbc.conf)\n", database);
137                 return NULL;
138         }
139
140         newparam = va_arg(aq, const char *);
141         if (!newparam)
142                 return NULL;
143         newval = va_arg(aq, const char *);
144         op = !strchr(newparam, ' ') ? " =" : "";
145         snprintf(sql, sizeof(sql), "SELECT * FROM %s WHERE %s%s ?", table, newparam, op);
146         while((newparam = va_arg(aq, const char *))) {
147                 op = !strchr(newparam, ' ') ? " =" : "";
148                 snprintf(sql + strlen(sql), sizeof(sql) - strlen(sql), " AND %s%s ?%s", newparam, op,
149                         strcasestr(newparam, "LIKE") ? " ESCAPE '\\'" : "");
150                 newval = va_arg(aq, const char *);
151         }
152         va_end(aq);
153
154         stmt = ast_odbc_prepare_and_execute(obj, custom_prepare, &cps);
155
156         if (!stmt) {
157                 ast_odbc_release_obj(obj);
158                 return NULL;
159         }
160
161         res = SQLNumResultCols(stmt, &colcount);
162         if ((res != SQL_SUCCESS) && (res != SQL_SUCCESS_WITH_INFO)) {
163                 ast_log(LOG_WARNING, "SQL Column Count error!\n[%s]\n\n", sql);
164                 SQLFreeHandle (SQL_HANDLE_STMT, stmt);
165                 ast_odbc_release_obj(obj);
166                 return NULL;
167         }
168
169         res = SQLFetch(stmt);
170         if (res == SQL_NO_DATA) {
171                 SQLFreeHandle (SQL_HANDLE_STMT, stmt);
172                 ast_odbc_release_obj(obj);
173                 return NULL;
174         }
175         if ((res != SQL_SUCCESS) && (res != SQL_SUCCESS_WITH_INFO)) {
176                 ast_log(LOG_WARNING, "SQL Fetch error!\n[%s]\n\n", sql);
177                 SQLFreeHandle (SQL_HANDLE_STMT, stmt);
178                 ast_odbc_release_obj(obj);
179                 return NULL;
180         }
181         for (x = 0; x < colcount; x++) {
182                 rowdata[0] = '\0';
183                 collen = sizeof(coltitle);
184                 res = SQLDescribeCol(stmt, x + 1, (unsigned char *)coltitle, sizeof(coltitle), &collen, 
185                                         &datatype, &colsize, &decimaldigits, &nullable);
186                 if ((res != SQL_SUCCESS) && (res != SQL_SUCCESS_WITH_INFO)) {
187                         ast_log(LOG_WARNING, "SQL Describe Column error!\n[%s]\n\n", sql);
188                         if (var)
189                                 ast_variables_destroy(var);
190                         ast_odbc_release_obj(obj);
191                         return NULL;
192                 }
193
194                 indicator = 0;
195                 res = SQLGetData(stmt, x + 1, SQL_CHAR, rowdata, sizeof(rowdata), &indicator);
196                 if (indicator == SQL_NULL_DATA)
197                         rowdata[0] = '\0';
198                 else if (ast_strlen_zero(rowdata)) {
199                         /* Because we encode the empty string for a NULL, we will encode
200                          * actual empty strings as a string containing a single whitespace. */
201                         ast_copy_string(rowdata, " ", sizeof(rowdata));
202                 }
203
204                 if ((res != SQL_SUCCESS) && (res != SQL_SUCCESS_WITH_INFO)) {
205                         ast_log(LOG_WARNING, "SQL Get Data error!\n[%s]\n\n", sql);
206                         if (var)
207                                 ast_variables_destroy(var);
208                         ast_odbc_release_obj(obj);
209                         return NULL;
210                 }
211                 stringp = rowdata;
212                 while(stringp) {
213                         chunk = strsep(&stringp, ";");
214                         if (!ast_strlen_zero(ast_strip(chunk))) {
215                                 if (prev) {
216                                         prev->next = ast_variable_new(coltitle, chunk, "");
217                                         if (prev->next)
218                                                 prev = prev->next;
219                                 } else 
220                                         prev = var = ast_variable_new(coltitle, chunk, "");
221                         }
222                 }
223         }
224
225
226         SQLFreeHandle(SQL_HANDLE_STMT, stmt);
227         ast_odbc_release_obj(obj);
228         return var;
229 }
230
231 /*!
232  * \brief Excute an Select query and return ast_config list
233  * \param database
234  * \param table
235  * \param ap list containing one or more field/operator/value set.
236  *
237  * Select database and preform query on table, prepare the sql statement
238  * Sub-in the values to the prepared statement and execute it. 
239  * Execute this prepared query against several ODBC connected databases.
240  * Return results as an ast_config variable.
241  *
242  * \retval var on success
243  * \retval NULL on failure
244 */
245 static struct ast_config *realtime_multi_odbc(const char *database, const char *table, va_list ap)
246 {
247         struct odbc_obj *obj;
248         SQLHSTMT stmt;
249         char sql[1024];
250         char coltitle[256];
251         char rowdata[2048];
252         const char *initfield=NULL;
253         char *op;
254         const char *newparam, *newval;
255         char *stringp;
256         char *chunk;
257         SQLSMALLINT collen;
258         int res;
259         int x;
260         struct ast_variable *var=NULL;
261         struct ast_config *cfg=NULL;
262         struct ast_category *cat=NULL;
263         SQLULEN colsize;
264         SQLSMALLINT colcount=0;
265         SQLSMALLINT datatype;
266         SQLSMALLINT decimaldigits;
267         SQLSMALLINT nullable;
268         SQLLEN indicator;
269         struct custom_prepare_struct cps = { .sql = sql };
270         va_list aq;
271
272         va_copy(cps.ap, ap);
273         va_copy(aq, ap);
274
275         if (!table)
276                 return NULL;
277
278         obj = ast_odbc_request_obj(database, 0);
279         if (!obj)
280                 return NULL;
281
282         newparam = va_arg(aq, const char *);
283         if (!newparam)  {
284                 ast_odbc_release_obj(obj);
285                 return NULL;
286         }
287         initfield = ast_strdupa(newparam);
288         if ((op = strchr(initfield, ' '))) 
289                 *op = '\0';
290         newval = va_arg(aq, const char *);
291         op = !strchr(newparam, ' ') ? " =" : "";
292         snprintf(sql, sizeof(sql), "SELECT * FROM %s WHERE %s%s ?%s", table, newparam, op,
293                 strcasestr(newparam, "LIKE") ? " ESCAPE '\\'" : "");
294         while((newparam = va_arg(aq, const char *))) {
295                 op = !strchr(newparam, ' ') ? " =" : "";
296                 snprintf(sql + strlen(sql), sizeof(sql) - strlen(sql), " AND %s%s ?%s", newparam, op,
297                         strcasestr(newparam, "LIKE") ? " ESCAPE '\\'" : "");
298                 newval = va_arg(aq, const char *);
299         }
300         if (initfield)
301                 snprintf(sql + strlen(sql), sizeof(sql) - strlen(sql), " ORDER BY %s", initfield);
302         va_end(aq);
303
304         stmt = ast_odbc_prepare_and_execute(obj, custom_prepare, &cps);
305
306         if (!stmt) {
307                 ast_odbc_release_obj(obj);
308                 return NULL;
309         }
310
311         res = SQLNumResultCols(stmt, &colcount);
312         if ((res != SQL_SUCCESS) && (res != SQL_SUCCESS_WITH_INFO)) {
313                 ast_log(LOG_WARNING, "SQL Column Count error!\n[%s]\n\n", sql);
314                 SQLFreeHandle(SQL_HANDLE_STMT, stmt);
315                 ast_odbc_release_obj(obj);
316                 return NULL;
317         }
318
319         cfg = ast_config_new();
320         if (!cfg) {
321                 ast_log(LOG_WARNING, "Out of memory!\n");
322                 SQLFreeHandle(SQL_HANDLE_STMT, stmt);
323                 ast_odbc_release_obj(obj);
324                 return NULL;
325         }
326
327         while ((res=SQLFetch(stmt)) != SQL_NO_DATA) {
328                 var = NULL;
329                 if ((res != SQL_SUCCESS) && (res != SQL_SUCCESS_WITH_INFO)) {
330                         ast_log(LOG_WARNING, "SQL Fetch error!\n[%s]\n\n", sql);
331                         continue;
332                 }
333                 cat = ast_category_new("","",99999);
334                 if (!cat) {
335                         ast_log(LOG_WARNING, "Out of memory!\n");
336                         continue;
337                 }
338                 for (x=0;x<colcount;x++) {
339                         rowdata[0] = '\0';
340                         collen = sizeof(coltitle);
341                         res = SQLDescribeCol(stmt, x + 1, (unsigned char *)coltitle, sizeof(coltitle), &collen, 
342                                                 &datatype, &colsize, &decimaldigits, &nullable);
343                         if ((res != SQL_SUCCESS) && (res != SQL_SUCCESS_WITH_INFO)) {
344                                 ast_log(LOG_WARNING, "SQL Describe Column error!\n[%s]\n\n", sql);
345                                 ast_category_destroy(cat);
346                                 continue;
347                         }
348
349                         indicator = 0;
350                         res = SQLGetData(stmt, x + 1, SQL_CHAR, rowdata, sizeof(rowdata), &indicator);
351                         if (indicator == SQL_NULL_DATA)
352                                 continue;
353
354                         if ((res != SQL_SUCCESS) && (res != SQL_SUCCESS_WITH_INFO)) {
355                                 ast_log(LOG_WARNING, "SQL Get Data error!\n[%s]\n\n", sql);
356                                 ast_category_destroy(cat);
357                                 continue;
358                         }
359                         stringp = rowdata;
360                         while(stringp) {
361                                 chunk = strsep(&stringp, ";");
362                                 if (!ast_strlen_zero(ast_strip(chunk))) {
363                                         if (initfield && !strcmp(initfield, coltitle))
364                                                 ast_category_rename(cat, chunk);
365                                         var = ast_variable_new(coltitle, chunk, "");
366                                         ast_variable_append(cat, var);
367                                 }
368                         }
369                 }
370                 ast_category_append(cfg, cat);
371         }
372
373         SQLFreeHandle(SQL_HANDLE_STMT, stmt);
374         ast_odbc_release_obj(obj);
375         return cfg;
376 }
377
378 /*!
379  * \brief Excute an UPDATE query
380  * \param database
381  * \param table
382  * \param keyfield where clause field
383  * \param lookup value of field for where clause
384  * \param ap list containing one or more field/value set(s).
385  *
386  * Update a database table, prepare the sql statement using keyfield and lookup
387  * control the number of records to change. All values to be changed are stored in ap list.
388  * Sub-in the values to the prepared statement and execute it.
389  *
390  * \retval number of rows affected
391  * \retval -1 on failure
392 */
393 static int update_odbc(const char *database, const char *table, const char *keyfield, const char *lookup, va_list ap)
394 {
395         struct odbc_obj *obj;
396         SQLHSTMT stmt;
397         char sql[256];
398         SQLLEN rowcount=0;
399         const char *newparam, *newval;
400         int res;
401         va_list aq;
402         struct custom_prepare_struct cps = { .sql = sql, .extra = lookup };
403
404         va_copy(cps.ap, ap);
405         va_copy(aq, ap);
406         
407         if (!table)
408                 return -1;
409
410         obj = ast_odbc_request_obj(database, 0);
411         if (!obj)
412                 return -1;
413
414         newparam = va_arg(aq, const char *);
415         if (!newparam)  {
416                 ast_odbc_release_obj(obj);
417                 return -1;
418         }
419         newval = va_arg(aq, const char *);
420         snprintf(sql, sizeof(sql), "UPDATE %s SET %s=?", table, newparam);
421         while((newparam = va_arg(aq, const char *))) {
422                 snprintf(sql + strlen(sql), sizeof(sql) - strlen(sql), ", %s=?", newparam);
423                 newval = va_arg(aq, const char *);
424         }
425         va_end(aq);
426         snprintf(sql + strlen(sql), sizeof(sql) - strlen(sql), " WHERE %s=?", keyfield);
427
428         stmt = ast_odbc_prepare_and_execute(obj, custom_prepare, &cps);
429
430         if (!stmt) {
431                 ast_odbc_release_obj(obj);
432                 return -1;
433         }
434
435         res = SQLRowCount(stmt, &rowcount);
436         SQLFreeHandle (SQL_HANDLE_STMT, stmt);
437         ast_odbc_release_obj(obj);
438
439         if ((res != SQL_SUCCESS) && (res != SQL_SUCCESS_WITH_INFO)) {
440                 ast_log(LOG_WARNING, "SQL Row Count error!\n[%s]\n\n", sql);
441                 return -1;
442         }
443
444         if (rowcount >= 0)
445                 return (int)rowcount;
446
447         return -1;
448 }
449
450 /*!
451  * \brief Excute an INSERT query
452  * \param database
453  * \param table
454  * \param ap list containing one or more field/value set(s)
455  *
456  * Insert a new record into database table, prepare the sql statement.
457  * All values to be changed are stored in ap list.
458  * Sub-in the values to the prepared statement and execute it.
459  *
460  * \retval number of rows affected
461  * \retval -1 on failure
462 */
463 static int store_odbc(const char *database, const char *table, va_list ap)
464 {
465         struct odbc_obj *obj;
466         SQLHSTMT stmt;
467         char sql[256];
468         char keys[256];
469         char vals[256];
470         SQLLEN rowcount=0;
471         const char *newparam, *newval;
472         int res;
473         va_list aq;
474         struct custom_prepare_struct cps = { .sql = sql, .extra = NULL };
475
476         va_copy(cps.ap, ap);
477         va_copy(aq, ap);
478         
479         if (!table)
480                 return -1;
481
482         obj = ast_odbc_request_obj(database, 0);
483         if (!obj)
484                 return -1;
485
486         newparam = va_arg(aq, const char *);
487         if (!newparam)  {
488                 ast_odbc_release_obj(obj);
489                 return -1;
490         }
491         newval = va_arg(aq, const char *);
492         snprintf(keys, sizeof(keys), "%s", newparam);
493         ast_copy_string(vals, "?", sizeof(vals));
494         while ((newparam = va_arg(aq, const char *))) {
495                 snprintf(keys + strlen(keys), sizeof(keys) - strlen(keys), ", %s", newparam);
496                 snprintf(vals + strlen(vals), sizeof(vals) - strlen(vals), ", ?");
497                 newval = va_arg(aq, const char *);
498         }
499         va_end(aq);
500         snprintf(sql, sizeof(sql), "INSERT INTO %s (%s) VALUES (%s)", table, keys, vals);
501
502         stmt = ast_odbc_prepare_and_execute(obj, custom_prepare, &cps);
503
504         if (!stmt) {
505                 ast_odbc_release_obj(obj);
506                 return -1;
507         }
508
509         res = SQLRowCount(stmt, &rowcount);
510         SQLFreeHandle (SQL_HANDLE_STMT, stmt);
511         ast_odbc_release_obj(obj);
512
513         if ((res != SQL_SUCCESS) && (res != SQL_SUCCESS_WITH_INFO)) {
514                 ast_log(LOG_WARNING, "SQL Row Count error!\n[%s]\n\n", sql);
515                 return -1;
516         }
517
518         if (rowcount >= 0)
519                 return (int)rowcount;
520
521         return -1;
522 }
523
524 /*!
525  * \brief Excute an DELETE query
526  * \param database
527  * \param table
528  * \param keyfield where clause field
529  * \param lookup value of field for where clause
530  * \param ap list containing one or more field/value set(s)
531  *
532  * Delete a row from a database table, prepare the sql statement using keyfield and lookup
533  * control the number of records to change. Additional params to match rows are stored in ap list.
534  * Sub-in the values to the prepared statement and execute it.
535  *
536  * \retval number of rows affected
537  * \retval -1 on failure
538 */
539 static int destroy_odbc(const char *database, const char *table, const char *keyfield, const char *lookup, va_list ap)
540 {
541         struct odbc_obj *obj;
542         SQLHSTMT stmt;
543         char sql[256];
544         SQLLEN rowcount=0;
545         const char *newparam, *newval;
546         int res;
547         va_list aq;
548         struct custom_prepare_struct cps = { .sql = sql, .extra = lookup };
549
550         va_copy(cps.ap, ap);
551         va_copy(aq, ap);
552         
553         if (!table)
554                 return -1;
555
556         obj = ast_odbc_request_obj(database, 0);
557         if (!obj)
558                 return -1;
559
560         snprintf(sql, sizeof(sql), "DELETE FROM %s WHERE ", table);
561         while((newparam = va_arg(aq, const char *))) {
562                 snprintf(sql + strlen(sql), sizeof(sql) - strlen(sql), "%s=? AND ", newparam);
563                 newval = va_arg(aq, const char *);
564         }
565         va_end(aq);
566         snprintf(sql + strlen(sql), sizeof(sql) - strlen(sql), "%s=?", keyfield);
567
568         stmt = ast_odbc_prepare_and_execute(obj, custom_prepare, &cps);
569
570         if (!stmt) {
571                 ast_odbc_release_obj(obj);
572                 return -1;
573         }
574
575         res = SQLRowCount(stmt, &rowcount);
576         SQLFreeHandle (SQL_HANDLE_STMT, stmt);
577         ast_odbc_release_obj(obj);
578
579         if ((res != SQL_SUCCESS) && (res != SQL_SUCCESS_WITH_INFO)) {
580                 ast_log(LOG_WARNING, "SQL Row Count error!\n[%s]\n\n", sql);
581                 return -1;
582         }
583
584         if (rowcount >= 0)
585                 return (int)rowcount;
586
587         return -1;
588 }
589
590
591 struct config_odbc_obj {
592         char *sql;
593         unsigned long cat_metric;
594         char category[128];
595         char var_name[128];
596         char var_val[1024]; /* changed from 128 to 1024 via bug 8251 */
597         SQLLEN err;
598 };
599
600 static SQLHSTMT config_odbc_prepare(struct odbc_obj *obj, void *data)
601 {
602         struct config_odbc_obj *q = data;
603         SQLHSTMT sth;
604         int res;
605
606         res = SQLAllocHandle(SQL_HANDLE_STMT, obj->con, &sth);
607         if ((res != SQL_SUCCESS) && (res != SQL_SUCCESS_WITH_INFO)) {
608                 ast_verb(4, "Failure in AllocStatement %d\n", res);
609                 return NULL;
610         }
611
612         res = SQLPrepare(sth, (unsigned char *)q->sql, SQL_NTS);
613         if ((res != SQL_SUCCESS) && (res != SQL_SUCCESS_WITH_INFO)) {
614                 ast_verb(4, "Error in PREPARE %d\n", res);
615                 SQLFreeHandle(SQL_HANDLE_STMT, sth);
616                 return NULL;
617         }
618
619         SQLBindCol(sth, 1, SQL_C_ULONG, &q->cat_metric, sizeof(q->cat_metric), &q->err);
620         SQLBindCol(sth, 2, SQL_C_CHAR, q->category, sizeof(q->category), &q->err);
621         SQLBindCol(sth, 3, SQL_C_CHAR, q->var_name, sizeof(q->var_name), &q->err);
622         SQLBindCol(sth, 4, SQL_C_CHAR, q->var_val, sizeof(q->var_val), &q->err);
623
624         return sth;
625 }
626
627 static struct ast_config *config_odbc(const char *database, const char *table, const char *file, struct ast_config *cfg, struct ast_flags flags, const char *sugg_incl)
628 {
629         struct ast_variable *new_v;
630         struct ast_category *cur_cat;
631         int res = 0;
632         struct odbc_obj *obj;
633         char sqlbuf[1024] = "";
634         char *sql = sqlbuf;
635         size_t sqlleft = sizeof(sqlbuf);
636         unsigned int last_cat_metric = 0;
637         SQLSMALLINT rowcount = 0;
638         SQLHSTMT stmt;
639         char last[128] = "";
640         struct config_odbc_obj q;
641         struct ast_flags loader_flags = { 0 };
642
643         memset(&q, 0, sizeof(q));
644
645         if (!file || !strcmp (file, "res_config_odbc.conf"))
646                 return NULL;            /* cant configure myself with myself ! */
647
648         obj = ast_odbc_request_obj(database, 0);
649         if (!obj)
650                 return NULL;
651
652         ast_build_string(&sql, &sqlleft, "SELECT cat_metric, category, var_name, var_val FROM %s ", table);
653         ast_build_string(&sql, &sqlleft, "WHERE filename='%s' AND commented=0 ", file);
654         ast_build_string(&sql, &sqlleft, "ORDER BY cat_metric DESC, var_metric ASC, category, var_name ");
655         q.sql = sqlbuf;
656
657         stmt = ast_odbc_prepare_and_execute(obj, config_odbc_prepare, &q);
658
659         if (!stmt) {
660                 ast_log(LOG_WARNING, "SQL select error!\n[%s]\n\n", sql);
661                 ast_odbc_release_obj(obj);
662                 return NULL;
663         }
664
665         res = SQLNumResultCols(stmt, &rowcount);
666
667         if ((res != SQL_SUCCESS) && (res != SQL_SUCCESS_WITH_INFO)) {
668                 ast_log(LOG_WARNING, "SQL NumResultCols error!\n[%s]\n\n", sql);
669                 SQLFreeHandle(SQL_HANDLE_STMT, stmt);
670                 ast_odbc_release_obj(obj);
671                 return NULL;
672         }
673
674         if (!rowcount) {
675                 ast_log(LOG_NOTICE, "found nothing\n");
676                 ast_odbc_release_obj(obj);
677                 return cfg;
678         }
679
680         cur_cat = ast_config_get_current_category(cfg);
681
682         while ((res = SQLFetch(stmt)) != SQL_NO_DATA) {
683                 if (!strcmp (q.var_name, "#include")) {
684                         if (!ast_config_internal_load(q.var_val, cfg, loader_flags, "")) {
685                                 SQLFreeHandle(SQL_HANDLE_STMT, stmt);
686                                 ast_odbc_release_obj(obj);
687                                 return NULL;
688                         }
689                         continue;
690                 } 
691                 if (strcmp(last, q.category) || last_cat_metric != q.cat_metric) {
692                         cur_cat = ast_category_new(q.category, "", 99999);
693                         if (!cur_cat) {
694                                 ast_log(LOG_WARNING, "Out of memory!\n");
695                                 break;
696                         }
697                         strcpy(last, q.category);
698                         last_cat_metric = q.cat_metric;
699                         ast_category_append(cfg, cur_cat);
700                 }
701
702                 new_v = ast_variable_new(q.var_name, q.var_val, "");
703                 ast_variable_append(cur_cat, new_v);
704         }
705
706         SQLFreeHandle(SQL_HANDLE_STMT, stmt);
707         ast_odbc_release_obj(obj);
708         return cfg;
709 }
710
711 static struct ast_config_engine odbc_engine = {
712         .name = "odbc",
713         .load_func = config_odbc,
714         .realtime_func = realtime_odbc,
715         .realtime_multi_func = realtime_multi_odbc,
716         .store_func = store_odbc,
717         .destroy_func = destroy_odbc,
718         .update_func = update_odbc
719 };
720
721 static int unload_module (void)
722 {
723         ast_config_engine_deregister(&odbc_engine);
724         ast_verb(1, "res_config_odbc unloaded.\n");
725         return 0;
726 }
727
728 static int load_module (void)
729 {
730         ast_config_engine_register(&odbc_engine);
731         ast_verb(1, "res_config_odbc loaded.\n");
732         return 0;
733 }
734
735 AST_MODULE_INFO(ASTERISK_GPL_KEY, AST_MODFLAG_GLOBAL_SYMBOLS, "Realtime ODBC configuration",
736                 .load = load_module,
737                 .unload = unload_module,
738                 );