src/mod/server.mod/server.c File Reference

#include "src/mod/module.h"
#include "server.h"
#include "servmsg.c"
#include "cmdsserv.c"
#include "tclserv.c"

Include dependency graph for server.c:

Go to the source code of this file.

Defines
#define	MODULE_NAME   "server"
#define	MAKING_SERVER
#define	MAXPENALTY   10
#define	tcl_traceserver(name, ptr)
#define	tcl_untraceserver(name, ptr)
Functions
static void	empty_msgq (void)
static void	next_server (int *, char *, unsigned int *, char *)
static void	disconnect_server (int)
static char *	get_altbotnick (void)
static int	calc_penalty (char *)
static int	fast_deq (int)
static char *	splitnicks (char **)
static void	check_queues (char *, char *)
static void	parse_q (struct msgq_head *, char *, char *)
static void	purge_kicks (struct msgq_head *)
static int	deq_kick (int)
static void	msgq_clear (struct msgq_head *qh)
static void	deq_msg ()
static void	queue_server (int which, char *msg, int len)
static void	add_server (const char *ss)
static void	clearq (struct server_list *xx)
static char *	tcl_eggserver (ClientData cdata, Tcl_Interp *irp, char *name1, char *name2, int flags)
static void	dcc_chat_hostresolved (int)
static int	ctcp_DCC_CHAT (char *nick, char *from, char *handle, char *object, char *keyword, char *text)
static void	server_secondly ()
static void	server_5minutely ()
static void	server_prerehash ()
static void	server_postrehash ()
static void	server_die ()
static int	msgq_expmem (struct msgq_head *qh)
static int	server_expmem ()
static void	server_report (int idx, int details)
static char *	server_close ()
char *	server_start ()
char *	server_start (Function *global_funcs)
Variables
static Function *	global = 0
static int	ctcp_mode
static int	serv
static char	newserver [121]
static int	newserverport
static char	newserverpass [121]
static time_t	trying_server
static int	server_lag
static char	altnick [32->32 */+1]
static char	raltnick [32->32 */+1]
static int	curserv
static int	flud_thr
static int	flud_time
static int	flud_ctcp_thr
static int	flud_ctcp_time
static char	initserver [121]
static char	botuserhost [121]
static int	keepnick
static int	nick_juped = 0
static int	check_stoned
static int	serverror_quit
static time_t	lastpingcheck
static time_t	server_online
static time_t	server_cycle_wait
static char	botrealname [121]
static int	min_servs
static int	server_timeout
static int	never_give_up
static struct server_list *	serverlist
static int	cycle_time
static int	default_port
static char	oldnick [32->32 */+1]
static int	trigger_on_ignore
static int	exclusive_binds
static int	answer_ctcp
static int	lowercase_ctcp
static int	check_mode_r
static int	net_type
static char	connectserver [121]
static int	resolvserv
static int	double_mode
static int	double_server
static int	double_help
static int	double_warned
static int	lastpingtime
static char	stackablecmds [511]
static char	stackable2cmds [511]
static time_t	last_time
static int	use_penalties
static int	use_fastdeq
static int	nick_len
static int	kick_method
static int	optimize_kicks
static int	msgrate
static p_tcl_bind_list	H_wall
static p_tcl_bind_list	H_raw
static p_tcl_bind_list	H_notc
static p_tcl_bind_list	H_msgm
static p_tcl_bind_list	H_msg
static p_tcl_bind_list	H_flud
static p_tcl_bind_list	H_ctcr
static p_tcl_bind_list	H_ctcp
static p_tcl_bind_list	H_out
static int	stack_limit
static char *	realservername
static int	maxqmsg
static struct msgq_head mq hq	modeq
static int	burst
static tcl_coups	my_tcl_coups []
static tcl_ints	my_tcl_ints []
static cmd_t	my_ctcps []
static Function	server_table []

---

Define Documentation

#define MAKING_SERVER

Definition at line 27 of file server.c.

#define MAXPENALTY   10

Definition at line 121 of file server.c.

Referenced by deq_msg().

#define MODULE_NAME   "server"

Definition at line 26 of file server.c.

#define tcl_traceserver	(	name,
		ptr		)

Value:

Tcl_TraceVar(interp, name, TCL_TRACE_READS | TCL_TRACE_WRITES |       \
               TCL_TRACE_UNSETS, tcl_eggserver, (ClientData) ptr)

Definition at line 1451 of file server.c.

Referenced by server_start().

#define tcl_untraceserver	(	name,
		ptr		)

Value:

Tcl_UntraceVar(interp, name, TCL_TRACE_READS | TCL_TRACE_WRITES |     \
                 TCL_TRACE_UNSETS, tcl_eggserver, (ClientData) ptr)

Definition at line 1455 of file server.c.

Referenced by server_close().

---

Function Documentation

static void add_server

(

const char *

ss

)

[static]

Definition at line 953 of file server.c.

References default_port, server_list::name, server_list::next, nmalloc, server_list::pass, server_list::port, and server_list::realname.

Referenced by tcl_eggserver().

{
  struct server_list *x, *z;
  char *p, *q;

  for (z = serverlist; z && z->next; z = z->next);
  while (ss) {
    p = strchr(ss, ',');
    if (p)
      *p++ = 0;
    x = nmalloc(sizeof(struct server_list));

    x->next = 0;
    x->realname = 0;
    x->port = 0;
    if (z)
      z->next = x;
    else
      serverlist = x;
    z = x;
    q = strchr(ss, ':');
    if (!q) {
      x->port = default_port;
      x->pass = 0;
      x->name = nmalloc(strlen(ss) + 1);
      strcpy(x->name, ss);
    } else {
      *q++ = 0;
      x->name = nmalloc(q - ss);
      strcpy(x->name, ss);
      ss = q;
      q = strchr(ss, ':');
      if (!q) {
        x->pass = 0;
      } else {
        *q++ = 0;
        x->pass = nmalloc(strlen(q) + 1);
        strcpy(x->pass, q);
      }
      x->port = atoi(ss);
    }
    ss = p;
  }
}

Here is the caller graph for this function:

static int calc_penalty

(

char *

msg

)

[static]

Definition at line 246 of file server.c.

References egg_strcasecmp, last_time, LOG_SRVOUT, net_type, NETT_HYBRID_EFNET, NETT_UNDERNET, newsplit, putlog, raw_log, splitnicks(), and use_penalties.

Referenced by deq_kick(), deq_msg(), and fast_deq().

{
  char *cmd, *par1, *par2, *par3;
  register int penalty, i, ii;

  if (!use_penalties && net_type != NETT_UNDERNET &&
      net_type != NETT_HYBRID_EFNET)
    return 0;

  cmd = newsplit(&msg);
  if (msg)
    i = strlen(msg);
  else
    i = strlen(cmd);
  last_time -= 2;               /* undo eggdrop standard flood prot */
  if (net_type == NETT_UNDERNET || net_type == NETT_HYBRID_EFNET) {
    last_time += (2 + i / 120);
    return 0;
  }
  penalty = (1 + i / 100);
  if (!egg_strcasecmp(cmd, "KICK")) {
    par1 = newsplit(&msg);      /* channel */
    par2 = newsplit(&msg);      /* victim(s) */
    par3 = splitnicks(&par2);
    penalty++;
    while (strlen(par3) > 0) {
      par3 = splitnicks(&par2);
      penalty++;
    }
    ii = penalty;
    par3 = splitnicks(&par1);
    while (strlen(par1) > 0) {
      par3 = splitnicks(&par1);
      penalty += ii;
    }
  } else if (!egg_strcasecmp(cmd, "MODE")) {
    i = 0;
    par1 = newsplit(&msg);      /* channel */
    par2 = newsplit(&msg);      /* mode(s) */
    if (!strlen(par2))
      i++;
    while (strlen(par2) > 0) {
      if (strchr("ntimps", par2[0]))
        i += 3;
      else if (!strchr("+-", par2[0]))
        i += 1;
      par2++;
    }
    while (strlen(msg) > 0) {
      newsplit(&msg);
      i += 2;
    }
    ii = 0;
    while (strlen(par1) > 0) {
      splitnicks(&par1);
      ii++;
    }
    penalty += (ii * i);
  } else if (!egg_strcasecmp(cmd, "TOPIC")) {
    penalty++;
    par1 = newsplit(&msg);      /* channel */
    par2 = newsplit(&msg);      /* topic */
    if (strlen(par2) > 0) {     /* topic manipulation => 2 penalty points */
      penalty += 2;
      par3 = splitnicks(&par1);
      while (strlen(par1) > 0) {
        par3 = splitnicks(&par1);
        penalty += 2;
      }
    }
  } else if (!egg_strcasecmp(cmd, "PRIVMSG") ||
             !egg_strcasecmp(cmd, "NOTICE")) {
    par1 = newsplit(&msg);      /* channel(s)/nick(s) */
    /* Add one sec penalty for each recipient */
    while (strlen(par1) > 0) {
      splitnicks(&par1);
      penalty++;
    }
  } else if (!egg_strcasecmp(cmd, "WHO")) {
    par1 = newsplit(&msg);      /* masks */
    par2 = par1;
    while (strlen(par1) > 0) {
      par2 = splitnicks(&par1);
      if (strlen(par2) > 4)     /* long WHO-masks receive less penalty */
        penalty += 3;
      else
        penalty += 5;
    }
  } else if (!egg_strcasecmp(cmd, "AWAY")) {
    if (strlen(msg) > 0)
      penalty += 2;
    else
      penalty += 1;
  } else if (!egg_strcasecmp(cmd, "INVITE")) {
    /* Successful invite receives 2 or 3 penalty points. Let's go
     * with the maximum.
     */
    penalty += 3;
  } else if (!egg_strcasecmp(cmd, "JOIN")) {
    penalty += 2;
  } else if (!egg_strcasecmp(cmd, "PART")) {
    penalty += 4;
  } else if (!egg_strcasecmp(cmd, "VERSION")) {
    penalty += 2;
  } else if (!egg_strcasecmp(cmd, "TIME")) {
    penalty += 2;
  } else if (!egg_strcasecmp(cmd, "TRACE")) {
    penalty += 2;
  } else if (!egg_strcasecmp(cmd, "NICK")) {
    penalty += 3;
  } else if (!egg_strcasecmp(cmd, "ISON")) {
    penalty += 1;
  } else if (!egg_strcasecmp(cmd, "WHOIS")) {
    penalty += 2;
  } else if (!egg_strcasecmp(cmd, "DNS")) {
    penalty += 2;
  } else
    penalty++;                  /* just add standard-penalty */
  /* Shouldn't happen, but you never know... */
  if (penalty > 99)
    penalty = 99;
  if (penalty < 2) {
    putlog(LOG_SRVOUT, "*", "Penalty < 2sec; that's impossible!");
    penalty = 2;
  }
  if (raw_log && penalty != 0)
    putlog(LOG_SRVOUT, "*", "Adding penalty: %i", penalty);
  return penalty;
}

