2 * IRC - Internet Relay Chat, ircd/m_settime.c
3 * Copyright (C) 1990 Jarkko Oikarinen and
4 * University of Oulu, Computing Center
6 * See file AUTHORS in IRC package for additional names of
9 * This program is free software; you can redistribute it and/or modify
10 * it under the terms of the GNU General Public License as published by
11 * the Free Software Foundation; either version 1, or (at your option)
14 * This program is distributed in the hope that it will be useful,
15 * but WITHOUT ANY WARRANTY; without even the implied warranty of
16 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
17 * GNU General Public License for more details.
19 * You should have received a copy of the GNU General Public License
20 * along with this program; if not, write to the Free Software
21 * Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
27 * m_functions execute protocol messages on this server:
29 * cptr is always NON-NULL, pointing to a *LOCAL* client
30 * structure (with an open socket connected!). This
31 * identifies the physical socket where the message
32 * originated (or which caused the m_function to be
33 * executed--some m_functions may call others...).
35 * sptr is the source of the message, defined by the
36 * prefix part of the message if present. If not
37 * or prefix not found, then sptr==cptr.
39 * (!IsServer(cptr)) => (cptr == sptr), because
40 * prefixes are taken *only* from servers...
43 * (sptr == cptr) => the message didn't
46 * (sptr != cptr && IsServer(sptr) means
47 * the prefix specified servername. (?)
49 * (sptr != cptr && !IsServer(sptr) means
50 * that message originated from a remote
55 * (!IsServer(sptr)) means that, sptr can safely
56 * taken as defining the target structure of the
57 * message in this server.
59 * *Always* true (if 'parse' and others are working correct):
61 * 1) sptr->from == cptr (note: cptr->from == cptr)
63 * 2) MyConnect(sptr) <=> sptr == cptr (e.g. sptr
64 * *cannot* be a local connection, unless it's
65 * actually cptr!). [MyConnect(x) should probably
66 * be defined as (x == x->from) --msa ]
68 * parc number of variable parameter strings (if zero,
69 * parv is allowed to be NULL)
71 * parv a NULL terminated list of parameter pointers,
73 * parv[0], sender (prefix string), if not present
74 * this points to an empty string.
75 * parv[1]...parv[parc-1]
76 * pointers to additional parameters
77 * parv[parc] == NULL, *always*
79 * note: it is guaranteed that parv[0]..parv[parc-1] are all
87 #include "ircd_features.h"
88 #include "ircd_reply.h"
89 #include "ircd_snprintf.h"
90 #include "ircd_string.h"
103 * ms_settime - server message handler
105 * parv[0] = sender prefix
107 * parv[2] = server name (Only used when sptr is an Oper).
109 int ms_settime(struct Client* cptr, struct Client* sptr, int parc, char* parv[])
113 static char tbuf[11];
117 return need_more_params(sptr, "SETTIME");
122 if (t < OLDEST_TS || dt < -9000000)
125 protocol_violation(sptr, "SETTIME: Bad value (%Tu, delta %l)", t, dt);
127 sendcmdto_one(&me, CMD_NOTICE, sptr, "%C :SETTIME: Bad value (%Tu, "
128 "delta %l)", sptr, t, dt);
129 sendcmdto_one(&me, CMD_NOTICE, sptr, "%C :SETTIME: Bad value", sptr);
134 if (feature_bool(FEAT_RELIABLE_CLOCK))
136 ircd_snprintf(0, tbuf, sizeof(tbuf), "%Tu", TStime());
142 for (lp = cli_serv(&me)->down; lp; lp = lp->next)
143 if (cptr != lp->value.cptr)
144 sendcmdto_prio_one(sptr, CMD_SETTIME, lp->value.cptr, "%s", parv[1]);
148 if (hunt_server_prio_cmd(sptr, CMD_SETTIME, cptr, 1, "%s %C", 2, parc,
149 parv) != HUNTED_ISME)
151 /* If the destination was *not* me, but I'm RELIABLE_CLOCK and the
152 * delta is more than 30 seconds off, bounce back a corrected
155 if (feature_bool(FEAT_RELIABLE_CLOCK) && (dt > 30 || dt < -30))
156 sendcmdto_prio_one(&me, CMD_SETTIME, cptr, "%s %C", parv[1], cptr);
161 if (feature_bool(FEAT_RELIABLE_CLOCK))
163 /* don't apply settime--reliable */
164 if ((dt > 600) || (dt < -600))
165 sendcmdto_serv_butone(&me, CMD_DESYNCH, 0, ":Bad SETTIME from %s: %Tu "
166 "(delta %l)", cli_name(sptr), t, dt);
167 /* Let user know we're ignoring him */
170 sendcmdto_one(&me, CMD_NOTICE, sptr, "%C :clock is not set %ld "
171 "seconds %s : RELIABLE_CLOCK is defined", sptr,
172 (dt < 0) ? -dt : dt, (dt < 0) ? "forwards" : "backwards");
177 sendto_opmask_butone(0, SNO_OLDSNO, "SETTIME from %s, clock is set %ld "
178 "seconds %s", cli_name(sptr), (dt < 0) ? -dt : dt,
179 (dt < 0) ? "forwards" : "backwards");
180 /* Apply time change... */
182 /* Let the issuing user know what we did... */
185 sendcmdto_one(&me, CMD_NOTICE, sptr, "%C :clock is set %ld seconds %s",
186 sptr, (dt < 0) ? -dt : dt,
187 (dt < 0) ? "forwards" : "backwards");
195 * mo_settime - oper message handler
197 * parv[0] = sender prefix
199 * parv[2] = servername (Only used when sptr is an Oper).
201 int mo_settime(struct Client* cptr, struct Client* sptr, int parc, char* parv[])
205 static char tbuf[11];
207 /* Must be a global oper */
209 return send_reply(sptr, ERR_NOPRIVILEGES);
212 return need_more_params(sptr, "SETTIME");
214 if (parc == 2 && MyUser(sptr))
215 parv[parc++] = cli_name(&me);
218 /* If we're reliable_clock or if the oper specified a 0 time, use current */
219 if (!t || feature_bool(FEAT_RELIABLE_CLOCK))
222 ircd_snprintf(0, tbuf, sizeof(tbuf), "%Tu", TStime());
228 if (t < OLDEST_TS || dt < -9000000)
230 sendcmdto_one(&me, CMD_NOTICE, sptr, "%C :SETTIME: Bad value", sptr);
234 if (hunt_server_prio_cmd(sptr, CMD_SETTIME, cptr, 1, "%s %C", 2, parc,
235 parv) != HUNTED_ISME)
238 if (feature_bool(FEAT_RELIABLE_CLOCK))
240 if ((dt > 600) || (dt < -600))
241 sendcmdto_serv_butone(&me, CMD_DESYNCH, 0, ":Bad SETTIME from %s: %Tu "
242 "(delta %l)", cli_name(sptr), t, dt);
244 sendcmdto_one(&me, CMD_NOTICE, sptr, "%C :clock is not set %ld seconds "
245 "%s: RELIABLE_CLOCK is defined", sptr, (dt < 0) ? -dt : dt,
246 (dt < 0) ? "forward" : "backward");
250 sendto_opmask_butone(0, SNO_OLDSNO, "SETTIME from %s, clock is set %ld "
251 "seconds %s", cli_name(sptr), (dt < 0) ? -dt : dt,
252 (dt < 0) ? "forwards" : "backwards");
255 sendcmdto_one(&me, CMD_NOTICE, sptr, "%C :clock is set %ld seconds %s",
256 sptr, (dt < 0) ? -dt : dt,
257 (dt < 0) ? "forwards" : "backwards");