Merge branch 'master' into cairocanvas
[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 #include <sys/utsname.h>
27 #include <curl/curl.h>
28
29 #include <glibmm/miscutils.h>
30
31 #include "pbd/compose.h"
32 #include "pbd/pthread_utils.h"
33
34 #include "ardour/filesystem_paths.h"
35 #include "ardour/rc_configuration.h"
36
37 #include "pingback.h"
38
39 using std::string;
40 using namespace ARDOUR;
41
42 static size_t
43 curl_write_data (char *bufptr, size_t size, size_t nitems, void *ptr)
44 {
45         /* we know its a string */
46
47         string* sptr = (string*) ptr;
48
49         for (size_t i = 0; i < nitems; ++i) {
50                 for (size_t n = 0; n < size; ++n) {
51                         if (*bufptr == '\n') {
52                                 break;
53                         }
54
55                         (*sptr) += *bufptr++;
56                 }
57         }
58
59         return size * nitems;
60 }
61
62 struct ping_call {
63     std::string version;
64     std::string announce_path;
65
66     ping_call (const std::string& v, const std::string& a)
67             : version (v), announce_path (a) {}
68 };
69
70 static void*
71 _pingback (void *arg)
72 {
73         ping_call* cm = static_cast<ping_call*> (arg);
74         CURL* c;
75         struct utsname utb;
76         string return_str;
77
78         if (uname (&utb)) {
79                 return 0;
80         }
81
82         //initialize curl
83
84         curl_global_init (CURL_GLOBAL_NOTHING);
85         c = curl_easy_init ();
86         
87         curl_easy_setopt (c, CURLOPT_WRITEFUNCTION, curl_write_data); 
88         curl_easy_setopt (c, CURLOPT_WRITEDATA, &return_str); 
89         char errbuf[CURL_ERROR_SIZE];
90         curl_easy_setopt (c, CURLOPT_ERRORBUFFER, errbuf); 
91
92         string url;
93
94 #ifdef __APPLE__
95         url = Config->get_osx_pingback_url ();
96 #else
97         url = Config->get_linux_pingback_url ();
98 #endif
99
100         char* v = curl_easy_escape (c, cm->version.c_str(), cm->version.length());
101         url += v;
102         url += '?';
103         free (v);
104
105         string uts = string_compose ("%1 %2 %3 %4", utb.sysname, utb.release, utb.version, utb.machine);
106         string s;
107         char* query;
108
109         query = curl_easy_escape (c, utb.sysname, strlen (utb.sysname));
110         s = string_compose ("s=%1", query);
111         url += s;
112         url += '&';
113         free (query);
114
115         query = curl_easy_escape (c, utb.release, strlen (utb.release));
116         s = string_compose ("r=%1", query);
117         url += s;
118         url += '&';
119         free (query);
120
121         query = curl_easy_escape (c, utb.machine, strlen (utb.machine));
122         s = string_compose ("m=%1", query);
123         url += s;
124         free (query);
125
126         curl_easy_setopt (c, CURLOPT_URL, url.c_str());
127
128         return_str = "";
129
130         if (curl_easy_perform (c) == 0) {
131                 long http_status; 
132
133                 curl_easy_getinfo (c, CURLINFO_RESPONSE_CODE, &http_status);
134
135                 if (http_status != 200) {
136                         std::cerr << "Bad HTTP status" << std::endl;
137                         return 0;
138                 }
139
140                 if ( return_str.length() > 140 ) { // like a tweet :)
141                         std::cerr << "Announcement string is too long (probably behind a proxy)." << std::endl;
142                 } else {
143                         std::cerr << "Announcement is: " << return_str << std::endl;
144                         
145                         //write announcements to local file, even if the
146                         //announcement is empty
147                                 
148                         std::ofstream annc_file (cm->announce_path.c_str());
149                         
150                         if (annc_file) {
151                                 annc_file << return_str;
152                         }
153                 }
154         } else {
155                 std::cerr << "curl failed: " << errbuf << std::endl;
156         }
157
158         curl_easy_cleanup (c);
159         delete cm;
160
161         return 0;
162 }
163
164 namespace ARDOUR {
165
166 void pingback (const string& version, const string& announce_path) 
167 {
168         ping_call* cm = new ping_call (version, announce_path);
169         pthread_t thread;
170
171         pthread_create_and_store ("pingback", &thread, _pingback, cm);
172 }
173
174 }