ircd-hybrid/modules/m_links.c

/*
 *  ircd-hybrid: an advanced Internet Relay Chat Daemon(ircd).
 *  m_links.c: Shows what servers are currently connected.
 *
 *  Copyright (C) 2002 by the past and present ircd coders, and others.
 *
 *  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 2 of the License, 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., 59 Temple Place, Suite 330, Boston, MA  02111-1307
 *  USA
 *
 *  $Id$
 */

#include "stdinc.h"
#include "handlers.h"
#include "client.h"
#include "ircd.h"
#include "numeric.h"
#include "s_serv.h"
#include "send.h"
#include "s_conf.h"
#include "msg.h"
#include "motd.h"
#include "parse.h"
#include "modules.h"

static void do_links(struct Client *, int, char **);
static void m_links(struct Client*, struct Client*, int, char**);
static void mo_links(struct Client*, struct Client*, int, char**);
static void ms_links(struct Client*, struct Client*, int, char**);

struct Message links_msgtab = {
  "LINKS", 0, 0, 0, 0, MFLG_SLOW, 0,
  {m_unregistered, m_links, ms_links, m_ignore, mo_links, m_ignore}
};

#ifndef STATIC_MODULES
const char *_version = "$Revision$";
static struct Callback *links_cb;

static void *
va_links(va_list args)
{
  struct Client *source_p = va_arg(args, struct Client *);
  int parc = va_arg(args, int);
  char **parv = va_arg(args, char **);

  do_links(source_p, parc, parv);
  return NULL;
}

void
_modinit(void)
{
  links_cb = register_callback("doing_links", va_links);
  mod_add_cmd(&links_msgtab);
}

void
_moddeinit(void)
{
  mod_del_cmd(&links_msgtab);
  uninstall_hook(links_cb, va_links);
}

#endif

static void
do_links(struct Client *source_p, int parc, char **parv)
{
  if (IsOper(source_p) || !ConfigServerHide.flatten_links)
  {
    char *mask = (parc > 2 ? parv[2] : parv[1]);
    const char *me_name, *nick, *p;
    struct Client *target_p;
    char clean_mask[2 * HOSTLEN + 4];
    dlink_node *ptr;

    if (mask == NULL)
      mask = "";
    if (*mask)       /* only necessary if there is a mask */
      mask = collapse(clean_string(clean_mask, (const unsigned char*) mask, 2 * HOSTLEN));

    me_name = ID_or_name(&me, source_p->from);
    nick = ID_or_name(source_p, source_p->from);

    DLINK_FOREACH(ptr, global_serv_list.head)
    {
      target_p = ptr->data;

      if (*mask && !match(mask, target_p->name))
        continue;
    
      if (target_p->info[0])
      {
        if ((p = strchr(target_p->info, ']')))
          p += 2; /* skip the nasty [IP] part */
        else
          p = target_p->info;
      } 
      else
        p = "(Unknown Location)";

      /* We just send the reply, as if they are here there's either no SHIDE,
       * or they're an oper..  
       */
      sendto_one(source_p, form_str(RPL_LINKS),
                 me_name, nick,
                 target_p->name, target_p->servptr->name,
                 target_p->hopcount, p);
    }
  
    sendto_one(source_p, form_str(RPL_ENDOFLINKS),
               me_name, nick,
               EmptyString(mask) ? "*" : mask);
  }
  else
  {
    /*
     * Print our own info so at least it looks like a normal links
     * then print out the file (which may or may not be empty)
     */
    sendto_one(source_p, form_str(RPL_LINKS),
               ID_or_name(&me, source_p->from),
               ID_or_name(source_p, source_p->from),
               me.name, me.name, 0, me.info);
    send_message_file(source_p, &ConfigFileEntry.linksfile);
    sendto_one(source_p, form_str(RPL_ENDOFLINKS),
               ID_or_name(&me, source_p->from),
               ID_or_name(source_p, source_p->from), "*");
  }
}

/*
 * m_links - LINKS message handler
 *      parv[0] = sender prefix
 *      parv[1] = servername mask
 * or
 *      parv[0] = sender prefix
 *      parv[1] = server to query 
 *      parv[2] = servername mask
 */
