Merge the dialplan_aesthetics branch. Most of this patch simply converts applications
[asterisk/asterisk.git] / funcs / func_logic.c
index b3c7eb2..92c4f8b 100644 (file)
@@ -1,7 +1,7 @@
 /*
  * Asterisk -- An open source telephony toolkit.
  *
 /*
  * Asterisk -- An open source telephony toolkit.
  *
- * Copyright (C) 1999 - 2005, Digium, Inc.
+ * Copyright (C) 1999 - 2006, Digium, Inc.
  * Portions Copyright (C) 2005, Anthony Minessale II
  *
  * See http://www.asterisk.org for more information about
  * Portions Copyright (C) 2005, Anthony Minessale II
  *
  * See http://www.asterisk.org for more information about
  * \brief Conditional logic dialplan functions
  * 
  * \author Anthony Minessale II
  * \brief Conditional logic dialplan functions
  * 
  * \author Anthony Minessale II
+ *
+ * \ingroup functions
  */
 
  */
 
-#include <stdlib.h>
-#include <string.h>
-#include <sys/types.h>
-
 #include "asterisk.h"
 
 ASTERISK_FILE_VERSION(__FILE__, "$Revision$")
 
 #include "asterisk.h"
 
 ASTERISK_FILE_VERSION(__FILE__, "$Revision$")
 
+#include <stdio.h>
+#include <stdlib.h>
+#include <string.h>
+#include <sys/types.h>
+
 #include "asterisk/module.h"
 #include "asterisk/channel.h"
 #include "asterisk/pbx.h"
 #include "asterisk/module.h"
 #include "asterisk/channel.h"
 #include "asterisk/pbx.h"
@@ -37,40 +40,44 @@ ASTERISK_FILE_VERSION(__FILE__, "$Revision$")
 #include "asterisk/utils.h"
 #include "asterisk/app.h"
 
 #include "asterisk/utils.h"
 #include "asterisk/app.h"
 
-static char *isnull(struct ast_channel *chan, char *cmd, char *data, char *buf, size_t len) 
+static int isnull(struct ast_channel *chan, const char *cmd, char *data,
+                 char *buf, size_t len)
 {
 {
-       return data && *data ? "0" : "1";
+       strcpy(buf, data && *data ? "0" : "1");
+
+       return 0;
 }
 
 }
 
-static char *exists(struct ast_channel *chan, char *cmd, char *data, char *buf, size_t len) 
+static int exists(struct ast_channel *chan, const char *cmd, char *data, char *buf,
+                 size_t len)
 {
 {
-       return data && *data ? "1" : "0";
+       strcpy(buf, data && *data ? "1" : "0");
+
+       return 0;
 }
 
 }
 
