Mercurial > pidgin
view src/protocols/napster/napster.c @ 4660:92f401df564a
[gaim-migrate @ 4971]
Thanks to The Nathan Walp for telling me I'm dumb before giving
Herman a chance to chastise.
Man, was that poetic or what?
committer: Tailor Script <tailor@pidgin.im>
author | Mark Doliner <mark@kingant.net> |
---|---|
date | Fri, 07 Mar 2003 05:40:02 +0000 |
parents | d19872836812 |
children | 283fb289c510 |
line wrap: on
line source
/* * gaim - Napster Protocol Plugin * * Copyright (C) 2000-2001, Rob Flynn <rob@marko.net> * * 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 * */ #include <config.h> #ifndef _WIN32 #include <netdb.h> #include <unistd.h> #include <netinet/in.h> #include <arpa/inet.h> #include <sys/socket.h> #else #include <winsock.h> #endif #include <errno.h> #include <time.h> #include <string.h> #include <stdlib.h> #include <stdio.h> #include <time.h> #include <sys/stat.h> #include "gaim.h" #include "multi.h" #include "prpl.h" #include "proxy.h" #ifdef _WIN32 #include "win32dep.h" #endif #include "pixmaps/protocols/napster/napster.xpm" /* for win32 compatability */ G_MODULE_IMPORT GSList *connections; #define NAP_BUF_LEN 4096 #define USEROPT_NAPSERVER 3 #define NAP_SERVER "64.124.41.187" #define USEROPT_NAPPORT 4 #define NAP_PORT 8888 GSList *nap_connections = NULL; static unsigned int chat_id = 0; struct nap_channel { unsigned int id; gchar *name; }; struct nap_data { int fd; int inpa; gchar *email; GSList *channels; }; /* FIXME: Make this use va_arg stuff */ static void nap_write_packet(struct gaim_connection *gc, unsigned short command, const char *message) { struct nap_data *ndata = (struct nap_data *)gc->proto_data; unsigned short size; size = strlen(message); write(ndata->fd, &size, 2); write(ndata->fd, &command, 2); write(ndata->fd, message, size); } static int nap_send_im(struct gaim_connection *gc, char *who, char *message, int len, int flags) { gchar buf[NAP_BUF_LEN]; g_snprintf(buf, NAP_BUF_LEN, "%s %s", who, message); nap_write_packet(gc, 0xCD, buf); return 1; } static struct nap_channel *find_channel_by_name(struct gaim_connection *gc, char *name) { struct nap_channel *channel; struct nap_data *ndata = (struct nap_data *)gc->proto_data; GSList *channels; channels = ndata->channels; while (channels) { channel = (struct nap_channel *)channels->data; if (channel) { if (!g_strcasecmp(name, channel->name)) { return channel; } } channels = g_slist_next(channels); } return NULL; } static struct nap_channel *find_channel_by_id(struct gaim_connection *gc, int id) { struct nap_channel *channel; struct nap_data *ndata = (struct nap_data *)gc->proto_data; GSList *channels; channels = ndata->channels; while (channels) { channel = (struct nap_channel *)channels->data; if (id == channel->id) { return channel; } channels = g_slist_next(channels); } return NULL; } static struct gaim_conversation *find_conversation_by_id(struct gaim_connection *gc, int id) { GSList *bc = gc->buddy_chats; struct gaim_conversation *b = NULL; while (bc) { b = (struct gaim_conversation *)bc->data; if (id == gaim_chat_get_id(GAIM_CHAT(b))) break; bc = bc->next; b = NULL; } return b; } static void nap_callback(gpointer data, gint source, GaimInputCondition condition) { struct gaim_connection *gc = data; struct nap_data *ndata = gc->proto_data; gchar *buf; unsigned short header[2]; int len; int command; gchar **res; int i; if (recv(source, (void*)header, 4, 0) != 4) { hide_login_progress(gc, "Unable to read"); signoff(gc); return; } len = header[0]; command = header[1]; buf = (gchar *)g_malloc(sizeof(gchar) * (len + 1)); i = 0; do { int tmp = recv(source, buf + i, len - i, 0); if (tmp <= 0) { g_free(buf); hide_login_progress(gc, "Unable to read"); signoff(gc); return; } i += tmp; } while (i != len); buf[len] = 0; debug_printf("DEBUG: %s\n", buf); if (command == 0xd6) { res = g_strsplit(buf, " ", 0); /* Do we want to report what the users are doing? */ printf("users: %s, files: %s, size: %sGB\n", res[0], res[1], res[2]); g_strfreev(res); g_free(buf); return; } if (command == 0x26d) { /* Do we want to use the MOTD? */ g_free(buf); return; } if (command == 0xCD) { res = g_strsplit(buf, " ", 1); serv_got_im(gc, res[0], res[1], 0, time(NULL), -1); g_strfreev(res); g_free(buf); return; } if (command == 0x195) { struct nap_channel *channel; channel = find_channel_by_name(gc, buf); if (!channel) { chat_id++; channel = g_new0(struct nap_channel, 1); channel->id = chat_id; channel->name = g_strdup(buf); ndata->channels = g_slist_append(ndata->channels, channel); serv_got_joined_chat(gc, chat_id, buf); } g_free(buf); return; } if (command == 0x198 || command == 0x196) { struct nap_channel *channel; struct gaim_conversation *convo; gchar **res; res = g_strsplit(buf, " ", 0); channel = find_channel_by_name(gc, res[0]); convo = find_conversation_by_id(gc, channel->id); gaim_chat_add_user(GAIM_CHAT(convo), res[1], NULL); g_strfreev(res); g_free(buf); return; } if (command == 0x197) { struct nap_channel *channel; struct gaim_conversation *convo; gchar **res; res = g_strsplit(buf, " ", 0); channel = find_channel_by_name(gc, res[0]); convo = find_conversation_by_id(gc, channel->id); gaim_chat_remove_user(GAIM_CHAT(convo), res[1], NULL); g_strfreev(res); g_free(buf); return; } if (command == 0x193) { gchar **res; struct nap_channel *channel; res = g_strsplit(buf, " ", 2); channel = find_channel_by_name(gc, res[0]); if (channel) serv_got_chat_in(gc, channel->id, res[1], 0, res[2], time((time_t)NULL)); g_strfreev(res); g_free(buf); return; } if (command == 0x194) { do_error_dialog(buf, NULL, GAIM_ERROR); g_free(buf); return; } if (command == 0x12e) { gchar buf2[NAP_BUF_LEN]; g_snprintf(buf2, NAP_BUF_LEN, "Unable to add '%s' to your Napster hotlist", buf); do_error_dialog(buf2, NULL, GAIM_ERROR); g_free(buf); return; } if (command == 0x191) { struct nap_channel *channel; channel = find_channel_by_name(gc, buf); if (!channel) /* I'm not sure how this would happen =) */ return; serv_got_chat_left(gc, channel->id); ndata->channels = g_slist_remove(ndata->channels, channel); g_free(buf); return; } if (command == 0xd1) { gchar **res; res = g_strsplit(buf, " ", 0); serv_got_update(gc, res[0], 1, 0, 0, 0, 0, 0); g_strfreev(res); g_free(buf); return; } if (command == 0xd2) { serv_got_update(gc, buf, 0, 0, 0, 0, 0, 0); g_free(buf); return; } if (command == 0x12d) { /* Our buddy was added successfully */ g_free(buf); return; } if (command == 0x2ec) { /* Looks like someone logged in as us! =-O */ g_free(buf); signoff(gc); return; } debug_printf("NAP: [COMMAND: 0x%04x] %s\n", command, buf); g_free(buf); } static void nap_login_callback(gpointer data, gint source, GaimInputCondition condition) { struct gaim_connection *gc = data; struct nap_data *ndata = gc->proto_data; gchar buf[NAP_BUF_LEN]; unsigned short header[2]; int len; int command; read(source, header, 4); len = header[0]; command = header[1]; read(source, buf, len); buf[len] = 0; /* If we have some kind of error, get outta here */ if (command == 0x00) { do_error_dialog(buf, NULL, GAIM_ERROR); gaim_input_remove(ndata->inpa); ndata->inpa = 0; close(source); signoff(gc); return; } if (command == 0x03) { printf("Registered with E-Mail address of: %s\n", buf); ndata->email = g_strdup(buf); /* Remove old inpa, add new one */ gaim_input_remove(ndata->inpa); ndata->inpa = 0; gc->inpa = gaim_input_add(ndata->fd, GAIM_INPUT_READ, nap_callback, gc); /* Our signon is complete */ account_online(gc); serv_finish_login(gc); return; } } static void nap_login_connect(gpointer data, gint source, GaimInputCondition cond) { struct gaim_connection *gc = data; struct nap_data *ndata; char buf[NAP_BUF_LEN]; if (!g_slist_find(connections, gc)) { close(source); return; } if (source < 0) { hide_login_progress(gc, "Unable to connect"); signoff(gc); return; } ndata = gc->proto_data; ndata->fd = source; /* And write our signon data */ g_snprintf(buf, NAP_BUF_LEN, "%s %s 0 \"gaimster\" 0", gc->username, gc->password); nap_write_packet(gc, 0x02, buf); /* And set up the input watcher */ ndata->inpa = gaim_input_add(ndata->fd, GAIM_INPUT_READ, nap_login_callback, gc); } static void nap_login(struct gaim_account *account) { struct gaim_connection *gc = new_gaim_conn(account); gc->proto_data = g_new0(struct nap_data, 1); if (proxy_connect(account, account->proto_opt[USEROPT_NAPSERVER][0] ? account->proto_opt[USEROPT_NAPSERVER] : NAP_SERVER, account->proto_opt[USEROPT_NAPPORT][0] ? atoi(account->proto_opt[USEROPT_NAPPORT]) : NAP_PORT, nap_login_connect, gc) != 0) { hide_login_progress(gc, "Unable to connect"); signoff(gc); } } static GList *nap_chat_info(struct gaim_connection *gc) { GList *m = NULL; struct proto_chat_entry *pce; pce = g_new0(struct proto_chat_entry, 1); pce->label = _("Join what group:"); m = g_list_append(m, pce); return m; } static void nap_join_chat(struct gaim_connection *gc, GList *data) { gchar buf[NAP_BUF_LEN]; char *name; if (!data) return; name = data->data; /* Make sure the name has a # preceeding it */ if (name[0] != '#') g_snprintf(buf, NAP_BUF_LEN, "#%s", name); else g_snprintf(buf, NAP_BUF_LEN, "%s", name); nap_write_packet(gc, 0x190, buf); } static void nap_chat_leave(struct gaim_connection *gc, int id) { struct nap_data *ndata = (struct nap_data *)gc->proto_data; struct nap_channel *channel = NULL; channel = find_channel_by_id(gc, id); if (!channel) /* Again, I'm not sure how this would happen */ return; nap_write_packet(gc, 0x191, channel->name); ndata->channels = g_slist_remove(ndata->channels, channel); g_free(channel->name); g_free(channel); } static int nap_chat_send(struct gaim_connection *gc, int id, char *message) { struct nap_channel *channel = NULL; gchar buf[NAP_BUF_LEN]; channel = find_channel_by_id(gc, id); if (!channel) { /* This shouldn't happen */ return -EINVAL; } g_snprintf(buf, NAP_BUF_LEN, "%s %s", channel->name, message); nap_write_packet(gc, 0x192, buf); return 0; } static void nap_add_buddy(struct gaim_connection *gc, const char *name) { nap_write_packet(gc, 0xCF, name); } static void nap_remove_buddy(struct gaim_connection *gc, char *name, char *group) { nap_write_packet(gc, 0x12F, name); } static void nap_close(struct gaim_connection *gc) { struct nap_data *ndata = (struct nap_data *)gc->proto_data; struct nap_channel *channel; if (gc->inpa) gaim_input_remove(gc->inpa); while (ndata->channels) { channel = (struct nap_channel *)ndata->channels->data; g_free(channel->name); ndata->channels = g_slist_remove(ndata->channels, channel); g_free(channel); } g_free(gc->proto_data); } static void nap_add_buddies(struct gaim_connection *gc, GList *buddies) { while (buddies) { nap_write_packet(gc, 0xd0, (char *)buddies->data); buddies = buddies -> next; } } static char** nap_list_icon(int uc) { return napster_xpm; } static struct prpl *my_protocol = NULL; G_MODULE_EXPORT void napster_init(struct prpl *ret) { struct proto_user_opt *puo; ret->add_buddies = nap_add_buddies; ret->remove_buddy = nap_remove_buddy; ret->add_permit = NULL; ret->rem_permit = NULL; ret->add_deny = NULL; ret->rem_deny = NULL; ret->warn = NULL; ret->chat_info = nap_chat_info; ret->join_chat = nap_join_chat; ret->chat_invite = NULL; ret->chat_leave = nap_chat_leave; ret->chat_whisper = NULL; ret->chat_send = nap_chat_send; ret->keepalive = NULL; ret->protocol = PROTO_NAPSTER; ret->name = g_strdup("Napster"); ret->list_icon = nap_list_icon; ret->login = nap_login; ret->close = nap_close; ret->send_im = nap_send_im; ret->set_info = NULL; ret->get_info = NULL; ret->set_away = NULL; ret->set_dir = NULL; ret->get_dir = NULL; ret->dir_search = NULL; ret->set_idle = NULL; ret->change_passwd = NULL; ret->add_buddy = nap_add_buddy; ret->add_buddies = nap_add_buddies; ret->remove_buddy = nap_remove_buddy; ret->add_permit = NULL; ret->rem_permit = NULL; ret->add_deny = NULL; ret->rem_deny = NULL; ret->warn = NULL; ret->chat_info = nap_chat_info; ret->join_chat = nap_join_chat; ret->chat_invite = NULL; ret->chat_leave = nap_chat_leave; ret->chat_whisper = NULL; ret->chat_send = nap_chat_send; ret->keepalive = NULL; puo = g_new0(struct proto_user_opt, 1); puo->label = g_strdup(_("Server:")); puo->def = g_strdup(NAP_SERVER); puo->pos = USEROPT_NAPSERVER; ret->user_opts = g_list_append(ret->user_opts, puo); puo = g_new0(struct proto_user_opt, 1); puo->label = g_strdup(_("Port:")); puo->def = g_strdup("8888"); puo->pos = USEROPT_NAPPORT; ret->user_opts = g_list_append(ret->user_opts, puo); my_protocol = ret; } #ifndef STATIC G_MODULE_EXPORT void gaim_prpl_init(struct prpl *prpl) { napster_init(prpl); prpl->plug->desc.api_version = PLUGIN_API_VERSION; } #endif