]> jfr.im git - irc/rqf/shadowircd.git/blobdiff - modules/m_who.c
mkpasswd: Default to SHA512 instead of inherently insecure DES.
[irc/rqf/shadowircd.git] / modules / m_who.c
index 2bec0964ddebacd14293358f0357ce9772e2b879..769beea2a195afd3d3ef175a39f09cfa2263e40f 100644 (file)
  *  Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307
  *  USA
  *
- *  $Id: m_who.c 3283 2007-03-28 13:11:30Z jilles $
  */
 #include "stdinc.h"
-#include "tools.h"
 #include "common.h"
 #include "client.h"
 #include "channel.h"
 #include "numeric.h"
 #include "s_serv.h"
 #include "send.h"
-#include "irc_string.h"
-#include "sprintf_irc.h"
+#include "match.h"
 #include "s_conf.h"
-#include "s_log.h"
+#include "logger.h"
 #include "msg.h"
 #include "parse.h"
 #include "modules.h"
 #include "packet.h"
 #include "s_newconf.h"
 
+#define FIELD_CHANNEL    0x0001
+#define FIELD_HOP        0x0002
+#define FIELD_FLAGS      0x0004
+#define FIELD_HOST       0x0008
+#define FIELD_IP         0x0010
+#define FIELD_IDLE       0x0020
+#define FIELD_NICK       0x0040
+#define FIELD_INFO       0x0080
+#define FIELD_SERVER     0x0100
+#define FIELD_QUERYTYPE  0x0200 /* cookie for client */
+#define FIELD_USER       0x0400
+#define FIELD_ACCOUNT    0x0800
+#define FIELD_OPLEVEL    0x1000 /* meaningless and stupid, but whatever */
+
+struct who_format
+{
+       int fields;
+       const char *querytype;
+};
+
 static int m_who(struct Client *, struct Client *, int, const char **);
 
 struct Message who_msgtab = {
@@ -51,22 +68,23 @@ struct Message who_msgtab = {
 };
 
 mapi_clist_av1 who_clist[] = { &who_msgtab, NULL };
-DECLARE_MODULE_AV1(who, NULL, NULL, who_clist, NULL, NULL, "$Revision: 3283 $");
+DECLARE_MODULE_AV1(who, NULL, NULL, who_clist, NULL, NULL, "$Revision: 3350 $");
 
 static void do_who_on_channel(struct Client *source_p, struct Channel *chptr,
-                             int server_oper, int member);
+                             int server_oper, int member,
+                             struct who_format *fmt);
 
-static void who_global(struct Client *source_p, const char *mask, int server_oper, int operspy);
+static void who_global(struct Client *source_p, const char *mask, int server_oper, int operspy, struct who_format *fmt);
 
 static void do_who(struct Client *source_p,
-                  struct Client *target_p, const char *chname, const char *op_flags);
+                  struct Client *target_p, struct membership *msptr,
+                  struct who_format *fmt);
 
 
 /*
 ** m_who
-**      parv[0] = sender prefix
 **      parv[1] = nickname mask list
-**      parv[2] = additional selection flag, only 'o' for now.
+**      parv[2] = additional selection flag and format options
 */
 static int
 m_who(struct Client *client_p, struct Client *source_p, int parc, const char *parv[])