Here is the call graph for this function:

Here is the caller graph for this function:

static void check_queues	(	char *	oldnick,
		char *	newnick
	)			[static]

Definition at line 511 of file server.c.

References msgq_head::head, modeq, optimize_kicks, and parse_q().

Referenced by gotnick().

{
  if (optimize_kicks != 2)
    return;
  if (modeq.head)
    parse_q(&modeq, oldnick, newnick);
  if (mq.head)
    parse_q(&mq, oldnick, newnick);
  if (hq.head)
    parse_q(&hq, oldnick, newnick);
}

Here is the call graph for this function:

Here is the caller graph for this function:

static void clearq

(

struct server_list *

xx

)

[static]

Definition at line 1001 of file server.c.

References server_list::name, server_list::next, nfree, server_list::pass, and server_list::realname.

Referenced by server_close(), and tcl_eggserver().

{
  struct server_list *x;

  while (xx) {
    x = xx->next;
    if (xx->name)
      nfree(xx->name);
    if (xx->pass)
      nfree(xx->pass);
    if (xx->realname)
      nfree(xx->realname);
    nfree(xx);
    xx = x;
  }
}

Here is the caller graph for this function:

static int ctcp_DCC_CHAT	(	char *	nick,
		char *	from,
		char *	handle,
		char *	object,
		char *	keyword,
		char *	text
	)			[static]

Definition at line 1468 of file server.c.

References botname, chan_op, dcc, dcc_chat_hostresolved(), DCC_CHAT_PASS, DCC_CONNECTFAILED1, DCC_CONNECTFAILED3, dcc_dnshostbyip, DCC_DNSWAIT, DCC_REFUSED, DCC_REFUSED2, DCC_REFUSED3, DCC_REFUSED4, DCC_TOOMANYDCCS1, DCC_TOOMANYDCCS2, dcc_total, DP_HELP, dprintf, egg_strcasecmp, FR_ANYWH, FR_CHAN, FR_GLOBAL, get_user_by_handle, get_user_flagrec, glob_party, glob_xfer, userrec::handle, increase_socks_max, LOG_MISC, max_dcc, my_atoul, new_dcc, newsplit, now, putlog, quiet_reject, require_p, RES_HOSTBYIP, sanitycheck_dcc, u_pass_match, and userlist.

{
  char *action, *param, *ip, *prt, buf[512], *msg = buf;
  int i;
  struct userrec *u = get_user_by_handle(userlist, handle);
  struct flag_record fr = { FR_GLOBAL | FR_CHAN | FR_ANYWH, 0, 0, 0, 0, 0 };

  strcpy(msg, text);
  action = newsplit(&msg);
  param = newsplit(&msg);
  ip = newsplit(&msg);
  prt = newsplit(&msg);
  if (egg_strcasecmp(action, "CHAT") || egg_strcasecmp(object, botname) || !u)
    return 0;
  get_user_flagrec(u, &fr, 0);
  if (dcc_total == max_dcc && increase_socks_max()) {
    if (!quiet_reject)
      dprintf(DP_HELP, "NOTICE %s :%s\n", nick, DCC_TOOMANYDCCS1);
    putlog(LOG_MISC, "*", DCC_TOOMANYDCCS2, "CHAT", param, nick, from);
  } else if (!(glob_party(fr) || (!require_p && chan_op(fr)))) {
    if (glob_xfer(fr))
      return 0;                 /* Allow filesys to pick up the chat */
    if (!quiet_reject)
      dprintf(DP_HELP, "NOTICE %s :%s\n", nick, DCC_REFUSED2);
    putlog(LOG_MISC, "*", "%s: %s!%s", DCC_REFUSED, nick, from);
  } else if (u_pass_match(u, "-")) {
    if (!quiet_reject)
      dprintf(DP_HELP, "NOTICE %s :%s\n", nick, DCC_REFUSED3);
    putlog(LOG_MISC, "*", "%s: %s!%s", DCC_REFUSED4, nick, from);
  } else if (atoi(prt) < 1024 || atoi(prt) > 65535) {
    /* Invalid port */
    if (!quiet_reject)
      dprintf(DP_HELP, "NOTICE %s :%s (invalid port)\n", nick,
              DCC_CONNECTFAILED1);
    putlog(LOG_MISC, "*", "%s: CHAT (%s!%s)", DCC_CONNECTFAILED3, nick, from);
  } else {
    if (!sanitycheck_dcc(nick, from, ip, prt))
      return 1;
    i = new_dcc(&DCC_DNSWAIT, sizeof(struct dns_info));
    if (i < 0) {
      putlog(LOG_MISC, "*", "DCC connection: CHAT (%s!%s)", nick, ip);
      return 1;
    }
    dcc[i].addr = my_atoul(ip);
    dcc[i].port = atoi(prt);
    dcc[i].sock = -1;
    strcpy(dcc[i].nick, u->handle);
    strcpy(dcc[i].host, from);
    dcc[i].timeval = now;
    dcc[i].user = u;
    dcc[i].u.dns->ip = dcc[i].addr;
    dcc[i].u.dns->dns_type = RES_HOSTBYIP;
    dcc[i].u.dns->dns_success = dcc_chat_hostresolved;
    dcc[i].u.dns->dns_failure = dcc_chat_hostresolved;
    dcc[i].u.dns->type = &DCC_CHAT_PASS;
    dcc_dnshostbyip(dcc[i].addr);
  }
  return 1;
}

Here is the call graph for this function:

static void dcc_chat_hostresolved

(

int

i

)

[static]

Definition at line 1529 of file server.c.

References changeover_dcc, chanset, dcc, DCC_CHAT_PASS, DCC_CONNECTFAILED1, DCC_CONNECTFAILED2, DCC_ENTERPASS, DP_HELP, dprintf, egg_snprintf, FR_ANYWH, FR_CHAN, FR_GLOBAL, get_user_flagrec, getsock, glob_party, hostsanitycheck_dcc, iptolong, killsock, LOG_MISC, lostdcc, neterror, now, open_telnet_dcc, putlog, quiet_reject, STAT_ECHO, STAT_PARTY, and user.

Referenced by ctcp_DCC_CHAT().

{
  char buf[512], ip[512];
  struct flag_record fr = { FR_GLOBAL | FR_CHAN | FR_ANYWH, 0, 0, 0, 0, 0 };

  egg_snprintf(buf, sizeof buf, "%d", dcc[i].port);
  if (!hostsanitycheck_dcc(dcc[i].nick, dcc[i].host, dcc[i].addr,
                           dcc[i].u.dns->host, buf)) {
    lostdcc(i);
    return;
  }
  egg_snprintf(ip, sizeof ip, "%lu", iptolong(htonl(dcc[i].addr)));
  dcc[i].sock = getsock(0);
  if (dcc[i].sock < 0 || open_telnet_dcc(dcc[i].sock, ip, buf) < 0) {
    neterror(buf);
    if (!quiet_reject)
      dprintf(DP_HELP, "NOTICE %s :%s (%s)\n", dcc[i].nick,
              DCC_CONNECTFAILED1, buf);
    putlog(LOG_MISC, "*", "%s: CHAT (%s!%s)", DCC_CONNECTFAILED2,
           dcc[i].nick, dcc[i].host);
    putlog(LOG_MISC, "*", "    (%s)", buf);
    killsock(dcc[i].sock);
    lostdcc(i);
  } else {
    changeover_dcc(i, &DCC_CHAT_PASS, sizeof(struct chat_info));
    dcc[i].status = STAT_ECHO;
    get_user_flagrec(dcc[i].user, &fr, 0);
    if (glob_party(fr))
      dcc[i].status |= STAT_PARTY;
    strcpy(dcc[i].u.chat->con_chan, (chanset) ? chanset->dname : "*");
    dcc[i].timeval = now;
    /* Ok, we're satisfied with them now: attempt the connect */
    putlog(LOG_MISC, "*", "DCC connection: CHAT (%s!%s)", dcc[i].nick,
           dcc[i].host);
    dprintf(i, "%s\n", DCC_ENTERPASS);
  }
  return;
}

Here is the caller graph for this function:

static int deq_kick

(

int

which

)

[static]

