3faff62e2bfff1badcd2589eff82db17c3bba0ca
[asterisk/asterisk.git] / res / res_config_sqlite.c
1 /*
2  * Asterisk -- An open source telephony toolkit.
3  *
4  * Copyright (C) 2006, Proformatique
5  *
6  * Written by Richard Braun <rbraun@proformatique.com>
7  *
8  * Based on res_sqlite3 by Anthony Minessale II,
9  * and res_config_mysql by Matthew Boehm
10  *
11  * See http://www.asterisk.org for more information about
12  * the Asterisk project. Please do not directly contact
13  * any of the maintainers of this project for assistance;
14  * the project provides a web site, mailing lists and IRC
15  * channels for your use.
16  *
17  * This program is free software, distributed under the terms of
18  * the GNU General Public License Version 2. See the LICENSE file
19  * at the top of the source tree.
20  */
21
22 /*!
23  * \page res_config_sqlite
24  *
25  * \section intro_sec Presentation
26  *
27  * res_config_sqlite is a module for the Asterisk Open Source PBX to
28  * support SQLite 2 databases. It can be used to fetch configuration
29  * from a database (static configuration files and/or using the Asterisk
30  * RealTime Architecture - ARA).  It can also be used to log CDR entries. 
31  * Note that Asterisk already comes with a module named cdr_sqlite.
32  * There are two reasons for including it in res_config_sqlite:
33  * the first is that rewriting it was a training to learn how to write a
34  * simple module for Asterisk, the other is to have the same database open for
35  * all kinds of operations, which improves reliability and performance.
36  *
37  * \section conf_sec Configuration
38  *
39  * The main configuration file is res_config_sqlite.conf. It must be readable or
40  * res_config_sqlite will fail to start. It is suggested to use the sample file
41  * in this package as a starting point. The file has only one section
42  * named <code>general</code>. Here are the supported parameters :
43  *
44  * <dl>
45  *      <dt><code>dbfile</code></dt>
46  *      <dd>The absolute path to the SQLite database (the file can be non existent,
47  *                      res_config_sqlite will create it if it has the appropriate rights)</dd>
48  *      <dt><code>config_table</code></dt>
49  *      <dd>The table used for static configuration</dd>
50  *      <dt><code>cdr_table</code></dt>
51  *      <dd>The table used to store CDR entries (if ommitted, CDR support is
52  *                      disabled)</dd>
53  * </dl>
54  *
55  * To use res_config_sqlite for static and/or RealTime configuration, refer to the
56  * Asterisk documentation. The file tables.sql can be used to create the
57  * needed tables.
58  *
59  * \section status_sec Driver status
60  *
61  * The CLI command <code>show sqlite status</code> returns status information
62  * about the running driver.
63  *
64  * \section credits_sec Credits
65  *
66  * res_config_sqlite was developed by Richard Braun at the Proformatique company.
67  */
68
69 /*!
70  * \file
71  * \brief res_config_sqlite module.
72  */
73
74 /*** MODULEINFO
75         <depend>sqlite</depend>
76  ***/
77
78 #include "asterisk.h"
79 ASTERISK_FILE_VERSION(__FILE__, "$Revision$")
80
81 #include <sqlite.h>
82
83 #include "asterisk/pbx.h"
84 #include "asterisk/cdr.h"
85 #include "asterisk/cli.h"
86 #include "asterisk/lock.h"
87 #include "asterisk/config.h"
88 #include "asterisk/module.h"
89 #include "asterisk/linkedlists.h"
90
91 #define MACRO_BEGIN     do {
92 #define MACRO_END       } while (0)
93
94 #define RES_CONFIG_SQLITE_NAME "res_config_sqlite"
95 #define RES_CONFIG_SQLITE_DRIVER "sqlite"
96 #define RES_CONFIG_SQLITE_DESCRIPTION "Resource Module for SQLite 2"
97 #define RES_CONFIG_SQLITE_CONF_FILE "res_config_sqlite.conf"
98
99 enum {
100         RES_CONFIG_SQLITE_CONFIG_ID,
101         RES_CONFIG_SQLITE_CONFIG_CAT_METRIC,
102         RES_CONFIG_SQLITE_CONFIG_VAR_METRIC,
103         RES_CONFIG_SQLITE_CONFIG_COMMENTED,
104         RES_CONFIG_SQLITE_CONFIG_FILENAME,
105         RES_CONFIG_SQLITE_CONFIG_CATEGORY,
106         RES_CONFIG_SQLITE_CONFIG_VAR_NAME,
107         RES_CONFIG_SQLITE_CONFIG_VAR_VAL,
108         RES_CONFIG_SQLITE_CONFIG_COLUMNS,
109 };
110
111 #define SET_VAR(config, to, from)                       \
112 MACRO_BEGIN                                             \
113         int __error;                                    \
114                                                         \
115         __error = set_var(&to, #to, from->value);       \
116                                                         \
117         if (__error) {                                  \
118                 ast_config_destroy(config);             \
119                 unload_config();                        \
120                 return 1;                               \
121         }                                               \
122 MACRO_END
123
124 /*!
125  * Maximum number of loops before giving up executing a query. Calls to
126  * sqlite_xxx() functions which can return SQLITE_BUSY or SQLITE_LOCKED
127  * are enclosed by RES_CONFIG_SQLITE_BEGIN and RES_CONFIG_SQLITE_END, e.g.
128  * <pre>
129  * char *errormsg;
130  * int error;
131  *
132  * RES_CONFIG_SQLITE_BEGIN
133  *       error = sqlite_exec(db, query, NULL, NULL, &errormsg);
134  * RES_CONFIG_SQLITE_END(error)
135  *
136  * if (error)
137  *       ...;
138  * </pre>
139  */
140 #define RES_CONFIG_SQLITE_MAX_LOOPS 10
141
142 /*!
143  * Macro used before executing a query.
144  *
145  * \see RES_CONFIG_SQLITE_MAX_LOOPS.
146  */
147 #define RES_CONFIG_SQLITE_BEGIN                                         \
148 MACRO_BEGIN                                                             \
149         int __i;                                                        \
150                                                                         \
151         for (__i = 0; __i < RES_CONFIG_SQLITE_MAX_LOOPS; __i++) {
152
153 /*!
154  * Macro used after executing a query.
155  *
156  * \see RES_CONFIG_SQLITE_MAX_LOOPS.
157  */
158 #define RES_CONFIG_SQLITE_END(error)                                    \
159                 if (error != SQLITE_BUSY && error != SQLITE_LOCKED)     \
160                         break;                                          \
161                 usleep(1000);                                           \
162         }                                                               \
163 MACRO_END;
164
165 /*!
166  * Structure sent to the SQLite callback function for static configuration.
167  *
168  * \see add_cfg_entry()
169  */
170 struct cfg_entry_args {
171         struct ast_config *cfg;
172         struct ast_category *cat;
173         char *cat_name;
174         struct ast_flags flags;
175         const char *who_asked;
176 };
177
178 /*!
179  * Structure sent to the SQLite callback function for RealTime configuration.
180  *
181  * \see add_rt_cfg_entry()
182  */
183 struct rt_cfg_entry_args {
184         struct ast_variable *var;
185         struct ast_variable *last;
186 };
187
188 /*!
189  * Structure sent to the SQLite callback function for RealTime configuration
190  * (realtime_multi_handler()).
191  *
192  * \see add_rt_multi_cfg_entry()
193  */
194 struct rt_multi_cfg_entry_args {
195         struct ast_config *cfg;
196         char *initfield;
197 };
198
199 /*!
200  * \brief Allocate a variable.
201  * \param var the address of the variable to set (it will be allocated)
202  * \param name the name of the variable (for error handling)
203  * \param value the value to store in var
204  * \retval 0 on success
205  * \retval 1 if an allocation error occurred
206  */
207 static int set_var(char **var, const char *name, const char *value);
208
209 /*!
210  * \brief Load the configuration file.
211  * \see unload_config()
212  *
213  * This function sets dbfile, config_table, and cdr_table. It calls
214  * check_vars() before returning, and unload_config() if an error occurred.
215  *
216  * \retval 0 on success
217  * \retval 1 if an error occurred
218  */
219 static int load_config(void);
220
221 /*!
222  * \brief Free resources related to configuration.
223  * \see load_config()
224  */
225 static void unload_config(void);
226
227 /*!
228  * \brief Asterisk callback function for CDR support.
229  * \param cdr the CDR entry Asterisk sends us.
230  *
231  * Asterisk will call this function each time a CDR entry must be logged if
232  * CDR support is enabled.
233  *
234  * \retval 0 on success
235  * \retval 1 if an error occurred
236  */
237 static int cdr_handler(struct ast_cdr *cdr);
238
239 /*!
240  * \brief SQLite callback function for static configuration.
241  *
242  * This function is passed to the SQLite engine as a callback function to
243  * parse a row and store it in a struct ast_config object. It relies on
244  * resulting rows being sorted by category.
245  *
246  * \param arg a pointer to a struct cfg_entry_args object
247  * \param argc number of columns
248  * \param argv values in the row
249  * \param columnNames names and types of the columns
250  * \retval 0 on success
251  * \retval 1 if an error occurred
252  * \see cfg_entry_args
253  * \see sql_get_config_table
254  * \see config_handler()
255  */
256 static int add_cfg_entry(void *arg, int argc, char **argv, char **columnNames);
257
258 /*!
259  * \brief Asterisk callback function for static configuration.
260  *
261  * Asterisk will call this function when it loads its static configuration,
262  * which usually happens at startup and reload.
263  *
264  * \param database the database to use (ignored)
265  * \param table the table to use
266  * \param file the file to load from the database
267  * \param cfg the struct ast_config object to use when storing variables
268  * \param flags Optional flags.  Not used.
269  * \param suggested_incl suggest include.
270  * \retval cfg object
271  * \retval NULL if an error occurred
272  * \see add_cfg_entry()
273  */
274 static struct ast_config * config_handler(const char *database, const char *table, const char *file,
275         struct ast_config *cfg, struct ast_flags flags, const char *suggested_incl, const char *who_asked);
276
277 /*!
278  * \brief Helper function to parse a va_list object into 2 dynamic arrays of
279  * strings, parameters and values.
280  *
281  * ap must have the following format : param1 val1 param2 val2 param3 val3 ...
282  * arguments will be extracted to create 2 arrays:
283  *
284  * <ul>
285  *      <li>params : param1 param2 param3 ...</li>
286  *      <li>vals : val1 val2 val3 ...</li>
287  * </ul>
288  *
289  * The address of these arrays are stored in params_ptr and vals_ptr. It
290  * is the responsibility of the caller to release the memory of these arrays.
291  * It is considered an error that va_list has a null or odd number of strings.
292  *
293  * \param ap the va_list object to parse
294  * \param params_ptr where the address of the params array is stored
295  * \param vals_ptr where the address of the vals array is stored
296  * \retval the number of elements in the arrays (which have the same size).
297  * \retval 0 if an error occurred.
298  */
299 static size_t get_params(va_list ap, const char ***params_ptr,
300         const char ***vals_ptr);
301
302 /*!
303  * \brief SQLite callback function for RealTime configuration.
304  *
305  * This function is passed to the SQLite engine as a callback function to
306  * parse a row and store it in a linked list of struct ast_variable objects.
307  *
308  * \param arg a pointer to a struct rt_cfg_entry_args object
309  * \param argc number of columns
310  * \param argv values in the row
311  * \param columnNames names and types of the columns
312  * \retval 0 on success.
313  * \retval 1 if an error occurred.
314  * \see rt_cfg_entry_args
315  * \see realtime_handler()
316  */
317 static int add_rt_cfg_entry(void *arg, int argc, char **argv,
318         char **columnNames);
319
320 /*!
321  * \brief Asterisk callback function for RealTime configuration.
322  *
323  * Asterisk will call this function each time it requires a variable
324  * through the RealTime architecture. ap is a list of parameters and
325  * values used to find a specific row, e.g one parameter "name" and
326  * one value "123" so that the SQL query becomes <code>SELECT * FROM
327  * table WHERE name = '123';</code>.
328  *
329  * \param database the database to use (ignored)
330  * \param table the table to use
331  * \param ap list of parameters and values to match
332  *
333  * \retval a linked list of struct ast_variable objects
334  * \retval NULL if an error occurred
335  * \see add_rt_cfg_entry()
336  */
337 static struct ast_variable * realtime_handler(const char *database,
338         const char *table, va_list ap);
339
340 /*!
341  * \brief SQLite callback function for RealTime configuration.
342  *
343  * This function performs the same actions as add_rt_cfg_entry() except
344  * that the rt_multi_cfg_entry_args structure is designed to store
345  * categories in addition to variables.
346  *
347  * \param arg a pointer to a struct rt_multi_cfg_entry_args object
348  * \param argc number of columns
349  * \param argv values in the row
350  * \param columnNames names and types of the columns
351  * \retval 0 on success.
352  * \retval 1 if an error occurred.
353  * \see rt_multi_cfg_entry_args
354  * \see realtime_multi_handler()
355  */
356 static int add_rt_multi_cfg_entry(void *arg, int argc, char **argv,
357         char **columnNames);
358
359 /*!
360  * \brief Asterisk callback function for RealTime configuration.
361  *
362  * This function performs the same actions as realtime_handler() except
363  * that it can store variables per category, and can return several
364  * categories.
365  *
366  * \param database the database to use (ignored)
367  * \param table the table to use
368  * \param ap list of parameters and values to match
369  * \retval a struct ast_config object storing categories and variables.
370  * \retval NULL if an error occurred.
371  *
372  * \see add_rt_multi_cfg_entry()
373  */
374 static struct ast_config * realtime_multi_handler(const char *database,
375         const char *table, va_list ap);
376
377 /*!
378  * \brief Asterisk callback function for RealTime configuration (variable
379  * update).
380  *
381  * Asterisk will call this function each time a variable has been modified
382  * internally and must be updated in the backend engine. keyfield and entity
383  * are used to find the row to update, e.g. <code>UPDATE table SET ... WHERE
384  * keyfield = 'entity';</code>. ap is a list of parameters and values with the
385  * same format as the other realtime functions.
386  *
387  * \param database the database to use (ignored)
388  * \param table the table to use
389  * \param keyfield the column of the matching cell
390  * \param entity the value of the matching cell
391  * \param ap list of parameters and new values to update in the database
392  * \retval the number of affected rows.
393  * \retval -1 if an error occurred.
394  */
395 static int realtime_update_handler(const char *database, const char *table,
396         const char *keyfield, const char *entity, va_list ap);
397
398 /*!
399  * \brief Asterisk callback function for RealTime configuration (variable
400  * create/store).
401  *
402  * Asterisk will call this function each time a variable has been created
403  * internally and must be stored in the backend engine.
404  * are used to find the row to update, e.g. ap is a list of parameters and
405  * values with the same format as the other realtime functions.
406  *
407  * \param database the database to use (ignored)
408  * \param table the table to use
409  * \param ap list of parameters and new values to insert into the database
410  * \retval the rowid of inserted row.
411  * \retval -1 if an error occurred.
412  */
413 static int realtime_store_handler(const char *database, const char *table,
414         va_list ap);
415
416 /*!
417  * \brief Asterisk callback function for RealTime configuration (destroys
418  * variable).
419  *
420  * Asterisk will call this function each time a variable has been destroyed
421  * internally and must be removed from the backend engine. keyfield and entity
422  * are used to find the row to delete, e.g. <code>DELETE FROM table WHERE
423  * keyfield = 'entity';</code>. ap is a list of parameters and values with the
424  * same format as the other realtime functions.
425  *
426  * \param database the database to use (ignored)
427  * \param table the table to use
428  * \param keyfield the column of the matching cell
429  * \param entity the value of the matching cell
430  * \param ap list of additional parameters for cell matching
431  * \retval the number of affected rows.
432  * \retval -1 if an error occurred.
433  */
434 static int realtime_destroy_handler(const char *database, const char *table,
435         const char *keyfield, const char *entity, va_list ap);
436
437 /*!
438  * \brief Asterisk callback function for the CLI status command.
439  *
440  * \param e CLI command
441  * \param cmd 
442  * \param a CLI argument list
443  * \return RESULT_SUCCESS
444  */
445 static char *handle_cli_show_sqlite_status(struct ast_cli_entry *e, int cmd, struct ast_cli_args *a);
446
447 /*! The SQLite database object. */
448 static sqlite *db;
449
450 /*! Set to 1 if CDR support is enabled. */
451 static int use_cdr;
452
453 /*! Set to 1 if the CDR callback function was registered. */
454 static int cdr_registered;
455
456 /*! Set to 1 if the CLI status command callback function was registered. */
457 static int cli_status_registered;
458
459 /*! The path of the database file. */
460 static char *dbfile;
461
462 /*! The name of the static configuration table. */
463 static char *config_table;
464
465 /*! The name of the table used to store CDR entries. */
466 static char *cdr_table;
467
468 /*!
469  * The structure specifying all callback functions used by Asterisk for static
470  * and RealTime configuration.
471  */
472 static struct ast_config_engine sqlite_engine =
473 {
474         .name = RES_CONFIG_SQLITE_DRIVER,
475         .load_func = config_handler,
476         .realtime_func = realtime_handler,
477         .realtime_multi_func = realtime_multi_handler,
478         .store_func = realtime_store_handler,
479         .destroy_func = realtime_destroy_handler,
480         .update_func = realtime_update_handler
481 };
482
483 /*!
484  * The mutex used to prevent simultaneous access to the SQLite database.
485  */
486 AST_MUTEX_DEFINE_STATIC(mutex);
487
488 /*!
489  * Structure containing details and callback functions for the CLI status
490  * command.
491  */
492 static struct ast_cli_entry cli_status[] = {
493         AST_CLI_DEFINE(handle_cli_show_sqlite_status, "Show status information about the SQLite 2 driver"),
494 };
495
496 /*
497  * Taken from Asterisk 1.2 cdr_sqlite.so.
498  */
499
500 /*! SQL query format to create the CDR table if non existent. */
501 static char *sql_create_cdr_table =
502 "CREATE TABLE '%q' (\n"
503 "       id              INTEGER,\n"
504 "       clid            VARCHAR(80)     NOT NULL        DEFAULT '',\n"
505 "       src             VARCHAR(80)     NOT NULL        DEFAULT '',\n"
506 "       dst             VARCHAR(80)     NOT NULL        DEFAULT '',\n"
507 "       dcontext        VARCHAR(80)     NOT NULL        DEFAULT '',\n"
508 "       channel         VARCHAR(80)     NOT NULL        DEFAULT '',\n"
509 "       dstchannel      VARCHAR(80)     NOT NULL        DEFAULT '',\n"
510 "       lastapp         VARCHAR(80)     NOT NULL        DEFAULT '',\n"
511 "       lastdata        VARCHAR(80)     NOT NULL        DEFAULT '',\n"
512 "       start           DATETIME        NOT NULL        DEFAULT '0000-00-00 00:00:00',\n"
513 "       answer          DATETIME        NOT NULL        DEFAULT '0000-00-00 00:00:00',\n"
514 "       end             DATETIME        NOT NULL        DEFAULT '0000-00-00 00:00:00',\n"
515 "       duration        INT(11)         NOT NULL        DEFAULT 0,\n"
516 "       billsec         INT(11)         NOT NULL        DEFAULT 0,\n"
517 "       disposition     VARCHAR(45)     NOT NULL        DEFAULT '',\n"
518 "       amaflags        INT(11)         NOT NULL        DEFAULT 0,\n"
519 "       accountcode     VARCHAR(20)     NOT NULL        DEFAULT '',\n"
520 "       uniqueid        VARCHAR(32)     NOT NULL        DEFAULT '',\n"
521 "       userfield       VARCHAR(255)    NOT NULL        DEFAULT '',\n"
522 "       PRIMARY KEY     (id)\n"
523 ");";
524
525 /*! SQL query format to insert a CDR entry. */
526 static char *sql_add_cdr_entry =
527 "INSERT INTO '%q' ("
528 "       clid,"
529 "       src,"
530 "       dst,"
531 "       dcontext,"
532 "       channel,"
533 "       dstchannel,"
534 "       lastapp,"
535 "       lastdata,"
536 "       start,"
537 "       answer,"
538 "       end,"
539 "       duration,"
540 "       billsec,"
541 "       disposition,"
542 "       amaflags,"
543 "       accountcode,"
544 "       uniqueid,"
545 "       userfield"
546 ") VALUES ("
547 "       '%q',"
548 "       '%q',"
549 "       '%q',"
550 "       '%q',"
551 "       '%q',"
552 "       '%q',"
553 "       '%q',"
554 "       '%q',"
555 "       datetime(%d,'unixepoch','localtime'),"
556 "       datetime(%d,'unixepoch','localtime'),"
557 "       datetime(%d,'unixepoch','localtime'),"
558 "       '%ld',"
559 "       '%ld',"
560 "       '%ld',"
561 "       '%ld',"
562 "       '%q',"
563 "       '%q',"
564 "       '%q'"
565 ");";
566
567 /*!
568  * SQL query format to fetch the static configuration of a file.
569  * Rows must be sorted by category.
570  *
571  * \see add_cfg_entry()
572  */
573 static char *sql_get_config_table =
574 "SELECT *"
575 "       FROM '%q'"
576 "       WHERE filename = '%q' AND commented = 0"
577 "       ORDER BY cat_metric ASC, var_metric ASC;";
578
579 static int set_var(char **var, const char *name, const char *value)
580 {
581         if (*var)
582                 ast_free(*var);
583
584         *var = ast_strdup(value);
585
586         if (!*var) {
587                 ast_log(LOG_WARNING, "Unable to allocate variable %s\n", name);
588                 return 1;
589         }
590
591         return 0;
592 }
593
594 static int check_vars(void)
595 {
596         if (!dbfile) {
597                 ast_log(LOG_ERROR, "Required parameter undefined: dbfile\n");
598                 return 1;
599         }
600
601         use_cdr = (cdr_table != NULL);
602
603         return 0;
604 }
605
606 static int load_config(void)
607 {
608         struct ast_config *config;
609         struct ast_variable *var;
610         int error;
611         struct ast_flags config_flags = { 0 };
612
613         config = ast_config_load(RES_CONFIG_SQLITE_CONF_FILE, config_flags);
614
615         if (!config) {
616                 ast_log(LOG_ERROR, "Unable to load " RES_CONFIG_SQLITE_CONF_FILE "\n");
617                 return 1;
618         }
619
620         for (var = ast_variable_browse(config, "general"); var; var = var->next) {
621                 if (!strcasecmp(var->name, "dbfile"))
622                         SET_VAR(config, dbfile, var);
623                 else if (!strcasecmp(var->name, "config_table"))
624                         SET_VAR(config, config_table, var);
625                 else if (!strcasecmp(var->name, "cdr_table"))
626                         SET_VAR(config, cdr_table, var);
627                 else
628                         ast_log(LOG_WARNING, "Unknown parameter : %s\n", var->name);
629         }
630
631         ast_config_destroy(config);
632         error = check_vars();
633
634         if (error) {
635                 unload_config();
636                 return 1;
637         }
638
639         return 0;
640 }
641
642 static void unload_config(void)
643 {
644         ast_free(dbfile);
645         dbfile = NULL;
646         ast_free(config_table);
647         config_table = NULL;
648         ast_free(cdr_table);
649         cdr_table = NULL;
650 }
651
652 static int cdr_handler(struct ast_cdr *cdr)
653 {
654         char *query, *errormsg;
655         int error;
656
657         query = sqlite_mprintf(sql_add_cdr_entry, cdr_table, cdr->clid,
658                         cdr->src, cdr->dst, cdr->dcontext, cdr->channel,
659                         cdr->dstchannel, cdr->lastapp, cdr->lastdata,
660                         cdr->start.tv_sec, cdr->answer.tv_sec,
661                         cdr->end.tv_sec, cdr->duration, cdr->billsec,
662                         cdr->disposition, cdr->amaflags, cdr->accountcode,
663                         cdr->uniqueid, cdr->userfield);
664
665         if (!query) {
666                 ast_log(LOG_WARNING, "Unable to allocate SQL query\n");
667                 return 1;
668         }
669
670         ast_debug(1, "SQL query: %s\n", query);
671
672         ast_mutex_lock(&mutex);
673
674         RES_CONFIG_SQLITE_BEGIN
675                 error = sqlite_exec(db, query, NULL, NULL, &errormsg);
676         RES_CONFIG_SQLITE_END(error)
677
678         ast_mutex_unlock(&mutex);
679
680         sqlite_freemem(query);
681
682         if (error) {
683                 ast_log(LOG_ERROR, "%s\n", errormsg);
684                 sqlite_freemem(errormsg);
685                 return 1;
686         }
687
688         return 0;
689 }
690
691 static int add_cfg_entry(void *arg, int argc, char **argv, char **columnNames)
692 {
693         struct cfg_entry_args *args;
694         struct ast_variable *var;
695
696         if (argc != RES_CONFIG_SQLITE_CONFIG_COLUMNS) {
697                 ast_log(LOG_WARNING, "Corrupt table\n");
698                 return 1;
699         }
700
701         args = arg;
702
703         if (!strcmp(argv[RES_CONFIG_SQLITE_CONFIG_VAR_NAME], "#include")) {
704                 struct ast_config *cfg;
705                 char *val;
706
707                 val = argv[RES_CONFIG_SQLITE_CONFIG_VAR_VAL];
708                 cfg = ast_config_internal_load(val, args->cfg, args->flags, "", args->who_asked);
709
710                 if (!cfg) {
711                         ast_log(LOG_WARNING, "Unable to include %s\n", val);
712                         return 1;
713                 } else {
714                         args->cfg = cfg;
715                         return 0;
716                 }
717         }
718
719         if (!args->cat_name || strcmp(args->cat_name, argv[RES_CONFIG_SQLITE_CONFIG_CATEGORY])) {
720                 args->cat = ast_category_new(argv[RES_CONFIG_SQLITE_CONFIG_CATEGORY], "", 99999);
721
722                 if (!args->cat) {
723                         ast_log(LOG_WARNING, "Unable to allocate category\n");
724                         return 1;
725                 }
726
727                 ast_free(args->cat_name);
728                 args->cat_name = ast_strdup(argv[RES_CONFIG_SQLITE_CONFIG_CATEGORY]);
729
730                 if (!args->cat_name) {
731                         ast_category_destroy(args->cat);
732                         return 1;
733                 }
734
735                 ast_category_append(args->cfg, args->cat);
736         }
737
738         var = ast_variable_new(argv[RES_CONFIG_SQLITE_CONFIG_VAR_NAME], argv[RES_CONFIG_SQLITE_CONFIG_VAR_VAL], "");
739
740         if (!var) {
741                 ast_log(LOG_WARNING, "Unable to allocate variable");
742                 return 1;
743         }
744
745         ast_variable_append(args->cat, var);
746
747         return 0;
748 }
749
750 static struct ast_config *config_handler(const char *database,  const char *table, const char *file,
751         struct ast_config *cfg, struct ast_flags flags, const char *suggested_incl, const char *who_asked)
752 {
753         struct cfg_entry_args args;
754         char *query, *errormsg;
755         int error;
756
757         if (!config_table) {
758                 if (!table) {
759                         ast_log(LOG_ERROR, "Table name unspecified\n");
760                         return NULL;
761                 }
762         } else
763                 table = config_table;
764
765         query = sqlite_mprintf(sql_get_config_table, table, file);
766
767         if (!query) {
768                 ast_log(LOG_WARNING, "Unable to allocate SQL query\n");
769                 return NULL;
770         }
771
772         ast_debug(1, "SQL query: %s\n", query);
773         args.cfg = cfg;
774         args.cat = NULL;
775         args.cat_name = NULL;
776         args.flags = flags;
777         args.who_asked = who_asked;
778
779         ast_mutex_lock(&mutex);
780
781         RES_CONFIG_SQLITE_BEGIN
782                 error = sqlite_exec(db, query, add_cfg_entry, &args, &errormsg);
783         RES_CONFIG_SQLITE_END(error)
784
785         ast_mutex_unlock(&mutex);
786
787         ast_free(args.cat_name);
788         sqlite_freemem(query);
789
790         if (error) {
791                 ast_log(LOG_ERROR, "%s\n", errormsg);
792                 sqlite_freemem(errormsg);
793                 return NULL;
794         }
795
796         return cfg;
797 }
798
799 static size_t get_params(va_list ap, const char ***params_ptr, const char ***vals_ptr)
800 {
801         const char **tmp, *param, *val, **params, **vals;
802         size_t params_count;
803
804         params = NULL;
805         vals = NULL;
806         params_count = 0;
807
808         while ((param = va_arg(ap, const char *)) && (val = va_arg(ap, const char *))) {
809                 if (!(tmp = ast_realloc(params, (params_count + 1) * sizeof(char *)))) {
810                         ast_free(params);
811                         ast_free(vals);
812                         return 0;
813                 }
814                 params = tmp;
815
816                 if (!(tmp = ast_realloc(vals, (params_count + 1) * sizeof(char *)))) {
817                         ast_free(params);
818                         ast_free(vals);
819                         return 0;
820                 }
821                 vals = tmp;
822
823                 params[params_count] = param;
824                 vals[params_count] = val;
825                 params_count++;
826         }
827
828         if (params_count > 0) {
829                 *params_ptr = params;
830                 *vals_ptr = vals;
831         } else
832                 ast_log(LOG_WARNING, "1 parameter and 1 value at least required\n");
833
834         return params_count;
835 }
836
837 static int add_rt_cfg_entry(void *arg, int argc, char **argv, char **columnNames)
838 {
839         struct rt_cfg_entry_args *args;
840         struct ast_variable *var;
841         int i;
842
843         args = arg;
844
845         for (i = 0; i < argc; i++) {
846                 if (!argv[i])
847                         continue;
848
849                 if (!(var = ast_variable_new(columnNames[i], argv[i], "")))
850                         return 1;
851
852                 if (!args->var)
853                         args->var = var;
854
855                 if (!args->last)
856                         args->last = var;
857                 else {
858                         args->last->next = var;
859                         args->last = var;
860                 }
861         }
862
863         return 0;
864 }
865
866 static struct ast_variable * realtime_handler(const char *database, const char *table, va_list ap)
867 {
868         char *query, *errormsg, *op, *tmp_str;
869         struct rt_cfg_entry_args args;
870         const char **params, **vals;
871         size_t params_count;
872         int error;
873
874         if (!table) {
875                 ast_log(LOG_WARNING, "Table name unspecified\n");
876                 return NULL;
877         }
878
879         params_count = get_params(ap, &params, &vals);
880
881         if (params_count == 0)
882                 return NULL;
883
884         op = (strchr(params[0], ' ') == NULL) ? " =" : "";
885
886 /* \cond DOXYGEN_CAN_PARSE_THIS */
887 #undef QUERY
888 #define QUERY "SELECT * FROM '%q' WHERE commented = 0 AND %q%s '%q'"
889 /* \endcond */
890
891         query = sqlite_mprintf(QUERY, table, params[0], op, vals[0]);
892
893         if (!query) {
894                 ast_log(LOG_WARNING, "Unable to allocate SQL query\n");
895                 ast_free(params);
896                 ast_free(vals);
897                 return NULL;
898         }
899
900         if (params_count > 1) {
901                 size_t i;
902
903                 for (i = 1; i < params_count; i++) {
904                         op = (strchr(params[i], ' ') == NULL) ? " =" : "";
905                         tmp_str = sqlite_mprintf("%s AND %q%s '%q'", query, params[i], op, vals[i]);
906                         sqlite_freemem(query);
907
908                         if (!tmp_str) {
909                                 ast_log(LOG_WARNING, "Unable to reallocate SQL query\n");
910                                 ast_free(params);
911                                 ast_free(vals);
912                                 return NULL;
913                         }
914
915                         query = tmp_str;
916                 }
917         }
918
919         ast_free(params);
920         ast_free(vals);
921
922         tmp_str = sqlite_mprintf("%s LIMIT 1;", query);
923         sqlite_freemem(query);
924
925         if (!tmp_str) {
926                 ast_log(LOG_WARNING, "Unable to reallocate SQL query\n");
927                 return NULL;
928         }
929
930         query = tmp_str;
931         ast_debug(1, "SQL query: %s\n", query);
932         args.var = NULL;
933         args.last = NULL;
934
935         ast_mutex_lock(&mutex);
936
937         RES_CONFIG_SQLITE_BEGIN
938                 error = sqlite_exec(db, query, add_rt_cfg_entry, &args, &errormsg);
939         RES_CONFIG_SQLITE_END(error)
940
941         ast_mutex_unlock(&mutex);
942
943         sqlite_freemem(query);
944
945         if (error) {
946                 ast_log(LOG_WARNING, "%s\n", errormsg);
947                 sqlite_freemem(errormsg);
948                 ast_variables_destroy(args.var);
949                 return NULL;
950         }
951
952         return args.var;
953 }
954
955 static int add_rt_multi_cfg_entry(void *arg, int argc, char **argv, char **columnNames)
956 {
957         struct rt_multi_cfg_entry_args *args;
958         struct ast_category *cat;
959         struct ast_variable *var;
960         char *cat_name;
961         size_t i;
962
963         args = arg;
964         cat_name = NULL;
965
966         /*
967          * cat_name should always be set here, since initfield is forged from
968          * params[0] in realtime_multi_handler(), which is a search parameter
969          * of the SQL query.
970          */
971         for (i = 0; i < argc; i++) {
972                 if (!strcmp(args->initfield, columnNames[i]))
973                         cat_name = argv[i];
974         }
975
976         if (!cat_name) {
977                 ast_log(LOG_ERROR, "Bogus SQL results, cat_name is NULL !\n");
978                 return 1;
979         }
980
981         if (!(cat = ast_category_new(cat_name, "", 99999))) {
982                 ast_log(LOG_WARNING, "Unable to allocate category\n");
983                 return 1;
984         }
985
986         ast_category_append(args->cfg, cat);
987
988         for (i = 0; i < argc; i++) {
989                 if (!argv[i] || !strcmp(args->initfield, columnNames[i]))
990                         continue;
991
992                 if (!(var = ast_variable_new(columnNames[i], argv[i], ""))) {
993                         ast_log(LOG_WARNING, "Unable to allocate variable\n");
994                         return 1;
995                 }
996
997                 ast_variable_append(cat, var);
998         }
999
1000         return 0;
1001 }
1002
1003 static struct ast_config *realtime_multi_handler(const char *database,
1004         const char *table, va_list ap)
1005 {
1006         char *query, *errormsg, *op, *tmp_str, *initfield;
1007         struct rt_multi_cfg_entry_args args;
1008         const char **params, **vals;
1009         struct ast_config *cfg;
1010         size_t params_count;
1011         int error;
1012
1013         if (!table) {
1014                 ast_log(LOG_WARNING, "Table name unspecified\n");
1015                 return NULL;
1016         }
1017
1018         if (!(cfg = ast_config_new())) {
1019                 ast_log(LOG_WARNING, "Unable to allocate configuration structure\n");
1020                 return NULL;
1021         }
1022
1023         if (!(params_count = get_params(ap, &params, &vals))) {
1024                 ast_config_destroy(cfg);
1025                 return NULL;
1026         }
1027
1028         if (!(initfield = ast_strdup(params[0]))) {
1029                 ast_config_destroy(cfg);
1030                 ast_free(params);
1031                 ast_free(vals);
1032                 return NULL;
1033         }
1034
1035         tmp_str = strchr(initfield, ' ');
1036
1037         if (tmp_str)
1038                 *tmp_str = '\0';
1039
1040         op = (!strchr(params[0], ' ')) ? " =" : "";
1041
1042         /*
1043          * Asterisk sends us an already escaped string when searching for
1044          * "exten LIKE" (uh!). Handle it separately.
1045          */
1046         tmp_str = (!strcmp(vals[0], "\\_%")) ? "_%" : (char *)vals[0];
1047
1048 /* \cond DOXYGEN_CAN_PARSE_THIS */
1049 #undef QUERY
1050 #define QUERY "SELECT * FROM '%q' WHERE commented = 0 AND %q%s '%q'"
1051 /* \endcond */
1052
1053         if (!(query = sqlite_mprintf(QUERY, table, params[0], op, tmp_str))) {
1054                 ast_log(LOG_WARNING, "Unable to allocate SQL query\n");
1055                 ast_config_destroy(cfg);
1056                 ast_free(params);
1057                 ast_free(vals);
1058                 ast_free(initfield);
1059                 return NULL;
1060         }
1061
1062         if (params_count > 1) {
1063                 size_t i;
1064
1065                 for (i = 1; i < params_count; i++) {
1066                         op = (!strchr(params[i], ' ')) ? " =" : "";
1067                         tmp_str = sqlite_mprintf("%s AND %q%s '%q'", query, params[i], op, vals[i]);
1068                         sqlite_freemem(query);
1069
1070                         if (!tmp_str) {
1071                                 ast_log(LOG_WARNING, "Unable to reallocate SQL query\n");
1072                                 ast_config_destroy(cfg);
1073                                 ast_free(params);
1074                                 ast_free(vals);
1075                                 ast_free(initfield);
1076                                 return NULL;
1077                         }
1078
1079                         query = tmp_str;
1080                 }
1081         }
1082
1083         ast_free(params);
1084         ast_free(vals);
1085
1086         if (!(tmp_str = sqlite_mprintf("%s ORDER BY %q;", query, initfield))) {
1087                 ast_log(LOG_WARNING, "Unable to reallocate SQL query\n");
1088                 sqlite_freemem(query);
1089                 ast_config_destroy(cfg);
1090                 ast_free(initfield);
1091                 return NULL;
1092         }
1093
1094         sqlite_freemem(query);
1095         query = tmp_str;
1096         ast_debug(1, "SQL query: %s\n", query);
1097         args.cfg = cfg;
1098         args.initfield = initfield;
1099
1100         ast_mutex_lock(&mutex);
1101
1102         RES_CONFIG_SQLITE_BEGIN
1103                 error = sqlite_exec(db, query, add_rt_multi_cfg_entry, &args, &errormsg);
1104         RES_CONFIG_SQLITE_END(error)
1105
1106         ast_mutex_unlock(&mutex);
1107
1108         sqlite_freemem(query);
1109         ast_free(initfield);
1110
1111         if (error) {
1112                 ast_log(LOG_WARNING, "%s\n", errormsg);
1113                 sqlite_freemem(errormsg);
1114                 ast_config_destroy(cfg);
1115                 return NULL;
1116         }
1117
1118         return cfg;
1119 }
1120
1121 static int realtime_update_handler(const char *database, const char *table,
1122         const char *keyfield, const char *entity, va_list ap)
1123 {
1124         char *query, *errormsg, *tmp_str;
1125         const char **params, **vals;
1126         size_t params_count;
1127         int error, rows_num;
1128
1129         if (!table) {
1130                 ast_log(LOG_WARNING, "Table name unspecified\n");
1131                 return -1;
1132         }
1133
1134         if (!(params_count = get_params(ap, &params, &vals)))
1135                 return -1;
1136
1137 /* \cond DOXYGEN_CAN_PARSE_THIS */
1138 #undef QUERY
1139 #define QUERY "UPDATE '%q' SET %q = '%q'"
1140 /* \endcond */
1141
1142         if (!(query = sqlite_mprintf(QUERY, table, params[0], vals[0]))) {
1143                 ast_log(LOG_WARNING, "Unable to allocate SQL query\n");
1144                 ast_free(params);
1145                 ast_free(vals);
1146                 return -1;
1147         }
1148
1149         if (params_count > 1) {
1150                 size_t i;
1151
1152                 for (i = 1; i < params_count; i++) {
1153                         tmp_str = sqlite_mprintf("%s, %q = '%q'", query, params[i], vals[i]);
1154                         sqlite_freemem(query);
1155
1156                         if (!tmp_str) {
1157                                 ast_log(LOG_WARNING, "Unable to reallocate SQL query\n");
1158                                 ast_free(params);
1159                                 ast_free(vals);
1160                                 return -1;
1161                         }
1162
1163                         query = tmp_str;
1164                 }
1165         }
1166
1167         ast_free(params);
1168         ast_free(vals);
1169
1170         if (!(tmp_str = sqlite_mprintf("%s WHERE %q = '%q';", query, keyfield, entity))) {
1171                 ast_log(LOG_WARNING, "Unable to reallocate SQL query\n");
1172                 sqlite_freemem(query);
1173                 return -1;
1174         }
1175
1176         sqlite_freemem(query);
1177         query = tmp_str;
1178         ast_debug(1, "SQL query: %s\n", query);
1179
1180         ast_mutex_lock(&mutex);
1181
1182         RES_CONFIG_SQLITE_BEGIN
1183                 error = sqlite_exec(db, query, NULL, NULL, &errormsg);
1184         RES_CONFIG_SQLITE_END(error)
1185
1186         if (!error)
1187                 rows_num = sqlite_changes(db);
1188         else
1189                 rows_num = -1;
1190
1191         ast_mutex_unlock(&mutex);
1192
1193         sqlite_freemem(query);
1194
1195         if (error) {
1196                 ast_log(LOG_WARNING, "%s\n", errormsg);
1197                 sqlite_freemem(errormsg);
1198         }
1199
1200         return rows_num;
1201 }
1202
1203 static int realtime_store_handler(const char *database, const char *table, va_list ap)
1204 {
1205         char *errormsg, *tmp_str, *tmp_keys = NULL, *tmp_keys2 = NULL, *tmp_vals = NULL, *tmp_vals2 = NULL;
1206         const char **params, **vals;
1207         size_t params_count;
1208         int error, rows_id;
1209         size_t i;
1210
1211         if (!table) {
1212                 ast_log(LOG_WARNING, "Table name unspecified\n");
1213                 return -1;
1214         }
1215
1216         if (!(params_count = get_params(ap, &params, &vals)))
1217                 return -1;
1218
1219 /* \cond DOXYGEN_CAN_PARSE_THIS */
1220 #undef QUERY
1221 #define QUERY "INSERT into '%q' (%s) VALUES (%s);"
1222 /* \endcond */
1223
1224         for (i = 0; i < params_count; i++) {
1225                 if ( tmp_keys2 ) {
1226                         tmp_keys = sqlite_mprintf("%s, %q", tmp_keys2, params[i]);
1227                         sqlite_freemem(tmp_keys2);
1228                 } else {
1229                         tmp_keys = sqlite_mprintf("%q", params[i]);
1230                 }
1231                 if (!tmp_keys) {
1232                         ast_log(LOG_WARNING, "Unable to reallocate SQL query\n");
1233                         sqlite_freemem(tmp_vals);
1234                         ast_free(params);
1235                         ast_free(vals);
1236                         return -1;
1237                 }
1238
1239                 if ( tmp_vals2 ) {
1240                         tmp_vals = sqlite_mprintf("%s, '%q'", tmp_vals2, params[i]);
1241                         sqlite_freemem(tmp_vals2);
1242                 } else {
1243                         tmp_vals = sqlite_mprintf("'%q'", params[i]);
1244                 }
1245                 if (!tmp_vals) {
1246                         ast_log(LOG_WARNING, "Unable to reallocate SQL query\n");
1247                         sqlite_freemem(tmp_keys);
1248                         ast_free(params);
1249                         ast_free(vals);
1250                         return -1;
1251                 }
1252
1253
1254                 tmp_keys2 = tmp_keys;
1255                 tmp_vals2 = tmp_vals;
1256         }
1257
1258         ast_free(params);
1259         ast_free(vals);
1260
1261         if (!(tmp_str = sqlite_mprintf(QUERY, table, tmp_keys, tmp_vals))) {
1262                 ast_log(LOG_WARNING, "Unable to reallocate SQL query\n");
1263                 sqlite_freemem(tmp_keys);
1264                 sqlite_freemem(tmp_vals);
1265                 return -1;
1266         }
1267
1268         sqlite_freemem(tmp_keys);
1269         sqlite_freemem(tmp_vals);
1270
1271         ast_debug(1, "SQL query: %s\n", tmp_str);
1272
1273         ast_mutex_lock(&mutex);
1274
1275         RES_CONFIG_SQLITE_BEGIN
1276                 error = sqlite_exec(db, tmp_str, NULL, NULL, &errormsg);
1277         RES_CONFIG_SQLITE_END(error)
1278
1279         if (!error) {
1280                 rows_id = sqlite_last_insert_rowid(db);
1281         } else {
1282                 rows_id = -1;
1283         }
1284
1285         ast_mutex_unlock(&mutex);
1286
1287         sqlite_freemem(tmp_str);
1288
1289         if (error) {
1290                 ast_log(LOG_WARNING, "%s\n", errormsg);
1291                 sqlite_freemem(errormsg);
1292         }
1293
1294         return rows_id;
1295 }
1296
1297 static int realtime_destroy_handler(const char *database, const char *table,
1298         const char *keyfield, const char *entity, va_list ap)
1299 {
1300         char *query, *errormsg, *tmp_str;
1301         const char **params, **vals;
1302         size_t params_count;
1303         int error, rows_num;
1304         size_t i;
1305
1306         if (!table) {
1307                 ast_log(LOG_WARNING, "Table name unspecified\n");
1308                 return -1;
1309         }
1310
1311         if (!(params_count = get_params(ap, &params, &vals)))
1312                 return -1;
1313
1314 /* \cond DOXYGEN_CAN_PARSE_THIS */
1315 #undef QUERY
1316 #define QUERY "DELETE FROM '%q' WHERE"
1317 /* \endcond */
1318
1319         if (!(query = sqlite_mprintf(QUERY, table))) {
1320                 ast_log(LOG_WARNING, "Unable to allocate SQL query\n");
1321                 ast_free(params);
1322                 ast_free(vals);
1323                 return -1;
1324         }
1325
1326         for (i = 0; i < params_count; i++) {
1327                 tmp_str = sqlite_mprintf("%s %q = '%q' AND", query, params[i], vals[i]);
1328                 sqlite_freemem(query);
1329
1330                 if (!tmp_str) {
1331                         ast_log(LOG_WARNING, "Unable to reallocate SQL query\n");
1332                         ast_free(params);
1333                         ast_free(vals);
1334                         return -1;
1335                 }
1336
1337                 query = tmp_str;
1338         }
1339
1340         ast_free(params);
1341         ast_free(vals);
1342         if (!(tmp_str = sqlite_mprintf("%s %q = '%q';", query, keyfield, entity))) {
1343                 ast_log(LOG_WARNING, "Unable to reallocate SQL query\n");
1344                 sqlite_freemem(query);
1345                 return -1;
1346         }
1347         sqlite_freemem(query);
1348         query = tmp_str;
1349         ast_debug(1, "SQL query: %s\n", query);
1350
1351         ast_mutex_lock(&mutex);
1352
1353         RES_CONFIG_SQLITE_BEGIN
1354                 error = sqlite_exec(db, query, NULL, NULL, &errormsg);
1355         RES_CONFIG_SQLITE_END(error)
1356
1357         if (!error)
1358                 rows_num = sqlite_changes(db);
1359         else
1360                 rows_num = -1;
1361
1362         ast_mutex_unlock(&mutex);
1363
1364         sqlite_freemem(query);
1365
1366         if (error) {
1367                 ast_log(LOG_WARNING, "%s\n", errormsg);
1368                 sqlite_freemem(errormsg);
1369         }
1370
1371         return rows_num;
1372 }
1373
1374 static char *handle_cli_show_sqlite_status(struct ast_cli_entry *e, int cmd, struct ast_cli_args *a)
1375 {
1376         switch (cmd) {
1377         case CLI_INIT:
1378                 e->command = "show sqlite status";
1379                 e->usage =
1380                         "Usage: show sqlite status\n"
1381                         "       Show status information about the SQLite 2 driver\n";
1382                 return NULL;
1383         case CLI_GENERATE:
1384                 return NULL;
1385         }
1386
1387         if (a->argc != 3)
1388                 return CLI_SHOWUSAGE;
1389
1390         ast_cli(a->fd, "SQLite database path: %s\n", dbfile);
1391         ast_cli(a->fd, "config_table: ");
1392
1393         if (!config_table)
1394                 ast_cli(a->fd, "unspecified, must be present in extconfig.conf\n");
1395         else
1396                 ast_cli(a->fd, "%s\n", config_table);
1397
1398         ast_cli(a->fd, "cdr_table: ");
1399
1400         if (!cdr_table)
1401                 ast_cli(a->fd, "unspecified, CDR support disabled\n");
1402         else
1403                 ast_cli(a->fd, "%s\n", cdr_table);
1404
1405         return CLI_SUCCESS;
1406 }
1407
1408 static int unload_module(void)
1409 {
1410         if (cli_status_registered)
1411                 ast_cli_unregister_multiple(cli_status, sizeof(cli_status) / sizeof(struct ast_cli_entry));
1412
1413         if (cdr_registered)
1414                 ast_cdr_unregister(RES_CONFIG_SQLITE_NAME);
1415
1416         ast_config_engine_deregister(&sqlite_engine);
1417
1418         if (db)
1419                 sqlite_close(db);
1420
1421         unload_config();
1422
1423         return 0;
1424 }
1425
1426 static int load_module(void)
1427 {
1428         char *errormsg;
1429         int error;
1430
1431         db = NULL;
1432         cdr_registered = 0;
1433         cli_status_registered = 0;
1434         dbfile = NULL;
1435         config_table = NULL;
1436         cdr_table = NULL;
1437         error = load_config();
1438
1439         if (error)
1440                 return AST_MODULE_LOAD_DECLINE;
1441
1442         if (!(db = sqlite_open(dbfile, 0660, &errormsg))) {
1443                 ast_log(LOG_ERROR, "%s\n", errormsg);
1444                 sqlite_freemem(errormsg);
1445                 unload_module();
1446                 return 1;
1447         }
1448
1449         ast_config_engine_register(&sqlite_engine);
1450
1451         if (use_cdr) {
1452                 char *query;
1453
1454 /* \cond DOXYGEN_CAN_PARSE_THIS */
1455 #undef QUERY
1456 #define QUERY "SELECT COUNT(id) FROM %Q;"
1457 /* \endcond */
1458
1459                 query = sqlite_mprintf(QUERY, cdr_table);
1460
1461                 if (!query) {
1462                         ast_log(LOG_ERROR, "Unable to allocate SQL query\n");
1463                         unload_module();
1464                         return 1;
1465                 }
1466
1467                 ast_debug(1, "SQL query: %s\n", query);
1468
1469                 RES_CONFIG_SQLITE_BEGIN
1470                         error = sqlite_exec(db, query, NULL, NULL, &errormsg);
1471                 RES_CONFIG_SQLITE_END(error)
1472
1473                 sqlite_freemem(query);
1474
1475                 if (error) {
1476                         /*
1477                          * Unexpected error.
1478                          */
1479                         if (error != SQLITE_ERROR) {
1480                                 ast_log(LOG_ERROR, "%s\n", errormsg);
1481                                 sqlite_freemem(errormsg);
1482                                 unload_module();
1483                                 return 1;
1484                         }
1485
1486                         sqlite_freemem(errormsg);
1487                         query = sqlite_mprintf(sql_create_cdr_table, cdr_table);
1488
1489                         if (!query) {
1490                                 ast_log(LOG_ERROR, "Unable to allocate SQL query\n");
1491                                 unload_module();
1492                                 return 1;
1493                         }
1494
1495                         ast_debug(1, "SQL query: %s\n", query);
1496
1497                         RES_CONFIG_SQLITE_BEGIN
1498                                 error = sqlite_exec(db, query, NULL, NULL, &errormsg);
1499                         RES_CONFIG_SQLITE_END(error)
1500
1501                         sqlite_freemem(query);
1502
1503                         if (error) {
1504                                 ast_log(LOG_ERROR, "%s\n", errormsg);
1505                                 sqlite_freemem(errormsg);
1506                                 unload_module();
1507                                 return 1;
1508                         }
1509                 }
1510
1511                 error = ast_cdr_register(RES_CONFIG_SQLITE_NAME, RES_CONFIG_SQLITE_DESCRIPTION, cdr_handler);
1512
1513                 if (error) {
1514                         unload_module();
1515                         return 1;
1516                 }
1517
1518                 cdr_registered = 1;
1519         }
1520
1521         error = ast_cli_register_multiple(cli_status, sizeof(cli_status) / sizeof(struct ast_cli_entry));
1522
1523         if (error) {
1524                 unload_module();
1525                 return 1;
1526         }
1527
1528         cli_status_registered = 1;
1529
1530         return 0;
1531 }
1532
1533 AST_MODULE_INFO(ASTERISK_GPL_KEY, AST_MODFLAG_GLOBAL_SYMBOLS, "Realtime SQLite configuration",
1534                 .load = load_module,
1535                 .unload = unload_module,
1536 );