@@ -75,13 +93,51 @@ m_who(struct Client *client_p, struct Client *source_p, int parc, const char *pa
        struct Client *target_p;
        struct membership *msptr;
        char *mask;
-       dlink_node *lp;
+       rb_dlink_node *lp;
        struct Channel *chptr = NULL;
        int server_oper = parc > 2 ? (*parv[2] == 'o') : 0;     /* Show OPERS only */
        int member;
        int operspy = 0;
+       struct who_format fmt;
+       const char *s;
+       char maskcopy[512];
 
-       mask = LOCAL_COPY(parv[1]);
+       fmt.fields = 0;
+       fmt.querytype = NULL;
+       if (parc > 2 && (s = strchr(parv[2], '%')) != NULL)
+       {
+               s++;
+               for (; *s != '\0'; s++)
+               {
+                       switch (*s)
+                       {
+                               case 'c': fmt.fields |= FIELD_CHANNEL; break;
+                               case 'd': fmt.fields |= FIELD_HOP; break;
+                               case 'f': fmt.fields |= FIELD_FLAGS; break;
+                               case 'h': fmt.fields |= FIELD_HOST; break;
+                               case 'i': fmt.fields |= FIELD_IP; break;
+                               case 'l': fmt.fields |= FIELD_IDLE; break;
+                               case 'n': fmt.fields |= FIELD_NICK; break;
+                               case 'r': fmt.fields |= FIELD_INFO; break;
+                               case 's': fmt.fields |= FIELD_SERVER; break;
+                               case 't': fmt.fields |= FIELD_QUERYTYPE; break;
+                               case 'u': fmt.fields |= FIELD_USER; break;
+                               case 'a': fmt.fields |= FIELD_ACCOUNT; break;
+                               case 'o': fmt.fields |= FIELD_OPLEVEL; break;
+                               case ',':
+                                         s++;
+                                         fmt.querytype = s;
+                                         s += strlen(s);
+                                         s--;
+                                         break;
+                       }
+               }
+               if (EmptyString(fmt.querytype) || strlen(fmt.querytype) > 3)
+                       fmt.querytype = "0";
+       }
+
+       rb_strlcpy(maskcopy, parv[1], sizeof maskcopy);
+       mask = maskcopy;
 
        collapse(mask);
 
@@ -94,7 +150,7 @@ m_who(struct Client *client_p, struct Client *source_p, int parc, const char *pa
                if((lp = source_p->user->channel.head) != NULL)
                {
                        msptr = lp->data;
-                       do_who_on_channel(source_p, msptr->chptr, server_oper, YES);
+                       do_who_on_channel(source_p, msptr->chptr, server_oper, YES, &fmt);
                }
 
                sendto_one(source_p, form_str(RPL_ENDOFWHO),
@@ -119,19 +175,19 @@ m_who(struct Client *client_p, struct Client *source_p, int parc, const char *pa
        if(IsChannelName(mask))
        {
                /* List all users on a given channel */
-               chptr = find_channel(parv[1]);
+               chptr = find_channel(parv[1] + operspy);
                if(chptr != NULL)
                {
                        if(operspy)
                                report_operspy(source_p, "WHO", chptr->chname);
 
                        if(IsMember(source_p, chptr) || operspy)
-                               do_who_on_channel(source_p, chptr, server_oper, YES);
+                               do_who_on_channel(source_p, chptr, server_oper, YES, &fmt);
                        else if(!SecretChannel(chptr))
-                               do_who_on_channel(source_p, chptr, server_oper, NO);
+                               do_who_on_channel(source_p, chptr, server_oper, NO, &fmt);
                }
                sendto_one(source_p, form_str(RPL_ENDOFWHO),
-                          me.name, source_p->name, parv[1]);
+                          me.name, source_p->name, parv[1] + operspy);
                return 0;
        }
 
@@ -143,7 +199,7 @@ m_who(struct Client *client_p, struct Client *source_p, int parc, const char *pa
                int isinvis = 0;
 
                isinvis = IsInvisible(target_p);
-               DLINK_FOREACH(lp, target_p->user->channel.head)
+               RB_DLINK_FOREACH(lp, target_p->user->channel.head)
                {
                        msptr = lp->data;
                        chptr = msptr->chptr;
@@ -161,10 +217,9 @@ m_who(struct Client *client_p, struct Client *source_p, int parc, const char *pa
                 * target_p of chptr
                 */
                if(lp != NULL)
-                       do_who(source_p, target_p, chptr->chname,
-                              find_channel_status(lp->data, IsCapable(source_p, CLICAP_MULTI_PREFIX)));
+                       do_who(source_p, target_p, lp->data, &fmt);
                else
-                       do_who(source_p, target_p, NULL, "");
+                       do_who(source_p, target_p, NULL, &fmt);
 
                sendto_one(source_p, form_str(RPL_ENDOFWHO), 
                           me.name, source_p->name, mask);
@@ -177,7 +232,7 @@ m_who(struct Client *client_p, struct Client *source_p, int parc, const char *pa
        /* it has to be a global who at this point, limit it */
        if(!IsOper(source_p))
        {
-               if((last_used + ConfigFileEntry.pace_wait) > CurrentTime)
+               if((last_used + ConfigFileEntry.pace_wait) > rb_current_time())
                {
                        sendto_one(source_p, form_str(RPL_LOAD2HI),
                                        me.name, source_p->name, "WHO");
@@ -186,7 +241,7 @@ m_who(struct Client *client_p, struct Client *source_p, int parc, const char *pa
                        return 0;
                }
                else
-                       last_used = CurrentTime;
+                       last_used = rb_current_time();
        }
 
        /* Note: operspy_dont_care_user_info does not apply to
@@ -199,9 +254,9 @@ m_who(struct Client *client_p, struct Client *source_p, int parc, const char *pa
         * with "/who" ;) --fl
         */
        if((*(mask + 1) == '\0') && (*mask == '0'))
-               who_global(source_p, NULL, server_oper, 0);
+               who_global(source_p, NULL, server_oper, 0, &fmt);
        else
-               who_global(source_p, mask, server_oper, operspy);
+               who_global(source_p, mask, server_oper, operspy, &fmt);
 
        sendto_one(source_p, form_str(RPL_ENDOFWHO),
                   me.name, source_p->name, mask);
@@ -215,19 +270,21 @@ m_who(struct Client *client_p, struct Client *source_p, int parc, const char *pa
  *             - char * mask to match
  *             - int if oper on a server or not
  *             - pointer to int maxmatches
+ *             - format options
  * output      - NONE
  * side effects - lists matching invisible clients on specified channel,
  *               marks matched clients.
  */
 static void
 who_common_channel(struct Client *source_p, struct Channel *chptr,
-                  const char *mask, int server_oper, int *maxmatches)
+                  const char *mask, int server_oper, int *maxmatches,
+                  struct who_format *fmt)
 {
        struct membership *msptr;
        struct Client *target_p;
-       dlink_node *ptr;
+       rb_dlink_node *ptr;
 
-       DLINK_FOREACH(ptr, chptr->members.head)
+       RB_DLINK_FOREACH(ptr, chptr->members.head)
        {
                msptr = ptr->data;
                target_p = msptr->client_p;
@@ -244,11 +301,11 @@ who_common_channel(struct Client *source_p, struct Channel *chptr,
                {
                        if((mask == NULL) ||
                                        match(mask, target_p->name) || match(mask, target_p->username) ||
-                                       match(mask, target_p->host) || match(mask, target_p->user->server) ||
+                                       match(mask, target_p->host) || match(mask, target_p->servptr->name) ||
                                        (IsOper(source_p) && match(mask, target_p->orighost)) ||
                                        match(mask, target_p->info))
                        {
-                               do_who(source_p, target_p, NULL, "");
+                               do_who(source_p, target_p, NULL, fmt);
                                --(*maxmatches);
                        }
                }
@@ -261,6 +318,8 @@ who_common_channel(struct Client *source_p, struct Channel *chptr,
  * inputs      - pointer to client requesting who
  *             - char * mask to match
  *             - int if oper on a server or not
+ *             - int if operspy or not
+ *             - format options
  * output      - NONE
  * side effects - do a global scan of all clients looking for match
  *               this is slightly expensive on EFnet ...
@@ -268,11 +327,11 @@ who_common_channel(struct Client *source_p, struct Channel *chptr,
  *               and will be left cleared on return
  */
 static void
-who_global(struct Client *source_p, const char *mask, int server_oper, int operspy)
+who_global(struct Client *source_p, const char *mask, int server_oper, int operspy, struct who_format *fmt)
 {
        struct membership *msptr;
        struct Client *target_p;
-       dlink_node *lp, *ptr;
+       rb_dlink_node *lp, *ptr;
        int maxmatches = 500;
 
        /* first, list all matching INvisible clients on common channels
@@ -280,10 +339,10 @@ who_global(struct Client *source_p, const char *mask, int server_oper, int opers
         */
        if(!operspy)
        {
-               DLINK_FOREACH(lp, source_p->user->channel.head)
+               RB_DLINK_FOREACH(lp, source_p->user->channel.head)
                {
                        msptr = lp->data;
-                       who_common_channel(source_p, msptr->chptr, mask, server_oper, &maxmatches);
+                       who_common_channel(source_p, msptr->chptr, mask, server_oper, &maxmatches, fmt);
                }
        }
        else if (!ConfigFileEntry.operspy_dont_care_user_info)
@@ -294,7 +353,7 @@ who_global(struct Client *source_p, const char *mask, int server_oper, int opers
         * if this is an operspy who, list all matching clients, no need
         * to clear marks
         */
-       DLINK_FOREACH(ptr, global_client_list.head)
+       RB_DLINK_FOREACH(ptr, global_client_list.head)
        {
                target_p = ptr->data;
                if(!IsPerson(target_p))
@@ -313,11 +372,11 @@ who_global(struct Client *source_p, const char *mask, int server_oper, int opers
                {
                        if(!mask ||
                                        match(mask, target_p->name) || match(mask, target_p->username) ||
-                                       match(mask, target_p->host) || match(mask, target_p->user->server) ||
+                                       match(mask, target_p->host) || match(mask, target_p->servptr->name) ||
                                        (IsOper(source_p) && match(mask, target_p->orighost)) ||
                                        match(mask, target_p->info))
                        {
-                               do_who(source_p, target_p, NULL, "");
+                               do_who(source_p, target_p, NULL, fmt);
                                --maxmatches;
                        }
                }
@@ -337,19 +396,19 @@ who_global(struct Client *source_p, const char *mask, int server_oper, int opers
  *             - The "real name" of this channel
  *             - int if source_p is a server oper or not
  *             - int if client is member or not
+ *             - format options
  * output      - NONE
  * side effects - do a who on given channel
  */
 static void
 do_who_on_channel(struct Client *source_p, struct Channel *chptr,
-                 int server_oper, int member)
+                 int server_oper, int member, struct who_format *fmt)
 {
        struct Client *target_p;
        struct membership *msptr;
-       dlink_node *ptr;
-       int combine = IsCapable(source_p, CLICAP_MULTI_PREFIX);
+       rb_dlink_node *ptr;
 
-       DLINK_FOREACH(ptr, chptr->members.head)
+       RB_DLINK_FOREACH(ptr, chptr->members.head)
        {
                msptr = ptr->data;
                target_p = msptr->client_p;
@@ -358,35 +417,124 @@ do_who_on_channel(struct Client *source_p, struct Channel *chptr,
                        continue;
 
                if(member || !IsInvisible(target_p))
-                       do_who(source_p, target_p, chptr->chname,
-                              find_channel_status(msptr, combine));
+                       do_who(source_p, target_p, msptr, fmt);
        }
 }
 
+/*
+ * append_format
+ *
+ * inputs      - pointer to buffer
+ *             - size of buffer
+ *             - pointer to position
+ *             - format string
+ *             - arguments for format
+ * output      - NONE
+ * side effects - position incremented, possibly beyond size of buffer
+ *               this allows detecting overflow
+ */
+static void
+append_format(char *buf, size_t bufsize, size_t *pos, const char *fmt, ...)
+{
+       size_t max, result;
+       va_list ap;
+
+       max = *pos >= bufsize ? 0 : bufsize - *pos;
+       va_start(ap, fmt);
+       result = rb_vsnprintf(buf + *pos, max, fmt, ap);
+       va_end(ap);
+       *pos += result;
+}
+
 /*
  * do_who
  *
  * inputs      - pointer to client requesting who
  *             - pointer to client to do who on
- *             - The reported name
- *             - channel flags
+ *             - channel membership or NULL
+ *             - format options
  * output      - NONE
  * side effects - do a who on given person
  */
 
 static void
-do_who(struct Client *source_p, struct Client *target_p, const char *chname, const char *op_flags)
+do_who(struct Client *source_p, struct Client *target_p, struct membership *msptr, struct who_format *fmt)
 {
-       char status[5];
-
-       ircsprintf(status, "%c%s%s",
-                  target_p->user->away ? 'G' : 'H', IsOper(target_p) ? "*" : "", op_flags);
-
-       sendto_one(source_p, form_str(RPL_WHOREPLY), me.name, source_p->name,
-                  (chname) ? (chname) : "*",
-                  target_p->username,
-                  target_p->host, target_p->user->server, target_p->name,
-                  status, 
-                  ConfigServerHide.flatten_links ? 0 : target_p->hopcount, 
-                  target_p->info);
+       char status[16];
+       char str[510 + 1]; /* linebuf.c will add \r\n */
+       size_t pos;
+       const char *q;
+
+       rb_sprintf(status, "%c%s%s",
+                  target_p->user->away ? 'G' : 'H', IsOper(target_p) ? "*" : "", msptr ? find_channel_status(msptr, fmt->fields || IsCapable(source_p, CLICAP_MULTI_PREFIX)) : "");
+
+       if (fmt->fields == 0)
+               sendto_one(source_p, form_str(RPL_WHOREPLY), me.name,
+                          source_p->name, msptr ? msptr->chptr->chname : "*",
+                          target_p->username, target_p->host,
+                          target_p->servptr->name, target_p->name, status,
+                          ConfigServerHide.flatten_links && !IsOper(source_p) && !IsExemptShide(source_p) ? 0 : target_p->hopcount, 
+                          target_p->info);
+       else
+       {
+               str[0] = '\0';
+               pos = 0;
+               append_format(str, sizeof str, &pos, ":%s %d %s",
+                               me.name, RPL_WHOSPCRPL, source_p->name);
+               if (fmt->fields & FIELD_QUERYTYPE)
+                       append_format(str, sizeof str, &pos, " %s", fmt->querytype);
+               if (fmt->fields & FIELD_CHANNEL)
+                       append_format(str, sizeof str, &pos, " %s", msptr ? msptr->chptr->chname : "*");
+               if (fmt->fields & FIELD_USER)
+                       append_format(str, sizeof str, &pos, " %s", target_p->username);
+               if (fmt->fields & FIELD_IP)
+               {
+                       if (show_ip(source_p, target_p) && !EmptyString(target_p->sockhost) && strcmp(target_p->sockhost, "0"))
+                               append_format(str, sizeof str, &pos, " %s", target_p->sockhost);
+                       else
+                               append_format(str, sizeof str, &pos, " %s", "255.255.255.255");
+               }
+               if (fmt->fields & FIELD_HOST)
+                       append_format(str, sizeof str, &pos, " %s", target_p->host);
+               if (fmt->fields & FIELD_SERVER)
+                       append_format(str, sizeof str, &pos, " %s", target_p->servptr->name);
+               if (fmt->fields & FIELD_NICK)
+                       append_format(str, sizeof str, &pos, " %s", target_p->name);
+               if (fmt->fields & FIELD_FLAGS)
+                       append_format(str, sizeof str, &pos, " %s", status);
+               if (fmt->fields & FIELD_HOP)
+                       append_format(str, sizeof str, &pos, " %d", ConfigServerHide.flatten_links && !IsOper(source_p) && !IsExemptShide(source_p) ? 0 : target_p->hopcount);
+               if (fmt->fields & FIELD_IDLE)
+                       append_format(str, sizeof str, &pos, " %d", (int)(MyClient(target_p) ? rb_current_time() - target_p->localClient->last : 0));
+               if (fmt->fields & FIELD_ACCOUNT)
+               {
+                       /* display as in whois */
+                       q = target_p->user->suser;
+                       if (!EmptyString(q))
+                       {
+                               while(IsDigit(*q))
+                                       q++;
+                               if(*q == '\0')
+                                       q = target_p->user->suser;
+                       }
+                       else
+                               q = "0";
+                       append_format(str, sizeof str, &pos, " %s", q);
+               }
+               if (fmt->fields & FIELD_OPLEVEL)
+                       append_format(str, sizeof str, &pos, " %s", is_chanop(msptr) ? "999" : "n/a");
+               if (fmt->fields & FIELD_INFO)
+                       append_format(str, sizeof str, &pos, " :%s", target_p->info);
+
+               if (pos >= sizeof str)
+               {
+                       static int warned = 0;
+                       if (!warned)
+                               sendto_realops_snomask(SNO_DEBUG, L_NETWIDE,
+                                               "WHOX overflow while sending information about %s to %s",
+                                               target_p->name, source_p->name);
+                       warned = 1;
+               }
+               sendto_one(source_p, "%s", str);
+       }
 }