d20b7719f216f3ed3bd3397d133841d2b4224bf4
[asterisk/asterisk.git] / funcs / func_logic.c
1 /*
2  * Asterisk -- A telephony toolkit for Linux.
3  *
4  * Conditional logic dialplan functions
5  * 
6  * Copyright (C) 2005, Digium, Inc.
7  * Portions Copyright (C) 2005, Anthony Minessale II
8  *
9  * This program is free software, distributed under the terms of
10  * the GNU General Public License
11  */
12
13 #include <stdlib.h>
14 #include <string.h>
15 #include <sys/types.h>
16
17 #include "asterisk/channel.h"
18 #include "asterisk/pbx.h"
19 #include "asterisk/logger.h"
20 #include "asterisk/utils.h"
21 #include "asterisk/app.h"
22 #include "asterisk/config.h"            /* for ast_true */
23
24 static char *builtin_function_isnull(struct ast_channel *chan, char *cmd, char *data, char *buf, size_t len) 
25 {
26         char *ret_true = "1", *ret_false = "0";
27
28         return data && *data ? ret_false : ret_true;
29 }
30
31 static char *builtin_function_exists(struct ast_channel *chan, char *cmd, char *data, char *buf, size_t len) 
32 {
33         char *ret_true = "1", *ret_false = "0";
34
35         return data && *data ? ret_true : ret_false;
36 }
37
38 static char *builtin_function_if(struct ast_channel *chan, char *cmd, char *data, char *buf, size_t len) 
39 {
40         char *ret = NULL;
41         char *mydata = NULL;
42         char *expr = NULL;
43         char *iftrue = NULL;
44         char *iffalse = NULL;
45
46         if((mydata = ast_strdupa(data))) {
47                 expr = mydata;
48                 if ((iftrue = strchr(mydata, '?'))) {
49                         *iftrue = '\0';
50                         iftrue++;
51                         if ((iffalse = strchr(iftrue, ':'))) {
52                                 *iffalse = '\0';
53                                 iffalse++;
54                         }
55                 } else 
56                         iffalse = "";
57                 if (expr && iftrue) {
58                         ret = ast_true(expr) ? iftrue : iffalse;
59                         strncpy(buf, ret, len);
60                         ret = buf;
61                 } else {
62                         ast_log(LOG_WARNING, "Syntax $(if <expr>?[<truecond>][:<falsecond>])\n");
63                         ret = NULL;
64                 }
65         } else {
66                 ast_log(LOG_WARNING, "Memory Error!\n");
67                 ret = NULL;
68         }
69
70         return ret;
71 }
72
73 #ifndef BUILTIN_FUNC
74 static
75 #endif
76 struct ast_custom_function isnull_function = {
77         .name = "ISNULL",
78         .synopsis = "NULL Test: Returns 1 if NULL or 0 otherwise",
79         .syntax = "ISNULL(<data>)",
80         .read = builtin_function_isnull,
81 };
82
83 #ifndef BUILTIN_FUNC
84 static
85 #endif
86 struct ast_custom_function exists_function = {
87         .name = "EXISTS",
88         .synopsis = "Existence Test: Returns 1 if exists, 0 otherwise",
89         .syntax = "EXISTS(<data>)",
90         .read = builtin_function_exists,
91 };
92
93 #ifndef BUILTIN_FUNC
94 static
95 #endif
96 struct ast_custom_function if_function = {
97         .name = "IF",
98         .synopsis = "Conditional: Returns the data following '?' if true else the data following ':'",
99         .syntax = "IF(<expr>?<true>:<false>)",
100         .read = builtin_function_if,
101 };