--- /dev/null
+/*
+ *
+ *
+ *
+ */
+
+#include <aim.h>
+#include <ctype.h>
+
+#ifdef AIMUTIL_USEMACROS
+/* macros in faim/aim.h */
+#else
+faim_shortfunc int aimutil_put8(u_char *buf, u_char data)
+{
+ buf[0] = (u_char)data&0xff;
+ return 1;
+}
+
+faim_shortfunc u_char aimutil_get8(u_char *buf)
+{
+ return buf[0];
+}
+
+/*
+ * Endian-ness issues here?
+ */
+faim_shortfunc int aimutil_put16(u_char *buf, u_short data)
+{
+ buf[0] = (u_char)(data>>8)&0xff;
+ buf[1] = (u_char)(data)&0xff;
+ return 2;
+}
+
+faim_shortfunc u_short aimutil_get16(u_char *buf)
+{
+ u_short val;
+ val = (buf[0] << 8) & 0xff00;
+ val+= (buf[1]) & 0xff;
+ return val;
+}
+
+faim_shortfunc int aimutil_put32(u_char *buf, u_long data)
+{
+ buf[0] = (u_char)(data>>24)&0xff;
+ buf[1] = (u_char)(data>>16)&0xff;
+ buf[2] = (u_char)(data>>8)&0xff;
+ buf[3] = (u_char)(data)&0xff;
+ return 4;
+}
+
+faim_shortfunc u_long aimutil_get32(u_char *buf)
+{
+ u_long val;
+ val = (buf[0] << 24) & 0xff000000;
+ val+= (buf[1] << 16) & 0x00ff0000;
+ val+= (buf[2] << 8) & 0x0000ff00;
+ val+= (buf[3] ) & 0x000000ff;
+ return val;
+}
+#endif /* AIMUTIL_USEMACROS */
+
+faim_export faim_shortfunc int aimutil_putstr(u_char *dest, const char *src, int len)
+{
+ memcpy(dest, src, len);
+ return len;
+}
+
+/*
+ * Tokenizing functions. Used to portably replace strtok/sep.
+ * -- DMP.
+ *
+ */
+faim_export int aimutil_tokslen(char *toSearch, int index, char dl)
+{
+ int curCount = 1;
+ char *next;
+ char *last;
+ int toReturn;
+
+ last = toSearch;
+ next = strchr(toSearch, dl);
+
+ while(curCount < index && next != NULL)
+ {
+ curCount++;
+ last = next + 1;
+ next = strchr(last, dl);
+ }
+
+ if ((curCount < index) || (next == NULL))
+ toReturn = strlen(toSearch) - (curCount - 1);
+ else
+ toReturn = next - toSearch - (curCount - 1);
+
+ return toReturn;
+}
+
+faim_export int aimutil_itemcnt(char *toSearch, char dl)
+{
+ int curCount;
+ char *next;
+
+ curCount = 1;
+
+ next = strchr(toSearch, dl);
+
+ while(next != NULL)
+ {
+ curCount++;
+ next = strchr(next + 1, dl);
+ }
+
+ return curCount;
+}
+
+faim_export char *aimutil_itemidx(char *toSearch, int index, char dl)
+{
+ int curCount;
+ char *next;
+ char *last;
+ char *toReturn;
+
+ curCount = 0;
+
+ last = toSearch;
+ next = strchr(toSearch, dl);
+
+ while(curCount < index && next != NULL)
+ {
+ curCount++;
+ last = next + 1;
+ next = strchr(last, dl);
+ }
+
+ if (curCount < index)
+ {
+ toReturn = malloc(sizeof(char));
+ *toReturn = '\0';
+ }
+ next = strchr(last, dl);
+
+ if (curCount < index)
+ {
+ toReturn = malloc(sizeof(char));
+ *toReturn = '\0';
+ }
+ else
+ {
+ if (next == NULL)
+ {
+ toReturn = malloc((strlen(last) + 1) * sizeof(char));
+ strcpy(toReturn, last);
+ }
+ else
+ {
+ toReturn = malloc((next - last + 1) * sizeof(char));
+ memcpy(toReturn, last, (next - last));
+ toReturn[next - last] = '\0';
+ }
+ }
+ return toReturn;
+}
+
+/*
+ * int snlen(const char *)
+ *
+ * This takes a screen name and returns its length without
+ * spaces. If there are no spaces in the SN, then the
+ * return is equal to that of strlen().
+ *
+ */
+faim_export int aim_snlen(const char *sn)
+{
+ int i = 0;
+ const char *curPtr = NULL;
+
+ if (!sn)
+ return 0;
+
+ curPtr = sn;
+ while ( (*curPtr) != (char) NULL) {
+ if ((*curPtr) != ' ')
+ i++;
+ curPtr++;
+ }
+
+ return i;
+}
+
+/*
+ * int sncmp(const char *, const char *)
+ *
+ * This takes two screen names and compares them using the rules
+ * on screen names for AIM/AOL. Mainly, this means case and space
+ * insensitivity (all case differences and spacing differences are
+ * ignored).
+ *
+ * Return: 0 if equal
+ * non-0 if different
+ *
+ */
+
+faim_export int aim_sncmp(const char *sn1, const char *sn2)
+{
+ const char *curPtr1 = NULL, *curPtr2 = NULL;
+
+ if (aim_snlen(sn1) != aim_snlen(sn2))
+ return 1;
+
+ curPtr1 = sn1;
+ curPtr2 = sn2;
+ while ( (*curPtr1 != (char) NULL) && (*curPtr2 != (char) NULL) ) {
+ if ( (*curPtr1 == ' ') || (*curPtr2 == ' ') ) {
+ if (*curPtr1 == ' ')
+ curPtr1++;
+ if (*curPtr2 == ' ')
+ curPtr2++;
+ } else {
+ if ( toupper(*curPtr1) != toupper(*curPtr2))
+ return 1;
+ curPtr1++;
+ curPtr2++;
+ }
+ }
+
+ return 0;
+}
+
+/* strsep Copyright (C) 1992, 1993 Free Software Foundation, Inc.
+ strsep is part of the GNU C Library.
+
+ The GNU C Library is free software; you can redistribute it and/or
+ modify it under the terms of the GNU Library General Public License as
+ published by the Free Software Foundation; either version 2 of the
+ License, or (at your option) any later version.
+
+ The GNU C Library 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
+ Library General Public License for more details.
+
+ You should have received a copy of the GNU Library General Public
+ License along with the GNU C Library; see the file COPYING.LIB. If
+ not, write to the Free Software Foundation, Inc., 675 Mass Ave,
+ Cambridge, MA 02139, USA. */
+
+/* Minor changes by and1000 on 15/1/97 to make it go under Nemesis */
+
+faim_export char *aim_strsep(char **pp, const char *delim)
+{
+ char *p, *q;
+
+ if (!(p = *pp))
+ return 0;
+
+ if ((q = strpbrk (p, delim)))
+ {
+ *pp = q + 1;
+ *q = '\0';
+ }
+ else
+ *pp = 0;
+
+ return p;
+}