Merge branch 'u2_10_12_branch' of git://git.code.sf.net/p/undernet-ircu/ircu2
[ircu2.10.12-pk.git] / ircd / m_settime.c
diff --git a/ircd/m_settime.c b/ircd/m_settime.c
new file mode 100644 (file)
index 0000000..39ec6aa
--- /dev/null
@@ -0,0 +1,265 @@
+/*
+ * IRC - Internet Relay Chat, ircd/m_settime.c
+ * Copyright (C) 1990 Jarkko Oikarinen and
+ *                    University of Oulu, Computing Center
+ *
+ * See file AUTHORS in IRC package for additional names of
+ * the programmers.
+ *
+ * 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 1, 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., 675 Mass Ave, Cambridge, MA 02139, USA.
+ *
+ * $Id$
+ */
+
+/*
+ * m_functions execute protocol messages on this server:
+ *
+ *    cptr    is always NON-NULL, pointing to a *LOCAL* client
+ *            structure (with an open socket connected!). This
+ *            identifies the physical socket where the message
+ *            originated (or which caused the m_function to be
+ *            executed--some m_functions may call others...).
+ *
+ *    sptr    is the source of the message, defined by the
+ *            prefix part of the message if present. If not
+ *            or prefix not found, then sptr==cptr.
+ *
+ *            (!IsServer(cptr)) => (cptr == sptr), because
+ *            prefixes are taken *only* from servers...
+ *
+ *            (IsServer(cptr))
+ *                    (sptr == cptr) => the message didn't
+ *                    have the prefix.
+ *
+ *                    (sptr != cptr && IsServer(sptr) means
+ *                    the prefix specified servername. (?)
+ *
+ *                    (sptr != cptr && !IsServer(sptr) means
+ *                    that message originated from a remote
+ *                    user (not local).
+ *
+ *            combining
+ *
+ *            (!IsServer(sptr)) means that, sptr can safely
+ *            taken as defining the target structure of the
+ *            message in this server.
+ *
+ *    *Always* true (if 'parse' and others are working correct):
+ *
+ *    1)      sptr->from == cptr  (note: cptr->from == cptr)
+ *
+ *    2)      MyConnect(sptr) <=> sptr == cptr (e.g. sptr
+ *            *cannot* be a local connection, unless it's
+ *            actually cptr!). [MyConnect(x) should probably
+ *            be defined as (x == x->from) --msa ]
+ *
+ *    parc    number of variable parameter strings (if zero,
+ *            parv is allowed to be NULL)
+ *
+ *    parv    a NULL terminated list of parameter pointers,
+ *
+ *                    parv[0], sender (prefix string), if not present
+ *                            this points to an empty string.
+ *                    parv[1]...parv[parc-1]
+ *                            pointers to additional parameters
+ *                    parv[parc] == NULL, *always*
+ *
+ *            note:   it is guaranteed that parv[0]..parv[parc-1] are all
+ *                    non-NULL pointers.
+ */
+#include "config.h"
+
+#include "client.h"
+#include "hash.h"
+#include "ircd.h"
+#include "ircd_features.h"
+#include "ircd_log.h"
+#include "ircd_reply.h"
+#include "ircd_snprintf.h"
+#include "ircd_string.h"
+#include "list.h"
+#include "msg.h"
+#include "numeric.h"
+#include "numnicks.h"
+#include "s_user.h"
+#include "send.h"
+#include "struct.h"
+
+/* #include <assert.h> -- Now using assert in ircd_log.h */
+#include <stdlib.h>
+
+/*
+ * ms_settime - server message handler
+ *
+ * parv[0] = sender prefix
+ * parv[1] = new time
+ * parv[2] = server name (Only used when sptr is an Oper).
+ */
+int ms_settime(struct Client* cptr, struct Client* sptr, int parc, char* parv[])
+{
+  time_t t;
+  long dt;
+  static char tbuf[11];
+  struct DLink *lp;
+
+  if (parc < 2) /* verify argument count */
+    return need_more_params(sptr, "SETTIME");
+
+  t = atoi(parv[1]); /* convert time and compute delta */
+  dt = TStime() - t;
+
+  /* verify value */
+  if (t < OLDEST_TS || dt < -9000000)
+  {
+    if (IsServer(sptr)) /* protocol violation if it's from a server */
+      protocol_violation(sptr, "SETTIME: Bad value (%Tu, delta %ld)", t, dt);
+    else
+      sendcmdto_one(&me, CMD_NOTICE, sptr, "%C :SETTIME: Bad value (%Tu, "
+                    "delta %ld)", sptr, t, dt);
+      sendcmdto_one(&me, CMD_NOTICE, sptr, "%C :SETTIME: Bad value", sptr);
+    return 0;
+  }
+
+  /* reset time... */
+  if (feature_bool(FEAT_RELIABLE_CLOCK))
+  {
+    ircd_snprintf(0, tbuf, sizeof(tbuf), "%Tu", TStime());
+    parv[1] = tbuf;
+  }
+
+  if (BadPtr(parv[2])) /* spam the network */
+  {
+    for (lp = cli_serv(&me)->down; lp; lp = lp->next)
+      if (cptr != lp->value.cptr)
+        sendcmdto_prio_one(sptr, CMD_SETTIME, lp->value.cptr, "%s", parv[1]);
+  }
+  else
+  {
+    if (hunt_server_prio_cmd(sptr, CMD_SETTIME, cptr, 1, "%s %C", 2, parc,
+                             parv) != HUNTED_ISME)
+    {
+      /* If the destination was *not* me, but I'm RELIABLE_CLOCK and the
+       * delta is more than 30 seconds off, bounce back a corrected
+       * SETTIME
+       */
+      if (feature_bool(FEAT_RELIABLE_CLOCK) && (dt > 30 || dt < -30))
+        sendcmdto_prio_one(&me, CMD_SETTIME, cptr, "%s %C", parv[1], cptr);
+      return 0;
+    }
+  }
+
+  if (feature_bool(FEAT_RELIABLE_CLOCK))
+  {
+    /* don't apply settime--reliable */
+    if ((dt > 600) || (dt < -600))
+      sendcmdto_serv_butone(&me, CMD_DESYNCH, 0, ":Bad SETTIME from %s: %Tu "
+                            "(delta %ld)", cli_name(sptr), t, dt);
+    /* Let user know we're ignoring him */
+    if (IsUser(sptr))
+    {
+      sendcmdto_one(&me, CMD_NOTICE, sptr, "%C :clock is not set %ld "
+                   "seconds %s : RELIABLE_CLOCK is defined", sptr,
+                   (dt < 0) ? -dt : dt, (dt < 0) ? "forwards" : "backwards");
+    }
+  }
+  else /* tell opers about time change */
+  {
+    sendto_opmask_butone(0, SNO_OLDSNO, "SETTIME from %s, clock is set %ld "
+                        "seconds %s", cli_name(sptr), (dt < 0) ? -dt : dt,
+                        (dt < 0) ? "forwards" : "backwards");
+    /* Apply time change... */
+    TSoffset -= dt;
+    /* Let the issuing user know what we did... */
+    if (IsUser(sptr))
+    {
+      sendcmdto_one(&me, CMD_NOTICE, sptr, "%C :clock is set %ld seconds %s",
+                    sptr, (dt < 0) ? -dt : dt,
+                    (dt < 0) ? "forwards" : "backwards");
+    }
+  }
+
+  return 0;
+}
+
+/*
+ * mo_settime - oper message handler
+ *
+ * parv[0] = sender prefix
+ * parv[1] = new time
+ * parv[2] = servername (Only used when sptr is an Oper).
+ */
+int mo_settime(struct Client* cptr, struct Client* sptr, int parc, char* parv[])
+{
+  time_t t;
+  long dt;
+  static char tbuf[11];
+
+  /* Must be a global oper */
+  if (!IsOper(sptr))
+    return send_reply(sptr, ERR_NOPRIVILEGES);
+
+  if (parc < 2) /* verify argument count */
+    return need_more_params(sptr, "SETTIME");
+
+  if (parc == 2 && MyUser(sptr)) /* default to me */
+    parv[parc++] = cli_name(&me);
+
+  t = atoi(parv[1]); /* convert the time */
+
+  /* If we're reliable_clock or if the oper specified a 0 time, use current */
+  if (!t || feature_bool(FEAT_RELIABLE_CLOCK))
+  {
+    t = TStime();
+    ircd_snprintf(0, tbuf, sizeof(tbuf), "%Tu", TStime());
+    parv[1] = tbuf;
+  }
+
+  dt = TStime() - t; /* calculate the delta */
+
+  if (t < OLDEST_TS || dt < -9000000) /* verify value */
+  {
+    sendcmdto_one(&me, CMD_NOTICE, sptr, "%C :SETTIME: Bad value", sptr);
+    return 0;
+  }
+
+  /* OK, send the message off to its destination */
+  if (hunt_server_prio_cmd(sptr, CMD_SETTIME, cptr, 1, "%s %C", 2, parc,
+                           parv) != HUNTED_ISME)
+    return 0;
+
+  if (feature_bool(FEAT_RELIABLE_CLOCK)) /* don't apply settime--reliable */
+  {
+    if ((dt > 600) || (dt < -600))
+      sendcmdto_serv_butone(&me, CMD_DESYNCH, 0, ":Bad SETTIME from %s: %Tu "
+                            "(delta %ld)", cli_name(sptr), t, dt);
+    if (IsUser(sptr)) /* Let user know we're ignoring him */
+      sendcmdto_one(&me, CMD_NOTICE, sptr, "%C :clock is not set %ld seconds "
+                    "%s: RELIABLE_CLOCK is defined", sptr, (dt < 0) ? -dt : dt,
+                    (dt < 0) ? "forwards" : "backwards");
+  }
+  else /* tell opers about time change */
+  {
+    sendto_opmask_butone(0, SNO_OLDSNO, "SETTIME from %s, clock is set %ld "
+                        "seconds %s", cli_name(sptr), (dt < 0) ? -dt : dt,
+                        (dt < 0) ? "forwards" : "backwards");
+    TSoffset -= dt; /* apply time change */
+    if (IsUser(sptr)) /* let user know what we did */
+      sendcmdto_one(&me, CMD_NOTICE, sptr, "%C :clock is set %ld seconds %s",
+                   sptr, (dt < 0) ? -dt : dt,
+                   (dt < 0) ? "forwards" : "backwards");
+  }
+
+  return 0;
+}