lib/eggdrop/ircmasks.c File Reference

#include <eggdrop/eggdrop.h>

Go to the source code of this file.

Functions
static int	compute_hash (const char *str, int *hash1, int *hash2)
int	ircmask_list_clear (ircmask_list_t *list)
int	ircmask_list_add (ircmask_list_t *list, const char *ircmask, void *data)
int	ircmask_list_del (ircmask_list_t *list, const char *ircmask, void *data)
int	ircmask_list_find (ircmask_list_t *list, const char *irchost, void *dataptr)
char *	ircmask_create_separate (int type, const char *nick, const char *user, const char *host)
char *	ircmask_create (int type, const char *nick, const char *uhost)
char *	ircmask_create_full (int type, const char *nuhost)
Variables
static const char	rcsid [] = "$Id: ircmasks.c,v 1.15 2005-05-15 17:34:23 stdarg Exp $"

---

Function Documentation

static int compute_hash	(	const char *	str,
		int *	hash1,
		int *	hash2
	)			[static]

Definition at line 207 of file ircmasks.c.

Referenced by ircmask_list_add(), and ircmask_list_find().

{
  unsigned int pair;
  int last = 0;

  *hash1 = *hash2 = 0;
  for (; *str; str++) {
    if (*str == '*' || *str == '?') {
      last = -1;
      continue;
    }
    if (last != -1) {
      pair = (last * 71317 + ((unsigned)tolower(*str)) * 1937) % 64;
      if (pair > 31) *hash2 |= 1 << (pair-32);
      else *hash1 |= 1 << pair;
    }
    last = (unsigned) tolower(*str);
  }
  if (last > 0) {
    pair = (last * 3133719) % 64;
    if (pair > 31) *hash2 |= 1 << (pair-32);
    else *hash1 |= 1 << pair;
  }
  return(0);
}

char* ircmask_create	(	int	type,
		const char *	nick,
		const char *	uhost
	)

Definition at line 174 of file ircmasks.c.

References ircmask_create_separate().

Referenced by chanserv_probe_member().

{
  char *user = strdup(uhost);
  char *at = strchr(uhost, '@');
  char *mask;

  if (at) {
    user[at-uhost] = 0;
    uhost = at+1;
  }
  else user[0] = 0;
  mask = ircmask_create_separate(type, nick, user, uhost);
  free(user);
  return(mask);
}

char* ircmask_create_full	(	int	type,
		const char *	nuhost
	)

Definition at line 190 of file ircmasks.c.

References ircmask_create_separate().

{
  char *nick, *user, *host, *buf, *mask;

  buf = strdup(nuhost);
  nick = buf;
  user = strchr(nick, '!');
  if (user) *user++ = 0;
  else user = "";
  host = strchr(user, '@');
  if (host) *host++ = 0;
  else host = "";
  mask = ircmask_create_separate(type, nick, user, host);
  free(buf);
  return(mask);
}

char* ircmask_create_separate	(	int	type,
		const char *	nick,
		const char *	user,
		const char *	host
	)

Definition at line 116 of file ircmasks.c.

References egg_mprintf().

Referenced by ircmask_create(), and ircmask_create_full().

{
  char *mask;
  char ustar[2] = {0, 0};
  char *domain;
/*
  int replace_numbers = 0;

  if (type >= 10) {
    replace_numbers = 1;
    type -= 10;
  }
*/
  if (type < 5) nick = "*";
  if (type == 2 || type == 4 || type == 7 || type == 9) user = "*";
  else if (type == 1 || type == 3 || type == 6 || type == 8) {
    while (*user && !isalnum(*user)) user++;
    ustar[0] = '*';
  }
  else {
    user = "";
    ustar[0] = '*';
  }

  domain = strdup(host);
  if (type == 3 || type == 4 || type == 8 || type == 9) {
    char *dot = strrchr(host, '.');
    char *colon = strrchr(host, ':');
    if (colon || (dot && isdigit(*(dot+1)))) {
      /* ipv6 or dotted decimal. */
      if (dot < colon) dot = colon;
      domain[host-dot+1] = '*';
      domain[host-dot+2] = 0;
    }
    else if (dot) {
      char *dot2;
      dot = strchr(host, '.');
      if ((dot2 = strchr(dot+1, '.'))) {
        if (strlen(dot2+1) > 2) {
          free(domain);
          domain = egg_mprintf("*%s", dot);
        }
      }
    }
  }
  mask = egg_mprintf("%s!%s%s@%s", nick, ustar, user, domain);
  free(domain);
  /* replaces numbers with '?' 
  if (replace_numbers) {
    char *c = NULL;

    for (c = mask; *c; ++c)
      if (isdigit((unsigned char) *c)) *c = '?';
  }
  */
  return(mask);
}

