source: skype/skype.c @ 7cf146f

Last change on this file since 7cf146f was 7cf146f, checked in by Miklos Vajna <vmiklos@…>, at 2010-04-18T02:44:08Z

copyright

  • Property mode set to 100644
File size: 33.1 KB
Line 
1/*
2 *  skype.c - Skype plugin for BitlBee
3 *
4 *  Copyright (c) 2007, 2008, 2009, 2010 by Miklos Vajna <vmiklos@frugalware.org>
5 *
6 *  This program is free software; you can redistribute it and/or modify
7 *  it under the terms of the GNU General Public License as published by
8 *  the Free Software Foundation; either version 2 of the License, or
9 *  (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 02111-1307,
19 *  USA.
20 */
21
22#define _XOPEN_SOURCE
23#define _BSD_SOURCE
24#include <poll.h>
25#include <bitlbee.h>
26#include <bitlbee/ssl_client.h>
27
28#define SKYPE_DEFAULT_SERVER "localhost"
29#define SKYPE_DEFAULT_PORT "2727"
30#define IRC_LINE_SIZE 1024
31#define ARRAY_SIZE(x) (sizeof(x)/sizeof(x[0]))
32
33/*
34 * Enumerations
35 */
36
37enum {
38        SKYPE_CALL_RINGING = 1,
39        SKYPE_CALL_MISSED,
40        SKYPE_CALL_CANCELLED,
41        SKYPE_CALL_FINISHED,
42        SKYPE_CALL_REFUSED
43};
44
45enum {
46        SKYPE_FILETRANSFER_NEW = 1,
47        SKYPE_FILETRANSFER_FAILED
48};
49
50/*
51 * Structures
52 */
53
54struct skype_data {
55        struct im_connection *ic;
56        char *username;
57        /* The effective file descriptor. We store it here so any function can
58         * write() to it. */
59        int fd;
60        /* File descriptor returned by bitlbee. we store it so we know when
61         * we're connected and when we aren't. */
62        int bfd;
63        /* ssl_getfd() uses this to get the file desciptor. */
64        void *ssl;
65        /* When we receive a new message id, we query the properties, finally
66         * the chatname. Store the properties here so that we can use
67         * imcb_buddy_msg() when we got the chatname. */
68        char *handle;
69        /* List, because of multiline messages. */
70        GList *body;
71        char *type;
72        /* This is necessary because we send a notification when we get the
73         * handle. So we store the state here and then we can send a
74         * notification about the handle is in a given status. */
75        int call_status;
76        char *call_id;
77        char *call_duration;
78        /* If the call is outgoing or not */
79        int call_out;
80        /* Same for file transfers. */
81        int filetransfer_status;
82        /* Using /j #nick we want to have a groupchat with two people. Usually
83         * not (default). */
84        char *groupchat_with;
85        /* The user who invited us to the chat. */
86        char *adder;
87        /* If we are waiting for a confirmation about we changed the topic. */
88        int topic_wait;
89        /* These are used by the info command. */
90        char *info_fullname;
91        char *info_phonehome;
92        char *info_phoneoffice;
93        char *info_phonemobile;
94        char *info_nrbuddies;
95        char *info_tz;
96        char *info_seen;
97        char *info_birthday;
98        char *info_sex;
99        char *info_language;
100        char *info_country;
101        char *info_province;
102        char *info_city;
103        char *info_homepage;
104        char *info_about;
105        /* When a call fails, we get the reason and later we get the failure
106         * event, so store the failure code here till then */
107        int failurereason;
108        /* If this is just an update of an already received message. */
109        int is_edit;
110};
111
112struct skype_away_state {
113        char *code;
114        char *full_name;
115};
116
117struct skype_buddy_ask_data {
118        struct im_connection *ic;
119        /* This is also used for call IDs for simplicity */
120        char *handle;
121};
122
123/*
124 * Tables
125 */
126
127const struct skype_away_state skype_away_state_list[] = {
128        { "AWAY", "Away" },
129        { "NA", "Not available" },
130        { "DND", "Do Not Disturb" },
131        { "INVISIBLE", "Invisible" },
132        { "OFFLINE", "Offline" },
133        { "SKYPEME", "Skype Me" },
134        { "ONLINE", "Online" },
135        { NULL, NULL}
136};
137
138/*
139 * Functions
140 */
141
142int skype_write(struct im_connection *ic, char *buf, int len)
143{
144        struct skype_data *sd = ic->proto_data;
145        struct pollfd pfd[1];
146
147        pfd[0].fd = sd->fd;
148        pfd[0].events = POLLOUT;
149
150        /* This poll is necessary or we'll get a SIGPIPE when we write() to
151         * sd->fd. */
152        poll(pfd, 1, 1000);
153        if (pfd[0].revents & POLLHUP) {
154                imc_logout(ic, TRUE);
155                return FALSE;
156        }
157        ssl_write(sd->ssl, buf, len);
158
159        return TRUE;
160}
161
162int skype_printf(struct im_connection *ic, char *fmt, ...)
163{
164        va_list args;
165        char str[IRC_LINE_SIZE];
166
167        va_start(args, fmt);
168        vsnprintf(str, IRC_LINE_SIZE, fmt, args);
169        va_end(args);
170
171        return skype_write(ic, str, strlen(str));
172}
173
174static void skype_buddy_ask_yes(void *data)
175{
176        struct skype_buddy_ask_data *bla = data;
177        skype_printf(bla->ic, "SET USER %s ISAUTHORIZED TRUE",
178                bla->handle);
179        g_free(bla->handle);
180        g_free(bla);
181}
182
183static void skype_buddy_ask_no(void *data)
184{
185        struct skype_buddy_ask_data *bla = data;
186        skype_printf(bla->ic, "SET USER %s ISAUTHORIZED FALSE",
187                bla->handle);
188        g_free(bla->handle);
189        g_free(bla);
190}
191
192void skype_buddy_ask(struct im_connection *ic, char *handle, char *message)
193{
194        struct skype_buddy_ask_data *bla = g_new0(struct skype_buddy_ask_data,
195                1);
196        char *buf;
197
198        bla->ic = ic;
199        bla->handle = g_strdup(handle);
200
201        buf = g_strdup_printf("The user %s wants to add you to "
202                "his/her buddy list, saying: '%s'.", handle, message);
203        imcb_ask(ic, buf, bla, skype_buddy_ask_yes, skype_buddy_ask_no);
204        g_free(buf);
205}
206
207static void skype_call_ask_yes(void *data)
208{
209        struct skype_buddy_ask_data *bla = data;
210        skype_printf(bla->ic, "SET CALL %s STATUS INPROGRESS",
211                bla->handle);
212        g_free(bla->handle);
213        g_free(bla);
214}
215
216static void skype_call_ask_no(void *data)
217{
218        struct skype_buddy_ask_data *bla = data;
219        skype_printf(bla->ic, "SET CALL %s STATUS FINISHED",
220                bla->handle);
221        g_free(bla->handle);
222        g_free(bla);
223}
224
225void skype_call_ask(struct im_connection *ic, char *call_id, char *message)
226{
227        struct skype_buddy_ask_data *bla = g_new0(struct skype_buddy_ask_data,
228                1);
229
230        bla->ic = ic;
231        bla->handle = g_strdup(call_id);
232
233        imcb_ask(ic, message, bla, skype_call_ask_yes, skype_call_ask_no);
234}
235struct groupchat *skype_chat_by_name(struct im_connection *ic, char *name)
236{
237        struct groupchat *ret;
238
239        for (ret = ic->groupchats; ret; ret = ret->next)
240                if (strcmp(name, ret->title) == 0)
241                        break;
242
243        return ret;
244}
245
246static char *skype_call_strerror(int err)
247{
248        switch (err) {
249        case 1:
250                return "Miscellaneous error";
251        case 2:
252                return "User or phone number does not exist.";
253        case 3:
254                return "User is offline";
255        case 4:
256                return "No proxy found";
257        case 5:
258                return "Session terminated.";
259        case 6:
260                return "No common codec found.";
261        case 7:
262                return "Sound I/O error.";
263        case 8:
264                return "Problem with remote sound device.";
265        case 9:
266                return "Call blocked by recipient.";
267        case 10:
268                return "Recipient not a friend.";
269        case 11:
270                return "Current user not authorized by recipient.";
271        case 12:
272                return "Sound recording error.";
273        default:
274                return "Unknown error";
275        }
276}
277
278static void skype_parse_users(struct im_connection *ic, char *line)
279{
280        char **i, **nicks;
281
282        nicks = g_strsplit(line + 6, ", ", 0);
283        for (i = nicks; *i; i++)
284                skype_printf(ic, "GET USER %s ONLINESTATUS\n", *i);
285        g_strfreev(nicks);
286}
287
288static void skype_parse_user(struct im_connection *ic, char *line)
289{
290        int flags = 0;
291        char *ptr;
292        struct skype_data *sd = ic->proto_data;
293        char *user = strchr(line, ' ');
294        char *status = strrchr(line, ' ');
295
296        status++;
297        ptr = strchr(++user, ' ');
298        if (!ptr)
299                return;
300        *ptr = '\0';
301        ptr++;
302        if (!strncmp(ptr, "ONLINESTATUS ", 13)) {
303                        if (!strcmp(user, sd->username))
304                                return;
305                        if (!set_getbool(&ic->acc->set, "test_join")
306                                && !strcmp(user, "echo123"))
307                                return;
308                ptr = g_strdup_printf("%s@skype.com", user);
309                imcb_add_buddy(ic, ptr, NULL);
310                if (strcmp(status, "OFFLINE") && (strcmp(status, "SKYPEOUT") ||
311                        !set_getbool(&ic->acc->set, "skypeout_offline")))
312                        flags |= OPT_LOGGED_IN;
313                if (strcmp(status, "ONLINE") && strcmp(status, "SKYPEME"))
314                        flags |= OPT_AWAY;
315                imcb_buddy_status(ic, ptr, flags, NULL, NULL);
316                g_free(ptr);
317        } else if (!strncmp(ptr, "RECEIVEDAUTHREQUEST ", 20)) {
318                char *message = ptr + 20;
319                if (strlen(message))
320                        skype_buddy_ask(ic, user, message);
321        } else if (!strncmp(ptr, "BUDDYSTATUS ", 12)) {
322                char *st = ptr + 12;
323                if (!strcmp(st, "3")) {
324                        char *buf = g_strdup_printf("%s@skype.com", user);
325                        imcb_add_buddy(ic, buf, NULL);
326                        g_free(buf);
327                }
328        } else if (!strncmp(ptr, "MOOD_TEXT ", 10) && set_getbool(&ic->acc->set, "show_moods")) {
329                char *buf = g_strdup_printf("%s@skype.com", user);
330                user_t *u = user_findhandle(ic, buf);
331                g_free(buf);
332                buf = ptr + 10;
333                if (u) {
334                        if (u->status_msg)
335                                g_free(u->status_msg);
336                        if (strlen(buf))
337                                u->status_msg = g_strdup(buf);
338                        else
339                                u->status_msg = NULL;
340                }
341                imcb_log(ic, "User `%s' changed mood text to `%s'", user, buf);
342        }
343        else if (!strncmp(ptr, "FULLNAME ", 9))
344                sd->info_fullname = g_strdup(ptr + 9);
345        else if (!strncmp(ptr, "PHONE_HOME ", 11))
346                sd->info_phonehome = g_strdup(ptr + 11);
347        else if (!strncmp(ptr, "PHONE_OFFICE ", 13))
348                sd->info_phoneoffice = g_strdup(ptr + 13);
349        else if (!strncmp(ptr, "PHONE_MOBILE ", 13))
350                sd->info_phonemobile = g_strdup(ptr + 13);
351        else if (!strncmp(ptr, "NROF_AUTHED_BUDDIES ", 20))
352                sd->info_nrbuddies = g_strdup(ptr + 20);
353        else if (!strncmp(ptr, "TIMEZONE ", 9))
354                sd->info_tz = g_strdup(ptr + 9);
355        else if (!strncmp(ptr, "LASTONLINETIMESTAMP ", 20))
356                sd->info_seen = g_strdup(ptr + 20);
357        else if (!strncmp(ptr, "BIRTHDAY ", 9))
358                sd->info_birthday = g_strdup(ptr + 9);
359        else if (!strncmp(ptr, "SEX ", 4))
360                sd->info_sex = g_strdup(ptr + 4);
361        else if (!strncmp(ptr, "LANGUAGE ", 9))
362                sd->info_language = g_strdup(ptr + 9);
363        else if (!strncmp(ptr, "COUNTRY ", 8))
364                sd->info_country = g_strdup(ptr + 8);
365        else if (!strncmp(ptr, "PROVINCE ", 9))
366                sd->info_province = g_strdup(ptr + 9);
367        else if (!strncmp(ptr, "CITY ", 5))
368                sd->info_city = g_strdup(ptr + 5);
369        else if (!strncmp(ptr, "HOMEPAGE ", 9))
370                sd->info_homepage = g_strdup(ptr + 9);
371        else if (!strncmp(ptr, "ABOUT ", 6)) {
372                sd->info_about = g_strdup(ptr + 6);
373
374                GString *st = g_string_new("Contact Information\n");
375                g_string_append_printf(st, "Skype Name: %s\n", user);
376                if (sd->info_fullname) {
377                        if (strlen(sd->info_fullname))
378                                g_string_append_printf(st, "Full Name: %s\n",
379                                        sd->info_fullname);
380                        g_free(sd->info_fullname);
381                }
382                if (sd->info_phonehome) {
383                        if (strlen(sd->info_phonehome))
384                                g_string_append_printf(st, "Home Phone: %s\n",
385                                        sd->info_phonehome);
386                        g_free(sd->info_phonehome);
387                }
388                if (sd->info_phoneoffice) {
389                        if (strlen(sd->info_phoneoffice))
390                                g_string_append_printf(st, "Office Phone: %s\n",
391                                        sd->info_phoneoffice);
392                        g_free(sd->info_phoneoffice);
393                }
394                if (sd->info_phonemobile) {
395                        if (strlen(sd->info_phonemobile))
396                                g_string_append_printf(st, "Mobile Phone: %s\n",
397                                        sd->info_phonemobile);
398                        g_free(sd->info_phonemobile);
399                }
400                g_string_append_printf(st, "Personal Information\n");
401                if (sd->info_nrbuddies) {
402                        if (strlen(sd->info_nrbuddies))
403                                g_string_append_printf(st,
404                                        "Contacts: %s\n", sd->info_nrbuddies);
405                        g_free(sd->info_nrbuddies);
406                }
407                if (sd->info_tz) {
408                        if (strlen(sd->info_tz)) {
409                                char ib[256];
410                                time_t t = time(NULL);
411                                t += atoi(sd->info_tz)-(60*60*24);
412                                struct tm *gt = gmtime(&t);
413                                strftime(ib, 256, "%H:%M:%S", gt);
414                                g_string_append_printf(st,
415                                        "Local Time: %s\n", ib);
416                        }
417                        g_free(sd->info_tz);
418                }
419                if (sd->info_seen) {
420                        if (strlen(sd->info_seen)) {
421                                char ib[256];
422                                time_t it = atoi(sd->info_seen);
423                                struct tm *tm = localtime(&it);
424                                strftime(ib, 256, ("%Y. %m. %d. %H:%M"), tm);
425                                g_string_append_printf(st,
426                                        "Last Seen: %s\n", ib);
427                        }
428                        g_free(sd->info_seen);
429                }
430                if (sd->info_birthday) {
431                        if (strlen(sd->info_birthday) &&
432                                strcmp(sd->info_birthday, "0")) {
433                                char ib[256];
434                                struct tm tm;
435                                strptime(sd->info_birthday, "%Y%m%d", &tm);
436                                strftime(ib, 256, "%B %d, %Y", &tm);
437                                g_string_append_printf(st,
438                                        "Birthday: %s\n", ib);
439
440                                strftime(ib, 256, "%Y", &tm);
441                                int year = atoi(ib);
442                                time_t t = time(NULL);
443                                struct tm *lt = localtime(&t);
444                                g_string_append_printf(st,
445                                        "Age: %d\n", lt->tm_year+1900-year);
446                        }
447                        g_free(sd->info_birthday);
448                }
449                if (sd->info_sex) {
450                        if (strlen(sd->info_sex)) {
451                                char *iptr = sd->info_sex;
452                                while (*iptr++)
453                                        *iptr = tolower(*iptr);
454                                g_string_append_printf(st,
455                                        "Gender: %s\n", sd->info_sex);
456                        }
457                        g_free(sd->info_sex);
458                }
459                if (sd->info_language) {
460                        if (strlen(sd->info_language)) {
461                                char *iptr = strchr(sd->info_language, ' ');
462                                if (iptr)
463                                        iptr++;
464                                else
465                                        iptr = sd->info_language;
466                                g_string_append_printf(st,
467                                        "Language: %s\n", iptr);
468                        }
469                        g_free(sd->info_language);
470                }
471                if (sd->info_country) {
472                        if (strlen(sd->info_country)) {
473                                char *iptr = strchr(sd->info_country, ' ');
474                                if (iptr)
475                                        iptr++;
476                                else
477                                        iptr = sd->info_country;
478                                g_string_append_printf(st,
479                                        "Country: %s\n", iptr);
480                        }
481                        g_free(sd->info_country);
482                }
483                if (sd->info_province) {
484                        if (strlen(sd->info_province))
485                                g_string_append_printf(st,
486                                        "Region: %s\n", sd->info_province);
487                        g_free(sd->info_province);
488                }
489                if (sd->info_city) {
490                        if (strlen(sd->info_city))
491                                g_string_append_printf(st,
492                                        "City: %s\n", sd->info_city);
493                        g_free(sd->info_city);
494                }
495                if (sd->info_homepage) {
496                        if (strlen(sd->info_homepage))
497                                g_string_append_printf(st,
498                                        "Homepage: %s\n", sd->info_homepage);
499                        g_free(sd->info_homepage);
500                }
501                if (sd->info_about) {
502                        if (strlen(sd->info_about))
503                                g_string_append_printf(st, "%s\n",
504                                        sd->info_about);
505                        g_free(sd->info_about);
506                }
507                imcb_log(ic, "%s", st->str);
508                g_string_free(st, TRUE);
509        }
510}
511
512static void skype_parse_chatmessage(struct im_connection *ic, char *line)
513{
514        struct skype_data *sd = ic->proto_data;
515        char buf[IRC_LINE_SIZE];
516        char *id = strchr(line, ' ');
517
518        if (!++id)
519                return;
520        char *info = strchr(id, ' ');
521
522        if (!info)
523                return;
524        *info = '\0';
525        info++;
526        if (!strcmp(info, "STATUS RECEIVED") || !strncmp(info, "EDITED_TIMESTAMP", 16)) {
527                /* New message ID:
528                 * (1) Request its from field
529                 * (2) Request its body
530                 * (3) Request its type
531                 * (4) Query chatname
532                 */
533                skype_printf(ic, "GET CHATMESSAGE %s FROM_HANDLE\n", id);
534                if (!strcmp(info, "STATUS RECEIVED"))
535                        skype_printf(ic, "GET CHATMESSAGE %s BODY\n", id);
536                else
537                        sd->is_edit = 1;
538                skype_printf(ic, "GET CHATMESSAGE %s TYPE\n", id);
539                skype_printf(ic, "GET CHATMESSAGE %s CHATNAME\n", id);
540        } else if (!strncmp(info, "FROM_HANDLE ", 12)) {
541                info += 12;
542                /* New from field value. Store
543                 * it, then we can later use it
544                 * when we got the message's
545                 * body. */
546                g_free(sd->handle);
547                sd->handle = g_strdup_printf("%s@skype.com", info);
548        } else if (!strncmp(info, "EDITED_BY ", 10)) {
549                info += 10;
550                /* This is the same as
551                 * FROM_HANDLE, except that we
552                 * never request these lines
553                 * from Skype, we just get
554                 * them. */
555                g_free(sd->handle);
556                sd->handle = g_strdup_printf("%s@skype.com", info);
557        } else if (!strncmp(info, "BODY ", 5)) {
558                info += 5;
559                sd->body = g_list_append(sd->body, g_strdup(info));
560        }       else if (!strncmp(info, "TYPE ", 5)) {
561                info += 5;
562                g_free(sd->type);
563                sd->type = g_strdup(info);
564        } else if (!strncmp(info, "CHATNAME ", 9)) {
565                info += 9;
566                if (sd->handle && sd->body && sd->type) {
567                        struct groupchat *gc = skype_chat_by_name(ic, info);
568                        int i;
569                        for (i = 0; i < g_list_length(sd->body); i++) {
570                                char *body = g_list_nth_data(sd->body, i);
571                                if (!strcmp(sd->type, "SAID") ||
572                                        !strcmp(sd->type, "EMOTED")) {
573                                        if (!strcmp(sd->type, "SAID")) {
574                                                if (!sd->is_edit)
575                                                        g_snprintf(buf, IRC_LINE_SIZE, "%s",
576                                                                body);
577                                                else {
578                                                        g_snprintf(buf, IRC_LINE_SIZE, "%s %s",
579                                                                set_getstr(&ic->acc->set, "edit_prefix"),
580                                                                body);
581                                                        sd->is_edit = 0;
582                                                }
583                                        } else
584                                                g_snprintf(buf, IRC_LINE_SIZE, "/me %s",
585                                                        body);
586                                        if (!gc)
587                                                /* Private message */
588                                                imcb_buddy_msg(ic,
589                                                        sd->handle, buf, 0, 0);
590                                        else
591                                                /* Groupchat message */
592                                                imcb_chat_msg(gc,
593                                                        sd->handle, buf, 0, 0);
594                                } else if (!strcmp(sd->type, "SETTOPIC") && gc)
595                                        imcb_chat_topic(gc,
596                                                sd->handle, body, 0);
597                                else if (!strcmp(sd->type, "LEFT") && gc)
598                                        imcb_chat_remove_buddy(gc,
599                                                sd->handle, NULL);
600                        }
601                        g_list_free(sd->body);
602                        sd->body = NULL;
603                }
604        }
605}
606
607static void skype_parse_call(struct im_connection *ic, char *line)
608{
609        struct skype_data *sd = ic->proto_data;
610        char *id = strchr(line, ' ');
611        char buf[IRC_LINE_SIZE];
612
613        if (!++id)
614                return;
615        char *info = strchr(id, ' ');
616
617        if (!info)
618                return;
619        *info = '\0';
620        info++;
621        if (!strncmp(info, "FAILUREREASON ", 14))
622                sd->failurereason = atoi(strchr(info, ' '));
623        else if (!strcmp(info, "STATUS RINGING")) {
624                if (sd->call_id)
625                        g_free(sd->call_id);
626                sd->call_id = g_strdup(id);
627                skype_printf(ic, "GET CALL %s PARTNER_HANDLE\n", id);
628                sd->call_status = SKYPE_CALL_RINGING;
629        } else if (!strcmp(info, "STATUS MISSED")) {
630                skype_printf(ic, "GET CALL %s PARTNER_HANDLE\n", id);
631                sd->call_status = SKYPE_CALL_MISSED;
632        } else if (!strcmp(info, "STATUS CANCELLED")) {
633                skype_printf(ic, "GET CALL %s PARTNER_HANDLE\n", id);
634                sd->call_status = SKYPE_CALL_CANCELLED;
635        } else if (!strcmp(info, "STATUS FINISHED")) {
636                skype_printf(ic, "GET CALL %s PARTNER_HANDLE\n", id);
637                sd->call_status = SKYPE_CALL_FINISHED;
638        } else if (!strcmp(info, "STATUS REFUSED")) {
639                skype_printf(ic, "GET CALL %s PARTNER_HANDLE\n", id);
640                sd->call_status = SKYPE_CALL_REFUSED;
641        } else if (!strcmp(info, "STATUS UNPLACED")) {
642                if (sd->call_id)
643                        g_free(sd->call_id);
644                /* Save the ID for later usage (Cancel/Finish). */
645                sd->call_id = g_strdup(id);
646                sd->call_out = TRUE;
647        } else if (!strcmp(info, "STATUS FAILED")) {
648                imcb_error(ic, "Call failed: %s",
649                        skype_call_strerror(sd->failurereason));
650                sd->call_id = NULL;
651        } else if (!strncmp(info, "DURATION ", 9)) {
652                if (sd->call_duration)
653                        g_free(sd->call_duration);
654                sd->call_duration = g_strdup(info+9);
655        } else if (!strncmp(info, "PARTNER_HANDLE ", 15)) {
656                info += 15;
657                if (!sd->call_status)
658                        return;
659                switch (sd->call_status) {
660                case SKYPE_CALL_RINGING:
661                        if (sd->call_out)
662                                imcb_log(ic, "You are currently ringing "
663                                        "the user %s.", info);
664                        else {
665                                g_snprintf(buf, IRC_LINE_SIZE,
666                                        "The user %s is currently ringing you.",
667                                        info);
668                                skype_call_ask(ic, sd->call_id, buf);
669                        }
670                        break;
671                case SKYPE_CALL_MISSED:
672                        imcb_log(ic, "You have missed a call from user %s.",
673                                info);
674                        break;
675                case SKYPE_CALL_CANCELLED:
676                        imcb_log(ic, "You cancelled the call to the user %s.",
677                                info);
678                        sd->call_status = 0;
679                        sd->call_out = FALSE;
680                        break;
681                case SKYPE_CALL_REFUSED:
682                        if (sd->call_out)
683                                imcb_log(ic, "The user %s refused the call.",
684                                        info);
685                        else
686                                imcb_log(ic,
687                                        "You refused the call from user %s.",
688                                        info);
689                        sd->call_out = FALSE;
690                        break;
691                case SKYPE_CALL_FINISHED:
692                        if (sd->call_duration)
693                                imcb_log(ic,
694                                        "You finished the call to the user %s "
695                                        "(duration: %s seconds).",
696                                        info, sd->call_duration);
697                        else
698                                imcb_log(ic,
699                                        "You finished the call to the user %s.",
700                                        info);
701                        sd->call_out = FALSE;
702                        break;
703                default:
704                        /* Don't be noisy, ignore other statuses for now. */
705                        break;
706                }
707                sd->call_status = 0;
708        }
709}
710
711static void skype_parse_filetransfer(struct im_connection *ic, char *line)
712{
713        struct skype_data *sd = ic->proto_data;
714        char *id = strchr(line, ' ');
715
716        if (!++id)
717                return;
718        char *info = strchr(id, ' ');
719
720        if (!info)
721                return;
722        *info = '\0';
723        info++;
724        if (!strcmp(info, "STATUS NEW")) {
725                skype_printf(ic, "GET FILETRANSFER %s PARTNER_HANDLE\n",
726                        id);
727                sd->filetransfer_status = SKYPE_FILETRANSFER_NEW;
728        } else if (!strcmp(info, "STATUS FAILED")) {
729                skype_printf(ic, "GET FILETRANSFER %s PARTNER_HANDLE\n",
730                        id);
731                sd->filetransfer_status = SKYPE_FILETRANSFER_FAILED;
732        } else if (!strncmp(info, "PARTNER_HANDLE ", 15)) {
733                info += 15;
734                if (!sd->filetransfer_status)
735                        return;
736                switch (sd->filetransfer_status) {
737                case SKYPE_FILETRANSFER_NEW:
738                        imcb_log(ic, "The user %s offered a new file for you.",
739                                info);
740                        break;
741                case SKYPE_FILETRANSFER_FAILED:
742                        imcb_log(ic, "Failed to transfer file from user %s.",
743                                info);
744                        break;
745                }
746                sd->filetransfer_status = 0;
747        }
748}
749
750static void skype_parse_chat(struct im_connection *ic, char *line)
751{
752        struct skype_data *sd = ic->proto_data;
753        char buf[IRC_LINE_SIZE];
754        char *id = strchr(line, ' ');
755
756        if (!++id)
757                return;
758        struct groupchat *gc;
759        char *info = strchr(id, ' ');
760
761        if (!info)
762                return;
763        *info = '\0';
764        info++;
765        /* Remove fake chat if we created one in skype_chat_with() */
766        gc = skype_chat_by_name(ic, "");
767        if (gc)
768                imcb_chat_free(gc);
769        if (!strcmp(info, "STATUS MULTI_SUBSCRIBED")) {
770                gc = imcb_chat_new(ic, id);
771#ifdef BITLBEE_VERSION_CODE
772#if BITLBEE_VERSION_CODE >= BITLBEE_VER(1, 2, 6)
773                imcb_chat_name_hint(gc, id);
774#endif
775#endif
776                skype_printf(ic, "GET CHAT %s ADDER\n", id);
777                skype_printf(ic, "GET CHAT %s TOPIC\n", id);
778        } else if (!strcmp(info, "STATUS DIALOG") && sd->groupchat_with) {
779                gc = imcb_chat_new(ic, id);
780#ifdef BITLBEE_VERSION_CODE
781#if BITLBEE_VERSION_CODE >= BITLBEE_VER(1, 2, 6)
782                imcb_chat_name_hint(gc, id);
783#endif
784#endif
785                /* According to the docs this
786                 * is necessary. However it
787                 * does not seem the situation
788                 * and it would open an extra
789                 * window on our client, so
790                 * just leave it out. */
791                /*skype_printf(ic, "OPEN CHAT %s\n", id);*/
792                g_snprintf(buf, IRC_LINE_SIZE, "%s@skype.com",
793                                sd->groupchat_with);
794                imcb_chat_add_buddy(gc, buf);
795                imcb_chat_add_buddy(gc, sd->username);
796                g_free(sd->groupchat_with);
797                sd->groupchat_with = NULL;
798                skype_printf(ic, "GET CHAT %s ADDER\n", id);
799                skype_printf(ic, "GET CHAT %s TOPIC\n", id);
800        } else if (!strcmp(info, "STATUS UNSUBSCRIBED")) {
801                gc = skype_chat_by_name(ic, id);
802                if (gc)
803                        gc->data = (void *)FALSE;
804        } else if (!strncmp(info, "ADDER ", 6)) {
805                info += 6;
806                g_free(sd->adder);
807                sd->adder = g_strdup_printf("%s@skype.com", info);
808        } else if (!strncmp(info, "TOPIC ", 6)) {
809                info += 6;
810                gc = skype_chat_by_name(ic, id);
811                if (gc && (sd->adder || sd->topic_wait)) {
812                        if (sd->topic_wait) {
813                                sd->adder = g_strdup(sd->username);
814                                sd->topic_wait = 0;
815                        }
816                        imcb_chat_topic(gc, sd->adder, info, 0);
817                        g_free(sd->adder);
818                        sd->adder = NULL;
819                }
820        } else if (!strncmp(info, "ACTIVEMEMBERS ", 14)) {
821                info += 14;
822                gc = skype_chat_by_name(ic, id);
823                /* Hack! We set ->data to TRUE
824                 * while we're on the channel
825                 * so that we won't rejoin
826                 * after a /part. */
827                if (!gc || gc->data)
828                        return;
829                char **members = g_strsplit(info, " ", 0);
830                int i;
831                for (i = 0; members[i]; i++) {
832                        if (!strcmp(members[i], sd->username))
833                                continue;
834                        g_snprintf(buf, IRC_LINE_SIZE, "%s@skype.com",
835                                        members[i]);
836                        if (!g_list_find_custom(gc->in_room, buf,
837                                (GCompareFunc)strcmp))
838                                imcb_chat_add_buddy(gc, buf);
839                }
840                imcb_chat_add_buddy(gc, sd->username);
841                g_strfreev(members);
842        }
843}
844
845static void skype_parse_password(struct im_connection *ic, char *line)
846{
847        if (!strncmp(line+9, "OK", 2))
848                imcb_connected(ic);
849        else {
850                imcb_error(ic, "Authentication Failed");
851                imc_logout(ic, TRUE);
852        }
853}
854
855static void skype_parse_profile(struct im_connection *ic, char *line)
856{
857        imcb_log(ic, "SkypeOut balance value is '%s'.", line+21);
858}
859
860static void skype_parse_ping(struct im_connection *ic, char *line)
861{
862        skype_printf(ic, "PONG\n");
863}
864
865static void skype_parse_chats(struct im_connection *ic, char *line)
866{
867        char **i;
868        char **chats = g_strsplit(line + 6, ", ", 0);
869
870        i = chats;
871        while (*i) {
872                skype_printf(ic, "GET CHAT %s STATUS\n", *i);
873                skype_printf(ic, "GET CHAT %s ACTIVEMEMBERS\n", *i);
874                i++;
875        }
876        g_strfreev(chats);
877}
878
879typedef void (*skype_parser)(struct im_connection *ic, char *line);
880
881static gboolean skype_read_callback(gpointer data, gint fd,
882                                    b_input_condition cond)
883{
884        struct im_connection *ic = data;
885        struct skype_data *sd = ic->proto_data;
886        char buf[IRC_LINE_SIZE];
887        int st, i;
888        char **lines, **lineptr, *line;
889        static struct parse_map {
890                char *k;
891                skype_parser v;
892        } parsers[] = {
893                { "USERS ", skype_parse_users },
894                { "USER ", skype_parse_user },
895                { "CHATMESSAGE ", skype_parse_chatmessage },
896                { "CALL ", skype_parse_call },
897                { "FILETRANSFER ", skype_parse_filetransfer },
898                { "CHAT ", skype_parse_chat },
899                { "PASSWORD ", skype_parse_password },
900                { "PROFILE PSTN_BALANCE ", skype_parse_profile },
901                { "PING", skype_parse_ping },
902                { "CHATS ", skype_parse_chats },
903        };
904
905        if (!sd || sd->fd == -1)
906                return FALSE;
907        /* Read the whole data. */
908        st = ssl_read(sd->ssl, buf, sizeof(buf));
909        if (st > 0) {
910                buf[st] = '\0';
911                /* Then split it up to lines. */
912                lines = g_strsplit(buf, "\n", 0);
913                lineptr = lines;
914                while ((line = *lineptr)) {
915                        if (!strlen(line))
916                                break;
917                        if (set_getbool(&ic->acc->set, "skypeconsole_receive"))
918                                imcb_buddy_msg(ic, "skypeconsole", line, 0, 0);
919                        for (i = 0; i < ARRAY_SIZE(parsers); i++)
920                                if (!strncmp(line, parsers[i].k,
921                                        strlen(parsers[i].k))) {
922                                        parsers[i].v(ic, line);
923                                        break;
924                                }
925                        lineptr++;
926                }
927                g_strfreev(lines);
928        } else if (st == 0 || (st < 0 && !sockerr_again())) {
929                closesocket(sd->fd);
930                sd->fd = -1;
931
932                imcb_error(ic, "Error while reading from server");
933                imc_logout(ic, TRUE);
934                return FALSE;
935        }
936        return TRUE;
937}
938
939gboolean skype_start_stream(struct im_connection *ic)
940{
941        struct skype_data *sd = ic->proto_data;
942        int st;
943
944        if (!sd)
945                return FALSE;
946
947        if (sd->bfd <= 0)
948                sd->bfd = b_input_add(sd->fd, GAIM_INPUT_READ,
949                        skype_read_callback, ic);
950
951        /* Log in */
952        skype_printf(ic, "USERNAME %s\n", ic->acc->user);
953        skype_printf(ic, "PASSWORD %s\n", ic->acc->pass);
954
955        /* This will download all buddies. */
956        st = skype_printf(ic, "SEARCH FRIENDS\n");
957        skype_printf(ic, "SET USERSTATUS ONLINE\n");
958
959        /* Auto join to bookmarked chats if requested.*/
960        if (set_getbool(&ic->acc->set, "auto_join"))
961                skype_printf(ic, "SEARCH BOOKMARKEDCHATS\n");
962        return st;
963}
964
965gboolean skype_connected(gpointer data, void *source, b_input_condition cond)
966{
967        struct im_connection *ic = data;
968        struct skype_data *sd = ic->proto_data;
969        if (!source) {
970                sd->ssl = NULL;
971                imcb_error(ic, "Could not connect to server");
972                imc_logout(ic, TRUE);
973                return FALSE;
974        }
975        imcb_log(ic, "Connected to server, logging in");
976        return skype_start_stream(ic);
977}
978
979static void skype_login(account_t *acc)
980{
981        struct im_connection *ic = imcb_new(acc);
982        struct skype_data *sd = g_new0(struct skype_data, 1);
983
984        ic->proto_data = sd;
985
986        imcb_log(ic, "Connecting");
987        sd->ssl = ssl_connect(set_getstr(&acc->set, "server"),
988                set_getint(&acc->set, "port"), skype_connected, ic);
989        sd->fd = sd->ssl ? ssl_getfd(sd->ssl) : -1;
990        sd->username = g_strdup(acc->user);
991
992        sd->ic = ic;
993
994        if (set_getbool(&acc->set, "skypeconsole"))
995                imcb_add_buddy(ic, "skypeconsole", NULL);
996}
997
998static void skype_logout(struct im_connection *ic)
999{
1000        struct skype_data *sd = ic->proto_data;
1001
1002        skype_printf(ic, "SET USERSTATUS OFFLINE\n");
1003
1004        g_free(sd->username);
1005        g_free(sd->handle);
1006        g_free(sd);
1007        ic->proto_data = NULL;
1008}
1009
1010static int skype_buddy_msg(struct im_connection *ic, char *who, char *message,
1011                           int flags)
1012{
1013        char *ptr, *nick;
1014        int st;
1015
1016        nick = g_strdup(who);
1017        ptr = strchr(nick, '@');
1018        if (ptr)
1019                *ptr = '\0';
1020
1021        if (!strncmp(who, "skypeconsole", 12))
1022                st = skype_printf(ic, "%s\n", message);
1023        else
1024                st = skype_printf(ic, "MESSAGE %s %s\n", nick, message);
1025        g_free(nick);
1026
1027        return st;
1028}
1029
1030const struct skype_away_state *skype_away_state_by_name(char *name)
1031{
1032        int i;
1033
1034        for (i = 0; skype_away_state_list[i].full_name; i++)
1035                if (g_strcasecmp(skype_away_state_list[i].full_name, name) == 0)
1036                        return skype_away_state_list + i;
1037
1038        return NULL;
1039}
1040
1041static void skype_set_away(struct im_connection *ic, char *state_txt,
1042                           char *message)
1043{
1044        const struct skype_away_state *state;
1045
1046        if (state_txt == NULL)
1047                state = skype_away_state_by_name("Online");
1048        else
1049                state = skype_away_state_by_name(state_txt);
1050        skype_printf(ic, "SET USERSTATUS %s\n", state->code);
1051}
1052
1053static GList *skype_away_states(struct im_connection *ic)
1054{
1055        static GList *l;
1056        int i;
1057
1058        if (l == NULL)
1059                for (i = 0; skype_away_state_list[i].full_name; i++)
1060                        l = g_list_append(l,
1061                                (void *)skype_away_state_list[i].full_name);
1062
1063        return l;
1064}
1065
1066static char *skype_set_display_name(set_t *set, char *value)
1067{
1068        account_t *acc = set->data;
1069        struct im_connection *ic = acc->ic;
1070
1071        skype_printf(ic, "SET PROFILE FULLNAME %s", value);
1072        return value;
1073}
1074
1075static char *skype_set_balance(set_t *set, char *value)
1076{
1077        account_t *acc = set->data;
1078        struct im_connection *ic = acc->ic;
1079
1080        skype_printf(ic, "GET PROFILE PSTN_BALANCE");
1081        return value;
1082}
1083
1084static char *skype_set_call(set_t *set, char *value)
1085{
1086        account_t *acc = set->data;
1087        struct im_connection *ic = acc->ic;
1088        struct skype_data *sd = ic->proto_data;
1089        char *nick, *ptr;
1090
1091        if (value) {
1092                user_t *u = user_find(acc->irc, value);
1093                /* We are starting a call */
1094                if (!u)
1095                        nick = g_strdup(value);
1096                else
1097                        nick = g_strdup(u->handle);
1098                ptr = strchr(nick, '@');
1099                if (ptr)
1100                        *ptr = '\0';
1101
1102                skype_printf(ic, "CALL %s", nick);
1103                g_free(nick);
1104        } else {
1105                /* We are ending a call */
1106                if (sd->call_id) {
1107                        skype_printf(ic, "SET CALL %s STATUS FINISHED",
1108                                sd->call_id);
1109                        g_free(sd->call_id);
1110                        sd->call_id = NULL;
1111                } else
1112                        imcb_error(ic, "There are no active calls currently.");
1113        }
1114        return value;
1115}
1116
1117static void skype_add_buddy(struct im_connection *ic, char *who, char *group)
1118{
1119        char *nick, *ptr;
1120
1121        nick = g_strdup(who);
1122        ptr = strchr(nick, '@');
1123        if (ptr)
1124                *ptr = '\0';
1125        skype_printf(ic, "SET USER %s BUDDYSTATUS 2 Please authorize me\n",
1126                nick);
1127        g_free(nick);
1128}
1129
1130static void skype_remove_buddy(struct im_connection *ic, char *who, char *group)
1131{
1132        char *nick, *ptr;
1133
1134        nick = g_strdup(who);
1135        ptr = strchr(nick, '@');
1136        if (ptr)
1137                *ptr = '\0';
1138        skype_printf(ic, "SET USER %s BUDDYSTATUS 1\n", nick);
1139        g_free(nick);
1140}
1141
1142void skype_chat_msg(struct groupchat *gc, char *message, int flags)
1143{
1144        struct im_connection *ic = gc->ic;
1145        skype_printf(ic, "CHATMESSAGE %s %s\n", gc->title, message);
1146}
1147
1148void skype_chat_leave(struct groupchat *gc)
1149{
1150        struct im_connection *ic = gc->ic;
1151        skype_printf(ic, "ALTER CHAT %s LEAVE\n", gc->title);
1152        gc->data = (void *)TRUE;
1153}
1154
1155void skype_chat_invite(struct groupchat *gc, char *who, char *message)
1156{
1157        struct im_connection *ic = gc->ic;
1158        char *ptr, *nick;
1159        nick = g_strdup(message);
1160        ptr = strchr(nick, '@');
1161        if (ptr)
1162                *ptr = '\0';
1163        skype_printf(ic, "ALTER CHAT %s ADDMEMBERS %s\n", gc->title, nick);
1164        g_free(nick);
1165}
1166
1167void skype_chat_topic(struct groupchat *gc, char *message)
1168{
1169        struct im_connection *ic = gc->ic;
1170        struct skype_data *sd = ic->proto_data;
1171        skype_printf(ic, "ALTER CHAT %s SETTOPIC %s\n",
1172                gc->title, message);
1173        sd->topic_wait = 1;
1174}
1175
1176struct groupchat *skype_chat_with(struct im_connection *ic, char *who)
1177{
1178        struct skype_data *sd = ic->proto_data;
1179        char *ptr, *nick;
1180        nick = g_strdup(who);
1181        ptr = strchr(nick, '@');
1182        if (ptr)
1183                *ptr = '\0';
1184        skype_printf(ic, "CHAT CREATE %s\n", nick);
1185        sd->groupchat_with = g_strdup(nick);
1186        g_free(nick);
1187        /* We create a fake chat for now. We will replace it with a real one in
1188         * the real callback. */
1189        return imcb_chat_new(ic, "");
1190}
1191
1192static void skype_get_info(struct im_connection *ic, char *who)
1193{
1194        char *ptr, *nick;
1195        nick = g_strdup(who);
1196        ptr = strchr(nick, '@');
1197        if (ptr)
1198                *ptr = '\0';
1199        skype_printf(ic, "GET USER %s FULLNAME\n", nick);
1200        skype_printf(ic, "GET USER %s PHONE_HOME\n", nick);
1201        skype_printf(ic, "GET USER %s PHONE_OFFICE\n", nick);
1202        skype_printf(ic, "GET USER %s PHONE_MOBILE\n", nick);
1203        skype_printf(ic, "GET USER %s NROF_AUTHED_BUDDIES\n", nick);
1204        skype_printf(ic, "GET USER %s TIMEZONE\n", nick);
1205        skype_printf(ic, "GET USER %s LASTONLINETIMESTAMP\n", nick);
1206        skype_printf(ic, "GET USER %s BIRTHDAY\n", nick);
1207        skype_printf(ic, "GET USER %s SEX\n", nick);
1208        skype_printf(ic, "GET USER %s LANGUAGE\n", nick);
1209        skype_printf(ic, "GET USER %s COUNTRY\n", nick);
1210        skype_printf(ic, "GET USER %s PROVINCE\n", nick);
1211        skype_printf(ic, "GET USER %s CITY\n", nick);
1212        skype_printf(ic, "GET USER %s HOMEPAGE\n", nick);
1213        skype_printf(ic, "GET USER %s ABOUT\n", nick);
1214}
1215
1216static void skype_set_my_name(struct im_connection *ic, char *info)
1217{
1218        skype_set_display_name(set_find(&ic->acc->set, "display_name"), info);
1219}
1220
1221static void skype_init(account_t *acc)
1222{
1223        set_t *s;
1224
1225        s = set_add(&acc->set, "server", SKYPE_DEFAULT_SERVER, set_eval_account,
1226                acc);
1227        s->flags |= ACC_SET_OFFLINE_ONLY;
1228
1229        s = set_add(&acc->set, "port", SKYPE_DEFAULT_PORT, set_eval_int, acc);
1230        s->flags |= ACC_SET_OFFLINE_ONLY;
1231
1232        s = set_add(&acc->set, "display_name", NULL, skype_set_display_name,
1233                acc);
1234        s->flags |= ACC_SET_NOSAVE | ACC_SET_ONLINE_ONLY;
1235
1236        s = set_add(&acc->set, "call", NULL, skype_set_call, acc);
1237        s->flags |= ACC_SET_NOSAVE | ACC_SET_ONLINE_ONLY;
1238
1239        s = set_add(&acc->set, "balance", NULL, skype_set_balance, acc);
1240        s->flags |= ACC_SET_NOSAVE | ACC_SET_ONLINE_ONLY;
1241
1242        s = set_add(&acc->set, "skypeout_offline", "true", set_eval_bool, acc);
1243
1244        s = set_add(&acc->set, "skypeconsole", "false", set_eval_bool, acc);
1245        s->flags |= ACC_SET_OFFLINE_ONLY;
1246
1247        s = set_add(&acc->set, "skypeconsole_receive", "false", set_eval_bool,
1248                acc);
1249        s->flags |= ACC_SET_OFFLINE_ONLY;
1250
1251        s = set_add(&acc->set, "auto_join", "false", set_eval_bool, acc);
1252        s->flags |= ACC_SET_OFFLINE_ONLY;
1253
1254        s = set_add(&acc->set, "test_join", "false", set_eval_bool, acc);
1255        s->flags |= ACC_SET_OFFLINE_ONLY;
1256
1257        s = set_add(&acc->set, "show_moods", "false", set_eval_bool, acc);
1258
1259        s = set_add(&acc->set, "edit_prefix", "EDIT:",
1260                        NULL, acc);
1261}
1262
1263void init_plugin(void)
1264{
1265        struct prpl *ret = g_new0(struct prpl, 1);
1266
1267        ret->name = "skype";
1268        ret->login = skype_login;
1269        ret->init = skype_init;
1270        ret->logout = skype_logout;
1271        ret->buddy_msg = skype_buddy_msg;
1272        ret->get_info = skype_get_info;
1273        ret->set_my_name = skype_set_my_name;
1274        ret->away_states = skype_away_states;
1275        ret->set_away = skype_set_away;
1276        ret->add_buddy = skype_add_buddy;
1277        ret->remove_buddy = skype_remove_buddy;
1278        ret->chat_msg = skype_chat_msg;
1279        ret->chat_leave = skype_chat_leave;
1280        ret->chat_invite = skype_chat_invite;
1281        ret->chat_with = skype_chat_with;
1282        ret->handle_cmp = g_strcasecmp;
1283        ret->chat_topic = skype_chat_topic;
1284        register_protocol(ret);
1285}
Note: See TracBrowser for help on using the repository browser.