Add relative substring (bug #229)
[asterisk/asterisk.git] / apps / app_substring.c
1 /*
2  * Asterisk -- A telephony toolkit for Linux.
3  *
4  * Skeleton application
5  * 
6  * Copyright (C) 1999, Mark Spencer
7  *
8  * Mark Spencer <markster@linux-support.net>
9  *
10  * This program is free software, distributed under the terms of
11  * the GNU General Public License
12  */
13
14 #include <sys/types.h>
15 #include <asterisk/file.h>
16 #include <asterisk/logger.h>
17 #include <asterisk/channel.h>
18 #include <asterisk/pbx.h>
19 #include <asterisk/module.h>
20 #include <asterisk/pbx.h>
21 #include <stdlib.h>
22 #include <unistd.h>
23 #include <string.h>
24 #include <stdlib.h>
25
26 #include <pthread.h>
27
28
29 static char *tdesc = "Save substring digits in a given variable";
30
31 static char *descrip =
32 "  SubString(variable=string_of_digits|count1|count2): Assigns the substring\n"
33 "of string_of_digits to a given variable. Parameter count1 may be positive\n"
34 "or negative. If it's positive then we skip the first count1 digits from the\n"
35 "left. If it's negative, we move count1 digits counting from the end of\n"
36 "the string to the left. Parameter count2 implies how many digits we are\n"
37 "taking from the point that count1 placed us. If count2 is negative, then\n"
38 "that many digits are omitted from the end.\n"
39 "For example:\n"
40 "exten => _NXXXXXX,1,SubString,test=2564286161|0|3\n"
41 "assigns the area code (3 first digits) to variable test.\n"
42 "exten => _NXXXXXX,1,SubString,test=2564286161|-7|7\n"
43 "assigns the last 7 digits to variable test.\n"
44 "exten => _NXXXXXX,1,SubString,test=2564286161|0|-4\n" 
45 "assigns all but the last 4 digits to variable test.\n" 
46 "If there are no parameters it'll return with -1.\n"
47 "If there wrong parameters it go on and return with 0\n";
48
49 static char *app = "SubString";
50
51 static char *synopsis = "Save substring digits in a given variable";
52
53 STANDARD_LOCAL_USER;
54
55 LOCAL_USER_DECL;
56
57 static int substring_exec(struct ast_channel *chan, void *data)
58 {
59   char newexten[AST_MAX_EXTENSION] = "";
60   char *count1, *count2;
61   char *first, *second, *stringp;
62   stringp=alloca(strlen(data)+1);
63   ast_log(LOG_WARNING, "The use of Substring application is deprecated. Please use ${variable:a:b} instead\n");
64   strncpy(stringp,data,strlen(data)+1);
65   if (strchr(stringp,'|')&&strchr(stringp,'=')) {
66     int icount1,icount2;
67     first=strsep(&stringp,"=");
68     second=strsep(&stringp,"|");
69     count1=strsep(&stringp,"|");
70     count2=strsep(&stringp,"\0");
71     if (!first || !second || !count1 || !count2) {
72       ast_log(LOG_DEBUG, "Ignoring, since there is no argument: variable or string or count1 or count2\n");
73       return 0;
74     }
75     icount1=atoi(count1);
76     icount2=atoi(count2);
77         if (icount2<0) {
78           icount2 = icount2 + strlen(second);
79     }
80     if (abs(icount1)>strlen(second)) {
81       ast_log(LOG_WARNING, "Limiting count1 parameter because it exceeds the length of the string\n");
82       if (icount1>=0)
83         icount1=strlen(second);
84       else
85         icount1=0;
86     }
87     if ((icount1<0 && icount2>-icount1) || (icount1>=0 && icount1+icount2>strlen(second))) {
88       ast_log(LOG_WARNING, "Limiting count2 parameter because it exceeds the length of the string\n");
89       if (icount1>=0)
90         icount2=strlen(second)-icount1;
91       else
92         icount2=strlen(second)+icount1;
93     }
94     if (first&&second) {
95       if (icount1>=0)
96         strncpy(newexten,second+icount1,icount2);
97       else
98         strncpy(newexten,second+strlen(second)+icount1,icount2);
99       pbx_builtin_setvar_helper(chan,first,newexten);
100     }
101   } else {
102     ast_log(LOG_DEBUG, "Ignoring, no parameters\n");
103   }
104   return 0;
105 }
106
107 int unload_module(void)
108 {
109         STANDARD_HANGUP_LOCALUSERS;
110         return ast_unregister_application(app);
111 }
112
113 int load_module(void)
114 {
115         return ast_register_application(app, substring_exec, synopsis, descrip);
116 }
117
118 char *description(void)
119 {
120         return tdesc;
121 }
122
123 int usecount(void)
124 {
125         int res;
126         STANDARD_USECOUNT(res);
127         return res;
128 }
129
130 char *key()
131 {
132         return ASTERISK_GPL_KEY;
133 }