8c1c1e463bcfdb800b2283754b3d92f04bd967dc
[supertux.git] / src / addon_manager.cpp
1 //  $Id$
2 //
3 //  SuperTux - Add-on Manager
4 //  Copyright (C) 2007 Christoph Sommer <christoph.sommer@2007.expires.deltadevelopment.de>
5 //
6 //  This program is free software; you can redistribute it and/or
7 //  modify it under the terms of the GNU General Public License
8 //  as published by the Free Software Foundation; either version 2
9 //  of the License, or (at your option) any later version.
10 //
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.
15 //
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
19 //  02111-1307, USA.
20 //
21
22 #include <sstream>
23 #include <stdexcept>
24 #include <list>
25 #include <physfs.h>
26 #include <sys/stat.h>
27 #include <stdio.h>
28 #include "addon_manager.hpp"
29 #include "config.h"
30 #include "log.hpp"
31 #include "lisp/parser.hpp"
32 #include "lisp/lisp.hpp"
33 #include "lisp/list_iterator.hpp"
34
35 #ifdef HAVE_LIBCURL
36 #include <curl/curl.h>
37 #include <curl/types.h>
38 #include <curl/easy.h>
39 #endif
40
41 #ifdef HAVE_LIBCURL
42 namespace {
43
44   size_t my_curl_string_append(void *ptr, size_t size, size_t nmemb, void *string_ptr)
45   {
46     std::string& s = *static_cast<std::string*>(string_ptr);
47     std::string buf(static_cast<char*>(ptr), size * nmemb);
48     s += buf;
49     log_debug << "read " << size * nmemb << " bytes of data..." << std::endl;
50     return size * nmemb;
51   }
52
53   size_t my_curl_physfs_write(void *ptr, size_t size, size_t nmemb, void *f_p)
54   {
55     PHYSFS_file* f = static_cast<PHYSFS_file*>(f_p);
56     PHYSFS_sint64 written = PHYSFS_write(f, ptr, size, nmemb);
57     log_debug << "read " << size * nmemb << " bytes of data..." << std::endl;
58     return size * written;
59   }
60
61 }
62 #endif
63
64 AddonManager&
65 AddonManager::get_instance()
66 {
67   static AddonManager instance;
68   return instance;
69 }
70
71 AddonManager::AddonManager()
72 {
73 #ifdef HAVE_LIBCURL
74   curl_global_init(CURL_GLOBAL_ALL);
75 #endif
76 }
77
78 AddonManager::~AddonManager()
79 {
80 #ifdef HAVE_LIBCURL
81   curl_global_cleanup();
82 #endif
83 }
84
85 std::vector<Addon>
86 AddonManager::get_installed_addons() const
87 {
88   std::vector<Addon> addons;
89
90   // iterate over complete search path (i.e. directories and archives)
91   char **i = PHYSFS_getSearchPath();
92   if (!i) throw std::runtime_error("Could not query physfs search path");
93   for (; *i != NULL; i++) {
94
95     // get filename of potential archive
96     std::string fileName = *i;
97
98     // make sure it's in the writeDir
99     static const std::string writeDir = PHYSFS_getWriteDir();
100     if (fileName.compare(0, writeDir.length(), writeDir) != 0) continue;
101
102     // make sure it looks like an archive
103     static const std::string archiveExt = ".zip";
104     if (fileName.compare(fileName.length()-archiveExt.length(), archiveExt.length(), archiveExt) != 0) continue;
105
106     // make sure it exists
107     struct stat stats;
108     if (stat(fileName.c_str(), &stats) != 0) continue;
109
110     // make sure it's an actual file
111     if (!S_ISREG(stats.st_mode)) continue;
112
113     Addon addon;
114
115     // extract nice title as fallback for when the Add-on has no addoninfo file
116     static const char* dirSep = PHYSFS_getDirSeparator();
117     std::string::size_type n = fileName.rfind(dirSep) + 1;
118     if (n == std::string::npos) n = 0;
119     addon.title = fileName.substr(n, fileName.length() - n - archiveExt.length());
120     std::string shortFileName = fileName.substr(n, fileName.length() - n);
121     addon.file = shortFileName;
122    
123     // read an accompaining .nfo file, if it exists
124     static const std::string infoExt = ".nfo";
125     std::string infoFileName = fileName.substr(n, fileName.length() - n - archiveExt.length()) + infoExt;
126     if (PHYSFS_exists(infoFileName.c_str())) {
127       addon.parse(infoFileName);
128       if (addon.file != shortFileName) {
129         log_warning << "Add-on \"" << addon.title << "\", contained in file \"" << shortFileName << "\" is accompained by an addoninfo file that specifies \"" << addon.file << "\" as the Add-on's file name. Skipping." << std::endl;
130       }
131     }
132
133     addon.isInstalled = true;
134     addons.push_back(addon);
135   }
136
137   return addons;
138 }
139
140 std::vector<Addon>
141 AddonManager::get_available_addons() const
142 {
143   std::vector<Addon> addons;
144
145 #ifdef HAVE_LIBCURL
146
147   // FIXME: This URL is just for testing!
148   const char* baseUrl = "http://www.deltadevelopment.de/users/christoph/supertux/addons/index.nfo";
149   std::string addoninfos = "";
150
151   CURL *curl_handle;
152   curl_handle = curl_easy_init();
153   curl_easy_setopt(curl_handle, CURLOPT_URL, baseUrl);
154   curl_easy_setopt(curl_handle, CURLOPT_USERAGENT, "SuperTux/" PACKAGE_VERSION " libcURL");
155   curl_easy_setopt(curl_handle, CURLOPT_WRITEFUNCTION, my_curl_string_append);
156   curl_easy_setopt(curl_handle, CURLOPT_WRITEDATA, &addoninfos);
157   curl_easy_perform(curl_handle);
158   curl_easy_cleanup(curl_handle);
159
160   try {
161     lisp::Parser parser;
162     std::stringstream addoninfos_stream(addoninfos);
163     const lisp::Lisp* root = parser.parse(addoninfos_stream, "supertux-addons");
164
165     const lisp::Lisp* addons_lisp = root->get_lisp("supertux-addons");
166     if(!addons_lisp) throw std::runtime_error("file is not a supertux-addons file.");
167
168     lisp::ListIterator iter(addons_lisp);
169     while(iter.next()) {
170       const std::string& token = iter.item();
171       if(token == "supertux-addoninfo") {
172         Addon addon;
173         addon.parse(*(iter.lisp()));
174
175         // make sure the Add-on's file name does not contain weird characters
176         if (addon.file.find_first_not_of("match.quiz-proxy_gwenblvdjfks0123456789ABCDEFGHIJKLMNOPQRSTUVWXYZ") != std::string::npos) {
177           log_warning << "Add-on \"" << addon.title << "\" contains unsafe file name. Skipping." << std::endl;
178           continue;
179         }
180
181         addon.isInstalled = false;
182         addons.push_back(addon);
183       } else {
184         log_warning << "Unknown token '" << token << "' in supertux-addons file" << std::endl;
185       }
186     }
187   } catch(std::exception& e) {
188     std::stringstream msg;
189     msg << "Problem when reading addoninfo: " << e.what();
190     throw std::runtime_error(msg.str());
191   }
192
193 #endif
194
195   return addons;
196 }
197
198
199 void
200 AddonManager::install(const Addon& addon)
201 {
202
203 #ifdef HAVE_LIBCURL
204
205   char* url = (char*)malloc(addon.http_url.length() + 1);
206   strncpy(url, addon.http_url.c_str(), addon.http_url.length() + 1);
207
208   PHYSFS_file* f = PHYSFS_openWrite(addon.file.c_str());
209
210   log_debug << "Downloading \"" << url << "\"" << std::endl;
211
212   CURL *curl_handle;
213   curl_handle = curl_easy_init();
214   curl_easy_setopt(curl_handle, CURLOPT_URL, url);
215   curl_easy_setopt(curl_handle, CURLOPT_USERAGENT, "SuperTux/" PACKAGE_VERSION " libcURL");
216   curl_easy_setopt(curl_handle, CURLOPT_WRITEFUNCTION, my_curl_physfs_write);
217   curl_easy_setopt(curl_handle, CURLOPT_WRITEDATA, f);
218   curl_easy_perform(curl_handle);
219   curl_easy_cleanup(curl_handle);
220
221   PHYSFS_close(f);
222
223   free(url);
224
225   // write an accompaining .nfo file
226   static const std::string archiveExt = ".zip";
227   static const std::string infoExt = ".nfo";
228   std::string infoFileName = addon.file.substr(0, addon.file.length()-archiveExt.length()) + infoExt;
229   addon.write(infoFileName);
230
231   static const std::string writeDir = PHYSFS_getWriteDir();
232   static const std::string dirSep = PHYSFS_getDirSeparator();
233   std::string fullFilename = writeDir + dirSep + addon.file;
234   log_debug << "Finished downloading \"" << fullFilename << "\"" << std::endl;
235   PHYSFS_addToSearchPath(fullFilename.c_str(), 1);
236 #else
237   (void) addon;
238 #endif
239
240 }
241
242 void
243 AddonManager::remove(const Addon& addon)
244 {
245   log_debug << "deleting file \"" << addon.file << "\"" << std::endl;
246   PHYSFS_removeFromSearchPath(addon.file.c_str());
247   PHYSFS_delete(addon.file.c_str());
248
249   // remove an accompaining .nfo file
250   static const std::string archiveExt = ".zip";
251   static const std::string infoExt = ".nfo";
252   std::string infoFileName = addon.file.substr(0, addon.file.length()-archiveExt.length()) + infoExt;
253   if (PHYSFS_exists(infoFileName.c_str())) {
254     log_debug << "deleting file \"" << infoFileName << "\"" << std::endl;
255     PHYSFS_delete(infoFileName.c_str());
256   }
257 }
258