Definition at line 647 of file server.c.

References calc_penalty(), check_tcl_out(), debug3, DP_HELP, DP_MODE, DP_SERVER, egg_snprintf, egg_strcasecmp, egg_strncasecmp, msgq_head::head, kick_method, msgq_head::last, last_time, msgq::len, LOG_SRVOUT, modeq, msgq::msg, newsplit, msgq::next, nfree, nmalloc, NULL, optimize_kicks, purge_kicks(), putlog, raw_log, splitnicks(), strncpyz, msgq_head::tot, and write_to_server.

Referenced by deq_msg().

{
  struct msgq_head *h;
  struct msgq *msg, *m, *lm;
  char buf[511], buf2[511], *reason2, *nicks, *chan, *chan2, *reason, *nick,
       newnicks[511], newnicks2[511], newmsg[511];
  int changed = 0, nr = 0;

  if (!optimize_kicks)
    return 0;

  newnicks[0] = 0;
  switch (which) {
  case DP_MODE:
    h = &modeq;
    break;
  case DP_SERVER:
    h = &mq;
    break;
  case DP_HELP:
    h = &hq;
    break;
  default:
    return 0;
  }

  if (egg_strncasecmp(h->head->msg, "KICK", 4))
    return 0;

  if (optimize_kicks == 2) {
    purge_kicks(h);
    if (!h->head)
      return 1;
  }

  if (egg_strncasecmp(h->head->msg, "KICK", 4))
    return 0;

  msg = h->head;
  strncpyz(buf, msg->msg, sizeof buf);
  reason = buf;
  newsplit(&reason);
  chan = newsplit(&reason);
  nicks = newsplit(&reason);
  while (strlen(nicks) > 0) {
    egg_snprintf(newnicks, sizeof newnicks, "%s,%s", newnicks,
                 newsplit(&nicks));
    nr++;
  }
  for (m = msg->next, lm = NULL; m && (nr < kick_method);) {
    if (!egg_strncasecmp(m->msg, "KICK", 4)) {
      changed = 0;
      newnicks2[0] = 0;
      strncpyz(buf2, m->msg, sizeof buf2);
      reason2 = buf2;
      newsplit(&reason2);
      chan2 = newsplit(&reason2);
      nicks = newsplit(&reason2);
      if (!egg_strcasecmp(chan, chan2) && !egg_strcasecmp(reason, reason2)) {
        while (strlen(nicks) > 0) {
          nick = splitnicks(&nicks);
          if ((nr < kick_method) && ((9 + strlen(chan) + strlen(newnicks) +
              strlen(nick) + strlen(reason)) < 510)) {
            egg_snprintf(newnicks, sizeof newnicks, "%s,%s", newnicks, nick);
            nr++;
            changed = 1;
          } else
            egg_snprintf(newnicks2, sizeof newnicks2, "%s,%s", newnicks2, nick);
        }
      }
      if (changed) {
        if (newnicks2[0] == 0) {
          if (!lm)
            h->head->next = m->next;
          else
            lm->next = m->next;
          nfree(m->msg);
          nfree(m);
          m = lm;
          h->tot--;
          if (!h->head)
            h->last = 0;
        } else {
          nfree(m->msg);
          egg_snprintf(newmsg, sizeof newmsg, "KICK %s %s %s", chan2,
                       newnicks2 + 1, reason);
          m->msg = nmalloc(strlen(newmsg) + 1);
          m->len = strlen(newmsg);
          strcpy(m->msg, newmsg);
        }
      }
    }
    lm = m;
    if (m)
      m = m->next;
    else
      m = h->head->next;
  }
  egg_snprintf(newmsg, sizeof newmsg, "KICK %s %s %s", chan, newnicks + 1,
               reason);
  check_tcl_out(which, newmsg, 1);
  write_to_server(newmsg, strlen(newmsg));
  if (raw_log) {
    switch (which) {
    case DP_MODE:
      putlog(LOG_SRVOUT, "*", "[m->] %s", newmsg);
      break;
    case DP_SERVER:
      putlog(LOG_SRVOUT, "*", "[s->] %s", newmsg);
      break;
    case DP_HELP:
      putlog(LOG_SRVOUT, "*", "[h->] %s", newmsg);
      break;
    }
    debug3("Changed: %d, kick-method: %d, nr: %d", changed, kick_method, nr);
  }
  h->tot--;
  last_time += calc_penalty(newmsg);
  m = h->head->next;
  nfree(h->head->msg);
  nfree(h->head);
  h->head = m;
  if (!h->head)
    h->last = 0;
  return 1;
}

Here is the call graph for this function:

Here is the caller graph for this function:

static void deq_msg

(

)

[static]

Definition at line 146 of file server.c.

References burst, calc_penalty(), check_tcl_out(), deq_kick(), DP_HELP, DP_MODE, DP_SERVER, fast_deq(), msgq_head::head, msgq_head::last, last_time, msgq::len, LOG_SRVOUT, MAXPENALTY, modeq, msgq::msg, msgrate, msgq::next, nfree, now, NULL, putlog, raw_log, serv, msgq_head::tot, and write_to_server.

Referenced by queue_server(), and server_secondly().

{
  struct msgq *q;
  int ok = 0;

  /* now < last_time tested 'cause clock adjustments could mess it up */
  if ((now - last_time) >= msgrate || now < (last_time - 90)) {
    last_time = now;
    if (burst > 0)
      burst--;
    ok = 1;
  }

  if (serv < 0)
    return;

  /* Send upto 4 msgs to server if the *critical queue* has anything in it */
  if (modeq.head) {
    while (modeq.head && (burst < 4) && ((last_time - now) < MAXPENALTY)) {
      if (deq_kick(DP_MODE)) {
        burst++;
        continue;
      }
      if (!modeq.head)
        break;
      if (fast_deq(DP_MODE)) {
        burst++;
        continue;
      }
      check_tcl_out(DP_MODE, modeq.head->msg, 1);
      write_to_server(modeq.head->msg, modeq.head->len);
      if (raw_log)
        putlog(LOG_SRVOUT, "*", "[m->] %s", modeq.head->msg);
      modeq.tot--;
      last_time += calc_penalty(modeq.head->msg);
      q = modeq.head->next;
      nfree(modeq.head->msg);
      nfree(modeq.head);
      modeq.head = q;
      burst++;
    }
    if (!modeq.head)
      modeq.last = 0;
    return;
  }

  /* Send something from the normal msg q even if we're slightly bursting */
  if (burst > 1)
    return;

  if (mq.head) {
    burst++;

    if (deq_kick(DP_SERVER))
      return;

    if (fast_deq(DP_SERVER))
      return;

    check_tcl_out(DP_SERVER, mq.head->msg, 1);
    write_to_server(mq.head->msg, mq.head->len);
    if (raw_log)
      putlog(LOG_SRVOUT, "*", "[s->] %s", mq.head->msg);
    mq.tot--;
    last_time += calc_penalty(mq.head->msg);
    q = mq.head->next;
    nfree(mq.head->msg);
    nfree(mq.head);
    mq.head = q;
    if (!mq.head)
      mq.last = NULL;
    return;
  }

  /* Never send anything from the help queue unless everything else is
   * finished.
   */
  if (!hq.head || burst || !ok)
    return;

  if (deq_kick(DP_HELP))
    return;

  if (fast_deq(DP_HELP))
    return;

  check_tcl_out(DP_HELP, hq.head->msg, 1);
  write_to_server(hq.head->msg, hq.head->len);
  if (raw_log)
    putlog(LOG_SRVOUT, "*", "[h->] %s", hq.head->msg);
  hq.tot--;
  last_time += calc_penalty(hq.head->msg);
  q = hq.head->next;
  nfree(hq.head->msg);
  nfree(hq.head);
  hq.head = q;
  if (!hq.head)
    hq.last = NULL;
}

Here is the call graph for this function:

Here is the caller graph for this function:

static void disconnect_server

(

int

)

[static]

Referenced by server_5minutely().

Here is the caller graph for this function:

static void empty_msgq

(

void

)

[static]

Definition at line 776 of file server.c.

References burst, modeq, and msgq_clear().

Referenced by connect_server(), and server_close().

{
  msgq_clear(&modeq);
  msgq_clear(&mq);
  msgq_clear(&hq);
  burst = 0;
}

Here is the call graph for this function:

Here is the caller graph for this function:

static int fast_deq

(

int

which

)

[static]

Definition at line 394 of file server.c.

References calc_penalty(), check_tcl_out(), DP_HELP, DP_MODE, DP_SERVER, egg_strcasecmp, msgq_head::head, msgq_head::last, last_time, msgq::len, LOG_SRVOUT, modeq, msgq::msg, newsplit, msgq::next, nfree, putlog, raw_log, simple_sprintf, stack_limit, stackable2cmds, stackablecmds, strncpyz, msgq_head::tot, use_fastdeq, and write_to_server.

Referenced by deq_msg().