-static char *iftime(struct ast_channel *chan, char *cmd, char *data, char *buf, size_t len) 
+static int iftime(struct ast_channel *chan, const char *cmd, char *data, char *buf,
+                 size_t len)
 {
        struct ast_timing timing;
 {
        struct ast_timing timing;
-       char *ret;
        char *expr;
        char *iftrue;
        char *iffalse;
 
        char *expr;
        char *iftrue;
        char *iffalse;
 
-       if (!(data = ast_strdupa(data)))
-               return NULL;
-
        data = ast_strip_quoted(data, "\"", "\"");
        expr = strsep(&data, "?");
        iftrue = strsep(&data, ":");
        iffalse = data;
 
        if (ast_strlen_zero(expr) || !(iftrue || iffalse)) {
        data = ast_strip_quoted(data, "\"", "\"");
        expr = strsep(&data, "?");
        iftrue = strsep(&data, ":");
        iffalse = data;
 
        if (ast_strlen_zero(expr) || !(iftrue || iffalse)) {
-               ast_log(LOG_WARNING, "Syntax IFTIME(<timespec>?[<true>][:<false>])\n");
-               return NULL;
+               ast_log(LOG_WARNING,
+                               "Syntax IFTIME(<timespec>?[<true>][:<false>])\n");
+               return -1;
        }
 
        if (!ast_build_timing(&timing, expr)) {
                ast_log(LOG_WARNING, "Invalid Time Spec.\n");
        }
 
        if (!ast_build_timing(&timing, expr)) {
                ast_log(LOG_WARNING, "Invalid Time Spec.\n");
-               return NULL;
+               return -1;
        }
 
        if (iftrue)
        }
 
        if (iftrue)
@@ -78,24 +85,18 @@ static char *iftime(struct ast_channel *chan, char *cmd, char *data, char *buf,
        if (iffalse)
                iffalse = ast_strip_quoted(iffalse, "\"", "\"");
 
        if (iffalse)
                iffalse = ast_strip_quoted(iffalse, "\"", "\"");
 
-       if ((ret = ast_check_timing(&timing) ? iftrue : iffalse)) {
-               ast_copy_string(buf, ret, len);
-               ret = buf;
-       } 
-       
-       return ret;
+       ast_copy_string(buf, ast_check_timing(&timing) ? iftrue : iffalse, len);
+
+       return 0;
 }
 
 }
 
-static char *acf_if(struct ast_channel *chan, char *cmd, char *data, char *buf, size_t len) 
+static int acf_if(struct ast_channel *chan, const char *cmd, char *data, char *buf,
+                 size_t len)
 {
 {
-       char *ret;
        char *expr;
        char *iftrue;
        char *iffalse;
 
        char *expr;
        char *iftrue;
        char *iffalse;
 
-       if (!(data = ast_strdupa(data)))
-               return NULL;
-
        data = ast_strip_quoted(data, "\"", "\"");
        expr = strsep(&data, "?");
        iftrue = strsep(&data, ":");
        data = ast_strip_quoted(data, "\"", "\"");
        expr = strsep(&data, "?");
        iftrue = strsep(&data, ":");
@@ -103,7 +104,7 @@ static char *acf_if(struct ast_channel *chan, char *cmd, char *data, char *buf,
 
        if (ast_strlen_zero(expr) || !(iftrue || iffalse)) {
                ast_log(LOG_WARNING, "Syntax IF(<expr>?[<true>][:<false>])\n");
 
        if (ast_strlen_zero(expr) || !(iftrue || iffalse)) {
                ast_log(LOG_WARNING, "Syntax IF(<expr>?[<true>][:<false>])\n");
-               return NULL;
+               return -1;
        }
 
        expr = ast_strip(expr);
        }
 
        expr = ast_strip(expr);
@@ -112,28 +113,23 @@ static char *acf_if(struct ast_channel *chan, char *cmd, char *data, char *buf,
        if (iffalse)
                iffalse = ast_strip_quoted(iffalse, "\"", "\"");
 
        if (iffalse)
                iffalse = ast_strip_quoted(iffalse, "\"", "\"");
 
-       if ((ret = ast_true(expr) ? iftrue : iffalse)) {
-               ast_copy_string(buf, ret, len);
-               ret = buf;
-       } 
-       
-       return ret;
+       ast_copy_string(buf, pbx_checkcondition(expr) ? (S_OR(iftrue, "")) : (S_OR(iffalse, "")), len);
+
+       return 0;
 }
 
 }
 
-static char *set(struct ast_channel *chan, char *cmd, char *data, char *buf, size_t len) 
+static int set(struct ast_channel *chan, const char *cmd, char *data, char *buf,
+              size_t len)
 {
        char *varname;
        char *val;
 
 {
        char *varname;
        char *val;
 
-       if (!(data = ast_strdupa(data)))
-               return NULL;
-
        varname = strsep(&data, "=");
        val = data;
 
        if (ast_strlen_zero(varname) || !val) {
                ast_log(LOG_WARNING, "Syntax SET(<varname>=[<value>])\n");
        varname = strsep(&data, "=");
        val = data;
 
        if (ast_strlen_zero(varname) || !val) {
                ast_log(LOG_WARNING, "Syntax SET(<varname>=[<value>])\n");
-               return NULL;
+               return -1;
        }
 
        varname = ast_strip(varname);
        }
 
        varname = ast_strip(varname);
@@ -141,7 +137,30 @@ static char *set(struct ast_channel *chan, char *cmd, char *data, char *buf, siz
        pbx_builtin_setvar_helper(chan, varname, val);
        ast_copy_string(buf, val, len);
 
        pbx_builtin_setvar_helper(chan, varname, val);
        ast_copy_string(buf, val, len);
 
-       return buf;
+       return 0;
+}
+
+static int acf_import(struct ast_channel *chan, const char *cmd, char *data, char *buf, size_t len)
+{
+       AST_DECLARE_APP_ARGS(args,
+               AST_APP_ARG(channel);
+               AST_APP_ARG(varname);
+       );
+       AST_STANDARD_APP_ARGS(args, data);
+       memset(buf, 0, len);
+
+       if (!ast_strlen_zero(args.varname)) {
+               struct ast_channel *chan2 = ast_get_channel_by_name_locked(args.channel);
+               if (chan2) {
+                       char *s = alloca(strlen(args.varname) + 4);
+                       if (s) {
+                               sprintf(s, "${%s}", args.varname);
+                               pbx_substitute_variables_helper(chan2, s, buf, len);
+                       }
+                       ast_channel_unlock(chan2);
+               }
+       }
+       return 0;
 }
 
 static struct ast_custom_function isnull_function = {
 }
 
 static struct ast_custom_function isnull_function = {
@@ -167,21 +186,29 @@ static struct ast_custom_function exists_function = {
 
 static struct ast_custom_function if_function = {
        .name = "IF",
 
 static struct ast_custom_function if_function = {
        .name = "IF",
-       .synopsis = "Conditional: Returns the data following '?' if true else the data following ':'",
+       .synopsis =
+               "Conditional: Returns the data following '?' if true, else the data following ':'",
        .syntax = "IF(<expr>?[<true>][:<false>])",
        .read = acf_if,
 };
 
 static struct ast_custom_function if_time_function = {
        .name = "IFTIME",
        .syntax = "IF(<expr>?[<true>][:<false>])",
        .read = acf_if,
 };
 
 static struct ast_custom_function if_time_function = {
        .name = "IFTIME",
-       .synopsis = "Temporal Conditional: Returns the data following '?' if true else the data following ':'",
+       .synopsis =
+               "Temporal Conditional: Returns the data following '?' if true, else the data following ':'",
        .syntax = "IFTIME(<timespec>?[<true>][:<false>])",
        .read = iftime,
 };
 
        .syntax = "IFTIME(<timespec>?[<true>][:<false>])",
        .read = iftime,
 };
 
-static char *tdesc = "Logical dialplan functions";
+static struct ast_custom_function import_function = {
+       .name = "IMPORT",
+       .synopsis =
+               "Retrieve the value of a variable from another channel\n",
+       .syntax = "IMPORT(channel,variable)",
+       .read = acf_import,
+};
 
 
-int unload_module(void)
+static int unload_module(void)
 {
        int res = 0;
 
 {
        int res = 0;
 
@@ -190,11 +217,12 @@ int unload_module(void)
        res |= ast_custom_function_unregister(&exists_function);
        res |= ast_custom_function_unregister(&if_function);
        res |= ast_custom_function_unregister(&if_time_function);
        res |= ast_custom_function_unregister(&exists_function);
        res |= ast_custom_function_unregister(&if_function);
        res |= ast_custom_function_unregister(&if_time_function);
+       res |= ast_custom_function_unregister(&import_function);
 
        return res;
 }
 
 
        return res;
 }
 
-int load_module(void)
+static int load_module(void)
 {
        int res = 0;
 
 {
        int res = 0;
 
@@ -203,21 +231,9 @@ int load_module(void)
        res |= ast_custom_function_register(&exists_function);
        res |= ast_custom_function_register(&if_function);
        res |= ast_custom_function_register(&if_time_function);
        res |= ast_custom_function_register(&exists_function);
        res |= ast_custom_function_register(&if_function);
        res |= ast_custom_function_register(&if_time_function);
+       res |= ast_custom_function_register(&import_function);
 
        return res;
 }
 
 
        return res;
 }
 
-char *description(void)
-{
-       return tdesc;
-}
-
-int usecount(void)
-{
-       return 0;
-}
-
-char *key()
-{
-       return ASTERISK_GPL_KEY;
-}
+AST_MODULE_INFO_STANDARD(ASTERISK_GPL_KEY, "Logical dialplan functions");