static void
m_links(struct Client *client_p, struct Client *source_p,
        int parc, char *parv[])
{
  if (!ConfigServerHide.flatten_links)
  {
    mo_links(client_p, source_p, parc, parv);
    return;
  }

#ifdef STATIC_MODULES
  do_links(source_p, parc, parv);
#else
  execute_callback(links_cb, source_p, parc, parv);
#endif
}

static void
mo_links(struct Client *client_p, struct Client *source_p,
         int parc, char *parv[])
{
  if (parc > 2) 
    if (!ConfigFileEntry.disable_remote || IsOper(source_p))
    {
        if (hunt_server(client_p, source_p, ":%s LINKS %s :%s", 1, parc, parv)
            != HUNTED_ISME)
        return;
    }

#ifdef STATIC_MODULES
  do_links(source_p, parc, parv);
#else
  execute_callback(links_cb, source_p, parc, parv);
#endif
}

/*
 * ms_links - LINKS message handler
 *      parv[0] = sender prefix
 *      parv[1] = servername mask
 * or
 *      parv[0] = sender prefix
 *      parv[1] = server to query 
 *      parv[2] = servername mask
 */
static void
ms_links(struct Client *client_p, struct Client *source_p,
         int parc, char *parv[])
{
  if (hunt_server(client_p, source_p, ":%s LINKS %s :%s", 1, parc, parv)
      != HUNTED_ISME)
    return;

  if (IsClient(source_p))
    m_links(client_p, source_p, parc, parv);
}
Revision:	104
Committed:	Mon Oct 10 21:01:58 2005 UTC (20 years, 10 months ago) by adx
Content type:	text/x-csrc
File size:	5588 byte(s)
Log Message:	- fixed core on /links
#	Content
1	/*
2	* ircd-hybrid: an advanced Internet Relay Chat Daemon(ircd).
3	* m_links.c: Shows what servers are currently connected.
4	*
5	* Copyright (C) 2002 by the past and present ircd coders, and others.
6	*
7	* This program is free software; you can redistribute it and/or modify
8	* it under the terms of the GNU General Public License as published by
9	* the Free Software Foundation; either version 2 of the License, or
10	* (at your option) any later version.
11	*
12	* This program is distributed in the hope that it will be useful,
13	* but WITHOUT ANY WARRANTY; without even the implied warranty of
14	* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
15	* GNU General Public License for more details.
16	*
17	* You should have received a copy of the GNU General Public License
18	* along with this program; if not, write to the Free Software
19	* Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307
20	* USA
21	*
22	* $Id$
23	*/
24
25	#include "stdinc.h"
26	#include "handlers.h"
27	#include "client.h"
28	#include "ircd.h"
29	#include "numeric.h"
30	#include "s_serv.h"
31	#include "send.h"
32	#include "s_conf.h"
33	#include "msg.h"
34	#include "motd.h"
35	#include "parse.h"
36	#include "modules.h"
37
38	static void do_links(struct Client , int, char *);
39	static void m_links(struct Client, struct Client, int, char**);
40	static void mo_links(struct Client, struct Client, int, char**);
41	static void ms_links(struct Client, struct Client, int, char**);
42
43	struct Message links_msgtab = {
44	"LINKS", 0, 0, 0, 0, MFLG_SLOW, 0,
45	{m_unregistered, m_links, ms_links, m_ignore, mo_links, m_ignore}
46	};
47
48	#ifndef STATIC_MODULES
49	const char *_version = "$Revision$";
50	static struct Callback *links_cb;
51
52	static void *
53	va_links(va_list args)
54	{
55	struct Client source_p = va_arg(args, struct Client );
56	int parc = va_arg(args, int);
57	char parv = va_arg(args, char );
58
59	do_links(source_p, parc, parv);
60	return NULL;
61	}
62
63	void
64	_modinit(void)
65	{
66	links_cb = register_callback("doing_links", va_links);
67	mod_add_cmd(&links_msgtab);
68	}
69
70	void
71	_moddeinit(void)
72	{
73	mod_del_cmd(&links_msgtab);
74	uninstall_hook(links_cb, va_links);
75	}
76
77	#endif
78
79	static void
80	do_links(struct Client source_p, int parc, char *parv)
81	{
82	if (IsOper(source_p) \|\| !ConfigServerHide.flatten_links)
83	{
84	char *mask = (parc > 2 ? parv[2] : parv[1]);
85	const char me_name, nick, *p;
86	struct Client *target_p;
87	char clean_mask[2 * HOSTLEN + 4];
88	dlink_node *ptr;
89
90	if (mask == NULL)
91	mask = "";
92	if (mask) / only necessary if there is a mask */
93	mask = collapse(clean_string(clean_mask, (const unsigned char) mask, 2 HOSTLEN));
94
95	me_name = ID_or_name(&me, source_p->from);
96	nick = ID_or_name(source_p, source_p->from);
97
98	DLINK_FOREACH(ptr, global_serv_list.head)
99	{
100	target_p = ptr->data;
101
102	if (*mask && !match(mask, target_p->name))
103	continue;
104
105	if (target_p->info[0])
106	{
107	if ((p = strchr(target_p->info, ']')))
108	p += 2; /* skip the nasty [IP] part */
109	else
110	p = target_p->info;
111	}
112	else
113	p = "(Unknown Location)";
114
115	/* We just send the reply, as if they are here there's either no SHIDE,
116	* or they're an oper..
117	*/
118	sendto_one(source_p, form_str(RPL_LINKS),
119	me_name, nick,
120	target_p->name, target_p->servptr->name,
121	target_p->hopcount, p);
122	}
123
124	sendto_one(source_p, form_str(RPL_ENDOFLINKS),
125	me_name, nick,
126	EmptyString(mask) ? "*" : mask);
127	}
128	else
129	{
130	/*
131	* Print our own info so at least it looks like a normal links
132	* then print out the file (which may or may not be empty)
133	*/
134	sendto_one(source_p, form_str(RPL_LINKS),
135	ID_or_name(&me, source_p->from),
136	ID_or_name(source_p, source_p->from),
137	me.name, me.name, 0, me.info);
138	send_message_file(source_p, &ConfigFileEntry.linksfile);
139	sendto_one(source_p, form_str(RPL_ENDOFLINKS),
140	ID_or_name(&me, source_p->from),
141	ID_or_name(source_p, source_p->from), "*");
142	}
143	}
144
145	/*
146	* m_links - LINKS message handler
147	* parv[0] = sender prefix
148	* parv[1] = servername mask
149	* or
150	* parv[0] = sender prefix
151	* parv[1] = server to query
152	* parv[2] = servername mask
153	*/
154	static void
155	m_links(struct Client client_p, struct Client source_p,
156	int parc, char *parv[])
157	{
158	if (!ConfigServerHide.flatten_links)
159	{
160	mo_links(client_p, source_p, parc, parv);
161	return;
162	}
163
164	#ifdef STATIC_MODULES
165	do_links(source_p, parc, parv);
166	#else
167	execute_callback(links_cb, source_p, parc, parv);
168	#endif
169	}
170
171	static void
172	mo_links(struct Client client_p, struct Client source_p,
173	int parc, char *parv[])
174	{
175	if (parc > 2)
176	if (!ConfigFileEntry.disable_remote \|\| IsOper(source_p))
177	{
178	if (hunt_server(client_p, source_p, ":%s LINKS %s :%s", 1, parc, parv)
179	!= HUNTED_ISME)
180	return;
181	}
182
183	#ifdef STATIC_MODULES
184	do_links(source_p, parc, parv);
185	#else
186	execute_callback(links_cb, source_p, parc, parv);
187	#endif
188	}
189
190	/*
191	* ms_links - LINKS message handler
192	* parv[0] = sender prefix
193	* parv[1] = servername mask
194	* or
195	* parv[0] = sender prefix
196	* parv[1] = server to query
197	* parv[2] = servername mask
198	*/
199	static void
200	ms_links(struct Client client_p, struct Client source_p,
201	int parc, char *parv[])
202	{
203	if (hunt_server(client_p, source_p, ":%s LINKS %s :%s", 1, parc, parv)
204	!= HUNTED_ISME)
205	return;
206
207	if (IsClient(source_p))
208	m_links(client_p, source_p, parc, parv);
209	}