view plugins/irc.c @ 1911:db3104dda736

[gaim-migrate @ 1921] Mike Heffner's redesigned UI. I changed around a lot of things from his patch, not because they weren't good or needed or anything like that; most of the changes I made just made the patch smaller. I moved functions back to where they originally where and renamed them back to what they originally were. Granted the names aren't as... good as the changes Mike made, but eh, it made my life a lot easier when I could see the meat of the changes without all the cosmetic details. The only thing I really changed about his patch was I made the list BROWSE instead of SINGLE so that there wouldn't be need for a deselect callback. Oh yeah, and update_show_plugins is called from different places (so that plugins can call load_plugin and have the window update properly). committer: Tailor Script <[e-mail]>

/*
 * gaim - IRC Protocol Plugin
 *
 * Copyright (C) 2000-2001, Rob Flynn <[e-mail]>
 * Copyright (C) 1998-1999, Mark Spencer <[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 <fcntl.h>
#include <string.h>
#include <stdlib.h>
#include <stdio.h>
#include <time.h>
#include <sys/socket.h>
#include <sys/stat.h>
#include <ctype.h>
#include "multi.h"
#include "prpl.h"
#include "gaim.h"
#include "proxy.h"

#include "pixmaps/free_icon.xpm"

#define IRC_BUF_LEN 4096


#define USEROPT_SERV      0
#define USEROPT_PORT      1

static int chat_id = 0;

struct irc_channel {
	int id;
	gchar *name;
};

struct irc_data {
	int fd;
	int inpa;		/* used for non-block logins */

	int timer;

	int totalblocks;
	int recblocks;

	GSList *templist;
	GList *channels;
};

static char *irc_name()
{
	return "IRC";
}

static void irc_get_info(struct gaim_connection *gc, char *who);
	
char *name()
{
	return "IRC";
}

char *description()
{
	return "Allows gaim to use the IRC protocol";
}

static void irc_join_chat(struct gaim_connection *gc, int id, char *name)
{
	struct irc_data *idata = (struct irc_data *)gc->proto_data;
	gchar *buf = (gchar *) g_malloc(IRC_BUF_LEN + 1);

	g_snprintf(buf, IRC_BUF_LEN, "JOIN %s\n", name);
	write(idata->fd, buf, strlen(buf));
	write(idata->fd, buf, strlen(buf));

	g_free(buf);
}

static void irc_update_user(struct gaim_connection *gc, char *name, int status)
{
	struct irc_data *idata = (struct irc_data *)gc->proto_data;
	struct irc_channel *u;
	GSList *temp = idata->templist;

	/* Loop through our list */

	while (temp) {
		u = (struct irc_channel *)temp->data;
		if (g_strcasecmp(u->name, name) == 0) {
			u->id = status;
			return;
		}

		temp = g_slist_next(temp);
	}
	return;
}

static void irc_request_buddy_update(struct gaim_connection *gc)
{
	struct irc_data *idata = (struct irc_data *)gc->proto_data;
	GSList *grp = gc->groups;
	GSList *person;
	struct group *g;
	struct buddy *b;
	struct irc_channel *u;

	if (idata->templist != NULL)
		return;

	idata->recblocks = 0;
	idata->totalblocks = 1;

	/* First, let's check to see if we have anyone on our buddylist */
	if (!grp) {
		return;
	}

	/* Send the first part of our request */
	write(idata->fd, "ISON", 4);

	/* Step through our list of groups */
	while (grp) {

		g = (struct group *)grp->data;
		person = g->members;

		while (person) {
			b = (struct buddy *)person->data;

			/* We will store our buddy info here.  I know, this is cheap
			 * but hey, its the exact same data structure.  Why should we
			 * bother with making another one */

			u = g_new0(struct irc_channel, 1);
			u->id = 0;	/* Assume by default that they're offline */
			u->name = strdup(b->name);

			write(idata->fd, " ", 1);
			write(idata->fd, u->name, strlen(u->name));
			idata->templist = g_slist_append(idata->templist, u);

			person = person->next;
		}

		grp = g_slist_next(grp);
	}
	write(idata->fd, "\n", 1);
}


static void irc_send_im(struct gaim_connection *gc, char *who, char *message, int away)
{

        struct irc_data *idata = (struct irc_data *)gc->proto_data;
	gchar *buf = (gchar *) g_malloc(IRC_BUF_LEN + 1);

	if (who[0] == '@' || who[0] == '+') {

	  /* If the user trys to msg an op or a voice from the channel, the convo will try
           * to send it to @nick or +nick... needless to say, this is undesirable.
	   */
	        who++;
	}

	/* Before we actually send this, we should check to see if they're trying
	 * To issue a command and handle it properly. */

	if (message[0] == '/')
	{
		/* I'll change the implementation of this a little later :-) */
		if ((g_strncasecmp(message, "/me ", 4) == 0) && (strlen(message) > 4)) {
			/* We have /me!! We have /me!! :-) */

			gchar *temp = (gchar *) g_malloc(IRC_BUF_LEN + 1);
			strcpy(temp, message + 4);
			g_snprintf(buf, IRC_BUF_LEN, "PRIVMSG %s :%cACTION %s%c\n", who, '\001', temp, '\001');
			g_free(temp);
		} 
		else if (!g_strncasecmp(message, "/whois ", 7) && (strlen(message) > 7)) {
			gchar *temp = (gchar *) g_malloc(IRC_BUF_LEN + 1);
			strcpy(temp, message + 7);
			irc_get_info(gc, temp);
			g_free(temp);

			return;
		}	
				
	}
	else {
		g_snprintf(buf, IRC_BUF_LEN, "PRIVMSG %s :%s\n", who, message);
	}

	write(idata->fd, buf, strlen(buf));

	g_free(buf);
}

static int find_id_by_name(struct gaim_connection *gc, char *name)
{
	gchar *temp = (gchar *) g_malloc(IRC_BUF_LEN + 1);
	GList *templist;
	struct irc_channel *channel;

	templist = ((struct irc_data *)gc->proto_data)->channels;

	while (templist) {
		channel = (struct irc_channel *)templist->data;

		g_snprintf(temp, IRC_BUF_LEN, "#%s", channel->name);

		if (g_strcasecmp(temp, name) == 0) {
			g_free(temp);
			return channel->id;
		}

		templist = templist->next;
	}

	g_free(temp);

	/* Return -1 if we have no ID */
	return -1;
}

static struct irc_channel *find_channel_by_name(struct gaim_connection *gc, char *name)
{
	gchar *temp = (gchar *) g_malloc(IRC_BUF_LEN + 1);
	GList *templist;
	struct irc_channel *channel;

	templist = ((struct irc_data *)gc->proto_data)->channels;

	while (templist) {
		channel = (struct irc_channel *)templist->data;

		g_snprintf(temp, IRC_BUF_LEN, "%s", channel->name);

		if (g_strcasecmp(temp, name) == 0) {
			g_free(temp);
			return channel;
		}

		templist = templist->next;
	}

	g_free(temp);

	/* If we found nothing, return nothing :-) */
	return NULL;
}

static struct irc_channel *find_channel_by_id(struct gaim_connection *gc, int id)
{
	struct irc_data *idata = (struct irc_data *)gc->proto_data;
	struct irc_channel *channel;

	GList *temp;

	temp = idata->channels;

	while (temp) {
		channel = (struct irc_channel *)temp->data;

		if (channel->id == id) {
			/* We've found our man */
			return channel;
		}

		temp = temp->next;
	}


	/* If we didnt find one, return NULL */
	return NULL;
}