{
  struct msgq_head *h;
  struct msgq *m, *nm;
  char msgstr[511], nextmsgstr[511], tosend[511], victims[511], stackable[511],
       *msg, *nextmsg, *cmd, *nextcmd, *to, *nextto, *stckbl;
  int len, doit = 0, found = 0, cmd_count = 0, stack_method = 1;

  if (!use_fastdeq)
    return 0;

  switch (which) {
  case DP_MODE:
    h = &modeq;
    break;
  case DP_SERVER:
    h = &mq;
    break;
  case DP_HELP:
    h = &hq;
    break;
  default:
    return 0;
  }

  m = h->head;
  strncpyz(msgstr, m->msg, sizeof msgstr);
  msg = msgstr;
  cmd = newsplit(&msg);
  if (use_fastdeq > 1) {
    strncpyz(stackable, stackablecmds, sizeof stackable);
    stckbl = stackable;
    while (strlen(stckbl) > 0) {
      if (!egg_strcasecmp(newsplit(&stckbl), cmd)) {
        found = 1;
        break;
      }
    }

    /* If use_fastdeq is 2, only commands in the list should be stacked. */
    if (use_fastdeq == 2 && !found)
      return 0;

    /* If use_fastdeq is 3, only commands _not_ in the list should be stacked. */
    if (use_fastdeq == 3 && found)
      return 0;

    /* we check for the stacking method (default=1) */
    strncpyz(stackable, stackable2cmds, sizeof stackable);
    stckbl = stackable;
    while (strlen(stckbl) > 0)
      if (!egg_strcasecmp(newsplit(&stckbl), cmd)) {
        stack_method = 2;
        break;
      }
  }
  to = newsplit(&msg);
  len = strlen(to);
  simple_sprintf(victims, "%s", to);
  while (m) {
    nm = m->next;
    if (!nm)
      break;
    strncpyz(nextmsgstr, nm->msg, sizeof nextmsgstr);
    nextmsg = nextmsgstr;
    nextcmd = newsplit(&nextmsg);
    nextto = newsplit(&nextmsg);
    len = strlen(nextto);
    if (strcmp(to, nextto) && !strcmp(cmd, nextcmd) && !strcmp(msg, nextmsg) &&
        ((strlen(cmd) + strlen(victims) + strlen(nextto) + strlen(msg) + 2) <
        510) && (!stack_limit || cmd_count < stack_limit - 1)) {
      cmd_count++;
      if (stack_method == 1)
        simple_sprintf(victims, "%s,%s", victims, nextto);
      else
        simple_sprintf(victims, "%s %s", victims, nextto);
      doit = 1;
      m->next = nm->next;
      if (!nm->next)
        h->last = m;
      nfree(nm->msg);
      nfree(nm);
      h->tot--;
    } else
      m = m->next;
  }
  if (doit) {
    simple_sprintf(tosend, "%s %s %s", cmd, victims, msg);
    len = strlen(tosend);
    check_tcl_out(which, tosend, 1);
    write_to_server(tosend, len);
    if (raw_log) {
      switch (which) {
      case DP_MODE:
        putlog(LOG_SRVOUT, "*", "[m=>] %s", tosend);
        break;
      case DP_SERVER:
        putlog(LOG_SRVOUT, "*", "[s=>] %s", tosend);
        break;
      case DP_HELP:
        putlog(LOG_SRVOUT, "*", "[h=>] %s", tosend);
        break;
      }
    }
    m = h->head->next;
    nfree(h->head->msg);
    nfree(h->head);
    h->head = m;
    if (!h->head)
      h->last = 0;
    h->tot--;
    last_time += calc_penalty(tosend);
    return 1;
  }
  return 0;
}

Here is the call graph for this function:

Here is the caller graph for this function:

static char* get_altbotnick

(

void

)

[static]

Referenced by got303(), gotfake433(), gotnick(), gotquit(), minutely_checks(), and server_postrehash().

Here is the caller graph for this function:

static void msgq_clear

(

struct msgq_head *

qh

)

[static]

Definition at line 1636 of file server.c.

References msgq_head::head, msgq_head::last, msgq::msg, msgq::next, nfree, NULL, msgq_head::tot, and msgq_head::warned.

Referenced by cmd_clearqueue(), and empty_msgq().

{
  register struct msgq *q, *qq;

  for (q = qh->head; q; q = qq) {
    qq = q->next;
    nfree(q->msg);
    nfree(q);
  }
  qh->head = qh->last = NULL;
  qh->tot = qh->warned = 0;
}

Here is the caller graph for this function:

static int msgq_expmem

(

struct msgq_head *

qh

)

[static]

Definition at line 1649 of file server.c.

References msgq_head::head, msgq::len, and msgq::next.

Referenced by server_expmem().

{
  register int tot = 0;
  register struct msgq *m;

  for (m = qh->head; m; m = m->next) {
    tot += m->len + 1;
    tot += sizeof(struct msgq);
  }
  return tot;
}

Here is the caller graph for this function:

static void next_server	(	int *	ptr,
		char *	serv,
		unsigned int *	port,
		char *	pass
	)			[static]

Definition at line 1022 of file server.c.

References default_port, egg_list_append, egg_strcasecmp, server_list::name, server_list::next, nmalloc, NULL, server_list::pass, server_list::port, server_list::realname, and strncpyz.

Referenced by connect_server(), and tcl_eggserver().

{
  struct server_list *x = serverlist;
  int i = 0;

  /* -1  -->  Go to specified server */
  if (*ptr == -1) {
    for (; x; x = x->next) {
      if (x->port == *port) {
        if (!egg_strcasecmp(x->name, serv)) {
          *ptr = i;
          return;
        } else if (x->realname && !egg_strcasecmp(x->realname, serv)) {
          *ptr = i;
          strncpyz(serv, x->realname, sizeof serv);
          return;
        }
      }
      i++;
    }
    /* Gotta add it: */
    x = nmalloc(sizeof(struct server_list));

    x->next = 0;
    x->realname = 0;
    x->name = nmalloc(strlen(serv) + 1);
    strcpy(x->name, serv);
    x->port = *port ? *port : default_port;
    if (pass && pass[0]) {
      x->pass = nmalloc(strlen(pass) + 1);
      strcpy(x->pass, pass);
    } else
      x->pass = NULL;
    egg_list_append((struct list_type **) (&serverlist),
                    (struct list_type *) x);
    *ptr = i;
    return;
  }
  /* Find where i am and boogie */
  if (x == NULL)
    return;
  i = (*ptr);
  while (i > 0 && x != NULL) {
    x = x->next;
    i--;
  }
  if (x != NULL) {
    x = x->next;
    (*ptr)++;
  }                             /* Go to next server */
  if (x == NULL) {
    x = serverlist;
    *ptr = 0;
  }                             /* Start over at the beginning */
  strcpy(serv, x->name);
  *port = x->port ? x->port : default_port;
  if (x->pass)
    strcpy(pass, x->pass);
  else
    pass[0] = 0;
}

Here is the caller graph for this function:

static void parse_q	(	struct msgq_head *	q,
		char *	oldnick,
		char *	newnick
	)			[static]

Definition at line 523 of file server.c.

References egg_snprintf, egg_strcasecmp, egg_strncasecmp, msgq_head::head, msgq_head::last, msgq::len, msgq::msg, newsplit, msgq::next, nfree, nmalloc, NULL, optimize_kicks, splitnicks(), strncpyz, and msgq_head::tot.

Referenced by check_queues().

{
  struct msgq *m, *lm = NULL;
  char buf[511], *msg, *nicks, *nick, *chan, newnicks[511], newmsg[511];
  int changed;

  for (m = q->head; m;) {
    changed = 0;
    if (optimize_kicks == 2 && !egg_strncasecmp(m->msg, "KICK ", 5)) {
      newnicks[0] = 0;
      strncpyz(buf, m->msg, sizeof buf);
      msg = buf;
      newsplit(&msg);
      chan = newsplit(&msg);
      nicks = newsplit(&msg);
      while (strlen(nicks) > 0) {
        nick = splitnicks(&nicks);
        if (!egg_strcasecmp(nick, oldnick) &&
            ((9 + strlen(chan) + strlen(newnicks) + strlen(newnick) +
              strlen(nicks) + strlen(msg)) < 510)) {
          if (newnick)
            egg_snprintf(newnicks, sizeof newnicks, "%s,%s", newnicks, newnick);
          changed = 1;
        } else
          egg_snprintf(newnicks, sizeof newnicks, ",%s", nick);
      }
      egg_snprintf(newmsg, sizeof newmsg, "KICK %s %s %s", chan,
                   newnicks + 1, msg);
    }
    if (changed) {
      if (newnicks[0] == 0) {
        if (!lm)
          q->head = m->next;
        else
          lm->next = m->next;
        nfree(m->msg);
        nfree(m);
        m = lm;
        q->tot--;
        if (!q->head)
          q->last = 0;
      } else {
        nfree(m->msg);
        m->msg = nmalloc(strlen(newmsg) + 1);
        m->len = strlen(newmsg);
        strcpy(m->msg, newmsg);
      }
    }
    lm = m;
    if (m)
      m = m->next;
    else
      m = q->head;
  }
}

Here is the call graph for this function:

Here is the caller graph for this function:

static void purge_kicks

(

struct msgq_head *

q

)

[static]

Definition at line 579 of file server.c.

References egg_snprintf, egg_strncasecmp, findchan, msgq_head::head, ismember, msgq_head::last, msgq::len, LOG_SRVOUT, msgq::msg, newsplit, msgq::next, nfree, nmalloc, NULL, putlog, splitnicks(), strncpyz, and msgq_head::tot.

Referenced by deq_kick().

