major re-work of dialplan functions, including:

 - locking of functions list during registration/unregistration/searching
 - rename of function description structure to be consistent with the rest of the API
 - addition of 'desc' element to description structure, for detailed description (like applications)
 - addition of 'show function' CLI command to show function details
 - conversion of existing functions to use uppercase names to match policy
 - creation of new 'pbx_functions.so' module to contain standard 'builtin' functions
 - removal of all builtin functions from pbx.c and apps and placement into new 'funcs' directory


git-svn-id: http://svn.digium.com/svn/asterisk/trunk@5583 f38db490-d61c-443f-a65b-d21fe96a405b

1 files changed, 100 insertions, 0 deletions

diff --git a/funcs/func_logic.c b/funcs/func_logic.c
new file mode 100755
index 000000000..f7f2c8e5c
--- /dev/null
+++ b/funcs/func_logic.c
@@ -0,0 +1,100 @@
+/*
+ * Asterisk -- A telephony toolkit for Linux.
+ *
+ * MD5 digest related dialplan functions
+ * 
+ * Copyright (C) 2005, Digium, Inc.
+ *
+ * This program is free software, distributed under the terms of
+ * the GNU General Public License
+ */
+
+#include <stdlib.h>
+#include <string.h>
+#include <sys/types.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) 
+{
+	char *ret_true = "1", *ret_false = "0";
+
+	return data && *data ? ret_false : ret_true;
+}
+
+static char *builtin_function_exists(struct ast_channel *chan, char *cmd, char *data, char *buf, size_t len) 
+{
+	char *ret_true = "1", *ret_false = "0";
+
+	return data && *data ? ret_true : ret_false;
+}
+
+static char *builtin_function_if(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++;
+			}
+		} else 
+			iffalse = "";
+		if (expr && iftrue) {
+			ret = ast_true(expr) ? iftrue : iffalse;
+			strncpy(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;
+	}
+
+	return ret;
+}
+
+#ifndef BUILTIN_FUNC
+static
+#endif
+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,
+};
+
+#ifndef BUILTIN_FUNC
+static
+#endif
+struct ast_custom_function exists_function = {
+	.name = "EXISTS",
+	.synopsis = "Existence Test: Returns 1 if exists, 0 otherwise",
+	.syntax = "EXISTS(<data>)",
+	.read = builtin_function_exists,
+};
+
+#ifndef BUILTIN_FUNC
+static
+#endif
+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,
+};