pbx_lua: fix regression with global sym export and context clash by pbx_config.
[asterisk/asterisk.git] / pbx / pbx_loopback.c
index 5f590cf..dc9e7c7 100644 (file)
  *
  */
 
-#include <stdlib.h>
-#include <stdio.h>
-#include <unistd.h>
-#include <string.h>
-#include <errno.h>
+/*** MODULEINFO
+       <support_level>core</support_level>
+ ***/
 
 #include "asterisk.h"
 
@@ -36,11 +34,9 @@ ASTERISK_FILE_VERSION(__FILE__, "$Revision$")
 #include "asterisk/logger.h"
 #include "asterisk/channel.h"
 #include "asterisk/config.h"
-#include "asterisk/options.h"
 #include "asterisk/pbx.h"
 #include "asterisk/module.h"
 #include "asterisk/frame.h"
-#include "asterisk/file.h"
 #include "asterisk/cli.h"
 #include "asterisk/lock.h"
 #include "asterisk/md5.h"
@@ -49,22 +45,29 @@ ASTERISK_FILE_VERSION(__FILE__, "$Revision$")
 #include "asterisk/sched.h"
 #include "asterisk/io.h"
 #include "asterisk/utils.h"
-#include "asterisk/crypto.h"
 #include "asterisk/astdb.h"
 
-static char *tdesc = "Loopback Switch";
 
-/* Loopback switch substitutes ${EXTEN}, ${CONTEXT}, and ${PRIORITY} into
-   the data passed to it to try to get a string of the form:
+/* Loopback switch creates a 'tunnel' to another context.  When extension
+   lookups pass through the 'tunnel', Asterisk expressions can be used
+   to modify the target extension, context, and priority in any way desired.
+   If there is a match at the far end, execution jumps through the 'tunnel'
+   to the matched context, extension, and priority.
+   Global variables as well as ${CONTEXT}, ${EXTEN}, and ${PRIORITY} are 
+   available for substitution.  After substitution Loopback expects to get
+   a string of the form:
 
        [exten]@context[:priority][/extramatch]
    
    Where exten, context, and priority are another extension, context, and priority
-   to lookup and "extramatch" is an extra match restriction the *original* number 
-   must fit if  specified.  The "extramatch" begins with _ like an exten pattern
-   if it is specified.  Note that the search context MUST be a different context
-   from the current context or the search will not succeed in an effort to reduce
-   the likelihood of loops (they're still possible if you try hard, so be careful!)
+   to lookup and "extramatch" is a dialplan extension pattern which the *original*
+   number must match.  If exten or priority are empty, the original values are 
+   used.
+
+   Note that the search context MUST be a different context from the current
+   context or the search will not succeed.  This is intended to reduce the
+   likelihood of loops (they're still possible if you try hard, so be careful!)
 
 */
 
@@ -75,24 +78,28 @@ static char *tdesc = "Loopback Switch";
        char *newexten=(char *)exten, *newcontext=(char *)context; \
        int newpriority=priority; \
        char *newpattern=NULL; \
-       loopback_helper(buf, sizeof(buf), exten, context, priority, data); \
-       loopback_subst(&newexten, &newcontext, &newpriority, &newpattern, buf); \
-       ast_log(LOG_DEBUG, "Parsed into %s @ %s priority %d\n", newexten, newcontext, newpriority); \
+       loopback_subst(buf, sizeof(buf), exten, context, priority, data); \
+       loopback_parse(&newexten, &newcontext, &newpriority, &newpattern, buf); \
+       ast_debug(1, "Parsed into %s @ %s priority %d\n", newexten, newcontext, newpriority); \
        if (!strcasecmp(newcontext, context)) return -1
 
