/* * viking -- GPS Data and Topo Analyzer, Explorer, and Manager * * Copyright (C) 2007, Guilhem Bonnefille * Copyright (C) 2007, Quy Tonthat * Copyright (C) 2009-2010, Jocelyn Jaubert * Copyright (C) 2010, Sven Wegener * * This program is free software; you can redistribute it and/or modify * it under the terms of the GNU General Public License as published by * the Free Software Foundation; either version 2 of the License, or * (at your option) any later version. * * This program is distributed in the hope that it will be useful, * but WITHOUT ANY WARRANTY; without even the implied warranty of * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the * GNU General Public License for more details. * * You should have received a copy of the GNU General Public License * along with this program; if not, write to the Free Software * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA * */ #ifdef HAVE_CONFIG_H #include "config.h" #endif #include #include #ifdef HAVE_UNISTD_H #include #endif #include #include #include #include #include #include #include "background.h" #include "dir.h" #include "file.h" #include "globals.h" #include "curl_download.h" gchar *curl_download_user_agent = NULL; /* * Even if writing to FILE* is supported by libcurl by default, * it seems that it is non-portable (win32 DLL specific). * * So, we provide our own trivial CURLOPT_WRITEFUNCTION. */ static size_t curl_write_func(void *ptr, size_t size, size_t nmemb, FILE *stream) { return fwrite(ptr, size, nmemb, stream); } static size_t curl_get_etag_func(void *ptr, size_t size, size_t nmemb, void *stream) { #define ETAG_KEYWORD "ETag: " #define ETAG_LEN (sizeof(ETAG_KEYWORD)-1) CurlDownloadOptions *cdo = (CurlDownloadOptions*)stream; size_t len = size*nmemb; char *str = g_strstr_len((const char*)ptr, len, ETAG_KEYWORD); if (str) { char *etag_str = str + ETAG_LEN; char *end_str = g_strstr_len(etag_str, len - ETAG_LEN, "\r\n"); if (etag_str && end_str) { cdo->new_etag = g_strndup(etag_str, end_str - etag_str); g_debug("%s: ETAG found: %s", __FUNCTION__, cdo->new_etag); } } return nmemb; } static int curl_progress_func(void *clientp, double dltotal, double dlnow, double ultotal, double ulnow) { return a_background_testcancel(NULL); } /* This should to be called from main() to make sure thread safe */ void curl_download_init() { curl_global_init(CURL_GLOBAL_ALL); curl_download_user_agent = g_strdup_printf ("%s/%s %s", PACKAGE, VERSION, curl_version()); } /* This should to be called from main() to make sure thread safe */ void curl_download_uninit() { curl_global_cleanup(); } /** * */ CURL_download_t curl_download_uri ( const char *uri, FILE *f, DownloadFileOptions *options, CurlDownloadOptions *cdo, void *handle ) { CURL *curl; struct curl_slist *curl_send_headers = NULL; CURLcode res = CURLE_FAILED_INIT; g_debug("%s: uri=%s", __PRETTY_FUNCTION__, uri); curl = handle ? handle : curl_easy_init (); if ( !curl ) { return CURL_DOWNLOAD_ERROR; } if (vik_verbose) curl_easy_setopt ( curl, CURLOPT_VERBOSE, 1 ); curl_easy_setopt ( curl, CURLOPT_NOSIGNAL, 1 ); // Yep, we're a multi-threaded program so don't let signals mess it up! if ( options != NULL && options->user_pass ) { curl_easy_setopt ( curl, CURLOPT_HTTPAUTH, CURLAUTH_ANY ); curl_easy_setopt ( curl, CURLOPT_USERPWD, options->user_pass ); } curl_easy_setopt ( curl, CURLOPT_URL, uri ); curl_easy_setopt ( curl, CURLOPT_WRITEDATA, f ); curl_easy_setopt ( curl, CURLOPT_WRITEFUNCTION, curl_write_func); curl_easy_setopt ( curl, CURLOPT_NOPROGRESS, 0 ); curl_easy_setopt ( curl, CURLOPT_PROGRESSDATA, NULL ); curl_easy_setopt ( curl, CURLOPT_PROGRESSFUNCTION, curl_progress_func); if (options != NULL) { if(options->referer != NULL) curl_easy_setopt ( curl, CURLOPT_REFERER, options->referer); if(options->follow_location != 0) { curl_easy_setopt ( curl, CURLOPT_FOLLOWLOCATION, 1); curl_easy_setopt ( curl, CURLOPT_MAXREDIRS, options->follow_location); } if (cdo != NULL) { if(options->check_file_server_time && cdo->time_condition != 0) { /* if file exists, check against server if file is recent enough */ curl_easy_setopt ( curl, CURLOPT_TIMECONDITION, CURL_TIMECOND_IFMODSINCE); curl_easy_setopt ( curl, CURLOPT_TIMEVALUE, cdo->time_condition); } if (options->use_etag) { if (cdo->etag != NULL) { /* add an header on the HTTP request */ char str[60]; g_snprintf(str, 60, "If-None-Match: %s", cdo->etag); curl_send_headers = curl_slist_append(curl_send_headers, str); curl_easy_setopt ( curl, CURLOPT_HTTPHEADER , curl_send_headers); } /* store the new etag from the server in an option value */ curl_easy_setopt ( curl, CURLOPT_WRITEHEADER, cdo); curl_easy_setopt ( curl, CURLOPT_HEADERFUNCTION, curl_get_etag_func); } } } curl_easy_setopt ( curl, CURLOPT_USERAGENT, curl_download_user_agent ); res = curl_easy_perform ( curl ); if (res == 0) { glong response; curl_easy_getinfo(curl, CURLINFO_RESPONSE_CODE, &response); if (response == 304) { // 304 = Not Modified res = CURL_DOWNLOAD_NO_NEWER_FILE; } else if (response == 200 || // http: 200 = Ok response == 226) { // ftp: 226 = sucess gdouble size; /* verify if curl sends us any data - this is a workaround on using CURLOPT_TIMECONDITION when the server has a (incorrect) time earlier than the time on the file we already have */ curl_easy_getinfo(curl, CURLINFO_SIZE_DOWNLOAD, &size); if (size == 0) res = CURL_DOWNLOAD_ERROR; else res = CURL_DOWNLOAD_NO_ERROR; } else { g_warning("%s: http response: %ld for uri %s\n", __FUNCTION__, response, uri); res = CURL_DOWNLOAD_ERROR; } } else { res = CURL_DOWNLOAD_ERROR; } if (!handle) curl_easy_cleanup ( curl ); if (curl_send_headers) { curl_slist_free_all(curl_send_headers); curl_send_headers = NULL; curl_easy_setopt ( curl, CURLOPT_HTTPHEADER , NULL); } return res; } /** * curl_download_get_url: * Either hostname and/or uri should be defined * */ CURL_download_t curl_download_get_url ( const char *hostname, const char *uri, FILE *f, DownloadFileOptions *options, gboolean ftp, CurlDownloadOptions *cdo, void *handle ) { gchar *full = NULL; if ( hostname && strstr ( hostname, "://" ) != NULL ) /* Already full url */ full = (gchar *) hostname; else if ( uri && strstr ( uri, "://" ) != NULL ) /* Already full url */ full = (gchar *) uri; else if ( hostname && uri ) /* Compose the full url */ full = g_strdup_printf ( "%s://%s%s", (ftp?"ftp":"http"), hostname, uri ); else { return CURL_DOWNLOAD_ERROR; } CURL_download_t ret = curl_download_uri ( full, f, options, cdo, handle ); // Only free newly allocated memory if ( hostname != full && uri != full ) g_free ( full ); return ret; } void * curl_download_handle_init () { return curl_easy_init(); } void curl_download_handle_cleanup ( void *handle ) { curl_easy_cleanup(handle); }