changeset 1323:4cbb78f05e4b

[gaim-migrate @ 1333] I am on some serious crack :-) committer: Tailor Script <[e-mail]>

--- a/plugins/Makefile.am	Wed Dec 20 04:03:58 2000 +0000
+++ b/plugins/Makefile.am	Wed Dec 20 04:05:15 2000 +0000
@@ -11,7 +11,7 @@
 SUBDIRS = yay icq msn
 endif
 
-plugin_DATA = autorecon.so iconaway.so irc.so notify.so spellchk.so lagmeter.so
+plugin_DATA = autorecon.so iconaway.so irc.so notify.so spellchk.so lagmeter.so napster.so
 plugindir = $(libdir)/gaim
 
 clean distclean:

--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/plugins/napster.c	Wed Dec 20 04:05:15 2000 +0000
@@ -0,0 +1,555 @@
+/*
+ * gaim - Napster Protocol Plugin
+ *
+ * Copyright (C) 2000, Rob Flynn <[e-mail]>
+ * 
+ * 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"
+
+#include <netdb.h>
+#include <gtk/gtk.h>
+#include <unistd.h>
+#include <errno.h>
+#include <netinet/in.h>
+#include <arpa/inet.h>
+#include <time.h>
+#include <string.h>
+#include <stdlib.h>
+#include <stdio.h>
+#include <time.h>
+#include <sys/socket.h>
+#include <sys/stat.h>
+#include "multi.h"
+#include "prpl.h"
+#include "gaim.h"
+
+#define NAP_BUF_LEN 4096
+
+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;
+};
+
+static char *nap_name()
+{
+	return "Napster";
+}
+
+char *name()
+{
+	return "Napster";
+}
+
+char *description()
+{
+	return "Allows gaim to use the Napster protocol.  Yes, kids, drugs are bad.";
+}
+
+
+/* FIXME: Make this use va_arg stuff */
+void nap_write_packet(struct gaim_connection *gc, unsigned short command, 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 void nap_send_im(struct gaim_connection *gc, char *who, char *message, int away)
+{
+	struct nap_data *ndata = (struct nap_data *)gc->proto_data;
+	gchar buf[NAP_BUF_LEN];
+
+	g_snprintf(buf, NAP_BUF_LEN, "%s %s", who, message);
+	nap_write_packet(gc, 0xCD, buf);
+}
+
+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 (!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 conversation *find_conversation_by_id(struct gaim_connection *gc, int id)
+{
+	struct nap_data *ndata = (struct nap_data *)gc->proto_data;
+	GSList *bc = gc->buddy_chats;
+	struct conversation *b = NULL;
+
+	while (bc) {
+		b = (struct conversation *)bc->data;
+		if (id == b->id) {
+			break;
+		}
+		bc = bc->next;
+		b = NULL;
+	}
+
+	if (!b) {
+		return NULL;
+	}
+
+	return b;
+}
+
+static void nap_callback(gpointer data, gint source, GdkInputCondition condition)
+{
+	struct gaim_connection *gc = data;
+	struct nap_data *ndata = gc->proto_data;
+	gchar *buf;
+	unsigned short header[2];
+	int i = 0;
+	int len;
+	int command;
+	gchar **res;
+
+	read(source, header, 4);
+	len = header[0];
+	command = header[1];	
+
+	buf = (gchar *)g_malloc(sizeof(gchar) * (len + 1));
+	
+	read(source, buf, len);
+
+	buf[len] = 0;
+
+	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);
+		free(buf);
+		return;
+	}
+
+	if (command == 0x26d) {
+		/* Do we want to use the MOTD? */
+		free(buf);
+		return;
+	}
+
+	if (command == 0xCD) {
+		res = g_strsplit(buf, " ", 1);
+		serv_got_im(gc, res[0], res[1], 0);
+		g_strfreev(res);
+		free(buf);
+		return;
+	}
+
+	if (command == 0x195) {
+		struct nap_channel *channel;
+		int id;		
+	
+		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);
+		}
+
+		free(buf);
+		return;
+	}
+
+	if (command == 0x198 || command == 0x196) {
+		struct nap_channel *channel;
+		struct 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);
+
+		add_chat_buddy(convo, res[1]);
+
+		g_strfreev(res);
+
+		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]);
+
+		g_strfreev(res);
+		free(buf);
+		return;
+	}
+
+	if (command == 0x194) {
+		do_error_dialog(buf, "Gaim: Napster Error");
+		free(buf);
+		return;
+	}
+
+	if (command == 0x12e) {
+		gchar buf2[NAP_BUF_LEN];
+
+		g_snprintf(buf2, NAP_BUF_LEN, "Unable to add '%s' to your hotlist", buf);
+		do_error_dialog(buf2, "Gaim: Napster Error");
+
+		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);
+
+		free(buf);
+		return;
+		
+	}
+
+	if (command == 0xd1) {
+		gchar **res;
+
+		res = g_strsplit(buf, " ", 0);
+
+		serv_got_update(gc, res[0], 1, 0, time((time_t *)NULL), 0, 0, 0);
+		
+		g_strfreev(res);
+		free(buf);
+		return;
+	}
+
+	if (command == 0xd2) {
+		serv_got_update(gc, buf, 0, 0, 0, 0, 0, 0);
+		free(buf);
+		return;
+	}
+
+	if (command == 0x12d) {
+		/* Our buddy was added successfully */
+		free(buf);
+		return;
+	}
+
+	printf("NAP: [COMMAND: 0x%04x] %s\n", command, buf);
+}
+
+
+static void nap_login_callback(gpointer data, gint source, GdkInputCondition condition)
+{
+	struct gaim_connection *gc = data;
+	struct nap_data *ndata = gc->proto_data;
+	gchar buf[NAP_BUF_LEN];
+	unsigned short header[2];
+	int i = 0;
+	int len;
+	int command;
+
+	read(source, header, 4);
+	len = header[0];
+	command = header[1];	
+	
+	read(source, buf, len);
+	buf[len] = 0;
+
+	if (command == 0x03) {
+		printf("Registered with E-Mail address of: %s\n", buf);
+		ndata->email = g_strdup(buf);
+
+		/* Remove old inpa, add new one */
+		gdk_input_remove(ndata->inpa);
+		ndata->inpa = 0;
+		gc->inpa = gdk_input_add(ndata->fd, GDK_INPUT_READ, nap_callback, gc);
+
+		/* Our signon is complete */
+		account_online(gc);
+		serv_finish_login(gc);
+
+		if (bud_list_cache_exists(gc))
+			do_import(NULL, gc);
+
+		return;
+	}
+}
+
+
+
+static void nap_login(struct aim_user *user)
+{
+	int fd;
+	struct hostent *host;
+	struct sockaddr_in site;
+	struct gaim_connection *gc = new_gaim_conn(user);
+	struct nap_data *ndata = gc->proto_data = g_new0(struct nap_data, 1);
+	char buf[NAP_BUF_LEN];
+	char c;
+	char z[4];
+	int i;
+	int status;
+
+	host = gethostbyname("64.124.41.184");
+
+        if (!host) {
+                hide_login_progress(gc, "Unable to resolve hostname");
+                signoff(gc);
+                return;
+        }
+
+        site.sin_family = AF_INET;
+        site.sin_addr.s_addr = *(long *)(host->h_addr);
+
+        site.sin_port = htons(8888);
+
+        fd = socket(AF_INET, SOCK_STREAM, 0);
+        if (fd < 0) {
+                hide_login_progress(gc, "Unable to create socket");
+                signoff(gc);
+                return;
+        }
+
+	/* Make a connection with the server */
+        if (connect(fd, (struct sockaddr *)&site, sizeof(site)) < 0) {
+                hide_login_progress(gc, "Unable to connect.");
+                signoff(gc);
+                 return;
+         }
+
+	ndata->fd = fd;
+	
+	/* And write our signon data */
+	g_snprintf(buf, NAP_BUF_LEN, "%s %s 0 \"Gnapster 1.4.1a\" 0", gc->username, gc->password);
+	nap_write_packet(gc, 0x02, buf);
+	
+	/* And set up the input watcher */
+	ndata->inpa = gdk_input_add(ndata->fd, GDK_INPUT_READ, nap_login_callback, gc);
+
+}
+
+static void nap_join_chat(struct gaim_connection *gc, int id, char *name)
+{
+	struct nap_data *ndata = (struct nap_data *)gc->proto_data;
+	gchar buf[NAP_BUF_LEN];
+
+	/* 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;
+	GSList *channels = ndata->channels;
+	
+	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);
+	
+	channels = g_slist_remove(channels, channel);
+	g_free(channel->name);
+	g_free(channel);
+	
+}
+
+static void nap_chat_send(struct gaim_connection *gc, int id, char *message)
+{
+	struct nap_data *ndata = (struct nap_data *)gc->proto_data;
+	struct nap_channel *channel = NULL;
+	gchar buf[NAP_BUF_LEN];
+	
+	channel = find_channel_by_id(gc, id);
+
+	if (!channel) {
+		/* This shouldn't happen */
+		return;
+	}
+
+	g_snprintf(buf, NAP_BUF_LEN, "%s %s", channel->name, message);
+	nap_write_packet(gc, 0x192, buf);
+
+}
+
+static void nap_add_buddy(struct gaim_connection *gc, char *name)
+{
+	nap_write_packet(gc, 0xCF, name);
+}
+
+static void nap_remove_buddy(struct gaim_connection *gc, char *name)
+{
+	nap_write_packet(gc, 0x12F, name);
+}
+
+static void nap_close(struct gaim_connection *gc)
+{
+	struct nap_data *ndata = (struct nap_data *)gc->proto_data;
+	gchar buf[NAP_BUF_LEN];
+	struct nap_channel *channel;
+	GSList *channels = ndata->channels;
+
+	if (gc->inpa)
+		gdk_input_remove(gc->inpa);
+
+	while (channels) {
+		channel = (struct nap_channel *)channels->data;
+		g_free(channel->name);
+		channels = g_slist_remove(channels, channel);
+		g_free(channel);
+	}
+	
+}
+
+static void nap_add_buddies(struct gaim_connection *gc, GList *buddies)
+{
+	struct nap_data *ndata = (struct nap_data *)gc->proto_data;
+	gchar buf[NAP_BUF_LEN];
+	int n = 0;
+
+	while (buddies) {
+		nap_write_packet(gc, 0xd0, (char *)buddies->data);
+		buddies = buddies -> next;
+	}
+}
+
+static struct prpl *my_protocol = NULL;
+
+void nap_init(struct prpl *ret)
+{
+	ret->protocol = PROTO_NAPSTER;
+	ret->name = nap_name;
+	ret->list_icon = NULL;
+	ret->action_menu = NULL;
+	ret->user_opts = NULL;
+	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->get_away_msg = 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->accept_chat = NULL;
+	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;
+
+	my_protocol = ret;
+}
+
+char *gaim_plugin_init(GModule * handle)
+{
+	load_protocol(nap_init);
+	return NULL;
+}
+
+void gaim_plugin_remove()
+{
+	struct prpl *p = find_prpl(PROTO_NAPSTER);
+	if (p == my_protocol)
+		unload_protocol(p);
+}