-
-static char *loopback_helper(char *buf, int buflen, const char *exten, const char *context, int priority, const char *data)
+static char *loopback_subst(char *buf, int buflen, const char *exten, const char *context, int priority, const char *data)
 {
        struct ast_var_t *newvariable;
        struct varshead headp;
        char tmp[80];
 
        snprintf(tmp, sizeof(tmp), "%d", priority);
-       memset(buf, 0, buflen);
        AST_LIST_HEAD_INIT_NOLOCK(&headp);
-       AST_LIST_INSERT_HEAD(&headp, ast_var_assign("EXTEN", exten), entries);
-       AST_LIST_INSERT_HEAD(&headp, ast_var_assign("CONTEXT", context), entries);
-       AST_LIST_INSERT_HEAD(&headp, ast_var_assign("PRIORITY", tmp), entries);
+       if ((newvariable = ast_var_assign("EXTEN", exten))) {
+               AST_LIST_INSERT_HEAD(&headp, newvariable, entries);
+       }
+       if ((newvariable = ast_var_assign("CONTEXT", context))) {
+               AST_LIST_INSERT_HEAD(&headp, newvariable, entries);
+       }
+       if ((newvariable = ast_var_assign("PRIORITY", tmp))) {
+               AST_LIST_INSERT_HEAD(&headp, newvariable, entries);
+       }
        /* Substitute variables */
        pbx_substitute_variables_varshead(&headp, data, buf, buflen);
        /* free the list */
@@ -101,7 +108,7 @@ static char *loopback_helper(char *buf, int buflen, const char *exten, const cha
        return buf;
 }
 
-static void loopback_subst(char **newexten, char **newcontext, int *priority, char **newpattern, char *buf)
+static void loopback_parse(char **newexten, char **newcontext, int *priority, char **newpattern, char *buf)
 {
        char *con;
        char *pri;
@@ -119,7 +126,7 @@ static void loopback_subst(char **newexten, char **newcontext, int *priority, ch
        if (!ast_strlen_zero(con))
                *newcontext = con;
        if (!ast_strlen_zero(pri))
-               sscanf(pri, "%d", priority);
+               sscanf(pri, "%30d", priority);
 }
 
 static int loopback_exists(struct ast_channel *chan, const char *context, const char *exten, int priority, const char *callerid, const char *data)
@@ -142,11 +149,9 @@ static int loopback_canmatch(struct ast_channel *chan, const char *context, cons
 
 static int loopback_exec(struct ast_channel *chan, const char *context, const char *exten, int priority, const char *callerid, const char *data)
 {
+       int found;
        LOOPBACK_COMMON;
-       res = ast_spawn_extension(chan, newcontext, newexten, newpriority, callerid);
-       /* XXX hmmm... res is overridden ? */
-       if (newpattern && !ast_extension_match(newpattern, exten))
-               res = -1;
+       res = ast_spawn_extension(chan, newcontext, newexten, newpriority, callerid, &found, 0);
        return res;
 }
 
@@ -161,38 +166,25 @@ static int loopback_matchmore(struct ast_channel *chan, const char *context, con
 
 static struct ast_switch loopback_switch =
 {
-        name:                   "Loopback",
-        description:                   "Loopback Dialplan Switch",
-        exists:                 loopback_exists,
-        canmatch:               loopback_canmatch,
-        exec:                   loopback_exec,
-        matchmore:              loopback_matchmore,
+       .name                   = "Loopback",
+       .description            = "Loopback Dialplan Switch",
+       .exists                 = loopback_exists,
+       .canmatch               = loopback_canmatch,
+       .exec                   = loopback_exec,
+       .matchmore              = loopback_matchmore,
 };
 
-char *description(void)
-{
-       return tdesc;
-}
-
-int usecount(void)
-{
-       return 1;
-}
-
-char *key()
-{
-       return ASTERISK_GPL_KEY;
-}
-
-int unload_module(void)
+static int unload_module(void)
 {
        ast_unregister_switch(&loopback_switch);
        return 0;
 }
 
-int load_module(void)
+static int load_module(void)
 {
-       ast_register_switch(&loopback_switch);
-       return 0;
+       if (ast_register_switch(&loopback_switch))
+               return AST_MODULE_LOAD_FAILURE;
+       return AST_MODULE_LOAD_SUCCESS;
 }
 
+AST_MODULE_INFO_STANDARD(ASTERISK_GPL_KEY, "Loopback Switch");