major dialplan functions update
[asterisk/asterisk.git] / apps / app_curl.c
1 /*
2  * Asterisk -- An open source telephony toolkit.
3  *
4  * Copyright (C)  2004 - 2006, Tilghman Lesher
5  *
6  * Tilghman Lesher <curl-20050919@the-tilghman.com>
7  * and Brian Wilkins <bwilkins@cfl.rr.com> (Added POST option)
8  *
9  * app_curl.c is distributed with no restrictions on usage or
10  * redistribution.
11  *
12  * See http://www.asterisk.org for more information about
13  * the Asterisk project. Please do not directly contact
14  * any of the maintainers of this project for assistance;
15  * the project provides a web site, mailing lists and IRC
16  * channels for your use.
17  *
18  */
19
20 /*! \file
21  * 
22  * \brief Curl - App to load a URL
23  *
24  * \author Tilghman Lesher <curl-20050919@the-tilghman.com>
25  *
26  * \note Brian Wilkins <bwilkins@cfl.rr.com> (Added POST option) 
27  * 
28  * \ingroup applications
29  */
30  
31 #include <stdio.h>
32 #include <stdlib.h>
33 #include <string.h>
34 #include <curl/curl.h>
35
36 #include "asterisk.h"
37
38 ASTERISK_FILE_VERSION(__FILE__, "$Revision$")
39
40 #include "asterisk/lock.h"
41 #include "asterisk/file.h"
42 #include "asterisk/logger.h"
43 #include "asterisk/channel.h"
44 #include "asterisk/pbx.h"
45 #include "asterisk/cli.h"
46 #include "asterisk/options.h"
47 #include "asterisk/module.h"
48 #include "asterisk/app.h"
49 #include "asterisk/utils.h"
50
51 static char *tdesc = "Load external URL";
52
53 STANDARD_LOCAL_USER;
54
55 LOCAL_USER_DECL;
56
57 struct MemoryStruct {
58         char *memory;
59         size_t size;
60 };
61
62 static void *myrealloc(void *ptr, size_t size)
63 {
64         /* There might be a realloc() out there that doesn't like reallocing
65            NULL pointers, so we take care of it here */
66         if (ptr)
67                 return ast_realloc(ptr, size);
68         else
69                 return ast_malloc(size);
70 }
71
72 static size_t WriteMemoryCallback(void *ptr, size_t size, size_t nmemb, void *data)
73 {
74         register int realsize = size * nmemb;
75         struct MemoryStruct *mem = (struct MemoryStruct *)data;
76
77         mem->memory = (char *)myrealloc(mem->memory, mem->size + realsize + 1);
78         if (mem->memory) {
79                 memcpy(&(mem->memory[mem->size]), ptr, realsize);
80                 mem->size += realsize;
81                 mem->memory[mem->size] = 0;
82         }
83         return realsize;
84 }
85
86 static int curl_internal(struct MemoryStruct *chunk, char *url, char *post)
87 {
88         CURL *curl;
89
90         curl_global_init(CURL_GLOBAL_ALL);
91         curl = curl_easy_init();
92
93         if (!curl) {
94                 return -1;
95         }
96
97         curl_easy_setopt(curl, CURLOPT_URL, url);
98         curl_easy_setopt(curl, CURLOPT_WRITEFUNCTION, WriteMemoryCallback);
99         curl_easy_setopt(curl, CURLOPT_WRITEDATA, (void *)chunk);
100         curl_easy_setopt(curl, CURLOPT_USERAGENT, "asterisk-libcurl-agent/1.0");
101
102         if (post) {
103                 curl_easy_setopt(curl, CURLOPT_POST, 1);
104                 curl_easy_setopt(curl, CURLOPT_POSTFIELDS, post);
105         }
106
107         curl_easy_perform(curl);
108         curl_easy_cleanup(curl);
109         return 0;
110 }
111
112 static int acf_curl_exec(struct ast_channel *chan, char *cmd, char *info, char *buf, size_t len)
113 {
114         struct localuser *u;
115         struct MemoryStruct chunk = { NULL, 0 };
116         AST_DECLARE_APP_ARGS(args,
117                 AST_APP_ARG(url);
118                 AST_APP_ARG(postdata);
119         );
120
121         *buf = '\0';
122         
123         if (ast_strlen_zero(info)) {
124                 ast_log(LOG_WARNING, "CURL requires an argument (URL)\n");
125                 return -1;
126         }
127
128         LOCAL_USER_ACF_ADD(u);
129
130         AST_STANDARD_APP_ARGS(args, info);      
131         
132         if (!curl_internal(&chunk, args.url, args.postdata)) {
133                 if (chunk.memory) {
134                         chunk.memory[chunk.size] = '\0';
135                         if (chunk.memory[chunk.size - 1] == 10)
136                                 chunk.memory[chunk.size - 1] = '\0';
137
138                         ast_copy_string(buf, chunk.memory, len);
139                         free(chunk.memory);
140                 }
141         } else {
142                 ast_log(LOG_ERROR, "Cannot allocate curl structure\n");
143         }
144
145         LOCAL_USER_REMOVE(u);
146
147         return 0;
148 }
149
150 struct ast_custom_function acf_curl = {
151         .name = "CURL",
152         .synopsis = "Retrieves the contents of a URL",
153         .syntax = "CURL(url[|post-data])",
154         .desc =
155         "  url       - URL to retrieve\n"
156         "  post-data - Optional data to send as a POST (GET is default action)\n",
157         .read = acf_curl_exec,
158 };
159
160 int unload_module(void)
161 {
162         int res;
163
164         res = ast_custom_function_unregister(&acf_curl);
165
166         STANDARD_HANGUP_LOCALUSERS;
167         
168         return res;
169 }
170
171 int load_module(void)
172 {
173         int res;
174
175         res = ast_custom_function_register(&acf_curl);
176
177         return res;
178 }
179
180 char *description(void)
181 {
182         return tdesc;
183 }
184
185 int usecount(void)
186 {
187         int res;
188         STANDARD_USECOUNT(res);
189         return res;
190 }
191
192 char *key()
193 {
194         return ASTERISK_GPL_KEY;
195 }