Add Masquerade manager event which trips when a masquerade happens (issue #7840 repor...
[asterisk/asterisk.git] / funcs / func_logic.c
old mode 100755 (executable)
new mode 100644 (file)
index d4e6cdf..9fe23b2
 /*
- * Asterisk -- A telephony toolkit for Linux.
+ * Asterisk -- An open source telephony toolkit.
  *
- * Conditional logic dialplan functions
- * 
- * Copyright (C) 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
+ * the Asterisk project. Please do not directly contact
+ * any of the maintainers of this project for assistance;
+ * the project provides a web site, mailing lists and IRC
+ * channels for your use.
+ *
  * This program is free software, distributed under the terms of
- * the GNU General Public License
+ * the GNU General Public License Version 2. See the LICENSE file
+ * at the top of the source tree.
+ */
+
+/*! \file
+ * 
+ * \brief Conditional logic dialplan functions
+ * 
+ * \author Anthony Minessale II
  */
 
+#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/logger.h"
 #include "asterisk/utils.h"
 #include "asterisk/app.h"
-#include "asterisk/config.h"           /* for ast_true */
 
-static char *builtin_function_isnull(struct ast_channel *chan, char *cmd, char *data, char *buf, size_t len) 
+static int isnull(struct ast_channel *chan, char *cmd, char *data,
+                 char *buf, size_t len)
 {
-       char *ret_true = "1", *ret_false = "0";
+       strcpy(buf, data && *data ? "0" : "1");
 
-       return data && *data ? ret_false : ret_true;
+       return 0;
 }
 
-static char *builtin_function_exists(struct ast_channel *chan, char *cmd, char *data, char *buf, size_t len) 
+static int exists(struct ast_channel *chan, char *cmd, char *data, char *buf,
+                 size_t len)
 {
-       char *ret_true = "1", *ret_false = "0";
+       strcpy(buf, data && *data ? "1" : "0");
 
-       return data && *data ? ret_true : ret_false;
+       return 0;
 }
 
-static char *builtin_function_if(struct ast_channel *chan, char *cmd, char *data, char *buf, size_t len) 
+static int iftime(struct ast_channel *chan, char *cmd, char *data, char *buf,
+                 size_t len)
 {
-       char *ret = NULL;
-       char *mydata = NULL;
-       char *expr = NULL;
-       char *iftrue = NULL;
-       char *iffalse = NULL;
-
-       if((mydata = ast_strdupa(data))) {
-               expr = mydata;
-               if ((iftrue = strchr(mydata, '?'))) {
-                       *iftrue = '\0';
-                       iftrue++;
-                       if ((iffalse = strchr(iftrue, ':'))) {
-                               *iffalse = '\0';
-                               iffalse++;
-                       }
-               } 
-
-               if (expr && iftrue) {
-                       expr = ast_strip_quoted(expr, "\"", "\"");
-                       iftrue = ast_strip_quoted(iftrue, "\"", "\"");
-
-                       if (iffalse) {
-                               iffalse = ast_strip_quoted(iffalse, "\"", "\"");
-                       }
-                       ret = ast_true(expr) ? iftrue : iffalse;
-                       if (ret) {
-                               ast_copy_string(buf, ret, len);
-                               ret = buf;
-                       }
-               } else {
-                       ast_log(LOG_WARNING, "Syntax $(if <expr>?[<truecond>][:<falsecond>])\n");
-                       ret = NULL;
-               }
-       } else {
-               ast_log(LOG_WARNING, "Memory Error!\n");
-               ret = NULL;
+       struct ast_timing timing;
+       char *expr;
+       char *iftrue;
+       char *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 -1;
+       }
+
+       if (!ast_build_timing(&timing, expr)) {
+               ast_log(LOG_WARNING, "Invalid Time Spec.\n");
+               return -1;
        }
 
-       return ret;
+       if (iftrue)
+               iftrue = ast_strip_quoted(iftrue, "\"", "\"");
+       if (iffalse)
+               iffalse = ast_strip_quoted(iffalse, "\"", "\"");
+
+       ast_copy_string(buf, ast_check_timing(&timing) ? iftrue : iffalse, len);
+
+       return 0;
 }
 
-static char *builtin_function_set(struct ast_channel *chan, char *cmd, char *data, char *buf, size_t len) 
+static int acf_if(struct ast_channel *chan, char *cmd, char *data, char *buf,
+                 size_t len)
 {
-       char *ret = NULL, *varname, *val;
-
-       if ((varname = ast_strdupa(data))) {
-               if ((val = strchr(varname, '='))) {
-                       *val = '\0';
-                       val++;
-                       varname = ast_strip(varname);
-                       val = ast_strip(val);
-                       pbx_builtin_setvar_helper(chan, varname, val);
-                       ast_copy_string(buf, val, len);
-               } else {
-                       ast_log(LOG_WARNING, "Syntax Error!\n");
-               }
-               
-       } else {
-        ast_log(LOG_WARNING, "Memory Error!\n");
-    }
-
-       return ret;
+       char *expr;
+       char *iftrue;
+       char *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 IF(<expr>?[<true>][:<false>])\n");
+               return -1;
+       }
+
+       expr = ast_strip(expr);
+       if (iftrue)
+               iftrue = ast_strip_quoted(iftrue, "\"", "\"");
+       if (iffalse)
+               iffalse = ast_strip_quoted(iffalse, "\"", "\"");
+
+       ast_copy_string(buf, pbx_checkcondition(expr) ? iftrue : iffalse, len);
+
+       return 0;
 }
 
