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
24 * $Id: m_links.c 254 2005-09-21 23:35:12Z nenolod $
42 static int m_links(struct MsgBuf
*, struct Client
*, struct Client
*, int, const char **);
43 static int mo_links(struct MsgBuf
*, struct Client
*, struct Client
*, int, const char **);
44 static char * clean_string(char *dest
, const unsigned char *src
, size_t len
);
46 struct Message links_msgtab
= {
48 {mg_unreg
, {m_links
, 0}, {mo_links
, 0}, mg_ignore
, mg_ignore
, {mo_links
, 0}}
53 mapi_clist_av1 links_clist
[] = { &links_msgtab
, NULL
};
54 mapi_hlist_av1 links_hlist
[] = {
55 { "doing_links", &doing_links_hook
},
59 DECLARE_MODULE_AV1(links
, NULL
, NULL
, links_clist
, links_hlist
, NULL
, "$Revision: 254 $");
62 * m_links - LINKS message handler
63 * parv[1] = servername mask
65 * parv[1] = server to query
66 * parv[2] = servername mask
69 m_links(struct MsgBuf
*msgbuf_p
, struct Client
*client_p
, struct Client
*source_p
, int parc
, const char *parv
[])
71 if(ConfigServerHide
.flatten_links
&& !IsExemptShide(source_p
))
72 scache_send_flattened_links(source_p
);
74 mo_links(msgbuf_p
, client_p
, source_p
, parc
, parv
);
80 mo_links(struct MsgBuf
*msgbuf_p
, struct Client
*client_p
, struct Client
*source_p
, int parc
, const char *parv
[])
82 const char *mask
= "";
83 struct Client
*target_p
;
84 char clean_mask
[2 * HOSTLEN
+ 4];
91 if(strlen(parv
[2]) > HOSTLEN
)
93 if(hunt_server(client_p
, source_p
, ":%s LINKS %s :%s", 1, parc
, parv
)
102 if(*mask
) /* only necessary if there is a mask */
103 mask
= collapse(clean_string
104 (clean_mask
, (const unsigned char *) mask
, 2 * HOSTLEN
));
106 hd
.client
= source_p
;
110 call_hook(doing_links_hook
, &hd
);
112 RB_DLINK_FOREACH(ptr
, global_serv_list
.head
)
114 target_p
= ptr
->data
;
116 if(*mask
&& !match(mask
, target_p
->name
))
119 /* We just send the reply, as if theyre here theres either no SHIDE,
120 * or theyre an oper..
122 sendto_one_numeric(source_p
, RPL_LINKS
, form_str(RPL_LINKS
),
123 target_p
->name
, target_p
->servptr
->name
,
125 target_p
->info
[0] ? target_p
->info
: "(Unknown Location)");
128 sendto_one_numeric(source_p
, RPL_ENDOFLINKS
, form_str(RPL_ENDOFLINKS
),
129 EmptyString(mask
) ? "*" : mask
);
135 clean_string(char *dest
, const unsigned char *src
, size_t len
)
141 if(dest
== NULL
|| src
== NULL
)
144 while (*src
&& (len
> 1))
146 if(*src
& 0x80) /* if high bit is set */
153 else if(!IsPrint(*src
)) /* if NOT printable */
159 *d
++ = 0x40 + *src
; /* turn it into a printable */