modules/m_time.c

   1 /*
   2  *  ircd-ratbox: A slightly useful ircd.
   3  *  m_time.c: Sends the current time on the server.
   4  *
   5  *  Copyright (C) 1990 Jarkko Oikarinen and University of Oulu, Co Center
   6  *  Copyright (C) 1996-2002 Hybrid Development Team
   7  *  Copyright (C) 2002-2005 ircd-ratbox development team
   8  *
   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 2 of the License, or
  12  *  (at your option) any later version.
  13  *
  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.
  18  *
  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., 59 Temple Place, Suite 330, Boston, MA  02111-1307
  22  *  USA
  23  */
  24
  25 #include "stdinc.h"
  26 #include "client.h"
  27 #include "ircd.h"
  28 #include "numeric.h"
  29 #include "s_conf.h"
  30 #include "s_serv.h"
  31 #include "send.h"
  32 #include "msg.h"
  33 #include "parse.h"
  34 #include "modules.h"
  35 #include "packet.h"
  36 #include "sprintf_irc.h"
  37
  38 static int m_time(struct Client *, struct Client *, int, const char **);
  39 static char *date(void);
  40
  41 struct Message time_msgtab = {
  42         "TIME", 0, 0, 0, MFLG_SLOW,
  43         {mg_unreg, {m_time, 0}, {m_time, 2}, mg_ignore, mg_ignore, {m_time, 0}}
  44 };
  45
  46 mapi_clist_av1 time_clist[] = { &time_msgtab, NULL };
  47 DECLARE_MODULE_AV1(time, NULL, NULL, time_clist, NULL, NULL, "$Revision: 26 $");
  48
  49 static const char *months[] = {
  50         "January", "February", "March", "April",
  51         "May", "June", "July", "August",
  52         "September", "October", "November", "December"
  53 };
  54
  55 static const char *weekdays[] = {
  56         "Sunday", "Monday", "Tuesday", "Wednesday",
  57         "Thursday", "Friday", "Saturday"
  58 };
  59
  60 /*
  61  * m_time
  62  *      parv[0] = sender prefix
  63  *      parv[1] = servername
  64  */
  65 static int
  66 m_time(struct Client *client_p, struct Client *source_p, int parc, const char *parv[])
  67 {
  68         /* this is not rate limited, so end the grace period */
  69         if(MyClient(source_p) && !IsFloodDone(source_p))
  70                 flood_endgrace(source_p);
  71
  72         if(hunt_server(client_p, source_p, ":%s TIME :%s", 1, parc, parv) == HUNTED_ISME)
  73                 sendto_one_numeric(source_p, RPL_TIME, form_str(RPL_TIME),
  74                                    me.name, date());
  75
  76         return 0;
  77 }
  78
  79 /* date()
  80  *
  81  * returns date in human readable form
  82  */
  83 static char *
  84 date(void)
  85 {
  86         static char buf[80];
  87         char plus;
  88         struct tm *lt;
  89         struct tm *gm;
  90         struct tm gmbuf;
  91         time_t lclock;
  92         int minswest;
  93
  94         lclock = CurrentTime;
  95         gm = gmtime(&lclock);
  96         memcpy((void *) &gmbuf, (void *) gm, sizeof(gmbuf));
  97         gm = &gmbuf;
  98         lt = localtime(&lclock);
  99
 100         if(lt->tm_yday == gm->tm_yday)
 101                 minswest = (gm->tm_hour - lt->tm_hour) * 60 + (gm->tm_min - lt->tm_min);
 102         else if(lt->tm_yday > gm->tm_yday && lt->tm_year == gm->tm_year)
 103                 minswest = (gm->tm_hour - (lt->tm_hour + 24)) * 60;
 104         else
 105                 minswest = ((gm->tm_hour + 24) - lt->tm_hour) * 60;
 106
 107         plus = (minswest > 0) ? '-' : '+';
 108
 109         if(minswest < 0)
 110                 minswest = -minswest;
 111
 112         ircsprintf(buf, "%s %s %d %d -- %02u:%02u:%02u %c%02u:%02u",
 113                    weekdays[lt->tm_wday], months[lt->tm_mon], lt->tm_mday,
 114                    lt->tm_year + 1900, lt->tm_hour, lt->tm_min, lt->tm_sec,
 115                    plus, minswest / 60, minswest % 60);
 116
 117         return buf;
 118 }