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