-#ifndef BUILTIN_FUNC
-static
-#endif
-struct ast_custom_function isnull_function = {
+static int set(struct ast_channel *chan, char *cmd, char *data, char *buf,
+              size_t len)
+{
+       char *varname;
+       char *val;
+
+       varname = strsep(&data, "=");
+       val = data;
+
+       if (ast_strlen_zero(varname) || !val) {
+               ast_log(LOG_WARNING, "Syntax SET(<varname>=[<value>])\n");
+               return -1;
+       }
+
+       varname = ast_strip(varname);
+       val = ast_strip(val);
+       pbx_builtin_setvar_helper(chan, varname, val);
+       ast_copy_string(buf, val, len);
+
+       return 0;
+}
+
+static struct ast_custom_function isnull_function = {
        .name = "ISNULL",
        .synopsis = "NULL Test: Returns 1 if NULL or 0 otherwise",
        .syntax = "ISNULL(<data>)",
-       .read = builtin_function_isnull,
+       .read = isnull,
 };
 
-#ifndef BUILTIN_FUNC
-static
-#endif
-struct ast_custom_function set_function = {
+static struct ast_custom_function set_function = {
        .name = "SET",
-       .synopsis = "SET assigns a value to a function call.",
-       .syntax = "SET(<varname>=<value>)",
-       .read = builtin_function_set,
+       .synopsis = "SET assigns a value to a channel variable",
+       .syntax = "SET(<varname>=[<value>])",
+       .read = set,
 };
 
-#ifndef BUILTIN_FUNC
-static
-#endif
-struct ast_custom_function exists_function = {
+static struct ast_custom_function exists_function = {
        .name = "EXISTS",
        .synopsis = "Existence Test: Returns 1 if exists, 0 otherwise",
        .syntax = "EXISTS(<data>)",
-       .read = builtin_function_exists,
+       .read = exists,
 };
 
-#ifndef BUILTIN_FUNC
-static
-#endif
-struct ast_custom_function if_function = {
+static struct ast_custom_function if_function = {
        .name = "IF",
-       .synopsis = "Conditional: Returns the data following '?' if true else the data following ':'",
-       .syntax = "IF(<expr>?<true>:<false>)",
-       .read = builtin_function_if,
+       .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",
+       .synopsis =
+               "Temporal Conditional: Returns the data following '?' if true else the data following ':'",
+       .syntax = "IFTIME(<timespec>?[<true>][:<false>])",
+       .read = iftime,
+};
+
+static int unload_module(void)
+{
+       int res = 0;
+
+       res |= ast_custom_function_unregister(&isnull_function);
+       res |= ast_custom_function_unregister(&set_function);
+       res |= ast_custom_function_unregister(&exists_function);
+       res |= ast_custom_function_unregister(&if_function);
+       res |= ast_custom_function_unregister(&if_time_function);
+
+       return res;
+}
+
+static int load_module(void)
+{
+       int res = 0;
+
+       res |= ast_custom_function_register(&isnull_function);
+       res |= ast_custom_function_register(&set_function);
+       res |= ast_custom_function_register(&exists_function);
+       res |= ast_custom_function_register(&if_function);
+       res |= ast_custom_function_register(&if_time_function);
+
+       return res;
+}
+
+AST_MODULE_INFO_STANDARD(ASTERISK_GPL_KEY, "Logical dialplan functions");