f52a654570ef4429214742659944a56852dfd93b
[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         curl = curl_easy_init();
126         if (curl) {
127                 DBGP("reading curl data from '%s'", curloc->uri);
128                 curl_easy_setopt(curl, CURLOPT_URL, curloc->uri);
129                 curl_easy_setopt(curl, CURLOPT_NOPROGRESS, 1);
130                 curl_easy_setopt(curl, CURLOPT_WRITEFUNCTION, ccurl_write_memory_callback);
131                 curl_easy_setopt(curl, CURLOPT_WRITEDATA, (void *) &chunk);
132                 curl_easy_setopt(curl, CURLOPT_USERAGENT, "conky-curl/1.0");
133
134                 res = curl_easy_perform(curl);
135                 if (res == CURLE_OK && chunk.size) {
136                         long http_status_code;
137
138                         if(curl_easy_getinfo(curl, CURLINFO_RESPONSE_CODE, &http_status_code) == CURLE_OK && http_status_code == 200) {
139                                 timed_thread_lock(curloc->p_timed_thread);
140                                 (*curloc->process_function)(curloc->result, chunk.memory);
141                                 timed_thread_unlock(curloc->p_timed_thread);
142                         } else {
143                                 NORM_ERR("curl: no data from server");
144                         }
145                         free(chunk.memory);
146                 } else {
147                         NORM_ERR("curl: no data from server");
148                 }
149
150                 curl_easy_cleanup(curl);
151         }
152 }
153
154 void *ccurl_thread(void *) __attribute__((noreturn));
155
156 void ccurl_init_thread(ccurl_location_t *curloc, int interval)
157 {
158 #ifdef DEBUG
159         assert(curloc->result);
160 #endif /* DEBUG */
161         curloc->p_timed_thread =
162                 timed_thread_create(&ccurl_thread,
163                                 (void *)curloc, interval * 1000000);
164
165         if (!curloc->p_timed_thread) {
166                 NORM_ERR("curl thread: error creating timed thread");
167         }
168         timed_thread_register(curloc->p_timed_thread,
169                         &curloc->p_timed_thread);
170         if (timed_thread_run(curloc->p_timed_thread)) {
171                 NORM_ERR("curl thread: error running timed thread");
172         }
173 }
174
175 void *ccurl_thread(void *arg)
176 {
177         ccurl_location_t *curloc = (ccurl_location_t*)arg;
178
179         while (1) {
180                 ccurl_fetch_data(curloc);
181                 if (timed_thread_test(curloc->p_timed_thread, 0)) {
182                         timed_thread_exit(curloc->p_timed_thread);
183                 }
184         }
185         /* never reached */
186 }
187
188
189 /*
190  * This is where the $curl section begins.
191  */
192
193 struct curl_data {
194         char uri[128];
195         float interval;
196 };
197
198 /* internal location pointer for use by $curl, no touchy */
199 static ccurl_location_t *ccurl_locations_head = 0;
200
201 /* used to free data used by $curl */
202 void ccurl_free_info(void)
203 {
204         ccurl_free_locations(&ccurl_locations_head);
205 }
206
207 /* straight copy, used by $curl */
208 static void ccurl_parse_data(void *result, const char *data)
209 {
210         strncpy(result, data, max_user_text);
211 }
212
213 /* prints result data to text buffer, used by $curl */
214 void ccurl_process_info(char *p, int p_max_size, char *uri, int interval)
215 {
216         ccurl_location_t *curloc = ccurl_find_location(&ccurl_locations_head, uri);
217         if (!curloc->p_timed_thread) {
218                 curloc->result = malloc(max_user_text);
219                 memset(curloc->result, 0, max_user_text);
220                 curloc->process_function = &ccurl_parse_data;
221                 ccurl_init_thread(curloc, interval);
222                 if (!curloc->p_timed_thread) {
223                         NORM_ERR("error setting up curl thread");
224                 }
225         }
226
227         timed_thread_lock(curloc->p_timed_thread);
228         strncpy(p, curloc->result, p_max_size);
229         timed_thread_unlock(curloc->p_timed_thread);
230 }
231
232 void curl_parse_arg(struct text_object *obj, const char *arg)
233 {
234         int argc;
235         struct curl_data *cd;
236         float interval = 0;
237
238         cd = malloc(sizeof(struct curl_data));
239         memset(cd, 0, sizeof(struct curl_data));
240
241         argc = sscanf(arg, "%127s %f", cd->uri, &interval);
242         if (argc < 1) {
243                 free(cd);
244                 NORM_ERR("wrong number of arguments for $curl");
245                 return;
246         }
247         cd->interval = interval > 0 ? interval * 60 : 15*60;
248         obj->data.opaque = cd;
249 }
250
251 void curl_print(struct text_object *obj, char *p, int p_max_size)
252 {
253         struct curl_data *cd = obj->data.opaque;
254
255         if (!cd || !cd->uri) {
256                 NORM_ERR("error processing Curl data");
257                 return;
258         }
259         ccurl_process_info(p, p_max_size, cd->uri, cd->interval);
260 }
261
262 void curl_obj_free(struct text_object *obj)
263 {
264         if (obj->data.opaque) {
265                 free(obj->data.opaque);
266                 obj->data.opaque = NULL;
267         }
268 }