1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
|
/*
* Asterisk -- A telephony toolkit for Linux.
*
* Conditional logic dialplan functions
*
* Copyright (C) 2005, Digium, Inc.
* Portions Copyright (C) 2005, Anthony Minessale II
*
* 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++;
}
}
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;
}
return ret;
}
static char *builtin_function_set(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;
}
#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 set_function = {
.name = "SET",
.synopsis = "SET assigns a value to a function call.",
.syntax = "SET(<varname>=<value>)",
.read = builtin_function_set,
};
#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,
};
|
