pbx_lua: fix regression with global sym export and context clash by pbx_config.
[asterisk/asterisk.git] / pbx / pbx_loopback.c
old mode 100755 (executable)
new mode 100644 (file)
index 2abc117..dc9e7c7
  *
  */
 
-#include <stdlib.h>
-#include <unistd.h>
-#include <string.h>
-#include <errno.h>
+/*** MODULEINFO
+       <support_level>core</support_level>
+ ***/
 
 #include "asterisk.h"
 
@@ -35,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"
@@ -48,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!)
 
 */
 
@@ -74,49 +78,46 @@ 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);
-       newvariable = ast_var_assign("EXTEN", exten);
-       AST_LIST_INSERT_HEAD(&headp, newvariable, entries);
-       newvariable = ast_var_assign("CONTEXT", context);
-       AST_LIST_INSERT_HEAD(&headp, newvariable, entries);
-       newvariable = ast_var_assign("PRIORITY", tmp);
-       AST_LIST_INSERT_HEAD(&headp, newvariable, entries);
-       pbx_substitute_variables_varshead(&headp, data, buf, buflen);
-       /* Substitute variables */
-       while (!AST_LIST_EMPTY(&headp)) {           /* List Deletion. */
-               newvariable = AST_LIST_REMOVE_HEAD(&headp, entries);
-               ast_var_delete(newvariable);
+       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 */
+       while ((newvariable = AST_LIST_REMOVE_HEAD(&headp, entries)))
+                ast_var_delete(newvariable);
        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;
        *newpattern = strchr(buf, '/');
-       if (*newpattern) {
-               *(*newpattern) = '\0';
-               (*newpattern)++;
-       }
+       if (*newpattern)
+               *(*newpattern)++ = '\0';
        con = strchr(buf, '@');
        if (con) {
-               *con = '\0';
-               con++;
+               *con++ = '\0';
                pri = strchr(con, ':');
        } else
                pri = strchr(buf, ':');
@@ -125,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)
@@ -146,15 +147,11 @@ static int loopback_canmatch(struct ast_channel *chan, const char *context, cons
        return res;
 }
 
-static int loopback_exec(struct ast_channel *chan, const char *context, const char *exten, int priority, const char *callerid, int newstack, const char *data)
+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;
-       if (newstack)
-               res = ast_spawn_extension(chan, newcontext, newexten, newpriority, callerid);
-       else
-               res = ast_exec_extension(chan, newcontext, newexten, newpriority, callerid);
-       if (newpattern && !ast_extension_match(newpattern, exten))
-               res = -1;
+       res = ast_spawn_extension(chan, newcontext, newexten, newpriority, callerid, &found, 0);
        return res;
 }
 
@@ -169,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");