1 files changed, 374 insertions, 0 deletions

diff --git a/vchat-user.c b/vchat-user.c
new file mode 100755
index 0000000..4f4990c
--- /dev/null
+++ b/vchat-user.c
@@ -0,0 +1,374 @@
+/*
+ * vchat-client - alpha version
+ * vchat-user.c - functions working with the userlist
+ *
+ * Copyright (C) 2001 Andreas Kotes <count@flatline.de>
+ *
+ * This program is free software. It can be redistributed and/or modified,
+ * provided that this copyright notice is kept intact. 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. In no event shall the copyright holder be liable for
+ * any direct, indirect, incidental or special damages arising in any way out
+ * of the use of this software. 
+ *
+ */
+
+/* general includes */
+#include <stdlib.h>
+#include <stdio.h>
+#include <string.h>
+#include <sys/types.h>
+#include <regex.h>
+#include "vchat.h"
+
+/* version of this module */
+unsigned char *vchat_us_version = "$Id$";
+
+/* externally used variables */
+/*   current nick */
+unsigned char *nick = NULL;
+/*   current channel */
+int chan = 0;
+/*   userlist */
+user *nicks = NULL;
+
+/* add user to userlist */
+void
+ul_add (unsigned char *name, int ignored)
+{
+  user *tmp = NULL;
+
+  /* is it this client? return */
+  if (nick && !strcasecmp (nick, name))
+    return;
+
+  /* no list? create one */
+  if (!nicks)
+    {
+      nicks = malloc (sizeof (user));
+      memset(nicks,0,sizeof(user));
+      nicks->nick = strdup(name);
+      nicks->chan = 0;       /* users default in channel 0 */
+      nicks->chan_valid = 0;
+      nicks->next = NULL;
+    }
+  else
+    {
+      /* travel list until end */
+      tmp = nicks;
+      while (tmp)
+        {
+          /* it is this user? return */
+          if (!strcmp (name, tmp->nick))
+            return;
+          /* is there a next user? */
+          if (tmp->next)
+            tmp = tmp->next;
+          else
+            {
+              /* create one */
+              tmp->next = malloc (sizeof (user));
+              tmp = tmp->next;
+              memset(tmp,0,sizeof(user));
+              tmp->nick = strdup(name);
+              tmp->chan = 0;
+              tmp->chan_valid = 0;
+              tmp->next = NULL;
+              tmp = NULL;
+            }
+        }
+    }
+}
+
+/* delete user from userlist */
+void
+ul_del (unsigned char *name, int ignored)
+{
+  user *tmp = NULL, *ltmp = NULL;
+
+  /* is it this client? return */
+  if (nick && !strcmp (nick, name))
+    return;
+  /* no list? return */
+  if (!nicks)
+    return;
+  /* the user on top of list? */
+  if (!strcmp (name, nicks->nick))
+    {
+      /* remove user and copy next in list */
+      tmp = nicks->next;
+      free (nicks);
+      nicks = tmp;
+      return;
+    }
+  /* travel through list, skip first entry */
+  ltmp = nicks;
+  tmp = nicks->next;
+  while (tmp)
+    {
+      /* is it this user? */
+      if (!strcmp (name, tmp->nick))
+        {
+          /* hook next to last, discard this */
+          ltmp->next = tmp->next;
+          free (tmp);
+          return;
+        }
+      /* advance in list */
+      ltmp = tmp;
+      tmp = tmp->next;
+    }
+}
+
+/* let user join a channel */
+void
+ul_join (unsigned char *name, int channel)
+{
+  /* is it this client? handle and return */
+  if (nick && !strcmp (nick, name))
+    {
+      ownjoin (channel);
+      return;
+    } else ul_moveuser(name,channel);
+}
+
+user *
+ul_finduser (unsigned char *name) {
+  user *tmp = nicks;
+  /* search user */
+  while (tmp)
+    {
+      /* is it this user? */
+      if (!strcmp (name, tmp->nick))
+        {
+          return tmp;
+        }
+      /* advance in list */
+      tmp = tmp->next;
+    }
+  return NULL;
+}
+
+unsigned char *
+ul_matchuser( unsigned char *regex) {
+  user          *tmp = nicks;
+  unsigned char *dest = tmpstr;
+  regex_t        preg;
+
+  *dest = 0;
+  if( !regcomp( &preg, regex,  REG_ICASE | REG_EXTENDED | REG_NEWLINE)) {
+      while( tmp ) {
+          /* does the username match? */
+          if( !regexec( &preg, tmp->nick, 0, NULL, 0)) /* append username to list */
+              dest += snprintf ( dest, 256, " %s", tmp->nick);
+          tmp = tmp->next;
+      }
+  }
+  regfree( &preg );
+  return tmpstr;
+}
+
+void
+ul_msgto (unsigned char *name) {
+  user *tmp = ul_finduser(name);
+
+  if (tmp)
+     tmp->messaged |= 1;
+}
+
+void
+ul_msgfrom (unsigned char *name) {
+  user *tmp = ul_finduser(name);
+
+  if (tmp)
+     tmp->messaged |= 2;
+}
+
+/* set channel of user */
+void
+ul_moveuser (unsigned char *name, int channel) {
+  user *tmp = ul_finduser(name);
+
+  if (tmp) {
+     /* store channel information and mark it valid */
+     tmp->chan = channel;
+     tmp->chan_valid = 1;
+  }
+}
+
+/* let user leave a channel */
+void
+ul_leave (unsigned char *name, int channel)
+{
+  user *tmp = ul_finduser(name);
+  /* is it this client? handle and return */
+  if (nick && !strcmp (nick, name))
+    {
+      ownleave (channel);
+      return;
+    }
+
+  if (tmp)
+    {
+      /* mark channel information invalid */
+      tmp->chan_valid = 0;
+      return;
+    }
+}
+
+/* let user change nick */
+void
+ul_nickchange (unsigned char *oldnick, unsigned char *newnick)
+{
+  user *tmp = ul_finduser(oldnick);
+  /* is it this client? handle and return */
+  if (nick && !strcmp (nick, oldnick))
+    {
+      ownnickchange (newnick);
+      return;
+    }
+  if (tmp)
+    {
+      /* exchange nickname */
+      free (tmp->nick);
+      tmp->nick = strdup (newnick);
+      return;
+    }
+}
+
+/* clear userlist */
+void
+ul_clear (void)
+{
+  user *tmp = nicks, *tmp2;
+  /* walk list */
+  while (tmp)
+    {
+      /* store next, delete this */
+      tmp2 = tmp->next;
+      free (tmp->nick);
+      free (tmp);
+      /* advance */
+      tmp = tmp2;
+    }
+  /* mark list empty */
+  nicks = NULL;
+}
+
+int ulnc_casenick(user *tmp, const unsigned char *text, int len, int value) {
+   return (!strncmp(tmp->nick, text, len));
+}
+
+int ulnc_ncasenick(user *tmp, const unsigned char *text, int len, int value) {
+   return (!strncasecmp(tmp->nick, text, len));
+}
+
+unsigned char *
+ulnc_complete (const unsigned char *text, int state, int value, int (*checkfn)(user *,const unsigned char *,int,int)) {
+  static int len;
+  static user *tmp;
+  unsigned char *name;
+
+  /* first round? reset pointers! */
+  if (!state)
+    {
+      tmp = nicks;
+      len = strlen (text);
+    }
+
+  /* walk list .. */
+  while (tmp)
+    {
+      /* we found a match? */
+      if (checkfn(tmp,text,len,value))
+        {
+          /* copy nick, advance pointer for next call, return nick */
+          name = tmp->nick;
+          tmp = tmp->next;
+          return name;
+        }
+      else
+        {
+          tmp = tmp->next;
+        }
+    }
+  return NULL;
+}
+
+/* nick completion functions for readline in vchat-ui.c */
+unsigned char *
+ul_nickcomp (const unsigned char *text, int state)
+{
+  int ncasemode;
+  unsigned char *name = NULL;
+  if (!state) ncasemode = 0;
+  if (!ncasemode) {
+     name = ulnc_complete(text,state,0,ulnc_casenick);
+     if (!state && !name) ncasemode = 1;
+  }
+  if (ncasemode)
+     name = ulnc_complete(text,state,0,ulnc_ncasenick);
+  if (name)
+      return strdup(name);
+    else
+      return NULL;
+}
+
+int ulnc_casenickc(user *tmp, const unsigned char *text, int len, int value) {
+   return (!strncmp(tmp->nick, text, len) && (tmp->chan_valid) && (tmp->chan == value));
+}
+
+int ulnc_ncasenickc(user *tmp, const unsigned char *text, int len, int value) {
+   return (!strncasecmp(tmp->nick, text, len) && (tmp->chan_valid) && (tmp->chan == value));
+}
+
+/* nick completion for channel, used by vchat-ui.c */
+unsigned char *
+ul_cnickcomp (const unsigned char *text, int state)
+{
+  int ncasemode;
+  static unsigned char *name = NULL;
+
+  if (!state) ncasemode = 0;
+  if (!ncasemode) {
+     name = ulnc_complete(text,state,chan,ulnc_casenickc);
+     if (!state && !name) ncasemode = 1;
+  }
+  if (ncasemode)
+     name = ulnc_complete(text,state,chan,ulnc_ncasenickc);
+  if (name) {
+     snprintf(tmpstr,TMPSTRSIZE,"%s:",name);
+     return strdup(tmpstr);
+  } else
+     return NULL;
+}
+
+int ulnc_casenickm(user *tmp, const unsigned char *text, int len, int value) {
+   return (!strncmp(tmp->nick, text, len) && (tmp->messaged));
+}
+
+int ulnc_ncasenickm(user *tmp, const unsigned char *text, int len, int value) {
+   return (!strncasecmp(tmp->nick, text, len) && (tmp->messaged));
+}
+
+/* nick completion for channel, used by vchat-ui.c */
+unsigned char *
+ul_mnickcomp (const unsigned char *text, int state)
+{
+  int ncasemode;
+  static unsigned char *name = NULL;
+
+  if (!state) ncasemode = 0;
+  if (!ncasemode) {
+     name = ulnc_complete(text,state,chan,ulnc_casenickm);
+     if (!state && !name) ncasemode = 1;
+  }
+  if (ncasemode)
+     name = ulnc_complete(text,state,chan,ulnc_ncasenickm);
+  if (name) {
+     snprintf(tmpstr,TMPSTRSIZE,".m %s",name);
+     return strdup(tmpstr);
+  } else
+     return NULL;
+}