Shuffle RESTful URL's around.
[asterisk/asterisk.git] / tests / test_func_file.c
1 /*
2  * Asterisk -- An open source telephony toolkit.
3  *
4  * Copyright (C) 2010, Digium, Inc.
5  *
6  * Tilghman Lesher <tlesher AT digium DOT com>
7  *
8  * See http://www.asterisk.org for more information about
9  * the Asterisk project. Please do not directly contact
10  * any of the maintainers of this project for assistance;
11  * the project provides a web site, mailing lists and IRC
12  * channels for your use.
13  *
14  * This program is free software, distributed under the terms of
15  * the GNU General Public License Version 2. See the LICENSE file
16  * at the top of the source tree.
17  */
18
19 /*!
20  * \file
21  * \brief Function FILE tests
22  *
23  * \author\verbatim Tilghman Lesher <tlesher AT digium DOT com> \endverbatim
24  *
25  * \ingroup tests
26  */
27
28 /*** MODULEINFO
29         <depend>TEST_FRAMEWORK</depend>
30         <support_level>core</support_level>
31  ***/
32
33 #include "asterisk.h"
34
35 ASTERISK_FILE_VERSION(__FILE__, "$Revision$")
36
37 #include "asterisk/utils.h"
38 #include "asterisk/app.h"
39 #include "asterisk/module.h"
40 #include "asterisk/test.h"
41 #include "asterisk/pbx.h"
42
43 #define C1024 \
44                 "1234567890ABCDEF1234567890ABCDEF1234567890ABCDEF1234567890ABCDEF1234567890ABCDEF1234567890ABCDEF1234567890ABCDEF1234567890ABCDEF1234567890ABCDEF1234567890ABCDEF1234567890ABCDEF1234567890ABCDEF1234567890ABCDEF1234567890ABCDEF1234567890ABCDEF1234567890ABCDEF1234567890ABCDEF1234567890ABCDEF1234567890ABCDEF1234567890ABCDEF1234567890ABCDEF1234567890ABCDEF1234567890ABCDEF1234567890ABCDEF1234567890ABCDEF1234567890ABCDEF1234567890ABCDEF1234567890ABCDEF1234567890ABCDEF1234567890ABCDEF1234567890ABCDEF1234567890ABCDEF1234567890ABCDEF1234567890ABCDEF1234567890ABCDEF1234567890ABCDEF1234567890ABCDEF1234567890ABCDEF1234567890ABCDEF1234567890ABCDEF1234567890ABCDEF1234567890ABCDEF1234567890ABCDEF1234567890ABCDEF1234567890ABCDEF1234567890ABCDEF1234567890ABCDEF1234567890ABCDEF1234567890ABCDEF1234567890ABCDEF1234567890ABCDEF1234567890ABCDEF1234567890ABCDEF1234567890ABCDEF1234567890ABCDEF1234567890ABCDEF1234567890ABCDEF1234567890ABCDEF1234567890ABCDEF1234567890ABCDEF1234567890ABCDEF1234567890ABCDEF1234567890ABCDEF1234567890ABCDEF"
45
46 static struct {
47         const char *contents;
48         const char *args;
49         const char *value;
50 } read_tests[] = {
51         /* 4 different ways of specifying the first character */
52         { "123456789", "0,1", "1" },
53         { "123456789", "0,-8", "1" },
54         { "123456789", "-9,1", "1" },
55         { "123456789", "-9,-8", "1" },
56         /* Does 0-length work? */
57         { "123456789", "0,0", "" },
58         { "123456789", "-9,0", "" },
59         { "123456789", "-9,-9", "" },
60         /* Does negative length work? */
61         { "123456789", "5,-6", "" },
62         { "123456789", "-5,-6", "" },
63         /* No length */
64         { "123456789", "-5", "56789" },
65         { "123456789", "4", "56789" },
66         /* Line mode, 4 ways of specifying the first character */
67         { "123\n456\n789\n", "0,1,l", "123\n" },
68         { "123\n456\n789\n", "-3,1,l", "123\n" },
69         { "123\n456\n789\n", "0,-2,l", "123\n" },
70         { "123\n456\n789\n", "-3,-2,l", "123\n" },
71         /* Line mode, 0-length */
72         { "123\n456\n789\n", "0,0,l", "" },
73         { "123\n456\n789\n", "-3,0,l", "" },
74         { "123\n456\n789\n", "-3,-3,l", "" },
75         /* Line mode, negative length */
76         { "123\n456\n789\n", "2,-2,l", "" },
77         { "123\n456\n789\n", "-2,-3,l", "" },
78         /* No length */
79         { "123\n456\n789\n", "1,,l", "456\n789\n" },
80         { "123\n456\n789\n", "-2,,l", "456\n789\n" },
81 };
82
83 static struct {
84         const char *contents;
85         const char *args;
86         const char *value;
87         const char *contents2;
88 } write_tests[] = {
89         /* Single character replace */
90         { "123456789", "0,1", "a", "a23456789" },
91         { "123456789", "-9,1", "a", "a23456789" },
92         { "123456789", "0,-8", "a", "a23456789" },
93         { "123456789", "-9,-8", "a", "a23456789" },
94         { "123456789", "5,1", "b", "12345b789" },
95         { "123456789", "-4,1", "b", "12345b789" },
96         { "123456789", "5,-3", "b", "12345b789" },
97         { "123456789", "-4,-3", "b", "12345b789" },
98         /* Replace 2 characters with 1 */
99         { "123456789", "0,2", "c", "c3456789" },
100         { "123456789", "-9,2", "c", "c3456789" },
101         { "123456789", "0,-7", "c", "c3456789" },
102         { "123456789", "-9,-7", "c", "c3456789" },
103         { "123456789", "4,2", "d", "1234d789" },
104         { "123456789", "-5,2", "d", "1234d789" },
105         { "123456789", "4,-3", "d", "1234d789" },
106         { "123456789", "-5,-3", "d", "1234d789" },
107         /* Truncate file */
108         { "123456789", "5", "e", "12345e" },
109         { "123456789", "5", "", "12345" },
110         { "123456789", "-4", "e", "12345e" },
111         { "123456789", "-4", "", "12345" },
112         /* Replace 1 character with 2 */
113         { "123456789", "0,1", "fg", "fg23456789" },
114         { "123456789", "0,-8", "fg", "fg23456789" },
115         { "123456789", "-9,1", "fg", "fg23456789" },
116         { "123456789", "-9,-8", "fg", "fg23456789" },
117         /* Overwrite file */
118         { "123456789", "", "h", "h" },
119         { "123456789", ",,,", "h", "h" },
120         { "123\n456\n789\n", ",,l", "h", "h\n" },
121         { "123\n456\n789\n", ",,ld", "h", "h" },
122         /* Single line replace, same length */
123         { "123\n456\n789\n", "0,1,l", "abc", "abc\n456\n789\n" },
124         { "123\n456\n789\n", "-3,1,l", "abc", "abc\n456\n789\n" },
125         { "123\n456\n789\n", "0,-2,l", "abc", "abc\n456\n789\n" },
126         { "123\n456\n789\n", "-3,-2,l", "abc", "abc\n456\n789\n" },
127         { "123\n456\n789\n", "1,1,l", "abc", "123\nabc\n789\n" },
128         { "123\n456\n789\n", "1,-1,l", "abc", "123\nabc\n789\n" },
129         { "123\n456\n789\n", "-2,1,l", "abc", "123\nabc\n789\n" },
130         { "123\n456\n789\n", "-2,-1,l", "abc", "123\nabc\n789\n" },
131         /* Single line replace, one character short */
132         { "123\n456\n789\n", "0,1,l", "ab", "ab\n456\n789\n" },
133         { "123\n456\n789\n", "-3,1,l", "ab", "ab\n456\n789\n" },
134         { "123\n456\n789\n", "0,-2,l", "ab", "ab\n456\n789\n" },
135         { "123\n456\n789\n", "-3,-2,l", "ab", "ab\n456\n789\n" },
136         { "123\n456\n789\n", "1,1,l", "ab", "123\nab\n789\n" },
137         { "123\n456\n789\n", "1,-1,l", "ab", "123\nab\n789\n" },
138         { "123\n456\n789\n", "-2,1,l", "ab", "123\nab\n789\n" },
139         { "123\n456\n789\n", "-2,-1,l", "ab", "123\nab\n789\n" },
140         /* Single line replace, one character long */
141         { "123\n456\n789\n", "0,1,l", "abcd", "abcd\n456\n789\n" },
142         { "123\n456\n789\n", "-3,1,l", "abcd", "abcd\n456\n789\n" },
143         { "123\n456\n789\n", "0,-2,l", "abcd", "abcd\n456\n789\n" },
144         { "123\n456\n789\n", "-3,-2,l", "abcd", "abcd\n456\n789\n" },
145         { "123\n456\n789\n", "1,1,l", "abcd", "123\nabcd\n789\n" },
146         { "123\n456\n789\n", "1,-1,l", "abcd", "123\nabcd\n789\n" },
147         { "123\n456\n789\n", "-2,1,l", "abcd", "123\nabcd\n789\n" },
148         { "123\n456\n789\n", "-2,-1,l", "abcd", "123\nabcd\n789\n" },
149         /* Multi-line replace, same number of characters, 2 lines for 1 */
150         { "123\n456\n789\n", "0,2,l", "abcdefg", "abcdefg\n789\n" },
151         { "123\n456\n789\n", "-3,2,l", "abcdefg", "abcdefg\n789\n" },
152         { "123\n456\n789\n", "0,-1,l", "abcdefg", "abcdefg\n789\n" },
153         { "123\n456\n789\n", "-3,-1,l", "abcdefg", "abcdefg\n789\n" },
154         { "123\n456\n789\n", "1,2,l", "abcdefg", "123\nabcdefg\n" },
155         { "123\n456\n789\n", "1,,l", "abcdefg", "123\nabcdefg\n" },
156         { "123\n456\n789\n", "-2,2,l", "abcdefg", "123\nabcdefg\n" },
157         { "123\n456\n789\n", "-2,,l", "abcdefg", "123\nabcdefg\n" },
158         /* Multi-line replace, shorter number of characters, 2 lines for 1 */
159         { "123\n456\n789\n", "0,2,l", "abcd", "abcd\n789\n" },
160         { "123\n456\n789\n", "-3,2,l", "abcd", "abcd\n789\n" },
161         { "123\n456\n789\n", "0,-1,l", "abcd", "abcd\n789\n" },
162         { "123\n456\n789\n", "-3,-1,l", "abcd", "abcd\n789\n" },
163         { "123\n456\n789\n", "1,2,l", "abcd", "123\nabcd\n" },
164         { "123\n456\n789\n", "1,,l", "abcd", "123\nabcd\n" },
165         { "123\n456\n789\n", "-2,2,l", "abcd", "123\nabcd\n" },
166         { "123\n456\n789\n", "-2,,l", "abcd", "123\nabcd\n" },
167         /* Multi-line replace, longer number of characters, 2 lines for 1 */
168         { "123\n456\n789\n", "0,2,l", "abcdefghijklmnop", "abcdefghijklmnop\n789\n" },
169         { "123\n456\n789\n", "-3,2,l", "abcdefghijklmnop", "abcdefghijklmnop\n789\n" },
170         { "123\n456\n789\n", "0,-1,l", "abcdefghijklmnop", "abcdefghijklmnop\n789\n" },
171         { "123\n456\n789\n", "-3,-1,l", "abcdefghijklmnop", "abcdefghijklmnop\n789\n" },
172         { "123\n456\n789\n", "1,2,l", "abcdefghijklmnop", "123\nabcdefghijklmnop\n" },
173         { "123\n456\n789\n", "1,,l", "abcdefghijklmnop", "123\nabcdefghijklmnop\n" },
174         { "123\n456\n789\n", "-2,2,l", "abcdefghijklmnop", "123\nabcdefghijklmnop\n" },
175         { "123\n456\n789\n", "-2,,l", "abcdefghijklmnop", "123\nabcdefghijklmnop\n" },
176         /* Insert line */
177         { "123\n456\n789\n", "0,0,l", "abcd", "abcd\n123\n456\n789\n" },
178         { "123\n456\n789\n", "-3,0,l", "abcd", "abcd\n123\n456\n789\n" },
179         { "123\n456\n789\n", "1,0,l", "abcd", "123\nabcd\n456\n789\n" },
180         { "123\n456\n789\n", "-2,0,l", "abcd", "123\nabcd\n456\n789\n" },
181         { "123\n456\n789\n", "2,0,l", "abcd", "123\n456\nabcd\n789\n" },
182         { "123\n456\n789\n", "-1,0,l", "abcd", "123\n456\nabcd\n789\n" },
183         { "123\n456\n789\n", "3,0,l", "abcd", "123\n456\n789\nabcd\n" },
184         { "123\n456\n789\n", ",,la", "abcd", "123\n456\n789\nabcd\n" },
185         /* Single line, replace with blank line */
186         { "123\n456\n789\n", "0,1,l", "", "\n456\n789\n" },
187         { "123\n456\n789\n", "-3,1,l", "", "\n456\n789\n" },
188         { "123\n456\n789\n", "0,-2,l", "", "\n456\n789\n" },
189         { "123\n456\n789\n", "-3,-2,l", "", "\n456\n789\n" },
190         { "123\n456\n789\n", "1,1,l", "", "123\n\n789\n" },
191         { "123\n456\n789\n", "1,-1,l", "", "123\n\n789\n" },
192         { "123\n456\n789\n", "-2,1,l", "", "123\n\n789\n" },
193         { "123\n456\n789\n", "-2,-1,l", "", "123\n\n789\n" },
194         /* Single line, delete */
195         { "123\n456\n789\n", "0,1,ld", "", "456\n789\n" },
196         { "123\n456\n789\n", "-3,1,ld", "", "456\n789\n" },
197         { "123\n456\n789\n", "0,-2,ld", "", "456\n789\n" },
198         { "123\n456\n789\n", "-3,-2,ld", "", "456\n789\n" },
199         { "123\n456\n789\n", "1,1,ld", "", "123\n789\n" },
200         { "123\n456\n789\n", "1,-1,ld", "", "123\n789\n" },
201         { "123\n456\n789\n", "-2,1,ld", "", "123\n789\n" },
202         { "123\n456\n789\n", "-2,-1,ld", "", "123\n789\n" },
203         /* Really long tests */
204         { "1234567890ABCDEF" C1024 C1024 C1024 C1024 C1024,
205                 "0,1", "a",
206                 "a234567890ABCDEF" C1024 C1024 C1024 C1024 C1024 },
207         { "1234567890ABCDEF" C1024 C1024 C1024 C1024 C1024,
208                 "0,1", "abcd",
209                 "abcd234567890ABCDEF" C1024 C1024 C1024 C1024 C1024 },
210         { "1234567890ABCDEF" C1024 C1024 C1024 C1024 C1024,
211                 "0,10", "abcd",
212                 "abcdABCDEF" C1024 C1024 C1024 C1024 C1024 },
213         { "1" C1024 "\n2" C1024 "\n3" C1024 "\n4" C1024 "\n5" C1024 "\n6" C1024 "\n",
214                 "0,1,l", "abcd",
215                 "abcd\n2" C1024 "\n3" C1024 "\n4" C1024 "\n5" C1024 "\n6" C1024 "\n" },
216         { "1234\n1" C1024 "\n2" C1024 "\n3" C1024 "\n4" C1024 "\n5" C1024 "\n6" C1024 "\n",
217                 "0,1,l", "abcd",
218                 "abcd\n1" C1024 "\n2" C1024 "\n3" C1024 "\n4" C1024 "\n5" C1024 "\n6" C1024 "\n" },
219         { "1234\n1" C1024 "\n2" C1024 "\n3" C1024 "\n4" C1024 "\n5" C1024 "\n6" C1024 "\n",
220                 "0,1,l", "a",
221                 "a\n1" C1024 "\n2" C1024 "\n3" C1024 "\n4" C1024 "\n5" C1024 "\n6" C1024 "\n" },
222 };
223
224 static char *file2display(struct ast_str **buf, ssize_t len, const char *input)
225 {
226         const char *ptr;
227         ast_str_reset(*buf);
228         for (ptr = input; *ptr; ptr++) {
229                 if (*ptr == '\n') {
230                         ast_str_append(buf, len, "\\n");
231                 } else if (*ptr == '\r') {
232                         ast_str_append(buf, len, "\\r");
233                 } else if (*ptr == '\t') {
234                         ast_str_append(buf, len, "\\t");
235                 } else if (*ptr < ' ' || *ptr > 125) {
236                         ast_str_append(buf, len, "\\x%hhX", *ptr);
237                 } else {
238                         ast_str_append(buf, len, "%c", *ptr);
239                 }
240         }
241         return ast_str_buffer(*buf);
242 }
243
244 AST_TEST_DEFINE(test_func_file)
245 {
246         int res = AST_TEST_PASS;
247         int i;
248         char dir[] = "/tmp/test_func_file.XXXXXX";
249         char file[80], expression[256];
250         struct ast_str *buf, *disp[2] = { NULL, NULL };
251         char fbuf[8192];
252         FILE *fh;
253
254         switch (cmd) {
255         case TEST_INIT:
256                 info->name = "func_file";
257                 info->category = "/funcs/func_env/";
258                 info->summary = "Verify behavior of the FILE() dialplan function";
259                 info->description =
260                         "Verifies that the examples of the FILE() dialplan function documentation work as described.";
261                 return AST_TEST_NOT_RUN;
262         case TEST_EXECUTE:
263                 break;
264         }
265
266         if (!mkdtemp(dir)) {
267                 ast_test_status_update(test, "Cannot create temporary directory: %s\n", strerror(errno));
268                 return AST_TEST_FAIL;
269         }
270
271         disp[0] = ast_str_create(16);
272         disp[1] = ast_str_create(16);
273         if (!(buf = ast_str_create(16)) || !disp[0] || !disp[1]) {
274                 ast_free(buf);
275                 ast_free(disp[0]);
276                 ast_free(disp[1]);
277                 rmdir(dir);
278                 return AST_TEST_FAIL;
279         }
280
281         snprintf(file, sizeof(file), "%s/test.txt", dir);
282
283         for (i = 0; i < ARRAY_LEN(read_tests); i++) {
284                 if (!(fh = fopen(file, "w"))) {
285                         ast_test_status_update(test, "Cannot open test file: %s\n", strerror(errno));
286                         ast_free(buf);
287                         ast_free(disp[0]);
288                         ast_free(disp[1]);
289                         unlink(file);
290                         rmdir(dir);
291                         return AST_TEST_FAIL;
292                 }
293
294                 if (fwrite(read_tests[i].contents, 1, strlen(read_tests[i].contents), fh) < strlen(read_tests[i].contents)) {
295                         ast_test_status_update(test, "Cannot write initial values into test file: %s\n", strerror(errno));
296                         ast_free(buf);
297                         ast_free(disp[0]);
298                         ast_free(disp[1]);
299                         fclose(fh);
300                         unlink(file);
301                         rmdir(dir);
302                         return AST_TEST_FAIL;
303                 }
304
305                 fclose(fh);
306
307                 snprintf(expression, sizeof(expression), "${FILE(%s,%s)}", file, read_tests[i].args);
308                 ast_str_substitute_variables(&buf, 0, NULL, expression);
309
310                 if (strcmp(ast_str_buffer(buf), read_tests[i].value)) {
311                         ast_test_status_update(test, "Expression '${FILE(...,%s)}' did not produce ('%s') the expected value ('%s')\n",
312                                 read_tests[i].args, file2display(&disp[0], 0, ast_str_buffer(buf)), file2display(&disp[1], 0, read_tests[i].value));
313                         res = AST_TEST_FAIL;
314                 }
315         }
316
317         ast_free(buf);
318
319         for (i = 0; i < ARRAY_LEN(write_tests); i++) {
320                 if (!(fh = fopen(file, "w"))) {
321                         ast_test_status_update(test, "Cannot open test file: %s\n", strerror(errno));
322                         ast_free(disp[0]);
323                         ast_free(disp[1]);
324                         unlink(file);
325                         rmdir(dir);
326                         return AST_TEST_FAIL;
327                 }
328
329                 if (fwrite(write_tests[i].contents, 1, strlen(write_tests[i].contents), fh) < strlen(write_tests[i].contents)) {
330                         ast_test_status_update(test, "Cannot write initial values into test file: %s\n", strerror(errno));
331                         ast_free(disp[0]);
332                         ast_free(disp[1]);
333                         fclose(fh);
334                         unlink(file);
335                         rmdir(dir);
336                         return AST_TEST_FAIL;
337                 }
338
339                 fclose(fh);
340
341                 snprintf(expression, sizeof(expression), "FILE(%s,%s)", file, write_tests[i].args);
342                 ast_func_write(NULL, expression, write_tests[i].value);
343
344                 if (!(fh = fopen(file, "r"))) {
345                         ast_test_status_update(test, "Cannot open test file: %s\n", strerror(errno));
346                         ast_free(disp[0]);
347                         ast_free(disp[1]);
348                         unlink(file);
349                         rmdir(dir);
350                         return AST_TEST_FAIL;
351                 }
352
353                 memset(fbuf, 0, sizeof(fbuf));
354                 if (!fread(fbuf, 1, sizeof(fbuf), fh)) {
355                         ast_test_status_update(test, "Cannot read write results from test file: %s\n", strerror(errno));
356                         ast_free(disp[0]);
357                         ast_free(disp[1]);
358                         fclose(fh);
359                         unlink(file);
360                         rmdir(dir);
361                         return AST_TEST_FAIL;
362                 }
363
364                 fclose(fh);
365
366                 if (strcmp(fbuf, write_tests[i].contents2)) {
367                         ast_test_status_update(test, "Expression 'FILE(...,%s)=%s' did not produce ('%s') the expected result ('%s')\n",
368                                 write_tests[i].args, write_tests[i].value, file2display(&disp[0], 0, fbuf), file2display(&disp[1], 0, write_tests[i].contents2));
369                         res = AST_TEST_FAIL;
370                 } else {
371                         ast_test_status_update(test, "Expression 'FILE(...,%s)=%s'... OK!\n", write_tests[i].args, write_tests[i].value);
372                 }
373         }
374
375         ast_free(disp[0]);
376         ast_free(disp[1]);
377         unlink(file);
378         rmdir(dir);
379
380         return res;
381 }
382
383 static int unload_module(void)
384 {
385         AST_TEST_UNREGISTER(test_func_file);
386         return 0;
387 }
388
389 static int load_module(void)
390 {
391         AST_TEST_REGISTER(test_func_file);
392         return AST_MODULE_LOAD_SUCCESS;
393 }
394
395 AST_MODULE_INFO_STANDARD(ASTERISK_GPL_KEY, "FILE() Tests");