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