2 * viking -- GPS Data and Topo Analyzer, Explorer, and Manager
4 * Copyright (C) 2003-2005, Evan Battaglia <gtoevan@gmx.net>
6 * This program is free software; you can redistribute it and/or modify
7 * it under the terms of the GNU General Public License as published by
8 * the Free Software Foundation; either version 2 of the License, or
9 * (at your option) any later version.
11 * This program is distributed in the hope that it will be useful,
12 * but WITHOUT ANY WARRANTY; without even the implied warranty of
13 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
14 * GNU General Public License for more details.
16 * You should have received a copy of the GNU General Public License
17 * along with this program; if not, write to the Free Software
18 * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
33 #include <glib/gstdio.h>
34 #include <glib/gi18n.h>
35 #include <glib/gprintf.h>
38 #include <curl/curl.h>
40 #include "background.h"
43 #include "curl_download.h"
45 gchar *curl_download_user_agent = NULL;
48 * Even if writing to FILE* is supported by libcurl by default,
49 * it seems that it is non-portable (win32 DLL specific).
51 * So, we provide our own trivial CURLOPT_WRITEFUNCTION.
53 static size_t curl_write_func(void *ptr, size_t size, size_t nmemb, FILE *stream)
55 return fwrite(ptr, size, nmemb, stream);
58 static size_t curl_get_etag_func(void *ptr, size_t size, size_t nmemb, gchar **stream)
60 #define ETAG_KEYWORD "ETag: "
61 #define ETAG_LEN (sizeof(ETAG_KEYWORD)-1)
62 size_t len = size*nmemb;
63 char *str = g_strstr_len(ptr, len, ETAG_KEYWORD);
65 char *etag_str = str + ETAG_LEN;
66 char *end_str = g_strstr_len(etag_str, len - ETAG_LEN, "\r\n");
67 if (etag_str && end_str) {
68 *stream = g_strndup(etag_str, end_str - etag_str);
69 g_debug("%s: ETAG found: %s", __FUNCTION__, *stream);
75 static int curl_progress_func(void *clientp, double dltotal, double dlnow, double ultotal, double ulnow)
77 return a_background_testcancel(NULL);
80 static gchar *get_cookie_file(gboolean init)
82 static gchar *cookie_file = NULL;
83 static GMutex *mutex = NULL;
85 if (init) { /* to make sure it's thread safe */
86 mutex = g_mutex_new();
87 static gchar *cookie_fn = "cookies.txt";
88 const gchar *viking_dir = a_get_viking_dir();
89 cookie_file = g_build_filename(viking_dir, cookie_fn, NULL);
90 g_unlink(cookie_file);
94 g_assert(cookie_file != NULL);
97 if (g_file_test(cookie_file, G_FILE_TEST_EXISTS) == FALSE) { /* file not there */
98 gchar * name_tmp = NULL;
99 FILE * out_file = tmpfile();
100 if (out_file == NULL) {
101 // Something wrong with previous call (unsuported?)
102 name_tmp = g_strdup_printf("%s.tmp", cookie_file);
103 out_file = g_fopen(name_tmp, "w+b");
106 CURL *curl = curl_easy_init();
108 curl_easy_setopt ( curl, CURLOPT_VERBOSE, 1 );
109 curl_easy_setopt(curl, CURLOPT_URL, "http://maps.google.com/"); /* google.com sets "PREF" cookie */
110 curl_easy_setopt ( curl, CURLOPT_WRITEDATA, out_file );
111 curl_easy_setopt ( curl, CURLOPT_WRITEFUNCTION, curl_write_func);
112 curl_easy_setopt(curl, CURLOPT_COOKIEJAR, cookie_file);
113 res = curl_easy_perform(curl);
114 if (res != CURLE_OK) {
115 g_warning(_("%s() Curl perform failed: %s"), __PRETTY_FUNCTION__,
116 curl_easy_strerror(res));
117 g_unlink(cookie_file);
119 curl_easy_cleanup(curl);
122 if (name_tmp != NULL) {
128 g_mutex_unlock(mutex);
133 /* This should to be called from main() to make sure thread safe */
134 void curl_download_init()
136 curl_global_init(CURL_GLOBAL_ALL);
137 get_cookie_file(TRUE);
138 curl_download_user_agent = g_strdup_printf ("%s/%s %s", PACKAGE, VERSION, curl_version());
141 int curl_download_uri ( const char *uri, FILE *f, DownloadMapOptions *options, DownloadFileOptions *file_options, void *handle )
144 struct curl_slist *curl_send_headers = NULL;
145 CURLcode res = CURLE_FAILED_INIT;
146 const gchar *cookie_file;
148 g_debug("%s: uri=%s", __PRETTY_FUNCTION__, uri);
150 curl = handle ? handle : curl_easy_init ();
152 return DOWNLOAD_ERROR;
155 curl_easy_setopt ( curl, CURLOPT_VERBOSE, 1 );
156 curl_easy_setopt ( curl, CURLOPT_URL, uri );
157 curl_easy_setopt ( curl, CURLOPT_WRITEDATA, f );
158 curl_easy_setopt ( curl, CURLOPT_WRITEFUNCTION, curl_write_func);
159 curl_easy_setopt ( curl, CURLOPT_NOPROGRESS, 0 );
160 curl_easy_setopt ( curl, CURLOPT_PROGRESSDATA, NULL );
161 curl_easy_setopt ( curl, CURLOPT_PROGRESSFUNCTION, curl_progress_func);
162 if (options != NULL) {
163 if(options->referer != NULL)
164 curl_easy_setopt ( curl, CURLOPT_REFERER, options->referer);
165 if(options->follow_location != 0) {
166 curl_easy_setopt ( curl, CURLOPT_FOLLOWLOCATION, 1);
167 curl_easy_setopt ( curl, CURLOPT_MAXREDIRS, options->follow_location);
169 if (file_options != NULL) {
170 if(options->check_file_server_time && file_options->time_condition != 0) {
171 /* if file exists, check against server if file is recent enough */
172 curl_easy_setopt ( curl, CURLOPT_TIMECONDITION, CURL_TIMECOND_IFMODSINCE);
173 curl_easy_setopt ( curl, CURLOPT_TIMEVALUE, file_options->time_condition);
175 if (options->use_etag) {
176 if (file_options->etag != NULL) {
177 /* add an header on the HTTP request */
179 g_snprintf(str, 60, "If-None-Match: %s", file_options->etag);
180 curl_send_headers = curl_slist_append(curl_send_headers, str);
181 curl_easy_setopt ( curl, CURLOPT_HTTPHEADER , curl_send_headers);
183 /* store the new etag from the server in an option value */
184 curl_easy_setopt ( curl, CURLOPT_WRITEHEADER, &(file_options->new_etag));
185 curl_easy_setopt ( curl, CURLOPT_HEADERFUNCTION, curl_get_etag_func);
189 curl_easy_setopt ( curl, CURLOPT_USERAGENT, curl_download_user_agent );
190 if ((cookie_file = get_cookie_file(FALSE)) != NULL)
191 curl_easy_setopt(curl, CURLOPT_COOKIEFILE, cookie_file);
192 res = curl_easy_perform ( curl );
196 curl_easy_getinfo(curl, CURLINFO_RESPONSE_CODE, &response);
197 if (response == 304) { // 304 = Not Modified
198 res = DOWNLOAD_NO_NEWER_FILE;
199 } else if (response == 200 || // http: 200 = Ok
200 response == 226) { // ftp: 226 = sucess
202 /* verify if curl sends us any data - this is a workaround on using CURLOPT_TIMECONDITION
203 when the server has a (incorrect) time earlier than the time on the file we already have */
204 curl_easy_getinfo(curl, CURLINFO_SIZE_DOWNLOAD, &size);
206 res = DOWNLOAD_ERROR;
208 res = DOWNLOAD_NO_ERROR;
210 g_warning("%s: http response: %ld for uri %s (time_condition = %ld)\n", __FUNCTION__, response, uri, file_options->time_condition);
211 res = DOWNLOAD_ERROR;
214 res = DOWNLOAD_ERROR;
217 curl_easy_cleanup ( curl );
218 if (curl_send_headers) {
219 curl_slist_free_all(curl_send_headers);
220 curl_send_headers = NULL;
221 curl_easy_setopt ( curl, CURLOPT_HTTPHEADER , NULL);
226 int curl_download_get_url ( const char *hostname, const char *uri, FILE *f, DownloadMapOptions *options, gboolean ftp, DownloadFileOptions *file_options, void *handle )
231 /* Compose the full url */
232 full = g_strdup_printf ( "%s://%s%s", (ftp?"ftp":"http"), hostname, uri );
233 ret = curl_download_uri ( full, f, options, file_options, handle );
240 void * curl_download_handle_init ()
242 return curl_easy_init();
245 void curl_download_handle_cleanup ( void *handle )
247 curl_easy_cleanup(handle);