2 * ircd-ratbox: A slightly useful ircd.
3 * m_links.c: Shows what servers are currently connected.
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
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.
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., 59 Temple Place, Suite 330, Boston, MA 02111-1307
27 #include "irc_string.h"
39 static int m_links(struct Client
*, struct Client
*, int, const char **);
40 static int do_links(struct Client
*, struct Client
*, int, const char **);
42 struct Message links_msgtab
= {
43 "LINKS", 0, 0, 0, MFLG_SLOW
,
44 {mg_unreg
, {m_links
, 0}, {do_links
, 0}, mg_ignore
, mg_ignore
, {m_links
, 0}}
49 mapi_clist_av1 links_clist
[] = { &links_msgtab
, NULL
};
50 mapi_hlist_av1 links_hlist
[] = {
51 { "doing_links", &doing_links_hook
},
55 DECLARE_MODULE_AV1(links
, NULL
, NULL
, links_clist
, links_hlist
, NULL
, "$Revision: 122 $");
57 static void send_links_cache(struct Client
*source_p
);
60 * m_links - LINKS message handler
61 * parv[0] = sender prefix
62 * parv[1] = servername mask
64 * parv[0] = sender prefix
65 * parv[1] = server to query
66 * parv[2] = servername mask
69 m_links(struct Client
*client_p
, struct Client
*source_p
, int parc
, const char *parv
[])
71 if(ConfigServerHide
.flatten_links
&& !IsExemptShide(source_p
) &&
72 !IsOperRouting(source_p
))
73 send_links_cache(source_p
);
75 do_links(client_p
, source_p
, parc
, parv
);
81 do_links(struct Client
*client_p
, struct Client
*source_p
, int parc
, const char *parv
[])
83 const char *mask
= "";
84 struct Client
*target_p
;
85 char clean_mask
[2 * HOSTLEN
+ 4];
92 if(hunt_server(client_p
, source_p
, ":%s LINKS %s :%s", 1, parc
, parv
)
101 if(*mask
) /* only necessary if there is a mask */
102 mask
= collapse(clean_string
103 (clean_mask
, (const unsigned char *) mask
, 2 * HOSTLEN
));
105 hd
.client
= source_p
;
109 call_hook(doing_links_hook
, &hd
);
111 DLINK_FOREACH(ptr
, global_serv_list
.head
)
113 target_p
= ptr
->data
;
115 if(*mask
&& !match(mask
, target_p
->name
))
118 /* We just send the reply, as if theyre here theres either no SHIDE,
119 * or theyre an oper..
121 sendto_one_numeric(source_p
, RPL_LINKS
, form_str(RPL_LINKS
),
122 target_p
->name
, target_p
->serv
->up
,
124 target_p
->info
[0] ? target_p
->info
: "(Unknown Location)");
127 sendto_one_numeric(source_p
, RPL_ENDOFLINKS
, form_str(RPL_ENDOFLINKS
),
128 EmptyString(mask
) ? "*" : mask
);
133 /* send_links_cache()
135 * inputs - client to send to
136 * outputs - the cached links, us, and RPL_ENDOFLINKS
140 send_links_cache(struct Client
*source_p
)
144 DLINK_FOREACH(ptr
, links_cache_list
.head
)
146 sendto_one(source_p
, ":%s 364 %s %s",
147 me
.name
, source_p
->name
, (const char *)ptr
->data
);
150 sendto_one_numeric(source_p
, RPL_LINKS
, form_str(RPL_LINKS
),
151 me
.name
, me
.name
, 0, me
.info
);
153 sendto_one_numeric(source_p
, RPL_ENDOFLINKS
, form_str(RPL_ENDOFLINKS
), "*");