int ircmask_list_add	(	ircmask_list_t *	list,
		const char *	ircmask,
		void *	data
	)

Definition at line 46 of file ircmasks.c.

References compute_hash(), ircmask_list_entry::data, ircmask_list_entry::hash1, ircmask_list_entry::hash2, ircmask_list_t::head, ircmask_list_entry::ircmask, ircmask_list_entry::len, ircmask_list_entry::next, and NULL.

Referenced by user_add_ircmask(), and user_load().

{
  int i, stars, len;
  ircmask_list_entry_t *entry, *prev;

  stars = 0;
  len = strlen(ircmask);
  for (i = 0; i < len; i++) {
    if (ircmask[i] == '*') stars++;
  }
  len -= stars;
  prev = NULL;
  for (entry = list->head; entry; entry = entry->next) {
    if (len >= entry->len) break;
    prev = entry;
  }
  entry = malloc(sizeof(*entry));
  entry->ircmask = strdup(ircmask);
  entry->len = len;
  entry->data = data;
  compute_hash(ircmask, &entry->hash1, &entry->hash2);
  if (prev) {
    entry->next = prev->next;
    prev->next = entry;
  }
  else {
    entry->next = list->head;
    list->head = entry;
  }
  return(0);
}

int ircmask_list_clear

(

ircmask_list_t *

list

)

Definition at line 28 of file ircmasks.c.

References ircmask_list_t::head, ircmask_list_entry::ircmask, ircmask_list_entry::next, _ident_info::next, and NULL.

{
  ircmask_list_entry_t *entry, *next;

  if (list == NULL) return -1;

  for (entry = list->head; entry; ) {
    next = entry->next;

    free(entry->ircmask);
    free(entry);

    entry = next;
  }

  return (0);
}

int ircmask_list_del	(	ircmask_list_t *	list,
		const char *	ircmask,
		void *	data
	)

Definition at line 78 of file ircmasks.c.

References ircmask_list_t::head, ircmask_list_entry::ircmask, ircmask_list_entry::next, and NULL.

Referenced by cache_user_del(), and user_delete().

{
  ircmask_list_entry_t *entry, *prev;

  prev = NULL;
  for (entry = list->head; entry; entry = entry->next) {
    if (!strcasecmp(ircmask, entry->ircmask)) break;
    prev = entry;
  }
  if (entry) {
    if (prev) prev->next = entry->next;
    else list->head = entry->next;
    free(entry->ircmask);
    free(entry);
  }
  return(0);
}

int ircmask_list_find	(	ircmask_list_t *	list,
		const char *	irchost,
		void *	dataptr
	)

Definition at line 96 of file ircmasks.c.

References compute_hash(), ircmask_list_entry::data, ircmask_list_entry::hash1, ircmask_list_entry::hash2, ircmask_list_t::head, ircmask_list_entry::ircmask, ircmask_list_entry::next, NULL, and wild_match().

Referenced by user_lookup_by_irchost(), and user_lookup_by_irchost_nocache().

{
  ircmask_list_entry_t *entry;
  int hash1, hash2;

  compute_hash(irchost, &hash1, &hash2);
  for (entry = list->head; entry; entry = entry->next) {
    if ((entry->hash1 & hash1) != entry->hash1 || (entry->hash2 & hash2) != entry->hash2) {
      continue;
    }
    if (wild_match(entry->ircmask, irchost) > 0) {
      *(void **)dataptr = entry->data;
      return(0);
    }
  }
  *(void **)dataptr = NULL;
  return(-1);
}

---

Variable Documentation

const char rcsid[] = "$Id: ircmasks.c,v 1.15 2005-05-15 17:34:23 stdarg Exp $" [static]

Definition at line 21 of file ircmasks.c.