/* * skype.c - Skype plugin for BitlBee * * Copyright (c) 2007, 2008 by Miklos Vajna * * Several ideas are used from the BitlBee Jabber plugin, which is * * Copyright (c) 2006 by Wilmer van der Gaast * * This program is free software; you can redistribute it and/or modify * it under the terms of the GNU General Public License as published by * the Free Software Foundation; either version 2 of the License, or * (at your option) any later version. * * This program is distributed in the hope that it will be useful, * but WITHOUT ANY WARRANTY; without even the implied warranty of * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the * GNU General Public License for more details. * * You should have received a copy of the GNU General Public License * along with this program; if not, write to the Free Software * Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, * USA. */ #define _XOPEN_SOURCE #include #include #include #include #include #define SKYPE_DEFAULT_SERVER "localhost" #define SKYPE_DEFAULT_PORT "2727" /* * Enumerations */ typedef enum { SKYPE_CALL_RINGING = 1, SKYPE_CALL_MISSED, SKYPE_CALL_CANCELLED, SKYPE_CALL_FINISHED, SKYPE_CALL_REFUSED } skype_call_status; typedef enum { SKYPE_FILETRANSFER_NEW = 1, SKYPE_FILETRANSFER_FAILED } skype_filetransfer_status; /* * Structures */ struct skype_data { struct im_connection *ic; char *username; /* The effective file descriptor. We store it here so any function can * write() to it. */ int fd; /* File descriptor returned by bitlbee. we store it so we know when * we're connected and when we aren't. */ int bfd; /* ssl_getfd() uses this to get the file desciptor. */ void *ssl; /* When we receive a new message id, we query the properties, finally * the chatname. Store the properties here so that we can use * imcb_buddy_msg() when we got the chatname. */ char *handle; /* List, because of multiline messages. */ GList *body; char *type; /* This is necessary because we send a notification when we get the * handle. So we store the state here and then we can send a * notification about the handle is in a given status. */ skype_call_status call_status; char *call_id; char *call_duration; /* If the call is outgoing or not */ int call_out; /* Same for file transfers. */ skype_filetransfer_status filetransfer_status; /* Using /j #nick we want to have a groupchat with two people. Usually * not (default). */ char* groupchat_with; /* The user who invited us to the chat. */ char* adder; /* If we are waiting for a confirmation about we changed the topic. */ int topic_wait; /* These are used by the info command. */ char *info_fullname; char *info_phonehome; char *info_phoneoffice; char *info_phonemobile; char *info_nrbuddies; char *info_tz; char *info_seen; char *info_birthday; char *info_sex; char *info_language; char *info_country; char *info_province; char *info_city; char *info_homepage; char *info_about; /* When a call fails, we get the reason and later we get the failure * event, so store the failure code here till then */ int failurereason; }; struct skype_away_state { char *code; char *full_name; }; struct skype_buddy_ask_data { struct im_connection *ic; /* This is also used for call IDs for simplicity */ char *handle; }; /* * Tables */ const struct skype_away_state skype_away_state_list[] = { { "ONLINE", "Online" }, { "SKYPEME", "Skype Me" }, { "AWAY", "Away" }, { "NA", "Not available" }, { "DND", "Do Not Disturb" }, { "INVISIBLE", "Invisible" }, { "OFFLINE", "Offline" }, { NULL, NULL} }; /* * Functions */ int skype_write( struct im_connection *ic, char *buf, int len ) { struct skype_data *sd = ic->proto_data; struct pollfd pfd[1]; pfd[0].fd = sd->fd; pfd[0].events = POLLOUT; /* This poll is necessary or we'll get a SIGPIPE when we write() to * sd->fd. */ poll(pfd, 1, 1000); if(pfd[0].revents & POLLHUP) { imc_logout( ic, TRUE ); return FALSE; } ssl_write( sd->ssl, buf, len ); return TRUE; } static void skype_buddy_ask_yes( gpointer w, struct skype_buddy_ask_data *bla ) { char *buf = g_strdup_printf("SET USER %s ISAUTHORIZED TRUE", bla->handle); skype_write( bla->ic, buf, strlen( buf ) ); g_free(buf); g_free(bla->handle); g_free(bla); } static void skype_buddy_ask_no( gpointer w, struct skype_buddy_ask_data *bla ) { char *buf = g_strdup_printf("SET USER %s ISAUTHORIZED FALSE", bla->handle); skype_write( bla->ic, buf, strlen( buf ) ); g_free(buf); g_free(bla->handle); g_free(bla); } void skype_buddy_ask( struct im_connection *ic, char *handle, char *message) { struct skype_buddy_ask_data *bla = g_new0( struct skype_buddy_ask_data, 1 ); char *buf; bla->ic = ic; bla->handle = g_strdup(handle); buf = g_strdup_printf( "The user %s wants to add you to his/her buddy list, saying: '%s'.", handle, message); imcb_ask( ic, buf, bla, skype_buddy_ask_yes, skype_buddy_ask_no ); g_free( buf ); } static void skype_call_ask_yes( gpointer w, struct skype_buddy_ask_data *bla ) { char *buf = g_strdup_printf("SET CALL %s STATUS INPROGRESS", bla->handle); skype_write( bla->ic, buf, strlen( buf ) ); g_free(buf); g_free(bla->handle); g_free(bla); } static void skype_call_ask_no( gpointer w, struct skype_buddy_ask_data *bla ) { char *buf = g_strdup_printf("SET CALL %s STATUS FINISHED", bla->handle); skype_write( bla->ic, buf, strlen( buf ) ); g_free(buf); g_free(bla->handle); g_free(bla); } void skype_call_ask( struct im_connection *ic, char *call_id, char *message) { struct skype_buddy_ask_data *bla = g_new0( struct skype_buddy_ask_data, 1 ); bla->ic = ic; bla->handle = g_strdup(call_id); imcb_ask( ic, message, bla, skype_call_ask_yes, skype_call_ask_no ); } struct groupchat *skype_chat_by_name( struct im_connection *ic, char *name ) { struct groupchat *ret; for( ret = ic->groupchats; ret; ret = ret->next ) { if(strcmp(name, ret->title ) == 0 ) break; } return ret; } static char *skype_call_strerror(int err) { switch(err) { case 1: return "Miscellaneous error"; case 2: return "User or phone number does not exist."; case 3: return "User is offline"; case 4: return "No proxy found"; case 5: return "Session terminated."; case 6: return "No common codec found."; case 7: return "Sound I/O error."; case 8: return "Problem with remote sound device."; case 9: return "Call blocked by recipient."; case 10: return "Recipient not a friend."; case 11: return "Current user not authorized by recipient."; case 12: return "Sound recording error."; default: return "Unknown error"; } } static gboolean skype_read_callback( gpointer data, gint fd, b_input_condition cond ) { struct im_connection *ic = data; struct skype_data *sd = ic->proto_data; char buf[1024]; int st; char **lines, **lineptr, *line, *ptr; if( !sd || sd->fd == -1 ) return FALSE; /* Read the whole data. */ st = ssl_read( sd->ssl, buf, sizeof( buf ) ); if( st > 0 ) { buf[st] = '\0'; /* Then split it up to lines. */ lines = g_strsplit(buf, "\n", 0); lineptr = lines; while((line = *lineptr)) { if(!strlen(line)) break; if(!strncmp(line, "USERS ", 6)) { char **i; char **nicks; nicks = g_strsplit(line + 6, ", ", 0); i = nicks; while(*i) { g_snprintf(buf, 1024, "GET USER %s ONLINESTATUS\n", *i); skype_write( ic, buf, strlen( buf ) ); i++; } g_strfreev(nicks); } else if(!strncmp(line, "USER ", 5)) { int flags = 0; char *status = strrchr(line, ' '); char *user = strchr(line, ' '); status++; ptr = strchr(++user, ' '); *ptr = '\0'; ptr++; if(!strncmp(ptr, "ONLINESTATUS ", 13) && strcmp(user, sd->username) != 0 && strcmp(user, "echo123") != 0) { ptr = g_strdup_printf("%s@skype.com", user); imcb_add_buddy(ic, ptr, NULL); if(strcmp(status, "OFFLINE") != 0 && strcmp(status, "SKYPEOUT") != 0) flags |= OPT_LOGGED_IN; if(strcmp(status, "ONLINE") != 0 && strcmp(status, "SKYPEME") != 0) flags |= OPT_AWAY; imcb_buddy_status(ic, ptr, flags, NULL, NULL); g_free(ptr); } else if(!strncmp(ptr, "RECEIVEDAUTHREQUEST ", 20)) { char *message = ptr + 20; if(strlen(message)) skype_buddy_ask(ic, user, message); } else if(!strncmp(ptr, "BUDDYSTATUS ", 12)) { char *st = ptr + 12; if(!strcmp(st, "3")) { char *buf = g_strdup_printf("%s@skype.com", user); imcb_add_buddy(ic, buf, NULL); g_free(buf); } } else if(!strncmp(ptr, "FULLNAME ", 9)) sd->info_fullname = g_strdup_printf("%s", ptr + 9); else if(!strncmp(ptr, "PHONE_HOME ", 11)) sd->info_phonehome = g_strdup_printf("%s", ptr + 11); else if(!strncmp(ptr, "PHONE_OFFICE ", 13)) sd->info_phoneoffice = g_strdup_printf("%s", ptr + 13); else if(!strncmp(ptr, "PHONE_MOBILE ", 13)) sd->info_phonemobile = g_strdup_printf("%s", ptr + 13); else if(!strncmp(ptr, "NROF_AUTHED_BUDDIES ", 20)) sd->info_nrbuddies = g_strdup_printf("%s", ptr + 20); else if(!strncmp(ptr, "TIMEZONE ", 9)) sd->info_tz = g_strdup_printf("%s", ptr + 9); else if(!strncmp(ptr, "LASTONLINETIMESTAMP ", 20)) sd->info_seen = g_strdup_printf("%s", ptr + 20); else if(!strncmp(ptr, "BIRTHDAY ", 9)) sd->info_birthday = g_strdup_printf("%s", ptr + 9); else if(!strncmp(ptr, "SEX ", 4)) sd->info_sex = g_strdup_printf("%s", ptr + 4); else if(!strncmp(ptr, "LANGUAGE ", 9)) sd->info_language = g_strdup_printf("%s", ptr + 9); else if(!strncmp(ptr, "COUNTRY ", 8)) sd->info_country = g_strdup_printf("%s", ptr + 8); else if(!strncmp(ptr, "PROVINCE ", 9)) sd->info_province = g_strdup_printf("%s", ptr + 9); else if(!strncmp(ptr, "CITY ", 5)) sd->info_city = g_strdup_printf("%s", ptr + 5); else if(!strncmp(ptr, "HOMEPAGE ", 9)) sd->info_homepage = g_strdup_printf("%s", ptr + 9); else if(!strncmp(ptr, "ABOUT ", 6)) { sd->info_about = g_strdup_printf("%s", ptr + 6); GString *st = g_string_new("Contact Information\n"); g_string_append_printf(st, "Skype Name: %s\n", user); if(sd->info_fullname) { if(strlen(sd->info_fullname)) g_string_append_printf(st, "Full Name: %s\n", sd->info_fullname); g_free(sd->info_fullname); } if(sd->info_phonehome) { if(strlen(sd->info_phonehome)) g_string_append_printf(st, "Home Phone: %s\n", sd->info_phonehome); g_free(sd->info_phonehome); } if(sd->info_phoneoffice) { if(strlen(sd->info_phoneoffice)) g_string_append_printf(st, "Office Phone: %s\n", sd->info_phoneoffice); g_free(sd->info_phoneoffice); } if(sd->info_phonemobile) { if(strlen(sd->info_phonemobile)) g_string_append_printf(st, "Mobile Phone: %s\n", sd->info_phonemobile); g_free(sd->info_phonemobile); } g_string_append_printf(st, "Personal Information\n"); if(sd->info_nrbuddies) { if(strlen(sd->info_nrbuddies)) g_string_append_printf(st, "Contacts: %s\n", sd->info_nrbuddies); g_free(sd->info_nrbuddies); } if(sd->info_tz) { if(strlen(sd->info_tz)) { char ib[256]; time_t t = time(NULL); t += atoi(sd->info_tz)-(60*60*24); struct tm *gt = gmtime(&t); strftime(ib, 256, "%H:%M:%S", gt); g_string_append_printf(st, "Local Time: %s\n", ib); } g_free(sd->info_tz); } if(sd->info_seen) { if(strlen(sd->info_seen)) { char ib[256]; time_t it = atoi(sd->info_seen); struct tm *tm = localtime(&it); strftime(ib, 256, ("%Y. %m. %d. %H:%M"), tm); g_string_append_printf(st, "Last Seen: %s\n", ib); } g_free(sd->info_seen); } if(sd->info_birthday) { if(strlen(sd->info_birthday) && strcmp(sd->info_birthday, "0")) { char ib[256]; struct tm tm; strptime(sd->info_birthday, "%Y%m%d", &tm); strftime(ib, 256, "%B %d, %Y", &tm); g_string_append_printf(st, "Birthday: %s\n", ib); strftime(ib, 256, "%Y", &tm); int year = atoi(ib); time_t t = time(NULL); struct tm *lt = localtime(&t); g_string_append_printf(st, "Age: %d\n", lt->tm_year+1900-year); } g_free(sd->info_birthday); } if(sd->info_sex) { if(strlen(sd->info_sex)) { char *iptr = sd->info_sex; while(*iptr++) *iptr = tolower(*iptr); g_string_append_printf(st, "Gender: %s\n", sd->info_sex); } g_free(sd->info_sex); } if(sd->info_language) { if(strlen(sd->info_language)) { char *iptr = strchr(sd->info_language, ' '); if(iptr) iptr++; else iptr = sd->info_language; g_string_append_printf(st, "Language: %s\n", iptr); } g_free(sd->info_language); } if(sd->info_country) { if(strlen(sd->info_country)) { char *iptr = strchr(sd->info_country, ' '); if(iptr) iptr++; else iptr = sd->info_country; g_string_append_printf(st, "Country: %s\n", iptr); } g_free(sd->info_country); } if(sd->info_province) { if(strlen(sd->info_province)) g_string_append_printf(st, "Region: %s\n", sd->info_province); g_free(sd->info_province); } if(sd->info_city) { if(strlen(sd->info_city)) g_string_append_printf(st, "City: %s\n", sd->info_city); g_free(sd->info_city); } if(sd->info_homepage) { if(strlen(sd->info_homepage)) g_string_append_printf(st, "Homepage: %s\n", sd->info_homepage); g_free(sd->info_homepage); } if(sd->info_about) { if(strlen(sd->info_about)) g_string_append_printf(st, "%s\n", sd->info_about); g_free(sd->info_about); } imcb_log(ic, "%s", st->str); g_string_free(st, TRUE); } } else if(!strncmp(line, "CHATMESSAGE ", 12)) { char *id = strchr(line, ' '); if(++id) { char *info = strchr(id, ' '); *info = '\0'; info++; if(!strcmp(info, "STATUS RECEIVED")) { /* New message ID: * (1) Request its from field * (2) Request its body * (3) Request its type * (4) Query chatname */ g_snprintf(buf, 1024, "GET CHATMESSAGE %s FROM_HANDLE\n", id); skype_write( ic, buf, strlen( buf ) ); g_snprintf(buf, 1024, "GET CHATMESSAGE %s BODY\n", id); skype_write( ic, buf, strlen( buf ) ); g_snprintf(buf, 1024, "GET CHATMESSAGE %s TYPE\n", id); skype_write( ic, buf, strlen( buf ) ); g_snprintf(buf, 1024, "GET CHATMESSAGE %s CHATNAME\n", id); skype_write( ic, buf, strlen( buf ) ); } else if(!strncmp(info, "FROM_HANDLE ", 12)) { info += 12; /* New from field value. Store * it, then we can later use it * when we got the message's * body. */ g_free(sd->handle); sd->handle = g_strdup_printf("%s@skype.com", info); } else if(!strncmp(info, "EDITED_BY ", 10)) { info += 10; /* This is the same as * FROM_HANDLE, except that we * never request these lines * from Skype, we just get * them. */ g_free(sd->handle); sd->handle = g_strdup_printf("%s@skype.com", info); } else if(!strncmp(info, "BODY ", 5)) { info += 5; sd->body = g_list_append(sd->body, g_strdup(info)); } else if(!strncmp(info, "TYPE ", 5)) { info += 5; g_free(sd->type); sd->type = g_strdup(info); } else if(!strncmp(info, "CHATNAME ", 9)) { info += 9; if(sd->handle && sd->body && sd->type) { struct groupchat *gc = skype_chat_by_name(ic, info); int i; for(i=0;ibody);i++) { char *body = g_list_nth_data(sd->body, i); if(!strcmp(sd->type, "SAID") || !strcmp(sd->type, "EMOTED")) { char *st; if(!strcmp(sd->type, "SAID")) st = g_strdup(body); else { st = g_strdup_printf("/me %s", body); } if(!gc) /* Private message */ imcb_buddy_msg(ic, sd->handle, st, 0, 0); else /* Groupchat message */ imcb_chat_msg(gc, sd->handle, st, 0, 0); g_free(st); } else if(!strcmp(sd->type, "SETTOPIC")) { if(gc) imcb_chat_topic(gc, sd->handle, body, 0); } else if(!strcmp(sd->type, "LEFT")) { if(gc) imcb_chat_remove_buddy(gc, sd->handle, NULL); } } g_list_free(sd->body); sd->body = NULL; } } } } else if(!strncmp(line, "CALL ", 5)) { char *id = strchr(line, ' '); if(++id) { char *info = strchr(id, ' '); *info = '\0'; info++; if(!strncmp(info, "FAILUREREASON ", 14)) sd->failurereason = atoi(strchr(info, ' ')); else if(!strcmp(info, "STATUS RINGING")) { if(sd->call_id) g_free(sd->call_id); sd->call_id = g_strdup(id); g_snprintf(buf, 1024, "GET CALL %s PARTNER_HANDLE\n", id); skype_write( ic, buf, strlen( buf ) ); sd->call_status = SKYPE_CALL_RINGING; } else if(!strcmp(info, "STATUS MISSED")) { g_snprintf(buf, 1024, "GET CALL %s PARTNER_HANDLE\n", id); skype_write( ic, buf, strlen( buf ) ); sd->call_status = SKYPE_CALL_MISSED; } else if(!strcmp(info, "STATUS CANCELLED")) { g_snprintf(buf, 1024, "GET CALL %s PARTNER_HANDLE\n", id); skype_write( ic, buf, strlen( buf ) ); sd->call_status = SKYPE_CALL_CANCELLED; } else if(!strcmp(info, "STATUS FINISHED")) { g_snprintf(buf, 1024, "GET CALL %s PARTNER_HANDLE\n", id); skype_write( ic, buf, strlen( buf ) ); sd->call_status = SKYPE_CALL_FINISHED; } else if(!strcmp(info, "STATUS REFUSED")) { g_snprintf(buf, 1024, "GET CALL %s PARTNER_HANDLE\n", id); skype_write( ic, buf, strlen( buf ) ); sd->call_status = SKYPE_CALL_REFUSED; } else if(!strcmp(info, "STATUS UNPLACED")) { if(sd->call_id) g_free(sd->call_id); /* Save the ID for later usage (Cancel/Finish). */ sd->call_id = g_strdup(id); sd->call_out = TRUE; } else if(!strcmp(info, "STATUS FAILED")) { imcb_error(ic, "Call failed: %s", skype_call_strerror(sd->failurereason)); sd->call_id = NULL; } else if(!strncmp(info, "DURATION ", 9)) { if(sd->call_duration) g_free(sd->call_duration); sd->call_duration = g_strdup(info+9); } else if(!strncmp(info, "PARTNER_HANDLE ", 15)) { info += 15; if(sd->call_status) { switch(sd->call_status) { case SKYPE_CALL_RINGING: if(sd->call_out) imcb_log(ic, "You are currently ringing the user %s.", info); else { g_snprintf(buf, 1024, "The user %s is currently ringing you.", info); skype_call_ask(ic, sd->call_id, buf); } break; case SKYPE_CALL_MISSED: imcb_log(ic, "You have missed a call from user %s.", info); break; case SKYPE_CALL_CANCELLED: imcb_log(ic, "You cancelled the call to the user %s.", info); sd->call_status = 0; sd->call_out = FALSE; break; case SKYPE_CALL_REFUSED: if(sd->call_out) imcb_log(ic, "The user %s refused the call.", info); else imcb_log(ic, "You refused the call from user %s.", info); sd->call_out = FALSE; break; case SKYPE_CALL_FINISHED: if(sd->call_duration) imcb_log(ic, "You finished the call to the user %s (duration: %s seconds).", info, sd->call_duration); else imcb_log(ic, "You finished the call to the user %s.", info); sd->call_out = FALSE; break; default: /* Don't be noisy, ignore other statuses for now. */ break; } sd->call_status = 0; } } } } else if(!strncmp(line, "FILETRANSFER ", 13)) { char *id = strchr(line, ' '); if(++id) { char *info = strchr(id, ' '); *info = '\0'; info++; if(!strcmp(info, "STATUS NEW")) { g_snprintf(buf, 1024, "GET FILETRANSFER %s PARTNER_HANDLE\n", id); skype_write( ic, buf, strlen( buf ) ); sd->filetransfer_status = SKYPE_FILETRANSFER_NEW; } else if(!strcmp(info, "STATUS FAILED")) { g_snprintf(buf, 1024, "GET FILETRANSFER %s PARTNER_HANDLE\n", id); skype_write( ic, buf, strlen( buf ) ); sd->filetransfer_status = SKYPE_FILETRANSFER_FAILED; } else if(!strncmp(info, "PARTNER_HANDLE ", 15)) { info += 15; if(sd->filetransfer_status) { switch(sd->filetransfer_status) { case SKYPE_FILETRANSFER_NEW: imcb_log(ic, "The user %s offered a new file for you.", info); break; case SKYPE_FILETRANSFER_FAILED: imcb_log(ic, "Failed to transfer file from user %s.", info); break; } sd->filetransfer_status = 0; } } } } else if(!strncmp(line, "CHAT ", 5)) { char *id = strchr(line, ' '); if(++id) { char *info = strchr(id, ' '); if(info) *info = '\0'; info++; /* Remove fake chat if we created one in skype_chat_with() */ struct groupchat *gc = skype_chat_by_name(ic, ""); if(gc) imcb_chat_free(gc); if(!strcmp(info, "STATUS MULTI_SUBSCRIBED")) { imcb_chat_new( ic, id ); g_snprintf(buf, 1024, "GET CHAT %s ADDER\n", id); skype_write(ic, buf, strlen(buf)); g_snprintf(buf, 1024, "GET CHAT %s TOPIC\n", id); skype_write(ic, buf, strlen(buf)); } else if(!strcmp(info, "STATUS DIALOG") && sd->groupchat_with) { gc = imcb_chat_new( ic, id ); /* According to the docs this * is necessary. However it * does not seem the situation * and it would open an extra * window on our client, so * just leave it out. */ /*g_snprintf(buf, 1024, "OPEN CHAT %s\n", id); skype_write(ic, buf, strlen(buf));*/ g_snprintf(buf, 1024, "%s@skype.com", sd->groupchat_with); imcb_chat_add_buddy(gc, buf); imcb_chat_add_buddy(gc, sd->username); g_free(sd->groupchat_with); sd->groupchat_with = NULL; g_snprintf(buf, 1024, "GET CHAT %s ADDER\n", id); skype_write(ic, buf, strlen(buf)); g_snprintf(buf, 1024, "GET CHAT %s TOPIC\n", id); skype_write(ic, buf, strlen(buf)); } else if(!strcmp(info, "STATUS UNSUBSCRIBED")) { gc = skype_chat_by_name(ic, id); if(gc) gc->data = (void*)FALSE; } else if(!strncmp(info, "ADDER ", 6)) { info += 6; g_free(sd->adder); sd->adder = g_strdup_printf("%s@skype.com", info); } else if(!strncmp(info, "TOPIC ", 6)) { info += 6; gc = skype_chat_by_name(ic, id); if(gc && (sd->adder || sd->topic_wait)) { if(sd->topic_wait) { sd->adder = g_strdup(sd->username); sd->topic_wait = 0; } imcb_chat_topic(gc, sd->adder, info, 0); g_free(sd->adder); sd->adder = NULL; } } else if(!strncmp(info, "ACTIVEMEMBERS ", 14)) { info += 14; gc = skype_chat_by_name(ic, id); /* Hack! We set ->data to TRUE * while we're on the channel * so that we won't rejoin * after a /part. */ if(gc && !gc->data) { char **members = g_strsplit(info, " ", 0); int i; for(i=0;members[i];i++) { if(!strcmp(members[i], sd->username)) continue; g_snprintf(buf, 1024, "%s@skype.com", members[i]); if(!g_list_find_custom(gc->in_room, buf, (GCompareFunc)strcmp)) imcb_chat_add_buddy(gc, buf); } imcb_chat_add_buddy(gc, sd->username); g_strfreev(members); } } } } else if(!strncmp(line, "PASSWORD ", 9)) { if(!strncmp(line+9, "OK", 2)) imcb_connected(ic); else { imcb_error(ic, "Authentication Failed"); imc_logout( ic, TRUE ); } } else if(!strncmp(line, "PROFILE PSTN_BALANCE ", 21)) { imcb_log(ic, "SkypeOut balance value is '%s'.", line+21); } lineptr++; } g_strfreev(lines); } else if( st == 0 || ( st < 0 && !sockerr_again() ) ) { closesocket( sd->fd ); sd->fd = -1; imcb_error( ic, "Error while reading from server" ); imc_logout( ic, TRUE ); return FALSE; } return TRUE; } gboolean skype_start_stream( struct im_connection *ic ) { struct skype_data *sd = ic->proto_data; char *buf; int st; if(!sd) return FALSE; if( sd->bfd <= 0 ) sd->bfd = b_input_add( sd->fd, GAIM_INPUT_READ, skype_read_callback, ic ); /* Log in */ buf = g_strdup_printf("USERNAME %s\n", ic->acc->user); st = skype_write( ic, buf, strlen( buf ) ); g_free(buf); buf = g_strdup_printf("PASSWORD %s\n", ic->acc->pass); st = skype_write( ic, buf, strlen( buf ) ); g_free(buf); /* This will download all buddies. */ buf = g_strdup_printf("SEARCH FRIENDS\n"); st = skype_write( ic, buf, strlen( buf ) ); g_free(buf); buf = g_strdup_printf("SET USERSTATUS ONLINE\n"); skype_write( ic, buf, strlen( buf ) ); g_free(buf); return st; } gboolean skype_connected( gpointer data, void *source, b_input_condition cond ) { struct im_connection *ic = data; struct skype_data *sd = ic->proto_data; if(!source) { sd->ssl = NULL; imcb_error( ic, "Could not connect to server" ); imc_logout( ic, TRUE ); return FALSE; } imcb_log( ic, "Connected to server, logging in" ); return skype_start_stream(ic); } static void skype_login( account_t *acc ) { struct im_connection *ic = imcb_new( acc ); struct skype_data *sd = g_new0( struct skype_data, 1 ); ic->proto_data = sd; imcb_log( ic, "Connecting" ); sd->ssl = ssl_connect(set_getstr( &acc->set, "server" ), set_getint( &acc->set, "port" ), skype_connected, ic ); sd->fd = sd->ssl ? ssl_getfd( sd->ssl ) : -1; sd->username = g_strdup( acc->user ); sd->ic = ic; } static void skype_logout( struct im_connection *ic ) { struct skype_data *sd = ic->proto_data; char *buf; buf = g_strdup_printf("SET USERSTATUS OFFLINE\n"); skype_write( ic, buf, strlen( buf ) ); g_free(buf); g_free(sd->username); g_free(sd->handle); g_free(sd); ic->proto_data = NULL; } static int skype_buddy_msg( struct im_connection *ic, char *who, char *message, int flags ) { char *buf, *ptr, *nick; int st; nick = g_strdup(who); ptr = strchr(nick, '@'); if(ptr) *ptr = '\0'; buf = g_strdup_printf("MESSAGE %s %s\n", nick, message); g_free(nick); st = skype_write( ic, buf, strlen( buf ) ); g_free(buf); return st; } const struct skype_away_state *skype_away_state_by_name( char *name ) { int i; for( i = 0; skype_away_state_list[i].full_name; i ++ ) if( g_strcasecmp( skype_away_state_list[i].full_name, name ) == 0 ) return( skype_away_state_list + i ); return NULL; } static void skype_set_away( struct im_connection *ic, char *state_txt, char *message ) { const struct skype_away_state *state; char *buf; if( strcmp( state_txt, GAIM_AWAY_CUSTOM ) == 0 ) state = skype_away_state_by_name( "Away" ); else state = skype_away_state_by_name( state_txt ); buf = g_strdup_printf("SET USERSTATUS %s\n", state->code); skype_write( ic, buf, strlen( buf ) ); g_free(buf); } static GList *skype_away_states( struct im_connection *ic ) { static GList *l = NULL; int i; if( l == NULL ) for( i = 0; skype_away_state_list[i].full_name; i ++ ) l = g_list_append( l, (void*) skype_away_state_list[i].full_name ); return l; } static char *skype_set_display_name( set_t *set, char *value ) { account_t *acc = set->data; struct im_connection *ic = acc->ic; char *buf; buf = g_strdup_printf("SET PROFILE FULLNAME %s", value); skype_write( ic, buf, strlen( buf ) ); g_free(buf); return(value); } static char *skype_set_balance( set_t *set, char *value ) { account_t *acc = set->data; struct im_connection *ic = acc->ic; char *buf; buf = g_strdup_printf("GET PROFILE PSTN_BALANCE"); skype_write( ic, buf, strlen( buf ) ); g_free(buf); return(value); } static char *skype_set_call( set_t *set, char *value ) { account_t *acc = set->data; struct im_connection *ic = acc->ic; struct skype_data *sd = ic->proto_data; char *nick, *ptr, *buf; if(value) { user_t *u = user_find(acc->irc, value); /* We are starting a call */ if(!u) nick = g_strdup(value); else nick = g_strdup(u->handle); ptr = strchr(nick, '@'); if(ptr) *ptr = '\0'; buf = g_strdup_printf("CALL %s", nick); skype_write( ic, buf, strlen( buf ) ); g_free(buf); g_free(nick); } else { /* We are ending a call */ if(sd->call_id) { buf = g_strdup_printf("SET CALL %s STATUS FINISHED", sd->call_id); skype_write( ic, buf, strlen( buf ) ); g_free(buf); g_free(sd->call_id); sd->call_id = NULL; } else { imcb_error(ic, "There are no active calls currently."); } } return(value); } static void skype_add_buddy( struct im_connection *ic, char *who, char *group ) { char *buf, *nick, *ptr; nick = g_strdup(who); ptr = strchr(nick, '@'); if(ptr) *ptr = '\0'; buf = g_strdup_printf("SET USER %s BUDDYSTATUS 2 Please authorize me\n", nick); skype_write( ic, buf, strlen( buf ) ); g_free(nick); } static void skype_remove_buddy( struct im_connection *ic, char *who, char *group ) { char *buf, *nick, *ptr; nick = g_strdup(who); ptr = strchr(nick, '@'); if(ptr) *ptr = '\0'; buf = g_strdup_printf("SET USER %s BUDDYSTATUS 1\n", nick); skype_write( ic, buf, strlen( buf ) ); g_free(nick); } void skype_chat_msg( struct groupchat *gc, char *message, int flags ) { struct im_connection *ic = gc->ic; char *buf; buf = g_strdup_printf("CHATMESSAGE %s %s\n", gc->title, message); skype_write( ic, buf, strlen( buf ) ); g_free(buf); } void skype_chat_leave( struct groupchat *gc ) { struct im_connection *ic = gc->ic; char *buf; buf = g_strdup_printf("ALTER CHAT %s LEAVE\n", gc->title); skype_write( ic, buf, strlen( buf ) ); g_free(buf); gc->data = (void*)TRUE; } void skype_chat_invite(struct groupchat *gc, char *who, char *message) { struct im_connection *ic = gc->ic; char *buf, *ptr, *nick; nick = g_strdup(message); ptr = strchr(nick, '@'); if(ptr) *ptr = '\0'; buf = g_strdup_printf("ALTER CHAT %s ADDMEMBERS %s\n", gc->title, nick); skype_write( ic, buf, strlen( buf ) ); g_free(buf); g_free(nick); } void skype_chat_topic(struct groupchat *gc, char *message) { struct im_connection *ic = gc->ic; struct skype_data *sd = ic->proto_data; char *buf; buf = g_strdup_printf("ALTER CHAT %s SETTOPIC %s\n", gc->title, message); skype_write( ic, buf, strlen( buf ) ); g_free(buf); sd->topic_wait = 1; } struct groupchat *skype_chat_with(struct im_connection *ic, char *who) { struct skype_data *sd = ic->proto_data; char *ptr, *nick, *buf; nick = g_strdup(who); ptr = strchr(nick, '@'); if(ptr) *ptr = '\0'; buf = g_strdup_printf("CHAT CREATE %s\n", nick); skype_write(ic, buf, strlen(buf)); g_free(buf); sd->groupchat_with = g_strdup(nick); g_free(nick); /* We create a fake chat for now. We will replace it with a real one in * the real callback. */ return(imcb_chat_new( ic, "" )); } static void skype_get_info(struct im_connection *ic, char *who) { char *ptr, *nick, *buf; nick = g_strdup(who); ptr = strchr(nick, '@'); if(ptr) *ptr = '\0'; buf = g_strdup_printf("GET USER %s FULLNAME\n", nick); skype_write(ic, buf, strlen(buf)); g_free(buf); buf = g_strdup_printf("GET USER %s PHONE_HOME\n", nick); skype_write(ic, buf, strlen(buf)); g_free(buf); buf = g_strdup_printf("GET USER %s PHONE_OFFICE\n", nick); skype_write(ic, buf, strlen(buf)); g_free(buf); buf = g_strdup_printf("GET USER %s PHONE_MOBILE\n", nick); skype_write(ic, buf, strlen(buf)); g_free(buf); buf = g_strdup_printf("GET USER %s NROF_AUTHED_BUDDIES\n", nick); skype_write(ic, buf, strlen(buf)); g_free(buf); buf = g_strdup_printf("GET USER %s TIMEZONE\n", nick); skype_write(ic, buf, strlen(buf)); g_free(buf); buf = g_strdup_printf("GET USER %s LASTONLINETIMESTAMP\n", nick); skype_write(ic, buf, strlen(buf)); g_free(buf); buf = g_strdup_printf("GET USER %s BIRTHDAY\n", nick); skype_write(ic, buf, strlen(buf)); g_free(buf); buf = g_strdup_printf("GET USER %s SEX\n", nick); skype_write(ic, buf, strlen(buf)); g_free(buf); buf = g_strdup_printf("GET USER %s LANGUAGE\n", nick); skype_write(ic, buf, strlen(buf)); g_free(buf); buf = g_strdup_printf("GET USER %s COUNTRY\n", nick); skype_write(ic, buf, strlen(buf)); g_free(buf); buf = g_strdup_printf("GET USER %s PROVINCE\n", nick); skype_write(ic, buf, strlen(buf)); g_free(buf); buf = g_strdup_printf("GET USER %s CITY\n", nick); skype_write(ic, buf, strlen(buf)); g_free(buf); buf = g_strdup_printf("GET USER %s HOMEPAGE\n", nick); skype_write(ic, buf, strlen(buf)); g_free(buf); buf = g_strdup_printf("GET USER %s ABOUT\n", nick); skype_write(ic, buf, strlen(buf)); g_free(buf); } static void skype_set_my_name( struct im_connection *ic, char *info ) { skype_set_display_name( set_find( &ic->acc->set, "display_name" ), info ); } static void skype_init( account_t *acc ) { set_t *s; s = set_add( &acc->set, "server", SKYPE_DEFAULT_SERVER, set_eval_account, acc ); s->flags |= ACC_SET_OFFLINE_ONLY; s = set_add( &acc->set, "port", SKYPE_DEFAULT_PORT, set_eval_int, acc ); s->flags |= ACC_SET_OFFLINE_ONLY; s = set_add( &acc->set, "display_name", NULL, skype_set_display_name, acc ); s->flags |= ACC_SET_NOSAVE | ACC_SET_ONLINE_ONLY; s = set_add( &acc->set, "call", NULL, skype_set_call, acc ); s->flags |= ACC_SET_NOSAVE | ACC_SET_ONLINE_ONLY; s = set_add( &acc->set, "balance", NULL, skype_set_balance, acc ); s->flags |= ACC_SET_NOSAVE | ACC_SET_ONLINE_ONLY; } void init_plugin(void) { struct prpl *ret = g_new0( struct prpl, 1 ); ret->name = "skype"; ret->login = skype_login; ret->init = skype_init; ret->logout = skype_logout; ret->buddy_msg = skype_buddy_msg; ret->get_info = skype_get_info; ret->set_my_name = skype_set_my_name; ret->away_states = skype_away_states; ret->set_away = skype_set_away; ret->add_buddy = skype_add_buddy; ret->remove_buddy = skype_remove_buddy; ret->chat_msg = skype_chat_msg; ret->chat_leave = skype_chat_leave; ret->chat_invite = skype_chat_invite; ret->chat_with = skype_chat_with; ret->handle_cmp = g_strcasecmp; ret->chat_topic = skype_chat_topic; register_protocol( ret ); } /* vim: set ts=2 sw=2 noet: */