{
  struct msgq *m, *lm = NULL;
  char buf[511], *reason, *nicks, *nick, *chan, newnicks[511],
       newmsg[511], chans[511], *chns, *ch;
  int changed, found;
  struct chanset_t *cs;

  for (m = q->head; m;) {
    if (!egg_strncasecmp(m->msg, "KICK", 4)) {
      newnicks[0] = 0;
      changed = 0;
      strncpyz(buf, m->msg, sizeof buf);
      reason = buf;
      newsplit(&reason);
      chan = newsplit(&reason);
      nicks = newsplit(&reason);
      while (strlen(nicks) > 0) {
        found = 0;
        nick = splitnicks(&nicks);
        strncpyz(chans, chan, sizeof chans);
        chns = chans;
        while (strlen(chns) > 0) {
          ch = newsplit(&chns);
          cs = findchan(ch);
          if (!cs)
            continue;
          if (ismember(cs, nick))
            found = 1;
        }
        if (found)
          egg_snprintf(newnicks, sizeof newnicks, "%s,%s", newnicks, nick);
        else {
          putlog(LOG_SRVOUT, "*", "%s isn't on any target channel; removing "
                 "kick.", nick);
          changed = 1;
        }
      }
      if (changed) {
        if (newnicks[0] == 0) {
          if (!lm)
            q->head = m->next;
          else
            lm->next = m->next;
          nfree(m->msg);
          nfree(m);
          m = lm;
          q->tot--;
          if (!q->head)
            q->last = 0;
        } else {
          nfree(m->msg);
          egg_snprintf(newmsg, sizeof newmsg, "KICK %s %s %s", chan,
                       newnicks + 1, reason);
          m->msg = nmalloc(strlen(newmsg) + 1);
          m->len = strlen(newmsg);
          strcpy(m->msg, newmsg);
        }
      }
    }
    lm = m;
    if (m)
      m = m->next;
    else
      m = q->head;
  }
}

Here is the call graph for this function:

Here is the caller graph for this function:

static void queue_server	(	int	which,
		char *	msg,
		int	len
	)			[static]

Definition at line 786 of file server.c.

References check_tcl_out(), debug1, deq_msg(), double_help, double_mode, double_server, double_warned, DP_HELP, DP_HELP_NEXT, DP_MODE, DP_MODE_NEXT, DP_SERVER, DP_SERVER_NEXT, egg_memcpy(), egg_strcasecmp, egg_strncasecmp, msgq_head::head, msgq_head::last, lastpingtime, msgq::len, LOG_MISC, LOG_SRVOUT, maxqmsg, modeq, msgq::msg, msgq::next, nmalloc, now, NULL, putlog, raw_log, remove_crlf, serv, msgq_head::tot, msgq_head::warned, and write_to_server.

Referenced by server_close(), and server_start().

{
  struct msgq_head *h = NULL, tempq;
  struct msgq *q, *tq, *tqq;
  int doublemsg = 0, qnext = 0;
  char buf[511];

  /* Don't even BOTHER if there's no server online. */
  if (serv < 0)
    return;

  /* Remove \r\n. We will add these back when we send the text to the server.
   * - Wcc [01/09/2004]
   */
  strncpy(buf, msg, sizeof buf);
  msg = buf;
  remove_crlf(&msg);
  buf[510] = 0;
  len = strlen(buf);

  /* No queue for PING and PONG - drummer */
  if (!egg_strncasecmp(buf, "PING", 4) || !egg_strncasecmp(buf, "PONG", 4)) {
    if (buf[1] == 'I' || buf[1] == 'i')
      lastpingtime = now;
    check_tcl_out(which, buf, 1);
    write_to_server(buf, len);
    if (raw_log)
      putlog(LOG_SRVOUT, "*", "[m->] %s", buf);
    return;
  }

  switch (which) {
  case DP_MODE_NEXT:
    qnext = 1;
    /* Fallthrough */

  case DP_MODE:
    h = &modeq;
    tempq = modeq;
    if (double_mode)
      doublemsg = 1;
    break;

  case DP_SERVER_NEXT:
    qnext = 1;
    /* Fallthrough */

  case DP_SERVER:
    h = &mq;
    tempq = mq;
    if (double_server)
      doublemsg = 1;
    break;

  case DP_HELP_NEXT:
    qnext = 1;
    /* Fallthrough */

  case DP_HELP:
    h = &hq;
    tempq = hq;
    if (double_help)
      doublemsg = 1;
    break;

  default:
    putlog(LOG_MISC, "*", "Warning: queuing unknown type to server!");
    return;
  }

  if (h->tot < maxqmsg) {
    /* Don't queue msg if it's already queued?  */
    if (!doublemsg) {
      for (tq = tempq.head; tq; tq = tqq) {
        tqq = tq->next;
        if (!egg_strcasecmp(tq->msg, buf)) {
          if (!double_warned) {
            debug1("Message already queued; skipping: %s", buf);
            double_warned = 1;
          }
          return;
        }
      }
    }

    if (check_tcl_out(which, buf, 0))
      return; /* a Tcl proc requested not to send the message */

    q = nmalloc(sizeof(struct msgq));

    /* Insert into queue. */
    if (qnext) {
      q->next = h->head;
      h->head = q;
      if (!h->last)
        h->last = q;
    }
    else {
      q->next = NULL;
      if (h->last)
        h->last->next = q;
      else
        h->head = q;
      h->last = q;
    }

    q->len = len;
    q->msg = nmalloc(len + 1);
    egg_memcpy(q->msg, buf, len);
    q->msg[len] = 0;
    h->tot++;
    h->warned = 0;
    double_warned = 0;

    if (raw_log) {
      switch (which) {
      case DP_MODE:
        putlog(LOG_SRVOUT, "*", "[!m] %s", buf);
        break;
      case DP_SERVER:
        putlog(LOG_SRVOUT, "*", "[!s] %s", buf);
        break;
      case DP_HELP:
        putlog(LOG_SRVOUT, "*", "[!h] %s", buf);
        break;
      case DP_MODE_NEXT:
        putlog(LOG_SRVOUT, "*", "[!!m] %s", buf);
        break;
      case DP_SERVER_NEXT:
        putlog(LOG_SRVOUT, "*", "[!!s] %s", buf);
        break;
      case DP_HELP_NEXT:
        putlog(LOG_SRVOUT, "*", "[!!h] %s", buf);
        break;
      }
    }
  } else {
    if (!h->warned) {
      switch (which) {
      case DP_MODE_NEXT:
        /* Fallthrough */
      case DP_MODE:
        putlog(LOG_MISC, "*", "Warning: over maximum mode queue!");
        break;

      case DP_SERVER_NEXT:
        /* Fallthrough */
      case DP_SERVER:
        putlog(LOG_MISC, "*", "Warning: over maximum server queue!");
        break;

      case DP_HELP_NEXT:
        /* Fallthrough */
      case DP_HELP:
        putlog(LOG_MISC, "*", "Warning: over maximum help queue!");
        break;
      }
    }
    h->warned = 1;
  }

  if (which == DP_MODE || which == DP_MODE_NEXT)
    deq_msg(); /* DP_MODE needs to be sent ASAP, flush if possible. */
}

Here is the call graph for this function:

Here is the caller graph for this function:

static void server_5minutely

(

)

[static]

Definition at line 1582 of file server.c.

References check_stoned, disconnect_server(), DP_MODE, dprintf, findanyidx, IRC_SERVERSTONED, lastpingcheck, LOG_SERV, lostdcc, now, putlog, serv, server_online, and trying_server.

Referenced by server_close(), and server_start().

{
  if (check_stoned && server_online) {
    if (lastpingcheck && (now - lastpingcheck >= 240)) {
      /* Still waiting for activity, requested longer than 4 minutes ago.
       * Server is probably stoned.
       */
      int servidx = findanyidx(serv);

      disconnect_server(servidx);
      lostdcc(servidx);
      putlog(LOG_SERV, "*", IRC_SERVERSTONED);
    } else if (!trying_server) {
      /* Check for server being stoned. */
      dprintf(DP_MODE, "PING :%li\n", now);
      lastpingcheck = now;
    }
  }
}

Here is the call graph for this function:

Here is the caller graph for this function:

static char* server_close

(

)

[static]

Definition at line 1749 of file server.c.

References C_dcc_serv, clearq(), cycle_time, del_bind_table, del_hook, empty_msgq(), H_dcc, HOOK_5MINUTELY, HOOK_DIE, HOOK_MINUTELY, HOOK_PRE_REHASH, HOOK_QSERV, HOOK_REHASH, HOOK_SECONDLY, interp, minutely_checks(), MODULE_NAME, module_undepend, my_raw_binds, nuke_server(), NULL, queue_server(), rem_builtins, rem_help_reference, rem_tcl_commands, rem_tcl_coups, rem_tcl_ints, rem_tcl_strings, server_5minutely(), server_die(), server_postrehash(), server_prerehash(), server_secondly(), tcl_untraceserver, and traced_nettype().

