[svn-upgrade] Integrating new upstream version, bti (009)
[debian/bti.git] / bti.c
1 /*
2  * Copyright (C) 2008 Greg Kroah-Hartman <greg@kroah.com>
3  *
4  * This program is free software; you can redistribute it and/or modify it
5  * under the terms of the GNU General Public License as published by the
6  * Free Software Foundation version 2 of the License.
7  *
8  * This program is distributed in the hope that it will be useful, but
9  * WITHOUT ANY WARRANTY; without even the implied warranty of
10  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
11  * General Public License for more details.
12  *
13  * You should have received a copy of the GNU General Public License along
14  * with this program; if not, write to the Free Software Foundation, Inc.,
15  * 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301, USA.
16  */
17
18 #include <stdio.h>
19 #include <stdlib.h>
20 #include <stddef.h>
21 #include <string.h>
22 #include <getopt.h>
23 #include <errno.h>
24 #include <ctype.h>
25 #include <fcntl.h>
26 #include <unistd.h>
27 #include <sys/stat.h>
28 #include <curl/curl.h>
29 #include "bti_version.h"
30
31
32 #define zalloc(size)    calloc(size, 1)
33
34 #define dbg(format, arg...)                                             \
35         do {                                                            \
36                 if (debug)                                              \
37                         printf("%s: " format , __func__ , ## arg );     \
38         } while (0)
39
40
41 static int debug = 0;
42
43 enum host {
44         HOST_TWITTER = 0,
45         HOST_IDENTICA = 1,
46 };
47
48 struct session {
49         char *password;
50         char *account;
51         char *tweet;
52         char *proxy;
53         int bash;
54         enum host host;
55 };
56
57 struct bti_curl_buffer {
58         char *data;
59         int length;
60 };
61
62 static void display_help(void)
63 {
64         fprintf(stdout, "bti - send tweet to twitter\n");
65         fprintf(stdout, "Version: " BTI_VERSION "\n");
66         fprintf(stdout, "Usage:\n");
67         fprintf(stdout, "  bti [options]\n");
68         fprintf(stdout, "options are:\n");
69         fprintf(stdout, "  --account accountname\n");
70         fprintf(stdout, "  --password password\n");
71         fprintf(stdout, "  --proxy PROXY:PORT\n");
72         fprintf(stdout, "  --host HOST\n");
73         fprintf(stdout, "  --bash\n");
74         fprintf(stdout, "  --debug\n");
75         fprintf(stdout, "  --version\n");
76         fprintf(stdout, "  --help\n");
77 }
78
79 static void display_version(void)
80 {
81         fprintf(stdout, "bti - version %s\n", BTI_VERSION);
82 }
83
84 static char *get_string_from_stdin(void)
85 {
86         char *temp;
87         char *string;
88
89         string = zalloc(1000);
90         if (!string)
91                 return NULL;
92
93         if (!fgets(string, 999, stdin))
94                 return NULL;
95         temp = strchr(string, '\n');
96         *temp = '\0';
97         return string;
98 }
99
100 static struct session *session_alloc(void)
101 {
102         struct session *session;
103
104         session = zalloc(sizeof(*session));
105         if (!session)
106                 return NULL;
107         return session;
108 }
109
110 static void session_free(struct session *session)
111 {
112         if (!session)
113                 return;
114         free(session->password);
115         free(session->account);
116         free(session->tweet);
117         free(session->proxy);
118         free(session);
119 }
120
121 static struct bti_curl_buffer *bti_curl_buffer_alloc(void)
122 {
123         struct bti_curl_buffer *buffer;
124
125         buffer = zalloc(sizeof(*buffer));
126         if (!buffer)
127                 return NULL;
128
129         /* start out with a data buffer of 1 byte to
130          * make the buffer fill logic simpler */
131         buffer->data = zalloc(1);
132         if (!buffer->data) {
133                 free(buffer);
134                 return NULL;
135         }
136         buffer->length = 0;
137         return buffer;
138 }
139
140 static void bti_curl_buffer_free(struct bti_curl_buffer *buffer)
141 {
142         if (!buffer)
143                 return;
144         free(buffer->data);
145         free(buffer);
146 }
147
148 static const char *twitter_url = "https://twitter.com/statuses/update.xml";
149 static const char *identica_url = "http://identi.ca/api/statuses/update.xml";
150
151 static CURL *curl_init(void)
152 {
153         CURL *curl;
154
155         curl = curl_easy_init();
156         if (!curl) {
157                 fprintf(stderr, "Can not init CURL!\n");
158                 return NULL;
159         }
160         /* some ssl sanity checks on the connection we are making */
161         curl_easy_setopt(curl, CURLOPT_SSL_VERIFYPEER, 0);
162         curl_easy_setopt(curl, CURLOPT_SSL_VERIFYHOST, 0);
163         return curl;
164 }
165
166 size_t curl_callback(void *buffer, size_t size, size_t nmemb, void *userp)
167 {
168         struct bti_curl_buffer *curl_buf = userp;
169         size_t buffer_size = size * nmemb;
170         char *temp;
171
172         if ((!buffer) || (!buffer_size) || (!curl_buf))
173                 return -EINVAL;
174
175         /* add to the data we already have */
176         temp = zalloc(curl_buf->length + buffer_size + 1);
177         if (!temp)
178                 return -ENOMEM;
179
180         memcpy(temp, curl_buf->data, curl_buf->length);
181         free(curl_buf->data);
182         curl_buf->data = temp;
183         memcpy(&curl_buf->data[curl_buf->length], (char *)buffer, buffer_size);
184         curl_buf->length += buffer_size;
185
186         dbg("%s\n", curl_buf->data);
187
188         return buffer_size;
189 }
190
191 static int send_tweet(struct session *session)
192 {
193         char user_password[500];
194         char data[500];
195         struct bti_curl_buffer *curl_buf;
196         CURL *curl = NULL;
197         CURLcode res;
198         struct curl_httppost *formpost = NULL;
199         struct curl_httppost *lastptr = NULL;
200         struct curl_slist *slist = NULL;
201
202         if (!session)
203                 return -EINVAL;
204
205         curl_buf = bti_curl_buffer_alloc();
206         if (!curl_buf)
207                 return -ENOMEM;
208
209         snprintf(user_password, sizeof(user_password), "%s:%s",
210                  session->account, session->password);
211         snprintf(data, sizeof(data), "status=\"%s\"", session->tweet);
212
213         curl = curl_init();
214         if (!curl)
215                 return -EINVAL;
216
217         curl_formadd(&formpost, &lastptr,
218                      CURLFORM_COPYNAME, "status",
219                      CURLFORM_COPYCONTENTS, session->tweet,
220                      CURLFORM_END);
221
222         curl_easy_setopt(curl, CURLOPT_HTTPPOST, formpost);
223
224         switch (session->host) {
225         case HOST_TWITTER:
226                 curl_easy_setopt(curl, CURLOPT_URL, twitter_url);
227                 /*
228                  * twitter doesn't like the "Expect: 100-continue" header
229                  * anymore, so turn it off.
230                  */
231                 slist = curl_slist_append(slist, "Expect:");
232                 curl_easy_setopt(curl, CURLOPT_HTTPHEADER, slist);
233                 break;
234         case HOST_IDENTICA:
235                 curl_easy_setopt(curl, CURLOPT_URL, identica_url);
236                 break;
237         }
238
239         if (session->proxy)
240                 curl_easy_setopt(curl, CURLOPT_PROXY, session->proxy);
241
242         if (debug)
243                 curl_easy_setopt(curl, CURLOPT_VERBOSE, 1);
244         curl_easy_setopt(curl, CURLOPT_USERPWD, user_password);
245
246         dbg("user_password = %s\n", user_password);
247         dbg("data = %s\n", data);
248         dbg("proxy = %s\n", session->proxy);
249
250         curl_easy_setopt(curl, CURLOPT_WRITEFUNCTION, curl_callback);
251         curl_easy_setopt(curl, CURLOPT_WRITEDATA, curl_buf);
252         res = curl_easy_perform(curl);
253         if (res && !session->bash) {
254                 fprintf(stderr, "error(%d) trying to send tweet\n", res);
255                 return -EINVAL;
256         }
257
258         curl_easy_cleanup(curl);
259         curl_formfree(formpost);
260         bti_curl_buffer_free(curl_buf);
261         return 0;
262 }
263
264 static void parse_configfile(struct session *session)
265 {
266         FILE *config_file;
267         char *line = NULL;
268         size_t len = 0;
269         char *account = NULL;
270         char *password = NULL;
271         char *host = NULL;
272         char *proxy = NULL;
273         char *file;
274         char *home = getenv("HOME");
275
276         /* config file is ~/.bti  */
277         file = alloca(strlen(home) + 7);
278
279         sprintf(file, "%s/.bti", home);
280
281         config_file = fopen(file, "r");
282
283         /* No error if file does not exist or is unreadable.  */
284         if (config_file == NULL)
285                 return;
286
287         do {
288                 ssize_t n = getline(&line, &len, config_file);
289                 if (n < 0)
290                         break;
291                 if (line[n - 1] == '\n')
292                         line[n - 1] = '\0';
293                 /* Parse file.  Format is the usual value pairs:
294                    account=name
295                    passwort=value
296                    # is a comment character
297                 */
298                 *strchrnul(line, '#') = '\0';
299                 char *c = line;
300                 while (isspace(*c))
301                         c++;
302                 /* Ignore blank lines.  */
303                 if (c[0] == '\0')
304                         continue;
305
306                 if (!strncasecmp(c, "account", 7) && (c[7] == '=')) {
307                         c += 8;
308                         if (c[0] != '\0')
309                                 account = strdup(c);
310                 } else if (!strncasecmp(c, "password", 8) &&
311                            (c[8] == '=')) {
312                         c += 9;
313                         if (c[0] != '\0')
314                                 password = strdup(c);
315                 } else if (!strncasecmp(c, "host", 4) &&
316                            (c[4] == '=')) {
317                         c += 5;
318                         if (c[0] != '\0')
319                                 host = strdup(c);
320                 } else if (!strncasecmp(c, "proxy", 5) &&
321                            (c[5] == '=')) {
322                         c += 6;
323                         if (c[0] != '\0')
324                                 proxy = strdup(c);
325                 }
326         } while (!feof(config_file));
327
328         if (password)
329                 session->password = password;
330         if (account)
331                 session->account = account;
332         if (host) {
333                 if (strcasecmp(host, "twitter") == 0)
334                         session->host = HOST_TWITTER;
335                 if (strcasecmp(host, "identica") == 0)
336                         session->host = HOST_IDENTICA;
337                 free(host);
338         }
339         if (proxy)
340                 session->proxy = proxy;
341
342         /* Free buffer and close file.  */
343         free(line);
344         fclose(config_file);
345 }
346
347 int main(int argc, char *argv[], char *envp[])
348 {
349         static const struct option options[] = {
350                 { "debug", 0, NULL, 'd' },
351                 { "account", 1, NULL, 'a' },
352                 { "password", 1, NULL, 'p' },
353                 { "host", 1, NULL, 'H' },
354                 { "help", 0, NULL, 'h' },
355                 { "bash", 0, NULL, 'b' },
356                 { "version", 0, NULL, 'v' },
357                 { }
358         };
359         struct session *session;
360         pid_t child;
361         char *tweet;
362         int retval;
363         int option;
364 #if 0
365         char *home = getenv("HOME");
366         char *pwd = getenv("PWD");
367         char *dir;
368 #endif
369         session = session_alloc();
370         if (!session) {
371                 fprintf(stderr, "no more memory...\n");
372                 return -1;
373         }
374
375         curl_global_init(CURL_GLOBAL_ALL);
376         parse_configfile(session);
377
378         while (1) {
379                 option = getopt_long_only(argc, argv, "dqe:p:H:a:h",
380                                           options, NULL);
381                 if (option == -1)
382                         break;
383                 switch (option) {
384                 case 'd':
385                         debug = 1;
386                         break;
387                 case 'a':
388                         if (session->account)
389                                 free(session->account);
390                         session->account = strdup(optarg);
391                         dbg("account = %s\n", session->account);
392                         break;
393                 case 'p':
394                         if (session->password)
395                                 free(session->password);
396                         session->password = strdup(optarg);
397                         dbg("password = %s\n", session->password);
398                         break;
399                 case 'H':
400                         if (strcasecmp(optarg, "twitter") == 0)
401                                 session->host = HOST_TWITTER;
402                         if (strcasecmp(optarg, "identica") == 0)
403                                 session->host = HOST_IDENTICA;
404                         dbg("host = %d\n", session->host);
405                         break;
406                 case 'b':
407                         session->bash= 1;
408                         break;
409                 case 'h':
410                         display_help();
411                         goto exit;
412                 case 'v':
413                         display_version();
414                         goto exit;
415                 default:
416                         display_help();
417                         goto exit;
418                 }
419         }
420
421         if (!session->account) {
422                 fprintf(stdout, "Enter twitter account: ");
423                 session->account = get_string_from_stdin();
424         }
425
426         if (!session->password) {
427                 fprintf(stdout, "Enter twitter password: ");
428                 session->password = get_string_from_stdin();
429         }
430 #if 0
431         /* get the current working directory basename */
432         if (strcmp(pwd, home) == 0)
433                 dir = "~";
434         else {
435                 dir = strrchr(pwd, '/');
436                 if (dir)
437                         dir++;
438                 else
439                         dir = "?";
440         }
441 #endif
442         tweet = get_string_from_stdin();
443         if (!tweet || strlen(tweet) == 0) {
444                 dbg("no tweet?\n");
445                 return -1;
446         }
447
448 //      session->tweet = zalloc(strlen(tweet) + strlen(dir) + 10);
449         session->tweet = zalloc(strlen(tweet) + 10);
450
451         /* if --bash is specified, add the "PWD $ " to
452          * the start of the tweet. */
453         if (session->bash)
454 //              sprintf(session->tweet, "%s $ %s", dir, tweet);
455                 sprintf(session->tweet, "$ %s", tweet);
456         else
457                 sprintf(session->tweet, "%s", tweet);
458         free(tweet);
459
460         dbg("account = %s\n", session->account);
461         dbg("password = %s\n", session->password);
462         dbg("tweet = %s\n", session->tweet);
463         dbg("host = %d\n", session->host);
464
465         /* fork ourself so that the main shell can get on
466          * with it's life as we try to connect and handle everything
467          */
468         if (session->bash) {
469                 child = fork();
470                         if (child) {
471                         dbg("child is %d\n", child);
472                         exit(0);
473                 }
474         }
475
476         retval = send_tweet(session);
477         if (retval && !session->bash) {
478                 fprintf(stderr, "tweet failed\n");
479                 return -1;
480         }
481
482         session_free(session);
483 exit:
484         return 0;
485 }