0dbe88e753eca271f52a7e3b613f28b9213b3386
[monky] / src / ccurl_thread.c
1 /* -*- mode: c; c-basic-offset: 4; tab-width: 4; indent-tabs-mode: t -*-
2  * vim: ts=4 sw=4 noet ai cindent syntax=c
3  *
4  * Conky, a system monitor, based on torsmo
5  *
6  * Please see COPYING for details
7  *
8  * Copyright (c) 2005-2010 Brenden Matthews, Philip Kovacs, et. al.
9  *      (see AUTHORS)
10  * All rights reserved.
11  *
12  * This program is free software: you can redistribute it and/or modify
13  * it under the terms of the GNU General Public License as published by
14  * the Free Software Foundation, either version 3 of the License, or
15  * (at your option) any later version.
16  *
17  * This program is distributed in the hope that it will be useful,
18  * but WITHOUT ANY WARRANTY; without even the implied warranty of
19  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
20  * GNU General Public License for more details.
21  * You should have received a copy of the GNU General Public License
22  * along with this program.  If not, see <http://www.gnu.org/licenses/>.
23  *
24  */
25
26 #include "conky.h"
27 #include "logging.h"
28 #include "ccurl_thread.h"
29 #include "text_object.h"
30
31 #ifdef DEBUG
32 #include <assert.h>
33 #endif /* DEBUG */
34
35 #include <curl/curl.h>
36 #include <curl/types.h>
37 #include <curl/easy.h>
38
39 /*
40  * The following code is the conky curl thread lib, which can be re-used to
41  * create any curl-based object (see weather and rss).  Below is an
42  * implementation of a curl-only object ($curl) which can also be used as an
43  * example.
44  */
45 typedef struct _ccurl_memory_t {
46         char *memory;
47         size_t size;
48 } ccurl_memory_t;
49
50 /* finds a location based on uri in the list provided */
51 ccurl_location_t *ccurl_find_location(ccurl_location_t **locations_head, char *uri)
52 {
53         ccurl_location_t *tail = *locations_head;
54         ccurl_location_t *new = 0;
55         while (tail) {
56                 if (tail->uri &&
57                                 strcmp(tail->uri, uri) == EQUAL) {
58                         return tail;
59                 }
60                 tail = tail->next;
61         }
62         if (!tail) { /* new location!!!!!!! */
63                 DBGP("new curl location: '%s'", uri);
64                 new = malloc(sizeof(ccurl_location_t));
65                 memset(new, 0, sizeof(ccurl_location_t));
66                 new->uri = strndup(uri, text_buffer_size);
67                 tail = *locations_head;
68                 while (tail && tail->next) {
69                         tail = tail->next;
70                 }
71                 if (!tail) {
72                         /* omg the first one!!!!!!! */
73                         *locations_head = new;
74                 } else {
75                         tail->next = new;
76                 }
77         }
78         return new;
79 }
80
81 /* iterates over the list provided, frees stuff (list item, uri, result) */
82 void ccurl_free_locations(ccurl_location_t **locations_head)
83 {
84         ccurl_location_t *tail = *locations_head;
85         ccurl_location_t *last = 0;
86
87         while (tail) {
88                 if (tail->uri) free(tail->uri);
89                 if (tail->result) free(tail->result);
90                 last = tail;
91                 tail = tail->next;
92                 free(last);
93         }
94         *locations_head = 0;
95 }
96
97 /* callback used by curl for writing the received data */
98 size_t ccurl_write_memory_callback(void *ptr, size_t size, size_t nmemb, void *data)
99 {
100         size_t realsize = size * nmemb;
101         ccurl_memory_t *mem = (ccurl_memory_t*)data;
102
103         mem->memory = (char *) realloc(mem->memory, mem->size + realsize + 1);
104         if (mem->memory) {
105                 memcpy(&(mem->memory[mem->size]), ptr, realsize);
106                 mem->size += realsize;
107                 mem->memory[mem->size] = 0;
108         }
109         return realsize;
110 }
111
112
113 /* fetch our datums */
114 void ccurl_fetch_data(ccurl_location_t *curloc)
115 {
116         CURL *curl = NULL;
117         CURLcode res;
118
119         // curl temps
120         ccurl_memory_t chunk;
121
122         chunk.memory = NULL;
123         chunk.size = 0;
124
125         if (curl_global_init(CURL_GLOBAL_ALL) == 0) {
126                 curl = curl_easy_init();
127                 if (curl) {
128                         DBGP("reading curl data from '%s'", curloc->uri);
129                         curl_easy_setopt(curl, CURLOPT_URL, curloc->uri);
130                         curl_easy_setopt(curl, CURLOPT_NOPROGRESS, 1);
131                         curl_easy_setopt(curl, CURLOPT_WRITEFUNCTION, ccurl_write_memory_callback);
132                         curl_easy_setopt(curl, CURLOPT_WRITEDATA, (void *) &chunk);
133                         curl_easy_setopt(curl, CURLOPT_USERAGENT, "conky-curl/1.0");
134
135                         res = curl_easy_perform(curl);
136                         if (res == CURLE_OK && chunk.size) {
137                                 long http_status_code;
138
139                                 if(curl_easy_getinfo(curl, CURLINFO_RESPONSE_CODE, &http_status_code) == CURLE_OK && http_status_code == 200) {
140                                         timed_thread_lock(curloc->p_timed_thread);
141                                         (*curloc->process_function)(curloc->result, chunk.memory);
142                                         timed_thread_unlock(curloc->p_timed_thread);
143                                 } else {
144                                         NORM_ERR("curl: no data from server");
145                                 }
146                                 free(chunk.memory);
147                         } else {
148                                 NORM_ERR("curl: no data from server");
149                         }
150
151                         curl_easy_cleanup(curl);
152                 }
153                 curl_global_cleanup();
154         }
155 }
156
157 void *ccurl_thread(void *) __attribute__((noreturn));
158
159 void ccurl_init_thread(ccurl_location_t *curloc, int interval)
160 {
161 #ifdef DEBUG
162         assert(curloc->result);
163 #endif /* DEBUG */
164         curloc->p_timed_thread =
165                 timed_thread_create(&ccurl_thread,
166                                 (void *)curloc, interval * 1000000);
167
168         if (!curloc->p_timed_thread) {
169                 NORM_ERR("curl thread: error creating timed thread");
170         }
171         timed_thread_register(curloc->p_timed_thread,
172                         &curloc->p_timed_thread);
173         if (timed_thread_run(curloc->p_timed_thread)) {
174                 NORM_ERR("curl thread: error running timed thread");
175         }
176 }
177
178 void *ccurl_thread(void *arg)
179 {
180         ccurl_location_t *curloc = (ccurl_location_t*)arg;
181
182         while (1) {
183                 ccurl_fetch_data(curloc);
184                 if (timed_thread_test(curloc->p_timed_thread, 0)) {
185                         timed_thread_exit(curloc->p_timed_thread);
186                 }
187         }
188         /* never reached */
189 }
190
191
192 /*
193  * This is where the $curl section begins.
194  */
195
196 struct curl_data {
197         char uri[128];
198         float interval;
199 };
200
201 /* internal location pointer for use by $curl, no touchy */
202 static ccurl_location_t *ccurl_locations_head = 0;
203
204 /* used to free data used by $curl */
205 void ccurl_free_info(void)
206 {
207         ccurl_free_locations(&ccurl_locations_head);
208 }
209
210 /* straight copy, used by $curl */
211 static void ccurl_parse_data(void *result, const char *data)
212 {
213         strncpy(result, data, max_user_text);
214 }
215
216 /* prints result data to text buffer, used by $curl */
217 void ccurl_process_info(char *p, int p_max_size, char *uri, int interval)
218 {
219         ccurl_location_t *curloc = ccurl_find_location(&ccurl_locations_head, uri);
220         if (!curloc->p_timed_thread) {
221                 curloc->result = malloc(max_user_text);
222                 memset(curloc->result, 0, max_user_text);
223                 curloc->process_function = &ccurl_parse_data;
224                 ccurl_init_thread(curloc, interval);
225                 if (!curloc->p_timed_thread) {
226                         NORM_ERR("error setting up curl thread");
227                 }
228         }
229
230         timed_thread_lock(curloc->p_timed_thread);
231         strncpy(p, curloc->result, p_max_size);
232         timed_thread_unlock(curloc->p_timed_thread);
233 }
234
235 void curl_parse_arg(struct text_object *obj, const char *arg)
236 {
237         int argc;
238         struct curl_data *cd;
239         float interval = 0;
240
241         cd = malloc(sizeof(struct curl_data));
242         memset(cd, 0, sizeof(struct curl_data));
243
244         argc = sscanf(arg, "%127s %f", cd->uri, &interval);
245         if (argc < 1) {
246                 free(cd);
247                 NORM_ERR("wrong number of arguments for $curl");
248                 return;
249         }
250         cd->interval = interval > 0 ? interval * 60 : 15*60;
251         obj->data.opaque = cd;
252 }
253
254 void curl_print(struct text_object *obj, char *p, int p_max_size)
255 {
256         struct curl_data *cd = obj->data.opaque;
257
258         if (!cd || !cd->uri) {
259                 NORM_ERR("error processing Curl data");
260                 return;
261         }
262         ccurl_process_info(p, p_max_size, cd->uri, cd->interval);
263 }
264
265 void curl_obj_free(struct text_object *obj)
266 {
267         if (obj->data.opaque) {
268                 free(obj->data.opaque);
269                 obj->data.opaque = NULL;
270         }
271 }