{
  cycle_time = 100;
  nuke_server("Connection reset by peer");
  clearq(serverlist);
  rem_builtins(H_dcc, C_dcc_serv);
  rem_builtins(H_raw, my_raw_binds);
  rem_builtins(H_ctcp, my_ctcps);
  /* Restore original commands. */
  del_bind_table(H_wall);
  del_bind_table(H_raw);
  del_bind_table(H_notc);
  del_bind_table(H_msgm);
  del_bind_table(H_msg);
  del_bind_table(H_flud);
  del_bind_table(H_ctcr);
  del_bind_table(H_ctcp);
  del_bind_table(H_out);
  rem_tcl_coups(my_tcl_coups);
  rem_tcl_strings(my_tcl_strings);
  rem_tcl_ints(my_tcl_ints);
  rem_help_reference("server.help");
  rem_tcl_commands(my_tcl_cmds);
  Tcl_UntraceVar(interp, "nick",
                 TCL_TRACE_READS | TCL_TRACE_WRITES | TCL_TRACE_UNSETS,
                 nick_change, NULL);
  Tcl_UntraceVar(interp, "altnick",
                 TCL_TRACE_WRITES | TCL_TRACE_UNSETS, altnick_change, NULL);
  Tcl_UntraceVar(interp, "botname",
                 TCL_TRACE_READS | TCL_TRACE_WRITES | TCL_TRACE_UNSETS,
                 traced_botname, NULL);
  Tcl_UntraceVar(interp, "server",
                 TCL_TRACE_READS | TCL_TRACE_WRITES | TCL_TRACE_UNSETS,
                 traced_server, NULL);
  Tcl_UntraceVar(interp, "serveraddress",
                 TCL_TRACE_READS | TCL_TRACE_WRITES | TCL_TRACE_UNSETS,
                 traced_serveraddress, NULL);
  Tcl_UntraceVar(interp, "net-type",
                 TCL_TRACE_READS | TCL_TRACE_WRITES | TCL_TRACE_UNSETS,
                 traced_nettype, NULL);
  Tcl_UntraceVar(interp, "nick-len",
                 TCL_TRACE_READS | TCL_TRACE_WRITES | TCL_TRACE_UNSETS,
                 traced_nicklen, NULL);
  tcl_untraceserver("servers", NULL);
  empty_msgq();
  del_hook(HOOK_SECONDLY, (Function) server_secondly);
  del_hook(HOOK_5MINUTELY, (Function) server_5minutely);
  del_hook(HOOK_QSERV, (Function) queue_server);
  del_hook(HOOK_MINUTELY, (Function) minutely_checks);
  del_hook(HOOK_PRE_REHASH, (Function) server_prerehash);
  del_hook(HOOK_REHASH, (Function) server_postrehash);
  del_hook(HOOK_DIE, (Function) server_die);
  module_undepend(MODULE_NAME);
  return NULL;
}

Here is the call graph for this function:

static void server_die

(

)

[static]

Definition at line 1625 of file server.c.

References cycle_time, dprintf, nuke_server(), NULL, quit_msg, serv, and server_online.

Referenced by server_close(), and server_start().

{
  cycle_time = 100;
  if (server_online) {
    dprintf(-serv, "QUIT :%s\n", quit_msg[0] ? quit_msg : "");
    sleep(3);                   /* Give the server time to understand */
  }
  nuke_server(NULL);
}

Here is the call graph for this function:

Here is the caller graph for this function:

static int server_expmem

(

)

[static]

Definition at line 1661 of file server.c.

References modeq, msgq_expmem(), server_list::name, server_list::next, server_list::pass, server_list::realname, and realservername.

Referenced by server_report().

{
  int tot = 0;
  struct server_list *s = serverlist;

  for (; s; s = s->next) {
    if (s->name)
      tot += strlen(s->name) + 1;
    if (s->pass)
      tot += strlen(s->pass) + 1;
    if (s->realname)
      tot += strlen(s->realname) + 1;
    tot += sizeof(struct server_list);
  }

  if (realservername)
    tot += strlen(realservername) + 1;
  tot += msgq_expmem(&mq) + msgq_expmem(&hq) + msgq_expmem(&modeq);

  return tot;
}

Here is the call graph for this function:

Here is the caller graph for this function:

static void server_postrehash

(

)

[static]

Definition at line 1607 of file server.c.

References botname, DP_SERVER, dprintf, fatal, get_altbotnick(), NICKLEN, NULL, oldnick, origbotname, rfc_casecmp, and strncpyz.

Referenced by server_close(), and server_start().

{
  strncpyz(botname, origbotname, NICKLEN);
  if (!botname[0])
    fatal("NO BOT NAME.", 0);
  if (serverlist == NULL)
    fatal("NO SERVER.", 0);
  if (oldnick[0] && !rfc_casecmp(oldnick, botname) &&
      !rfc_casecmp(oldnick, get_altbotnick())) {
    /* Change botname back, don't be premature. */
    strcpy(botname, oldnick);
    dprintf(DP_SERVER, "NICK %s\n", origbotname);
  }
  /* Change botname back incase we were using altnick previous to rehash. */
  else if (oldnick[0])
    strcpy(botname, oldnick);
}

Here is the call graph for this function:

Here is the caller graph for this function:

static void server_prerehash

(

)

[static]

Definition at line 1602 of file server.c.

References botname, and oldnick.

Referenced by server_close(), and server_start().

{
  strcpy(oldnick, botname);
}

Here is the caller graph for this function:

static void server_report	(	int	idx,
		int	details
	)			[static]

Definition at line 1683 of file server.c.

References botname, botrealname, botuserhost, connectserver, daysdur, dcc, dprintf, egg_snprintf, findanyidx, flud_ctcp_thr, flud_ctcp_time, flud_thr, flud_time, initserver, IRC_HELPQUEUE, IRC_MODEQUEUE, IRC_NOSERVER, IRC_SERVERQUEUE, keepnick, lastpingcheck, maxqmsg, min_servs, modeq, nick_juped, now, origbotname, server_list::port, serv, server_expmem(), server_lag, server_online, msgq_head::tot, and trying_server.

{
  char s1[64], s[128];
  int servidx;

  if (server_online) {
    dprintf(idx, "    Online as: %s%s%s (%s)\n", botname, botuserhost[0] ?
            "!" : "", botuserhost[0] ? botuserhost : "", botrealname);
    if (nick_juped)
      dprintf(idx, "    NICK IS JUPED: %s%s\n", origbotname,
              keepnick ? " (trying)" : "");
    daysdur(now, server_online, s1);
    egg_snprintf(s, sizeof s, "(connected %s)", s1);
    if (server_lag && !lastpingcheck) {
      if (server_lag == -1)
        egg_snprintf(s1, sizeof s1, " (bad pong replies)");
      else
        egg_snprintf(s1, sizeof s1, " (lag: %ds)", server_lag);
      strcat(s, s1);
    }
  }

  if ((trying_server || server_online) &&
      ((servidx = findanyidx(serv)) != -1)) {
    dprintf(idx, "    Server %s:%d %s\n", dcc[servidx].host, dcc[servidx].port,
            trying_server ? "(trying)" : s);
  } else
    dprintf(idx, "    %s\n", IRC_NOSERVER);

  if (modeq.tot)
    dprintf(idx, "    %s %d%% (%d msgs)\n", IRC_MODEQUEUE,
            (int) ((float) (modeq.tot * 100.0) / (float) maxqmsg),
            (int) modeq.tot);
  if (mq.tot)
    dprintf(idx, "    %s %d%% (%d msgs)\n", IRC_SERVERQUEUE,
            (int) ((float) (mq.tot * 100.0) / (float) maxqmsg), (int) mq.tot);
  if (hq.tot)
    dprintf(idx, "    %s %d%% (%d msgs)\n", IRC_HELPQUEUE,
            (int) ((float) (hq.tot * 100.0) / (float) maxqmsg), (int) hq.tot);

  if (details) {
    int size = server_expmem();

    if (min_servs)
      dprintf(idx, "    Requiring a network with at least %d server%s\n",
              min_servs, (min_servs != 1) ? "s" : "");
    if (initserver[0])
      dprintf(idx, "    On connect, I do: %s\n", initserver);
    if (connectserver[0])
      dprintf(idx, "    Before connect, I do: %s\n", connectserver);
    dprintf(idx, "    Msg flood: %d msg%s/%d second%s\n", flud_thr,
            (flud_thr != 1) ? "s" : "", flud_time,
            (flud_time != 1) ? "s" : "");
    dprintf(idx, "    CTCP flood: %d msg%s/%d second%s\n", flud_ctcp_thr,
            (flud_ctcp_thr != 1) ? "s" : "", flud_ctcp_time,
            (flud_ctcp_time != 1) ? "s" : "");
    dprintf(idx, "    Using %d byte%s of memory\n", size,
            (size != 1) ? "s" : "");
  }
}

Here is the call graph for this function:

static void server_secondly

(

)

[static]

Definition at line 1573 of file server.c.

References connect_server(), cycle_time, deq_msg(), resolvserv, and serv.

Referenced by server_close(), and server_start().

{
  if (cycle_time)
    cycle_time--;
  deq_msg();
  if (!resolvserv && serv < 0)
    connect_server();
}

Here is the call graph for this function:

Here is the caller graph for this function:

char* server_start

(

Function *

global_funcs

)

Definition at line 1861 of file server.c.

References add_bind_table, add_builtins, add_help_reference, add_hook, add_tcl_commands, add_tcl_coups, add_tcl_ints, add_tcl_strings, altnick, answer_ctcp, botname, botrealname, botuserhost, _tcl_strings::buf, burst, C_dcc_serv, check_mode_r, check_stoned, connectserver, curserv, cycle_time, default_port, do_nettype(), double_help, double_mode, double_server, double_warned, EGG_CONST, exclusive_binds, flud_ctcp_thr, flud_ctcp_time, flud_thr, flud_time, global, H_dcc, msgq_head::head, HOOK_5MINUTELY, HOOK_DIE, HOOK_MINUTELY, HOOK_PRE_REHASH, HOOK_QSERV, HOOK_REHASH, HOOK_SECONDLY, HT_STACKABLE, initserver, interp, keepnick, kick_method, msgq_head::last, last_time, lastpingcheck, lastpingtime, lowercase_ctcp, maxqmsg, min_servs, minutely_checks(), modeq, module_depend, MODULE_NAME, module_register, module_undepend, msgrate, my_raw_binds, net_type, NETT_EFNET, never_give_up, newserver, newserverport, nick_len, NICKLEN, NULL, oldnick, optimize_kicks, origbotname, queue_server(), raltnick, realservername, resolvserv, serv, server_5minutely(), server_cycle_wait, server_die(), server_lag, server_online, server_postrehash(), server_prerehash(), server_secondly(), server_timeout, serverror_quit, stack_limit, stackable2cmds, stackablecmds, strncpyz, tcl_eggserver(), tcl_traceserver, msgq_head::tot, traced_nettype(), trigger_on_ignore, trying_server, use_fastdeq, use_penalties, and msgq_head::warned.

