e30b17c8d65b7bb43721d4fd11d46dcbfe26a323
[ardour.git] / gtk2_ardour / pingback.cc
1 /*
2     Copyright (C) 2012 Paul Davis 
3     Inspired by code from Ben Loftis @ Harrison Consoles
4
5     This program is free software; you can redistribute it and/or modify
6     it under the terms of the GNU General Public License as published by
7     the Free Software Foundation; either version 2 of the License, or
8     (at your option) any later version.
9
10     This program is distributed in the hope that it will be useful,
11     but WITHOUT ANY WARRANTY; without even the implied warranty of
12     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
13     GNU General Public License for more details.
14
15     You should have received a copy of the GNU General Public License
16     along with this program; if not, write to the Free Software
17     Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
18
19 */
20
21 #include <string>
22 #include <iostream>
23 #include <fstream>
24 #include <cstring>
25
26 #ifndef PLATFORM_WINDOWS
27 #include <sys/utsname.h>
28 #endif
29
30 #include <curl/curl.h>
31
32 #include <glibmm/miscutils.h>
33
34 #include "pbd/compose.h"
35 #include "pbd/pthread_utils.h"
36
37 #include "ardour/filesystem_paths.h"
38 #include "ardour/rc_configuration.h"
39
40 #include "pingback.h"
41
42 using std::string;
43 using namespace ARDOUR;
44
45 #ifndef PLATFORM_WINDOWS // no pingback for windows, so far
46 static size_t
47 curl_write_data (char *bufptr, size_t size, size_t nitems, void *ptr)
48 {
49         /* we know its a string */
50
51         string* sptr = (string*) ptr;
52
53         for (size_t i = 0; i < nitems; ++i) {
54                 for (size_t n = 0; n < size; ++n) {
55                         if (*bufptr == '\n') {
56                                 break;
57                         }
58
59                         (*sptr) += *bufptr++;
60                 }
61         }
62
63         return size * nitems;
64 }
65 #endif
66
67 struct ping_call {
68     std::string version;
69     std::string announce_path;
70
71     ping_call (const std::string& v, const std::string& a)
72             : version (v), announce_path (a) {}
73 };
74
75 static void*
76 _pingback (void *arg)
77 {
78         ping_call* cm = static_cast<ping_call*> (arg);
79         CURL* c;
80         string return_str;
81         //initialize curl
82
83         curl_global_init (CURL_GLOBAL_NOTHING);
84         c = curl_easy_init ();
85         
86         curl_easy_setopt (c, CURLOPT_WRITEFUNCTION, curl_write_data); 
87         curl_easy_setopt (c, CURLOPT_WRITEDATA, &return_str); 
88         char errbuf[CURL_ERROR_SIZE];
89         curl_easy_setopt (c, CURLOPT_ERRORBUFFER, errbuf); 
90
91         string url;
92
93 #ifdef __APPLE__
94         url = Config->get_osx_pingback_url ();
95 #elif defined PLATFORM_WINDOWS
96         url = Config->get_windows_pingback_url ();
97 #else
98         url = Config->get_linux_pingback_url ();
99 #endif
100
101         if (url.compare (0, 4, "http") != 0) {
102                 delete cm;
103                 return 0;
104         }
105
106         char* v = curl_easy_escape (c, cm->version.c_str(), cm->version.length());
107         url += v;
108         url += '?';
109         free (v);
110
111 #ifndef PLATFORM_WINDOWS
112         struct utsname utb;
113
114         if (uname (&utb)) {
115                 delete cm;
116                 return 0;
117         }
118
119         //string uts = string_compose ("%1 %2 %3 %4", utb.sysname, utb.release, utb.version, utb.machine);
120         string s;
121         char* query;
122
123         query = curl_easy_escape (c, utb.sysname, strlen (utb.sysname));
124         s = string_compose ("s=%1", query);
125         url += s;
126         url += '&';
127         free (query);
128
129         query = curl_easy_escape (c, utb.release, strlen (utb.release));
130         s = string_compose ("r=%1", query);
131         url += s;
132         url += '&';
133         free (query);
134
135         query = curl_easy_escape (c, utb.machine, strlen (utb.machine));
136         s = string_compose ("m=%1", query);
137         url += s;
138         free (query);
139 #else
140         // this is hilarious: https://msdn.microsoft.com/en-us/library/windows/desktop/ms724429%28v=vs.85%29.aspx
141         url += "r=&";
142
143         HKEY key;
144         DWORD size = PATH_MAX;
145         char tmp[PATH_MAX+1];
146         if (   (ERROR_SUCCESS == RegOpenKeyExA (HKEY_LOCAL_MACHINE, "Hardware\\Description\\System\\CentralProcessor", 0, KEY_READ, &key))
147             && (ERROR_SUCCESS == RegQueryValueExA (key, "0", 0, NULL, reinterpret_cast<LPBYTE>(tmp), &size))
148                  )
149         {
150                 string s = Glib::locale_to_utf8 (tmp);
151                 char* query = curl_easy_escape (c, s.c_str(), strlen (s.c_str()));
152                 s = string_compose ("m=%1", query);
153                 url += s;
154                 url += '&';
155                 free (query);
156         } else {
157                 url += "m=&";
158         }
159
160         url += "r=&";
161 # if ( defined(__x86_64__) || defined(_M_X64) )
162         url += "s=Windows64";
163 # else
164         url += "s=Windows32";
165 # endif
166
167 #ifndef NDEBUG
168         cerr << "Pingback: " << url << endl;
169 #endif
170
171 #endif /* PLATFORM_WINDOWS */
172
173         curl_easy_setopt (c, CURLOPT_URL, url.c_str());
174
175         return_str = "";
176
177         if (curl_easy_perform (c) == 0) {
178                 long http_status; 
179
180                 curl_easy_getinfo (c, CURLINFO_RESPONSE_CODE, &http_status);
181
182                 if (http_status != 200) {
183                         std::cerr << "Bad HTTP status" << std::endl;
184                         return 0;
185                 }
186
187                 if ( return_str.length() > 140 ) { // like a tweet :)
188                         std::cerr << "Announcement string is too long (probably behind a proxy)." << std::endl;
189                 } else {
190                         std::cerr << "Announcement is: " << return_str << std::endl;
191                         
192                         //write announcements to local file, even if the
193                         //announcement is empty
194                                 
195                         std::ofstream annc_file (cm->announce_path.c_str());
196                         
197                         if (annc_file) {
198                                 annc_file << return_str;
199                         }
200                 }
201         } else {
202                 std::cerr << "curl failed: " << errbuf << std::endl;
203         }
204
205         curl_easy_cleanup (c);
206         delete cm;
207         return 0;
208 }
209
210 namespace ARDOUR {
211
212 void pingback (const string& version, const string& announce_path) 
213 {
214         ping_call* cm = new ping_call (version, announce_path);
215         pthread_t thread;
216
217         pthread_create_and_store ("pingback", &thread, _pingback, cm);
218 }
219
220 }