static void irc_chat_leave(struct gaim_connection *gc, int id);
static void irc_chat_send(struct gaim_connection *gc, int id, char *message)
{

        struct irc_data *idata = (struct irc_data *)gc->proto_data;
	struct irc_channel *channel = NULL;
	gchar *buf = (gchar *) g_malloc(IRC_BUF_LEN + 1);
	char **kick; 
	gboolean is_command = FALSE;
	/* First lets get our current channel */
	channel = find_channel_by_id(gc, id);


	if (!channel) {
		/* If for some reason we've lost our channel, let's bolt */
		g_free(buf);
		return;
	}


	/* Before we actually send this, we should check to see if they're trying
	 * To issue a command and handle it properly. */

	if (message[0] == '/')
	  {
	   
	    if ((g_strncasecmp(message, "/me ", 4) == 0) && (strlen(message) > 4)) {
	      /* We have /me!! We have /me!! :-) */
	      
	      gchar *temp = (gchar *) g_malloc(IRC_BUF_LEN + 1);
	      strcpy(temp, message + 4);
	      
	      g_snprintf(buf, IRC_BUF_LEN, "PRIVMSG #%s :%cACTION %s%c\n", channel->name, '\001', temp,
			 '\001');
	      g_free(temp);
	    }
	    else if ((g_strncasecmp(message, "/op ", 4) == 0) && (strlen(message) > 4)) {
	      gchar *temp = (gchar *) g_malloc(IRC_BUF_LEN + 1);
	      strcpy(temp, message + 4);
	      
	      g_snprintf(buf, IRC_BUF_LEN, "MODE #%s +o %s\n", channel->name, temp);
	      
	      g_free(temp);
	      is_command = TRUE;
	      
	    }
	    else if ((g_strncasecmp(message, "/deop ", 6) == 0) && (strlen(message) > 6)) {
	      gchar *temp = (gchar *) g_malloc(IRC_BUF_LEN + 1);
	      strcpy(temp, message + 6);
	      g_snprintf(buf, IRC_BUF_LEN, "MODE #%s -o %s\n", channel->name, temp);
	      
	      g_free(temp);
	      is_command = TRUE;
		}
	    
	    else if ((g_strncasecmp(message, "/voice ", 7) == 0) && (strlen(message) > 7)) {
	      gchar *temp = (gchar *) g_malloc(IRC_BUF_LEN + 1);
	      strcpy(temp, message + 7);
	      
	      g_snprintf(buf, IRC_BUF_LEN, "MODE #%s +v %s\n", channel->name, temp);
	      
	      g_free(temp);
	      is_command = TRUE;
	      
	    }
	    else if ((g_strncasecmp(message, "/devoice ", 9) == 0) && (strlen(message) > 9)) {
	      gchar *temp = (gchar *) g_malloc(IRC_BUF_LEN + 1);
	      strcpy(temp, message + 6);
	      g_snprintf(buf, IRC_BUF_LEN, "MODE #%s -v %s\n", channel->name, temp);
	      
	      g_free(temp);
	      is_command = TRUE;
	    }
	    else if ((g_strncasecmp(message, "/mode ", 6) == 0) && (strlen(message) > 6)) {
	      gchar *temp = (gchar *) g_malloc(IRC_BUF_LEN + 1);
	      strcpy(temp, message + 6);
	      g_snprintf(buf, IRC_BUF_LEN, "MODE #%s %s\n", channel->name, temp);
	      g_free(temp);
	      is_command = TRUE;
	    }
	    
	    else if (!g_strncasecmp(message, "/whois ", 7) && (strlen(message) > 7)) {
	      gchar *temp = (gchar *) g_malloc(IRC_BUF_LEN + 1);
	      
	      strcpy(temp, message + 7);
	      irc_get_info(gc, temp);
	      g_free(temp);
	      is_command = TRUE;
	      
	    }	
	    
	    else if (!g_strncasecmp(message, "/part", 5) && (strlen(message) == 5)) {

	      /* If I'm not mistaken, the chat_leave command was coded under the
	       * pretense that it would only occur when someone closed the window.
	       * For this reason, the /part command will not close the window.  Nor
	       * will the window close when the user is /kicked.  I'll let you decide
	       * the best way to fix it--I'd imagine it'd just be a little line like
	       * if (convo) close (convo), but I'll let you decide where to put it.
	       */

	      irc_chat_leave(gc, id);
	      is_command = TRUE;
	      return;


	    }

	    else if (!g_strncasecmp(message, "/join ", 6) && (strlen(message) > 6)) {
	      
	      gchar *temp = (gchar *) g_malloc(IRC_BUF_LEN + 1);
	      
	      strcpy(temp, message + 6);

	    
	      irc_join_chat(gc, 0, temp);
	      g_free(temp);
	      is_command = TRUE;
	      return;
	    }
	    
	    else if (!g_strncasecmp(message, "/raw ", 5) && (strlen(message) > 5)){
	      gchar *temp = (gchar *) g_malloc(IRC_BUF_LEN + 1);
	      strcpy(temp, message + 5);
	      g_snprintf(buf, IRC_BUF_LEN, "%s\r\n", temp);
	      g_free(temp);
	      is_command = TRUE;
	    }
	    
	    else if (!g_strncasecmp(message, "/quote ", 7) && (strlen(message) >7)) {
	      gchar *temp = (gchar *) g_malloc(IRC_BUF_LEN + 1);
	      strcpy(temp, message + 7);
	      g_snprintf(buf, IRC_BUF_LEN, "%s\r\n", temp);
	      g_free(temp);
	      is_command = TRUE;
	    }
	    
	    else if (!g_strncasecmp(message, "/kick ", 6) && (strlen(message) > 6)) {
	      gchar *temp = (gchar *) g_malloc(IRC_BUF_LEN + 1);
	      strcpy(temp, message + 6);
	      kick =  g_strsplit(temp, " ", 2);
	      g_snprintf(buf, IRC_BUF_LEN, "KICK #%s %s :%s\r\n", channel->name, kick[0], kick[1]);
	      g_free(temp);
	      is_command = TRUE;
	    }

/* FIXME: I'll go back in and grab this later.   -- Rob */
/*
I THOUGHT THIS WOULD WORK, BUT I WAS WRONG.  WOULD SOMEONE KINDLY FIX IT?

	    
	    else if (!g_strncasecmp(message, "/help", 5)) {
	      gchar *temp = (gchar *) g_malloc(IRC_BUF_LEN + 1);
	      strcpy(temp, message + 5);
	      	  if (temp == "") {
	     
	      serv_got_chat_in(gc, id, "gAIM", 0, "Available Commands:");
	      		    serv_got_chat_in(gc, id, "gAIM", 0, " ");
				    serv_got_chat_in(gc, id, "gAIM", 0, "<b>op     voice     kick </b>");
				    serv_got_chat_in(gc, id, "gAIM", 0, "<b>deop   devoice   whois</b>");
				    serv_got_chat_in(gc, id, "gAIM", 0, "<b>me     raw       quote</b>");
				    serv_got_chat_in(gc, id, "gAIM", 0, "<b>mode</b>");
		      }
		      else {
		    serv_got_chat_in(gc, id, "gAIM", 0, "Usage: ");
		    if (temp == "op")
		      serv_got_chat_in(gc, id, "gAIM", 0, "<b>/op <nick></b> - Gives operator status to user.");
		    else if (temp == "deop")
		      serv_got_chat_in(gc, id, "gAIM", 0, "<b>/deop <nick></b> - Removes operator status from user.");
		    else if (temp == "me")
		      serv_got_chat_in(gc, id, "gAIM", 0, "<b>/me <action></b> - Sends an action to the channel.");
		    else if (temp == "mode")
		      serv_got_chat_in(gc, id, "gAIM", 0, "<b>/mode {[+|-}|o|p|s|i|t|n|b|v} [<limit][<nick>][<ban mask]</b> - Changes channel and user modes.");
		      else if (temp == "voice")
		      serv_got_chat_in(gc, id, "gAIM", 0, "<b>/voice <nick></b> - Gives voice status to user.");
		    else if (temp == "devoice")
		      serv_got_chat_in(gc, id, "gAIM", 0, "<b>/devoice <nick></b> - Removes voice status from user.");
		    else if (temp == "raw")
		      serv_got_chat_in(gc, id, "gAIM", 0, "<b>/raw <text></b> - Sends raw text to the server.");
		    else if (temp == "kick")
		      serv_got_chat_in(gc, id, "gAIM", 0, "<b>/kick [<comment>]</b> - Kicks a user out of the channel.");
		    else if (temp ==  "whois")
		      serv_got_chat_in(gc, id, "gAIM", 0, "<b>/whois <nick></b> - Gets information about user.");
		    else if (temp == "quote")
		      serv_got_chat_in(gc, id, "gAIM", 0, "<b>/raw <text></b> - Sends raw text to the server.");
		    else
		      serv_got_chat_in(gc, id, "gAIM", 0, "No such command.");
		  }      
		    
	      g_free(temp);
	      is_command = TRUE;
	    }
*/
	    
	  }
	
	else {
	  g_snprintf(buf, IRC_BUF_LEN, "PRIVMSG #%s :%s\n", channel->name, message);
	  
	    }
	
	
	write(idata->fd, buf, strlen(buf));
	
	/* Since AIM expects us to receive the message we send, we gotta fake it */
	if (is_command==FALSE)
	  serv_got_chat_in(gc, id, gc->username, 0, message, time((time_t)NULL));
	
	g_free(buf);
	
	
}
static struct conversation *find_conversation_by_id(struct gaim_connection *gc, int id)
{
	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 struct conversation *find_conversation_by_name(struct gaim_connection *gc, char *name)
{
	GSList *bc = gc->buddy_chats;
	struct conversation *b = NULL;

	while (bc) {
		b = (struct conversation *)bc->data;

		if (g_strcasecmp(name, b->name) == 0) {
			break;
		}
		bc = bc->next;
		b = NULL;
	}

	if (!b) {
		return NULL;
	}

	return b;
}



static void irc_callback(gpointer data, gint source, GdkInputCondition condition)
{
	struct gaim_connection *gc = data;
	int i = 0;
	gchar buf[4096];
	gchar **buf2;
	struct irc_data *idata;
	
	idata = (struct irc_data *)gc->proto_data;


	do {
		if (read(idata->fd, buf + i, 1) < 0) {
			hide_login_progress(gc, "Read error");
			signoff(gc);
			return;
		}
	} while (buf[i++] != '\n');

	buf[--i] = '\0';
	g_strchomp(buf);
	g_print("%s\n", buf);

	/* Check for errors */

	if (((strstr(buf, "ERROR :") && (!strstr(buf, "PRIVMSG ")) &&
	      (!strstr(buf, "NOTICE ")) && (strlen(buf) > 7)))) {

		gchar *u_errormsg;

		/* Let's get our error message */
		u_errormsg = g_strdup(buf + 7);

		/* We got our error message.  Now, let's reaise an
		 * error dialog */

		do_error_dialog(u_errormsg, "Gaim: IRC Error");

		/* And our necessary garbage collection */
		g_free(u_errormsg);
		return;
	}

	/* This should be a whois response. I only care about the first (311) one.  I might do
	 * the other's later. They're boring.  */

	if (((strstr(buf, " 311 ")) && (!strstr(buf, "PRIVMSG")) && (!strstr(buf, "NOTICE")))) {
		char **res;

		res = g_strsplit(buf, " ", 7);

		if (!strcmp(res[1], "311"))
		{
			char buf[8192];

			g_snprintf(buf, 4096, "<b>Nick:</b> %s<br>"
					"<b>Host:</b> %s@%s<br>"
					"<b>Name:</b> %s<br>", res[3], res[4], res[5], res[7]+1);

			g_show_info_text(buf);
		}

		g_strfreev(res);
		return;
	}

	/* Autoresponse to an away message */
	if (((strstr(buf, " 301 ")) && (!strstr(buf, "PRIVMSG")) && (!strstr(buf, "NOTICE")))) {
		char **res;

		res = g_strsplit(buf, " ", 5);

		if (!strcmp(res[1], "301"))
			serv_got_im(gc, res[3], res[4] + 1, 1, time((time_t)NULL));

		g_strfreev(res);
		return;
	}

	/* Parse the list of names that we receive when we first sign on to
	 * a channel */

	if (((strstr(buf, " 353 ")) && (!strstr(buf, "PRIVMSG")) && (!strstr(buf, "NOTICE")))) {
		gchar u_host[255];
		gchar u_command[32];
		gchar u_channel[128];
		gchar u_names[IRC_BUF_LEN + 1];
		struct conversation *convo = NULL;
		int j;

		for (j = 0, i = 0; buf[i] != ' '; j++, i++) {
			u_host[j] = buf[i];
		}

		u_host[j] = '\0';
		i++;

		for (j = 0; buf[i] != ' '; j++, i++) {
			u_command[j] = buf[i];
		}

		u_command[j] = '\0';
		i++;

		for (j = 0; buf[i] != '#'; j++, i++) {
		}
		i++;

		for (j = 0; buf[i] != ':'; j++, i++) {
			u_channel[j] = buf[i];
		}

		u_channel[j - 1] = '\0';
		i++;

		while ((buf[i] == ' ') || (buf[i] == ':')) {
			i++;
		}

		strcpy(u_names, buf + i);

		buf2 = g_strsplit(u_names, " ", 0);

		/* Let's get our conversation window */
		convo = find_conversation_by_name(gc, u_channel);

		if (!convo) {
			return;
		}

		/* Now that we've parsed the hell out of this big
		 * mess, let's try to split up the names properly */

		for (i = 0; buf2[i] != NULL; i++)
			add_chat_buddy(convo, buf2[i]);

		/* And free our pointers */
		g_strfreev(buf2);

		return;

	}

	/* Receive a list of users that are currently online */

	if (((strstr(buf, " 303 ")) && (!strstr(buf, "PRIVMSG")) && (!strstr(buf, "NOTICE")))) {
		gchar u_host[255];
		gchar u_command[32];
		gchar u_names[IRC_BUF_LEN + 1];
		int j;

		for (j = 0, i = 0; buf[i] != ' '; j++, i++) {
			u_host[j] = buf[i];
		}

		u_host[j] = '\0';
		i++;

		for (j = 0; buf[i] != ' '; j++, i++) {
			u_command[j] = buf[i];
		}

		u_command[j] = '\0';
		i++;

		for (j = 0; buf[i] != ':'; j++, i++) {
			/* My Nick */
		}
		i++;

		strcpy(u_names, buf + i);

		buf2 = g_strsplit(u_names, " ", 0);

		/* Now that we've parsed the hell out of this big
		 * mess, let's try to split up the names properly */

		for (i = 0; buf2[i] != NULL; i++) {
			/* If we have a name here then our buddy is online.  We should
			 * update our temporary gslist accordingly.  When we achieve our maximum
			 * list of names then we should force an update */

			irc_update_user(gc, buf2[i], 1);
		}

		/* Increase our received blocks counter */
		idata->recblocks++;

		/* If we have our total number of blocks */
		if (idata->recblocks == idata->totalblocks) {
			GSList *temp;
			struct irc_channel *u;

			/* Let's grab our list of people and bring them all on or off line */
			temp = idata->templist;

			/* Loop */
			while (temp) {

				u = temp->data;

				/* Tell Gaim to bring the person on or off line */
				serv_got_update(gc, u->name, u->id, 0, 0, 0, 0, 0);

				/* Grab the next entry */
				temp = g_slist_next(temp);
			}

			/* And now, let's delete all of our entries */
			temp = idata->templist;
			while (temp) {
				u = temp->data;
				g_free(u->name);
				temp = g_slist_remove(temp, u);
			}

			/* Reset our list */
			idata->totalblocks = 0;
			idata->recblocks = 0;

			idata->templist = NULL;

			return;
		}

		/* And free our pointers */
		g_strfreev(buf2);

		return;

	}


	if ((strstr(buf, " MODE ")) && (strstr(buf, "!")) && (strstr(buf, "+v") || strstr(buf, "-v") || strstr(buf, "-o") || strstr(buf, "+o")) && (buf[0] == ':') && (!strstr(buf, " NOTICE "))) {
	  
	  gchar u_channel[128];
	  gchar u_nick[128];
	   
	  gchar u_mode[5];
	  char **people;
	  gchar *temp, *temp_new;
	 
	  
	  struct irc_channel *channel;
	  int j;
	  temp = NULL;
	  temp_new = NULL;


	  for (j = 0, i = 1; buf[i] != '!'; j++, i++) {
	    u_nick[j] = buf[i];
	  }
	  u_nick[j] = '\0';
	  i++;

	  for (j = 0; buf[i] != '#'; j++, i++) {
	  }
	  i++;

	  for (j = 0; buf[i] != ' '; j++, i++) {
	    u_channel[j] = buf[i];
	  }
	  
	  u_channel[j] = '\0';
	  i++;
	  
	  for (j = 0; buf[i] != ' '; j++, i++) {
	    u_mode[j] = buf[i];
	  }
	  u_mode[j] = '\0';
	  i++;
	  

	  
	  
	  people = g_strsplit(buf + i, " ", 3);
	  
	  
	  
	  channel = find_channel_by_name(gc, u_channel);
	  	  	  
	  if (!channel) {
	    return;
	  }
	  
	  for (j = 0; j < strlen(u_mode) - 1 ; j++) 
	    {
	      
	      	
		  struct conversation *convo = NULL;
		  convo = find_conversation_by_id(gc, channel->id);
		  
		  
		  
		  temp = (gchar *)g_malloc(strlen(people[j]) + 3);
		  temp_new = (gchar *)g_malloc(strlen(people[j]) + 3);
		  g_snprintf(temp, strlen(people[j]) + 2, "@%s", people[j]);
		  
		  if (u_mode[1] == 'v' && u_mode[0] == '+') {
		    g_snprintf(temp_new, strlen(people[j]) + 2, "+%s", people[j]);
		  }
		  else if (u_mode[1] == 'o' && u_mode[0] == '+') {
		    g_snprintf(temp_new, strlen(people[j]) + 2, "@%s", people[j]);
		  }

		  else if (u_mode[0] == '-') {
		    g_snprintf(temp_new, strlen(people[j]) + 1, "%s", people[j]);
	       		  }
		  

		  
		  rename_chat_buddy(convo, temp, temp_new);
		  g_snprintf(temp, strlen(people[j]) + 2, "+%s", people[j]);
		  rename_chat_buddy(convo, temp, temp_new);
		  
		  rename_chat_buddy(convo, people[j], temp_new);
		  
		  
		  
		    
		
	    }
	  if (temp)
	    g_free(temp);
	  if (temp_new)
	    g_free(temp_new);
	  
	  return;
	}
	

	if ((strstr(buf, " KICK ")) && (strstr(buf, "!")) && (buf[0] == ':') && (!strstr(buf, " NOTICE "))) {
	  gchar u_channel[128];
	  gchar u_nick[128];
	  gchar u_comment[128];
	  gchar u_who[128];
	  
	  int id;
	  
	  gchar *temp;

	

	  struct irc_channel *channel;
	  int j;

	  temp = NULL;

	  for (j = 0, i = 1; buf[i] != '!'; j++, i++) {
	    u_nick[j] = buf[i];
	  }
	  u_nick[j] = '\0';
	  i++;

	  for (j = 0; buf[i] != '#'; j++, i++) {
	  }
	  i++;

	  for (j = 0; buf[i] != ' '; j++, i++) {
	    u_channel[j] = buf[i];
	  }
	  
	  u_channel[j] = '\0';
	  i++;

	  for (j = 0; buf[i] != ' '; j++, i++) {
	    u_who[j] = buf[i];
	  }
	  u_who[j] = '\0';
	  i++;
	  i++;
	  strcpy(u_comment, buf + i);
	  g_strchomp(u_comment);

	  channel = find_channel_by_name(gc, u_channel);
	  
	  if (!channel) {
	    return;
	  }
	 

	  id = find_id_by_name(gc, u_channel);
	  
	
		if (g_strcasecmp(u_nick, gc->username) == 0) {

		  /* It looks like you've been naughty! */
	
			serv_got_chat_left(gc, channel->id);

			idata->channels = g_list_remove(idata->channels, channel);
		} 
		else {
		        struct conversation *convo = NULL;

			/* Find their conversation window */
		convo = find_conversation_by_id(gc, channel->id);

			if (!convo) {
				/* Some how the window doesn't exist. 
				 * Let's get out of here */
			  		return;
			}

			/* And remove their name */
			/* If the person is an op or voice, this won't work.
			 * so we'll just do a nice hack and remove nick and
			 * @nick and +nick.  Truly wasteful.
			 */
			  
			temp = (gchar *) g_malloc(strlen(u_who) + 3);
			g_snprintf(temp, strlen(u_who) + 2, "@%s", u_who);
			remove_chat_buddy(convo, temp);
			g_free(temp);
			temp = (gchar *) g_malloc(strlen(u_who) + 3);
			g_snprintf(temp, strlen(u_who) + 2, "+%s", u_who);
			remove_chat_buddy(convo, temp);
 			remove_chat_buddy(convo, u_who);
			
			g_free(temp);
			
		}

		/* Go Home! */
		return;
	}

	
	if ((strstr(buf, " JOIN ")) && (strstr(buf, "!")) && (buf[0] == ':') && (!strstr(buf, " NOTICE "))) {

		gchar u_channel[128];
		gchar u_nick[128];

		struct irc_channel *channel;
		int j;

		for (j = 0, i = 1; buf[i] != '!'; j++, i++) {
			u_nick[j] = buf[i];
		}

		u_nick[j] = '\0';
		i++;

		for (j = 0; buf[i] != '#'; j++, i++) {
		}

		i++;

		strcpy(u_channel, buf + i);

		g_strchomp(u_channel);

		/* Looks like we're going to join the channel for real 
		 * now.  Let's create a valid channel structure and add 
		 * it to our list.  Let's make sure that
		 * we are not already in a channel first */

		channel = find_channel_by_name(gc, u_channel);

		if (!channel) {

			chat_id++;

			channel = g_new0(struct irc_channel, 1);

			channel->id = chat_id;
			channel->name = strdup(u_channel);

			idata->channels = g_list_append(idata->channels, channel);

			serv_got_joined_chat(gc, chat_id, u_channel);
		} else {
			struct conversation *convo = NULL;

			/* Someone else joined. Find their conversation
			 * window */
			convo = find_conversation_by_id(gc, channel->id);

			/* And add their name to it */
			add_chat_buddy(convo, u_nick);

		}

		return;
	}

	if ((strstr(buf, " NICK ")) && (strstr(buf, "!")) && (buf[0] == ':') && (!strstr(buf, " NOTICE "))) {

		gchar old[128];
		gchar new[128];

		GList *templist;
		gchar *temp, *temp_new;
		struct irc_channel *channel;
		int j;
		temp = temp_new = NULL;
		for (j = 0, i = 1; buf[i] != '!'; j++, i++) {
			old[j] = buf[i];
		}

		old[j] = '\0';
		i++;

		for (j = 0; buf[i] != ':'; j++, i++) {
		}

		i++;
		strcpy(new, buf + i);

		g_strchomp(new);

		templist = ((struct irc_data *)gc->proto_data)->channels;

		while (templist) {
			struct conversation *convo = NULL;
			channel = templist->data;

			convo = find_conversation_by_id(gc, channel->id);
			
			/* If the person is an op or voice, this won't work.
			 * so we'll just do a nice hack and rename nick and
			 * @nick and +nick.  Truly wasteful.
			 */
			
			temp = (gchar *)g_malloc(strlen(old) + 5);
			temp_new = (gchar *)g_malloc(strlen(new) + 5);
			g_snprintf(temp_new, strlen(new) + 2, "@%s", new);
			g_snprintf(temp, strlen(old) + 2, "@%s", old);
			rename_chat_buddy(convo, temp, temp_new);
			g_snprintf(temp, strlen(old) + 2, "+%s", old);
			g_snprintf(temp_new, strlen(new) + 2, "+%s", new);
			rename_chat_buddy(convo, temp, temp_new);
 			rename_chat_buddy(convo, old, new);
			if (temp)
			  g_free(temp);
			if (temp_new)
			  g_free(temp_new);
			
			templist = templist->next;
		}
		return;
	}


	if ((strstr(buf, "QUIT ")) && (buf[0] == ':') && (strstr(buf, "!")) && (!strstr(buf, " NOTICE "))) {
	      
		gchar u_nick[128];
		gchar *temp;
		GList *templist;

		struct irc_channel *channel;
		int j;
		

		temp  = NULL;
		for (j = 0, i = 1 ; buf[i] != '!'; j++, i++) {
		    u_nick[j] = buf[i];
		}

		u_nick[j] = '\0';

		templist = ((struct irc_data *)gc->proto_data)->channels;

		while (templist) {
			struct conversation *convo = NULL;
			channel = templist->data;

			convo = find_conversation_by_id(gc, channel->id);
			
			/* If the person is an op or voice, this won't work.
			 * so we'll just do a nice hack and remove nick and
			 * @nick and +nick.  Truly wasteful.
			 */
			
			temp = (gchar *) g_malloc(strlen(u_nick) + 2);
			g_snprintf(temp, strlen(u_nick) + 2, "@%s", u_nick);
			remove_chat_buddy(convo, temp);
			g_free(temp);
			temp = (gchar *) g_malloc(strlen(u_nick) + 2);
			g_snprintf(temp, strlen(u_nick) + 2, "+%s", u_nick);
			remove_chat_buddy(convo, temp);
 			remove_chat_buddy(convo, u_nick);
			
			
			
			templist = templist->next;
		}

		 g_free(temp);
		
		return;
	}
	
	  

	if ((strstr(buf, " PART ")) && (strstr(buf, "!")) && (buf[0] == ':') && (!strstr(buf, " NOTICE "))) {

	        gchar u_channel[128];
		gchar u_nick[128];
		gchar *temp;
		struct irc_channel *channel;
		int j;
		temp = NULL;
		for (j = 0, i = 1; buf[i] != '!'; j++, i++) {
			u_nick[j] = buf[i];
		}
		u_nick[j] = '\0';

		i++;

		for (j = 0; buf[i] != '#'; j++, i++) {
		}

		i++;

		for (j = 0;  buf[i] != ' '; j++, i++) {
		  if (buf[i] == '\0') {
		    break;
		  }
		  u_channel[j] = buf[i];
		}
		u_channel[j] = '\0';
		
		 /* Now, lets check to see if it was US that was leaving.  
		 * If so, do the correct thing by closing up all of our 
		 * old channel stuff. Otherwise,
		 * we should just print that someone left */

		channel = find_channel_by_name(gc, u_channel);

		if (!channel) {
		  	return;
		}
		
		if (g_strcasecmp(u_nick, gc->username) == 0) {
		  
		  /* Looks like we're going to leave the channel for 
		   * real now.  Let's create a valid channel structure 
		   * and add it to our list */
		  
		  serv_got_chat_left(gc, channel->id);
		  
		  idata->channels = g_list_remove(idata->channels, channel);
		} 
		else {
		  struct conversation *convo = NULL;
		  
		  /* Find their conversation window */
		  convo = find_conversation_by_id(gc, channel->id);
		  
		  if (!convo) {
				/* Some how the window doesn't exist. 
				 * Let's get out of here */
		    return;
		  }
		  
		  /* And remove their name */
		  /* If the person is an op or voice, this won't work.
		   * so we'll just do a nice hack and remove nick and
		   * @nick and +nick.  Truly wasteful.
		   */
		  
		  temp = (gchar *) g_malloc(strlen(u_nick) + 3);
		  g_snprintf(temp, strlen(u_nick) + 2, "@%s", u_nick);
		  remove_chat_buddy(convo, temp);
		  g_free(temp);
		  temp = (gchar *) g_malloc(strlen(u_nick) + 3);
		  g_snprintf(temp, strlen(u_nick) + 2, "+%s", u_nick);
		  remove_chat_buddy(convo, temp);
		  g_free(temp);
		  remove_chat_buddy(convo, u_nick);
		     
		  
		}
		
		/* Go Home! */
		return;
	}
	
	if ((strstr(buf, " NOTICE ")) && (buf[0] == ':')) {
		gchar u_nick[128];
		gchar u_host[255];
		gchar u_command[32];
		gchar u_channel[128];
		gchar u_message[IRC_BUF_LEN];
		int j;

		for (j = 0, i = 1; buf[i] != '!'; j++, i++) {
			u_nick[j] = buf[i];
		}

		u_nick[j] = '\0';
		i++;

		for (j = 0; buf[i] != ' '; j++, i++) {
			u_host[j] = buf[i];
		}

		u_host[j] = '\0';
		i++;

		for (j = 0; buf[i] != ' '; j++, i++) {
			u_command[j] = buf[i];
		}

		u_command[j] = '\0';
		i++;

		for (j = 0; buf[i] != ':'; j++, i++) {
			u_channel[j] = buf[i];
		}

		u_channel[j - 1] = '\0';
		i++;


		/* Now that everything is parsed, the rest of this baby must be our message */
		strncpy(u_message, buf + i, IRC_BUF_LEN);

		/* Now, lets check the message to see if there's anything special in it */
		if (u_message[0] == '\001') {
			if ((g_strncasecmp(u_message, "\001PING ", 6) == 0) && (strlen(u_message) > 6)) {
				/* Someone's triyng to ping us.  Let's respond */
				gchar u_arg[24];
				gchar u_buf[200];
				unsigned long tend= time((time_t *)NULL);
				unsigned long tstart;
				
				printf("LA: %s\n", buf);

				strcpy(u_arg, u_message + 6);
				u_arg[strlen(u_arg) - 1] = '\0';

				tstart = atol(u_arg);

				g_snprintf(u_buf, sizeof(u_buf), "Ping Reply From %s: [%ld seconds]", u_nick, tend-tstart);

				do_error_dialog(u_buf, "Gaim IRC - Ping Reply");

				return;
			}
		}

	}


	if ((strstr(buf, " PRIVMSG ")) && (buf[0] == ':')) {
	  gchar u_nick[128];
	  gchar u_host[255];
	  gchar u_command[32];
	  gchar u_channel[128];
	  gchar u_message[IRC_BUF_LEN];
	  gboolean is_closing;	  

	  int j;
	  
	  
	  for (j = 0, i = 1; buf[i] != '!'; j++, i++) {
	    u_nick[j] = buf[i];
	  }
	  
	  u_nick[j] = '\0';
	  i++;
	  
	  for (j = 0; buf[i] != ' '; j++, i++) {
	    u_host[j] = buf[i];
	  }
	  
	  u_host[j] = '\0';
	  i++;
	  
	  for (j = 0; buf[i] != ' '; j++, i++) {
	    u_command[j] = buf[i];
	  }
	  
	  u_command[j] = '\0';
	  i++;
	  
	  for (j = 0; buf[i] != ':'; j++, i++) {
	    u_channel[j] = buf[i];
	  }
	  
	  u_channel[j - 1] = '\0';
	  i++;
	  
	  
	  /* Now that everything is parsed, the rest of this baby must be our message */
	  strncpy(u_message, buf + i, IRC_BUF_LEN);
	  
	  /* Now, lets check the message to see if there's anything special in it */
	  if (u_message[0] == '\001') {
	    if (g_strncasecmp(u_message, "\001VERSION", 8) == 0) {
				/* Looks like we have a version request.  Let
				 * us handle it thusly */
	      
	      g_snprintf(buf, IRC_BUF_LEN,
			 "NOTICE %s :%cVERSION GAIM %s:The Pimpin Penguin AIM Clone:%s%c\n",
			 u_nick, '\001', VERSION, WEBSITE, '\001');
	      
	      write(idata->fd, buf, strlen(buf));
	      
				/* And get the heck out of dodge */
	      return;
	    }
	    
	    if ((g_strncasecmp(u_message, "\001PING ", 6) == 0) && (strlen(u_message) > 6)) {
				/* Someone's triyng to ping us.  Let's respond */
	      gchar u_arg[24];
	      
	      strcpy(u_arg, u_message + 6);
	      u_arg[strlen(u_arg) - 1] = '\0';
	      
	      g_snprintf(buf, IRC_BUF_LEN, "NOTICE %s :%cPING %s%c\n", u_nick, '\001',
			 u_arg, '\001');
	      
	      write(idata->fd, buf, strlen(buf));
	      
				/* And get the heck out of dodge */
	      return;
	    }
	    
	    if (g_strncasecmp(u_message, "\001ACTION ", 8) == 0) {
				/* Looks like we have an action. Let's parse it a little */
	      strcpy(buf, u_message);
	      
	      strcpy(u_message, "/me ");
	      for (j = 4, i = 8; buf[i] != '\001'; i++, j++) {
		u_message[j] = buf[i];
	      }
	      u_message[j] = '\0';
	    }
	  }


	  /* OK, It is a chat or IM message.  Here, let's translate the IRC formatting into
	   * good ol' fashioned gtkimhtml style hypertext markup. */

	 
	  is_closing = FALSE;

	  while(strchr(u_message, '\002')) {         // \002 = ^B
	    gchar *current;
	    gchar *temp, *free_here;
	    
	    
	    temp =  g_strdup(strchr(u_message, '\002'));
	    free_here = temp; 
	    temp++;
	    
	    current = strchr(u_message, '\002');
	    *current = '<';
	    current++;
	    if (is_closing) {
	      *current = '/';
	      current++;
	    }
	    *current = 'b';
	    current++;
	    *current = '>';
	    current++;
	    
	    
	    while (*temp != '\0') {
	      *current = *temp;
	      current++;
	      temp++;
	    }
	    *current = '\0';
	    g_free(free_here);

	    is_closing = !is_closing;
	  }

	  is_closing = FALSE;
	  while(strchr(u_message, '\037')) {         // \037 = ^_
	    gchar *current;
	    gchar *temp, *free_here;
	         
	          
	    temp =  g_strdup(strchr(u_message, '\037'));
	    free_here = temp;
	    temp++;
	    
	    current = strchr(u_message, '\037');
	    *current = '<';
	    current++;
	    if (is_closing) {
	      *current = '/';
	      current++;
	    }
	    *current = 'u';
	    current++;
	    *current = '>';
	    current++;
	    
	    
	    while (*temp != '\0') {
	      *current = *temp;
	      current++;
	      temp++;
	    }
	    *current = '\0';
	    g_free(free_here); 
	    is_closing = !is_closing;

	  }

	  while(strchr(u_message, '\003')) {         // \003 = ^C
	    
	    /* This is color formatting.  IRC uses its own weird little system
	     * that we must translate to HTML. */
	    
	    
	    /* The format is something like this:
	     *         ^C5 or ^C5,3
	     * The number before the comma is the foreground color, after is the
	     * background color.  Either number can be 1 or two digits.
	     */
	      
	    gchar *current;
	    gchar *temp, *free_here;
	    gchar *font_tag, *body_tag;     
	    int fg_color, bg_color;
       
	    temp =  g_strdup(strchr(u_message, '\003'));
	    free_here = temp;
	    temp++;
	   
	    fg_color = bg_color = -1; 	    
	    body_tag = font_tag  = "";
	    
	    /* Parsing the color information: */
	    do {
	      if (!isdigit(*temp)) break;      // This translates to </font>
	      fg_color = (int)(*temp - 48);
	      temp++;
	      if (isdigit(*temp)) {
		fg_color = (fg_color * 10) + (int)(*temp - 48);   
		temp++;
	      }
	      if (*temp != ',') break;
	      temp++;
	      if (!isdigit(*temp)) break;      // This translates to </font>
	      bg_color = (int)(*temp - 48);
	      temp++;
	      if (isdigit(*temp)) {
		bg_color = (bg_color * 10) + (int)(*temp - 48);   
		temp++;
	      } 
	    }while (FALSE);
	    
	    if (fg_color > 15)
	      fg_color = fg_color % 16;
	    if (bg_color > 15)
	      bg_color = bg_color % 16;
	    
	    switch (fg_color) {
	    case -1:
	      font_tag = "</font></body>";
	      break;
	    case 0:                    // WHITE
	      font_tag = "<font color=\"#ffffff\">";
	      /* If no background color is specified, we're going to make it black anyway.
	       * That's probably what the sender anticipated the background color to be. 
	       * White on white would be illegible.
	       */
	      if (bg_color == -1) {
		body_tag = "<body bgcolor=\"#000000\">";
	      }
	      break;
	    case 1:                    // BLACK
	      font_tag = "<font color=\"#000000\">";
	      break;
	    case 2:                    // NAVY BLUE
	      font_tag = "<font color=\"#000066\">";
	      break;
	    case 3:                    // GREEN
	      font_tag = "<font color=\"#006600\">";
	      break;
	    case 4:                    // RED
	      font_tag = "<font color=\"#ff0000\">";
	      break;
	    case 5:                    // MAROON
	      font_tag = "<font color=\"#660000\">";
	      break;
	    case 6:                    // PURPLE
	      font_tag = "<font color=\"#660066\">";
	      break;
	    case 7:                    // DISGUSTING PUKE COLOR
	      font_tag = "<font color=\"#666600\">";
	      break;
	    case 8:                    // YELLOW
	      font_tag = "<font color=\"#cccc00\">";
	      break;
	    case 9:                    // LIGHT GREEN
	      font_tag = "<font color=\"#33cc33\">";
	      break;
	    case 10:                    // TEAL
	      font_tag = "<font color=\"#00acac\">";
	      break;
	    case 11:                    // CYAN
	      font_tag = "<font color=\"#00ccac\">";
	      break;
	    case 12:                    // BLUE
	      font_tag = "<font color=\"#0000ff\">";
	      break;
	    case 13:                    // PINK
	      font_tag = "<font color=\"#cc00cc\">";
	      break;
	    case 14:                    // GREY
	      font_tag = "<font color=\"#666666\">";
	      break;
	    case 15:                    // SILVER
	      font_tag = "<font color=\"#00ccac\">";
	      break;
	    }
	      
	    switch (bg_color) {
	    case 0:                    // WHITE
	      body_tag = "<body bgcolor=\"#ffffff\">";
	      break;
	    case 1:                    // BLACK
	      body_tag = "<body bgcolor=\"#000000\">";
	      break;
	    case 2:                    // NAVY BLUE
	      body_tag = "<body bgcolor=\"#000066\">";
	      break;
	    case 3:                    // GREEN
	      body_tag = "<body bgcolor=\"#006600\">";
	      break;
	    case 4:                    // RED
	      body_tag = "<body bgcolor=\"#ff0000\">";
	      break;
	    case 5:                    // MAROON
	      body_tag = "<body bgcolor=\"#660000\">";
	      break;
	    case 6:                    // PURPLE
	      body_tag = "<body bgcolor=\"#660066\">";
	      break;
	    case 7:                    // DISGUSTING PUKE COLOR
	      body_tag = "<body bgcolor=\"#666600\">";
	      break;
	    case 8:                    // YELLOW
	      body_tag = "<body bgcolor=\"#cccc00\">";
	      break;
	    case 9:                    // LIGHT GREEN
	      body_tag = "<body bgcolor=\"#33cc33\">";
	      break;
	    case 10:                    // TEAL
	      body_tag = "<body bgcolor=\"#00acac\">";
	      break;
	    case 11:                    // CYAN
	      body_tag = "<body bgcolor=\"#00ccac\">";
	      break;
	    case 12:                    // BLUE
	      body_tag = "<body bgcolor=\"#0000ff\">";
	      break;
	    case 13:                    // PINK
	      body_tag = "<body bgcolor=\"#cc00cc\">";
	      break;
	    case 14:                    // GREY
	      body_tag = "<body bgcolor=\"#666666\">";
	      break;
	    case 15:                    // SILVER
	      body_tag = "<body bgcolor=\"#00ccac\">";
	      break;
	    }
	      
	    current = strchr(u_message, '\003');
	    
	    while (*body_tag != '\0') {
	      *current = *body_tag;
	      current++;
	      body_tag++;
	    }	    
	    
	    while (*font_tag != '\0') {
	      *current = *font_tag;
	      current++;
	      font_tag++;
	    }	    

	    while (*temp != '\0') {
	      *current = *temp;
	      current++;
	      temp++;
	    }
	    *current = '\0';
	    g_free(free_here); 
	    is_closing = !is_closing;

	  }

	    while(strchr(u_message, '\017')) {         // \017 = ^O
	    gchar *current;
	    gchar *temp, *free_here;
	         
	          
	    temp =  g_strdup(strchr(u_message, '\017'));
	    free_here = temp;
	    temp++;
	    
	    current = strchr(u_message, '\017');
	    *current = '<';
	    current++;
	    *current = '/';
	    current++;
	    *current = 'b';
	    current++;
	    *current = '>';
	    current++;
	    *current = '<';
	    current++;
	    *current = '/';
	    current++;
	    *current = 'u';
	    current++;
	    *current = '>';
	    current++;
	       
	    while (*temp != '\0') {
	      *current = *temp;
	      current++;
	      temp++;
	    }
	    *current = '\0';
	    g_free(free_here);
	  }
		  
	  /* Let's check to see if we have a channel on our hands */
	  if (u_channel[0] == '#') {
	    /* Yup.  We have a channel */
	    int id;
	    
	    id = find_id_by_name(gc, u_channel);
	    if (id != -1) {
	      serv_got_chat_in(gc, id, u_nick, 0, u_message, time((time_t)NULL));
	      
	    } 
	    
	  } else {
	    /* Nope. Let's treat it as a private message */
	    
	    gchar *temp;
	    temp = NULL;
	    	    
	    temp = (gchar *) g_malloc(strlen(u_nick) + 5);
	    g_snprintf(temp, strlen(u_nick) + 2, "@%s", u_nick); 
	    
	    
	    /* If I get a message from SeanEgn, and I already have a window
	     * open for him as @SeanEgn or +SeanEgn, this will keep it in the
	     * same window.  Unfortunately, if SeanEgn loses his op status
	     * (a sad thing indeed), the messages will still appear to come from
	     * @SeanEgn, until that convo is closed.
	     */
	    
	    if (find_conversation(temp)){ 
	      serv_got_im(gc, temp, u_message, 0, time((time_t)NULL));
	      g_free(temp);
	      return; 
	    }
	    else {
	      g_snprintf(temp, strlen(u_nick) + 2, "+%s", u_nick);
	      if (find_conversation(temp)) { 
		serv_got_im(gc, temp, u_message, 0, time((time_t)NULL));
		g_free(temp);
		return; 
	      }
	      else {
		g_free(temp);
		serv_got_im(gc, u_nick, u_message, 0, time((time_t)NULL));
		return;
	      }
	    }
	  }
 
	  return;
	}
	
	/* Let's parse PING requests so that we wont get booted for inactivity */

	if (strncmp(buf, "PING :", 6) == 0) {
		buf2 = g_strsplit(buf, ":", 1);

		/* Let's build a new response */
		g_snprintf(buf, IRC_BUF_LEN, "PONG :%s\n", buf2[1]);
		write(idata->fd, buf, strlen(buf));

		/* And clean up after ourselves */
		g_strfreev(buf2);

		return;
	}

}

static void irc_close(struct gaim_connection *gc)
{
	struct irc_data *idata = (struct irc_data *)gc->proto_data;
	GList *chats = idata->channels;
	struct irc_channel *cc;

	gchar *buf = (gchar *) g_malloc(IRC_BUF_LEN);

	g_snprintf(buf, IRC_BUF_LEN, "QUIT :Download GAIM [%s]\n", WEBSITE);
	write(idata->fd, buf, strlen(buf));

	g_free(buf);

	if (idata->timer)
		gtk_timeout_remove(idata->timer);

	while (chats) {
		cc = (struct irc_channel *)chats->data;
		g_free(cc->name);
		chats = g_list_remove(chats, cc);
		g_free(cc);
	}

	if (gc->inpa)
		gdk_input_remove(gc->inpa);

	if (idata->inpa)
		gdk_input_remove(idata->inpa);

	close(idata->fd);
	g_free(gc->proto_data);
}

static void irc_chat_leave(struct gaim_connection *gc, int id)
{
	struct irc_data *idata = (struct irc_data *)gc->proto_data;
	struct irc_channel *channel;
	gchar *buf = (gchar *) g_malloc(IRC_BUF_LEN + 1);

	channel = find_channel_by_id(gc, id);

	if (!channel) {
		return;
	}

	g_snprintf(buf, IRC_BUF_LEN, "PART #%s\n", channel->name);
	write(idata->fd, buf, strlen(buf));

	g_free(buf);
}

static void irc_login_callback(gpointer data, gint source, GdkInputCondition condition)
{
	struct gaim_connection *gc = data;
	struct irc_data *idata = gc->proto_data;
	char buf[4096];

	if (source == -1) {
		hide_login_progress(gc, "Write error");
		signoff(gc);
		return;
	}

	if (idata->fd == 0)
		idata->fd = source;

 	g_snprintf(buf, 4096, "NICK %s\n USER %s localhost %s :GAIM (%s)\n",
 		   gc->username, g_get_user_name(), gc->user->proto_opt[USEROPT_SERV], WEBSITE);

	if (write(idata->fd, buf, strlen(buf)) < 0) {
		hide_login_progress(gc, "Write error");
		signoff(gc);
		return;
	}

	idata->inpa = gdk_input_add(idata->fd, GDK_INPUT_READ, irc_callback, gc);
	idata->inpa = 0;

	/* Now lets sign ourselves on */
	account_online(gc);
	serv_finish_login(gc);

	if (bud_list_cache_exists(gc))
		do_import(NULL, gc);

	/* we don't call this now because otherwise some IRC servers might not like us */
	idata->timer = gtk_timeout_add(20000, (GtkFunction)irc_request_buddy_update, gc);
}

static void irc_login(struct aim_user *user)
{
	char buf[4096];

	struct gaim_connection *gc = new_gaim_conn(user);
	struct irc_data *idata = gc->proto_data = g_new0(struct irc_data, 1);

	g_snprintf(buf, sizeof(buf), "Signon: %s", gc->username);
	set_login_progress(gc, 2, buf);

	idata->fd = proxy_connect(user->proto_opt[USEROPT_SERV],
			user->proto_opt[USEROPT_PORT][0] ? atoi(user->proto_opt[USEROPT_PORT]) : 6667,
			irc_login_callback, gc);
	if (!user->gc || (idata->fd < 0)) {
		hide_login_progress(gc, "Unable to create socket");
		signoff(gc);
		return;
	}
}

static void irc_print_option(GtkEntry *entry, struct aim_user *user)
{
	int entrynum;

	entrynum = (int)gtk_object_get_user_data(GTK_OBJECT(entry));

	if (entrynum == USEROPT_SERV) {
		g_snprintf(user->proto_opt[USEROPT_SERV],
			sizeof(user->proto_opt[USEROPT_SERV]), "%s", gtk_entry_get_text(entry));
	} else if (entrynum == USEROPT_PORT) {
		g_snprintf(user->proto_opt[USEROPT_PORT],
			sizeof(user->proto_opt[USEROPT_PORT]), "%s", gtk_entry_get_text(entry));
	}
}

static void irc_user_opts(GtkWidget * book, struct aim_user *user)
{
	/* so here, we create the new notebook page */
	GtkWidget *vbox;
	GtkWidget *hbox;
	GtkWidget *label;
	GtkWidget *entry;

	vbox = gtk_vbox_new(FALSE, 5);
	gtk_container_set_border_width(GTK_CONTAINER(vbox), 5);
	gtk_notebook_append_page(GTK_NOTEBOOK(book), vbox, gtk_label_new("IRC Options"));
	gtk_widget_show(vbox);

	hbox = gtk_hbox_new(FALSE, 5);
	gtk_box_pack_start(GTK_BOX(vbox), hbox, FALSE, FALSE, 0);
	gtk_widget_show(hbox);

	label = gtk_label_new("Server:");
	gtk_box_pack_start(GTK_BOX(hbox), label, FALSE, FALSE, 0);
	gtk_widget_show(label);

	entry = gtk_entry_new();
	gtk_box_pack_end(GTK_BOX(hbox), entry, FALSE, FALSE, 0);
	gtk_object_set_user_data(GTK_OBJECT(entry), (void *)USEROPT_SERV);
	gtk_signal_connect(GTK_OBJECT(entry), "changed", GTK_SIGNAL_FUNC(irc_print_option), user);
	if (user->proto_opt[USEROPT_SERV][0]) {
		debug_printf("setting text %s\n", user->proto_opt[USEROPT_SERV]);
		gtk_entry_set_text(GTK_ENTRY(entry), user->proto_opt[USEROPT_SERV]);
	}
	gtk_widget_show(entry);

	hbox = gtk_hbox_new(FALSE, 0);
	gtk_box_pack_start(GTK_BOX(vbox), hbox, FALSE, FALSE, 0);
	gtk_widget_show(hbox);

	label = gtk_label_new("Port:");
	gtk_box_pack_start(GTK_BOX(hbox), label, FALSE, FALSE, 0);
	gtk_widget_show(label);

	entry = gtk_entry_new();
	gtk_box_pack_end(GTK_BOX(hbox), entry, FALSE, FALSE, 0);
	gtk_object_set_user_data(GTK_OBJECT(entry), (void *)USEROPT_PORT);
	gtk_signal_connect(GTK_OBJECT(entry), "changed", GTK_SIGNAL_FUNC(irc_print_option), user);
	if (user->proto_opt[USEROPT_PORT][0]) {
		debug_printf("setting text %s\n", user->proto_opt[USEROPT_PORT]);
		gtk_entry_set_text(GTK_ENTRY(entry), user->proto_opt[USEROPT_PORT]);
	} else
		gtk_entry_set_text(GTK_ENTRY(entry), "6667");

	gtk_widget_show(entry);
}

static char **irc_list_icon(int uc)
{
	return free_icon_xpm;
}

/* Send out a ping request to the specified user */
static void irc_send_ping(GtkObject * w, char *who)
{
	struct gaim_connection *gc = (struct gaim_connection *)gtk_object_get_user_data(w);
	struct irc_data *idata = (struct irc_data *)gc->proto_data;
	char buf[BUF_LEN];

	g_snprintf(buf, BUF_LEN, "PRIVMSG %s :%cPING %ld%c\n", who, '\001', time((time_t *)NULL), '\001');

	write(idata->fd, buf, strlen(buf));
}

/* Do a whois check on someone :-) */
static void irc_get_info(struct gaim_connection *gc, char *who)
{
	struct irc_data *idata = (struct irc_data *)gc->proto_data;
	char buf[BUF_LEN];

	if (((who[0] == '@') || (who[0] == '+')) && (strlen(who)>1))
		g_snprintf(buf, BUF_LEN, "WHOIS %s\n", who+1);
	else
		g_snprintf(buf, BUF_LEN, "WHOIS %s\n", who);
	write(idata->fd, buf, strlen(buf));
}

static void irc_send_whois(GtkObject * w, char *who)
{
	struct gaim_connection *gc = (struct gaim_connection *)gtk_object_get_user_data(w);
	irc_get_info(gc, who);
}

static void irc_buddy_menu(GtkWidget * menu, struct gaim_connection *gc, char *who)
{
	GtkWidget *button;

	button = gtk_menu_item_new_with_label("Ping");
	gtk_signal_connect(GTK_OBJECT(button), "activate", GTK_SIGNAL_FUNC(irc_send_ping), who);
	gtk_object_set_user_data(GTK_OBJECT(button), gc);
	gtk_menu_append(GTK_MENU(menu), button);
	gtk_widget_show(button);

	button = gtk_menu_item_new_with_label("Whois");
	gtk_signal_connect(GTK_OBJECT(button), "activate", GTK_SIGNAL_FUNC(irc_send_whois), who);
	gtk_object_set_user_data(GTK_OBJECT(button), gc);
	gtk_menu_append(GTK_MENU(menu), button);
	gtk_widget_show(button);
}


static void irc_set_away(struct gaim_connection *gc, char *state, char *msg)
{
	struct irc_data *idata = (struct irc_data *)gc->proto_data;
	char buf[BUF_LEN];

	if (msg)
		g_snprintf(buf, BUF_LEN, "AWAY :%s\n", msg);		
	else
		g_snprintf(buf, BUF_LEN, "AWAY\n");		

	write(idata->fd, buf, strlen(buf));
}

static void irc_fake_buddy(struct gaim_connection *gc, char *who)
{
	/* Heh, there is no buddy list. We fake it.
	 * I just need this here so the add and remove buttons will
	 * show up */
}



static struct prpl *my_protocol = NULL;

static void irc_init(struct prpl *ret)
{
	ret->protocol = PROTO_IRC;
	ret->name = irc_name;
	ret->list_icon = irc_list_icon;
	ret->buddy_menu = irc_buddy_menu;
	ret->user_opts = irc_user_opts;
	ret->login = irc_login;
	ret->close = irc_close;
	ret->send_im = irc_send_im;
	ret->join_chat = irc_join_chat;
	ret->chat_leave = irc_chat_leave;
	ret->chat_send = irc_chat_send;
	ret->get_info = irc_get_info;
	ret->set_away = irc_set_away;
	ret->add_buddy = irc_fake_buddy;
	ret->remove_buddy = irc_fake_buddy;

	my_protocol = ret;
}

char *gaim_plugin_init(GModule * handle)
{
	load_protocol(irc_init, sizeof(struct prpl));
	return NULL;
}

void gaim_plugin_remove()
{
	struct prpl *p = find_prpl(PROTO_IRC);
	if (p == my_protocol)
		unload_protocol(p);
}