{
  EGG_CONST char *s;

  global = global_funcs;

  /*
   * Init of all the variables *must* be done in _start rather than
   * globally.
   */
  serv = -1;
  botname[0] = 0;
  trying_server = 0L;
  server_lag = 0;
  altnick[0] = 0;
  raltnick[0] = 0;
  curserv = 0;
  flud_thr = 5;
  flud_time = 60;
  flud_ctcp_thr = 3;
  flud_ctcp_time = 60;
  initserver[0] = 0;
  connectserver[0] = 0;         /* drummer */
  botuserhost[0] = 0;
  keepnick = 1;
  check_stoned = 1;
  serverror_quit = 1;
  lastpingcheck = 0;
  server_online = 0;
  server_cycle_wait = 60;
  strcpy(botrealname, "A deranged product of evil coders");
  min_servs = 0;
  server_timeout = 60;
  never_give_up = 0;
  serverlist = NULL;
  cycle_time = 0;
  default_port = 6667;
  oldnick[0] = 0;
  trigger_on_ignore = 0;
  exclusive_binds = 0;
  answer_ctcp = 1;
  lowercase_ctcp = 0;
  check_mode_r = 0;
  maxqmsg = 300;
  burst = 0;
  net_type = NETT_EFNET;
  double_mode = 0;
  double_server = 0;
  double_help = 0;
  use_penalties = 0;
  use_fastdeq = 0;
  stackablecmds[0] = 0;
  strcpy(stackable2cmds, "USERHOST ISON");
  resolvserv = 0;
  lastpingtime = 0;
  last_time = 0;
  nick_len = 9;
  kick_method = 1;
  optimize_kicks = 0;
  stack_limit = 4;
  realservername = 0;
  msgrate = 2;

  server_table[4] = (Function) botname;
  module_register(MODULE_NAME, server_table, 1, 3);
  if (!module_depend(MODULE_NAME, "eggdrop", 106, 7)) {
    module_undepend(MODULE_NAME);
    return "This module requires Eggdrop 1.6.7 or later.";
  }

  /* Fool bot in reading the values. */
  tcl_eggserver(NULL, interp, "servers", NULL, 0);
  tcl_traceserver("servers", NULL);
  s = Tcl_GetVar(interp, "nick", TCL_GLOBAL_ONLY);
  if (s)
    strncpyz(origbotname, s, NICKLEN);
  Tcl_TraceVar(interp, "nick",
               TCL_TRACE_READS | TCL_TRACE_WRITES | TCL_TRACE_UNSETS,
               nick_change, NULL);
  Tcl_TraceVar(interp, "altnick",
               TCL_TRACE_WRITES | TCL_TRACE_UNSETS, altnick_change, NULL);
  Tcl_TraceVar(interp, "botname",
               TCL_TRACE_READS | TCL_TRACE_WRITES | TCL_TRACE_UNSETS,
               traced_botname, NULL);
  Tcl_TraceVar(interp, "server",
               TCL_TRACE_READS | TCL_TRACE_WRITES | TCL_TRACE_UNSETS,
               traced_server, NULL);
  Tcl_TraceVar(interp, "serveraddress",
               TCL_TRACE_READS | TCL_TRACE_WRITES | TCL_TRACE_UNSETS,
               traced_serveraddress, NULL);
  Tcl_TraceVar(interp, "net-type",
               TCL_TRACE_READS | TCL_TRACE_WRITES | TCL_TRACE_UNSETS,
               traced_nettype, NULL);
  Tcl_TraceVar(interp, "nick-len",
               TCL_TRACE_READS | TCL_TRACE_WRITES | TCL_TRACE_UNSETS,
               traced_nicklen, NULL);

  H_wall = add_bind_table("wall", HT_STACKABLE, server_2char);
  H_raw = add_bind_table("raw", HT_STACKABLE, server_raw);
  H_notc = add_bind_table("notc", HT_STACKABLE, server_5char);
  H_msgm = add_bind_table("msgm", HT_STACKABLE, server_msg);
  H_msg = add_bind_table("msg", 0, server_msg);
  H_flud = add_bind_table("flud", HT_STACKABLE, server_5char);
  H_ctcr = add_bind_table("ctcr", HT_STACKABLE, server_6char);
  H_ctcp = add_bind_table("ctcp", HT_STACKABLE, server_6char);
  H_out = add_bind_table("out", HT_STACKABLE, server_out);
  add_builtins(H_raw, my_raw_binds);
  add_builtins(H_dcc, C_dcc_serv);
  add_builtins(H_ctcp, my_ctcps);
  add_help_reference("server.help");
  my_tcl_strings[0].buf = botname;
  add_tcl_strings(my_tcl_strings);
  add_tcl_ints(my_tcl_ints);
  add_tcl_commands(my_tcl_cmds);
  add_tcl_coups(my_tcl_coups);
  add_hook(HOOK_SECONDLY, (Function) server_secondly);
  add_hook(HOOK_5MINUTELY, (Function) server_5minutely);
  add_hook(HOOK_MINUTELY, (Function) minutely_checks);
  add_hook(HOOK_QSERV, (Function) queue_server);
  add_hook(HOOK_PRE_REHASH, (Function) server_prerehash);
  add_hook(HOOK_REHASH, (Function) server_postrehash);
  add_hook(HOOK_DIE, (Function) server_die);
  mq.head = hq.head = modeq.head = NULL;
  mq.last = hq.last = modeq.last = NULL;
  mq.tot = hq.tot = modeq.tot = 0;
  mq.warned = hq.warned = modeq.warned = 0;
  double_warned = 0;
  newserver[0] = 0;
  newserverport = 0;
  curserv = 999;
  do_nettype();
  return NULL;
}

Here is the call graph for this function:

char* server_start

(

)

char * splitnicks

(

char **

rest

)

[static]

Definition at line 376 of file server.c.

Referenced by calc_penalty(), deq_kick(), parse_q(), and purge_kicks().

{
  register char *o, *r;

  if (!rest)
    return *rest = "";
  o = *rest;
  while (*o == ' ')
    o++;
  r = o;
  while (*o && *o != ',')
    o++;
  if (*o)
    *o++ = 0;
  *rest = o;
  return r;
}

Here is the caller graph for this function:

static char* tcl_eggserver	(	ClientData	cdata,
		Tcl_Interp *	irp,
		char *	name1,
		char *	name2,
		int	flags
	)			[static]

Definition at line 1399 of file server.c.

References add_server(), clearq(), curserv, dcc, default_port, EGG_CONST, egg_snprintf, findanyidx, interp, server_list::name, server_list::next, next_server(), NULL, server_list::pass, server_list::port, server_list::realname, serv, server_online, and Tcl_Free.

Referenced by server_start().

{
  int lc, code, i;
  char x[1024];
  EGG_CONST char **list, *slist;
  struct server_list *q;
  Tcl_DString ds;

  if (flags & (TCL_TRACE_READS | TCL_TRACE_UNSETS)) {
    /* Create server list */
    Tcl_DStringInit(&ds);
    for (q = serverlist; q; q = q->next) {
      egg_snprintf(x, sizeof x, "%s:%d%s%s %s", q->name,
                   q->port ? q->port : default_port, q->pass ? ":" : "",
                   q->pass ? q->pass : "", q->realname ? q->realname : "");
      Tcl_DStringAppendElement(&ds, x);
    }
    slist = Tcl_DStringValue(&ds);
    Tcl_SetVar2(interp, name1, name2, slist, TCL_GLOBAL_ONLY);
    Tcl_DStringFree(&ds);
  } else {                        /* TCL_TRACE_WRITES */
    if (serverlist) {
      clearq(serverlist);
      serverlist = NULL;
    }
    slist = Tcl_GetVar2(interp, name1, name2, TCL_GLOBAL_ONLY);
    if (slist != NULL) {
      code = Tcl_SplitList(interp, slist, &lc, &list);
      if (code == TCL_ERROR)
        return "variable must be a list";
      for (i = 0; i < lc && i < 50; i++)
        add_server((char *) list[i]);

      /* Tricky way to make the bot reset its server pointers
       * perform part of a '.jump <current-server>':
       */
      if (server_online) {
        int servidx = findanyidx(serv);

        curserv = -1;
        if (serverlist)
          next_server(&curserv, dcc[servidx].host, &dcc[servidx].port, "");
      }
      Tcl_Free((char *) list);
    }
  }
  return NULL;
}

Here is the call graph for this function:

Here is the caller graph for this function:

---

Variable Documentation

char altnick[32->32 */+1] [static]

Definition at line 41 of file server.c.

Referenced by gotnick(), and server_start().

int answer_ctcp [static]

Definition at line 77 of file server.c.

Referenced by gotmsg(), and server_start().

char botrealname[121] [static]

Definition at line 65 of file server.c.

Referenced by server_report(), server_resolve_success(), and server_start().

char botuserhost[121] [static]

Definition at line 50 of file server.c.

Referenced by connect_server(), detect_chan_flood(), detect_flood(), disconnect_server(), do_channel_part(), enforce_bans(), got311(), got352or4(), got_ban(), msg_status(), server_report(), and server_start().

int burst [static]

Definition at line 126 of file server.c.

Referenced by cmd_clearqueue(), deq_msg(), empty_msgq(), and server_start().

int check_mode_r [static]

Definition at line 79 of file server.c.

Referenced by gotmode(), and server_start().

int check_stoned [static]

Definition at line 57 of file server.c.

Referenced by server_5minutely(), and server_start().

char connectserver[121] [static]

Definition at line 81 of file server.c.

Referenced by connect_server(), server_report(), and server_start().

int ctcp_mode [static]

Definition at line 34 of file server.c.

int curserv [static]

Definition at line 43 of file server.c.

Referenced by cmd_servers(), connect_server(), got001(), server_resolve_success(), server_start(), and tcl_eggserver().

int cycle_time [static]

Definition at line 71 of file server.c.

Referenced by cmd_jump(), connect_server(), msg_jump(), server_close(), server_die(), server_secondly(), and server_start().

int default_port [static]

Definition at line 72 of file server.c.

Referenced by add_server(), cmd_jump(), cmd_servers(), msg_jump(), next_server(), server_start(), and tcl_eggserver().

int double_help [static]

Definition at line 86 of file server.c.

Referenced by queue_server(), and server_start().

int double_mode [static]

Definition at line 84 of file server.c.

Referenced by queue_server(), and server_start().

int double_server [static]

Definition at line 85 of file server.c.

Referenced by queue_server(), and server_start().

int double_warned [static]

Definition at line 87 of file server.c.

Referenced by cmd_clearqueue(), queue_server(), and server_start().

int exclusive_binds [static]

Definition at line 75 of file server.c.

Referenced by gotmsg(), and server_start().

int flud_ctcp_thr [static]

Definition at line 46 of file server.c.

Referenced by detect_flood(), gotmsg(), gotnotice(), server_report(), and server_start().

int flud_ctcp_time [static]

Definition at line 47 of file server.c.

Referenced by detect_flood(), gotmsg(), server_report(), and server_start().

int flud_thr [static]

Definition at line 44 of file server.c.

Referenced by detect_flood(), server_report(), and server_start().

int flud_time [static]

Definition at line 45 of file server.c.

Referenced by detect_flood(), server_report(), and server_start().

Function* global = 0 [static]

Definition at line 32 of file server.c.

p_tcl_bind_list H_ctcp [static]

Definition at line 101 of file server.c.

Referenced by check_tcl_ctcpr(), ctcp_close(), ctcp_start(), filesys_close(), init_server_ctcps(), server_transfer_setup(), and transfer_close().

p_tcl_bind_list H_ctcr [static]

Definition at line 101 of file server.c.

Referenced by check_tcl_ctcpr().

p_tcl_bind_list H_flud [static]

Definition at line 101 of file server.c.

Referenced by check_tcl_flud().

p_tcl_bind_list H_msg [static]

Definition at line 101 of file server.c.

Referenced by check_tcl_msg(), irc_close(), and irc_start().

p_tcl_bind_list H_msgm [static]

Definition at line 101 of file server.c.

Referenced by check_tcl_msgm().

p_tcl_bind_list H_notc [static]

Definition at line 101 of file server.c.

Referenced by check_tcl_notc().

p_tcl_bind_list H_out [static]

Definition at line 101 of file server.c.

Referenced by check_tcl_out().

p_tcl_bind_list H_raw [static]

Definition at line 101 of file server.c.

Referenced by check_tcl_raw(), check_tcl_raw4(), irc_close(), and irc_start().

p_tcl_bind_list H_wall [static]

Definition at line 101 of file server.c.

Referenced by check_tcl_wall().

char initserver[121] [static]

Definition at line 48 of file server.c.

Referenced by got001(), server_report(), and server_start().

int keepnick [static]

Definition at line 54 of file server.c.

Referenced by server_report(), and server_start().

int kick_method [static]

Definition at line 96 of file server.c.

Referenced by deq_kick(), and server_start().

time_t last_time [static]

Definition at line 91 of file server.c.

Referenced by calc_penalty(), deq_kick(), deq_msg(), fast_deq(), gotkick(), server_start(), and whoispenalty().

time_t lastpingcheck [static]

Definition at line 60 of file server.c.

Referenced by connect_server(), server_5minutely(), server_activity(), server_report(), and server_start().

int lastpingtime [static]

Definition at line 88 of file server.c.

Referenced by gotpong(), queue_server(), and server_start().

int lowercase_ctcp [static]

Definition at line 78 of file server.c.

Referenced by gotmsg(), and server_start().

int maxqmsg [static]

Definition at line 124 of file server.c.

Referenced by queue_server(), server_report(), and server_start().

int min_servs [static]

Definition at line 66 of file server.c.

Referenced by got251(), minutely_checks(), server_report(), and server_start().

struct msgq_head mq hq modeq [static]

Definition at line 125 of file server.c.

Referenced by check_queues(), cmd_clearqueue(), deq_kick(), deq_msg(), empty_msgq(), fast_deq(), queue_server(), server_expmem(), server_report(), and server_start().

int msgrate [static]

Definition at line 98 of file server.c.

Referenced by deq_msg(), and server_start().

cmd_t my_ctcps[] [static]

Initial value:

 {
  {"DCC", "",   ctcp_DCC_CHAT, "server:DCC"},
  { 0 ,   0 ,  0 ,                   0 }
}

Definition at line 1744 of file server.c.

tcl_coups my_tcl_coups[] [static]

Initial value:

 {
  {"flood-ctcp", &flud_ctcp_thr, &flud_ctcp_time},
  {"flood-msg",  &flud_thr,           &flud_time},
  { 0 ,          0 ,                       0 }
}

Definition at line 1353 of file server.c.

tcl_ints my_tcl_ints[] [static]

Definition at line 1359 of file server.c.

int net_type [static]

Definition at line 80 of file server.c.

Referenced by calc_penalty(), and server_start().

int never_give_up [static]

Definition at line 68 of file server.c.

Referenced by connect_server(), server_resolve_success(), and server_start().

char newserver[121] [static]

Definition at line 36 of file server.c.

Referenced by cmd_jump(), connect_server(), msg_jump(), and server_start().

char newserverpass[121] [static]

Definition at line 38 of file server.c.

Referenced by cmd_jump(), connect_server(), and msg_jump().

int newserverport [static]

Definition at line 37 of file server.c.

Referenced by cmd_jump(), connect_server(), msg_jump(), and server_start().

int nick_juped = 0 [static]

Definition at line 56 of file server.c.

Referenced by connect_server(), got303(), got433(), got437(), gotnick(), and server_report().

int nick_len [static]

Definition at line 94 of file server.c.

Referenced by gotfake433(), and server_start().

char oldnick[32->32 */+1] [static]

Definition at line 73 of file server.c.

Referenced by server_postrehash(), server_prerehash(), and server_start().

int optimize_kicks [static]

Definition at line 97 of file server.c.

Referenced by check_queues(), deq_kick(), parse_q(), and server_start().

char raltnick[32->32 */+1] [static]

Definition at line 42 of file server.c.

Referenced by server_start().

char* realservername [static]

Definition at line 117 of file server.c.

Referenced by cmd_servers(), disconnect_server(), got001(), got442(), server_expmem(), server_start(), and whoispenalty().

int resolvserv [static]

Definition at line 83 of file server.c.

Referenced by connect_server(), server_resolve_failure(), server_resolve_success(), server_secondly(), and server_start().

int serv [static]

Definition at line 35 of file server.c.

Referenced by deq_msg(), disconnect_server(), gotmode(), msg_die(), msg_jump(), nuke_server(), queue_server(), send_uptime(), server_5minutely(), server_die(), server_report(), server_resolve_failure(), server_resolve_success(), server_secondly(), server_start(), and tcl_eggserver().

time_t server_cycle_wait [static]

Definition at line 63 of file server.c.

Referenced by connect_server(), and server_start().

int server_lag [static]

Definition at line 40 of file server.c.

Referenced by display_server(), gotpong(), server_report(), and server_start().

time_t server_online [static]

Definition at line 62 of file server.c.

Referenced by check_expired_chanstuff(), disconnect_server(), got001(), got432(), got433(), got437(), minutely_checks(), send_uptime(), server_5minutely(), server_die(), server_report(), server_start(), status_log(), and tcl_eggserver().

Function server_table[] [static]

Definition at line 1807 of file server.c.

int server_timeout [static]

Definition at line 67 of file server.c.

Referenced by server_resolve_success(), and server_start().

struct server_list* serverlist [static]

Definition at line 69 of file server.c.

Referenced by cmd_servers(), connect_server(), and got001().

int serverror_quit [static]

Definition at line 58 of file server.c.

Referenced by goterror(), and server_start().

int stack_limit [static]

Definition at line 116 of file server.c.

Referenced by fast_deq(), and server_start().

char stackable2cmds[511] [static]

Definition at line 90 of file server.c.

Referenced by fast_deq(), and server_start().

char stackablecmds[511] [static]

Definition at line 89 of file server.c.

Referenced by fast_deq(), and server_start().

int trigger_on_ignore [static]

Definition at line 74 of file server.c.

Referenced by gotmsg(), gotnotice(), and server_start().

time_t trying_server [static]

Definition at line 39 of file server.c.

Referenced by connect_server(), display_server(), server_5minutely(), server_activity(), server_report(), and server_start().

int use_fastdeq [static]

Definition at line 93 of file server.c.

Referenced by fast_deq(), and server_start().

int use_penalties [static]

Definition at line 92 of file server.c.

Referenced by calc_penalty(), gotkick(), server_start(), and whoispenalty().