Blame


1 0c471b84 2002-11-30 alex /*
2 0c471b84 2002-11-30 alex * ngIRCd -- The Next Generation IRC Daemon
3 0c471b84 2002-11-30 alex * Copyright (c)2001,2002 by Alexander Barton (alex@barton.de)
4 0c471b84 2002-11-30 alex *
5 490f28ff 2002-12-12 alex * This program is free software; you can redistribute it and/or modify
6 490f28ff 2002-12-12 alex * it under the terms of the GNU General Public License as published by
7 490f28ff 2002-12-12 alex * the Free Software Foundation; either version 2 of the License, or
8 490f28ff 2002-12-12 alex * (at your option) any later version.
9 490f28ff 2002-12-12 alex * Please read the file COPYING, README and AUTHORS for more information.
10 0c471b84 2002-11-30 alex *
11 490f28ff 2002-12-12 alex * IRC info commands
12 0c471b84 2002-11-30 alex */
13 0c471b84 2002-11-30 alex
14 0c471b84 2002-11-30 alex
15 0c471b84 2002-11-30 alex #include "portab.h"
16 490f28ff 2002-12-12 alex
17 e17976a1 2003-01-01 alex static char UNUSED id[] = "$Id: irc-info.c,v 1.14 2003/01/01 13:30:35 alex Exp $";
18 0c471b84 2002-11-30 alex
19 0c471b84 2002-11-30 alex #include "imp.h"
20 0c471b84 2002-11-30 alex #include <assert.h>
21 0c471b84 2002-11-30 alex #include <errno.h>
22 0c471b84 2002-11-30 alex #include <stdio.h>
23 0c471b84 2002-11-30 alex #include <string.h>
24 0c471b84 2002-11-30 alex
25 0c471b84 2002-11-30 alex #include "ngircd.h"
26 b8d7dcec 2002-12-30 alex #include "conn-func.h"
27 437f2c33 2002-12-30 alex #include "conn-zip.h"
28 0c471b84 2002-11-30 alex #include "client.h"
29 0c471b84 2002-11-30 alex #include "channel.h"
30 0c471b84 2002-11-30 alex #include "resolve.h"
31 0c471b84 2002-11-30 alex #include "conf.h"
32 0c471b84 2002-11-30 alex #include "defines.h"
33 0c471b84 2002-11-30 alex #include "log.h"
34 0c471b84 2002-11-30 alex #include "messages.h"
35 0c471b84 2002-11-30 alex #include "tool.h"
36 0c471b84 2002-11-30 alex #include "parse.h"
37 0c471b84 2002-11-30 alex #include "irc-write.h"
38 0c471b84 2002-11-30 alex
39 0c471b84 2002-11-30 alex #include "exp.h"
40 0c471b84 2002-11-30 alex #include "irc-info.h"
41 0c471b84 2002-11-30 alex
42 0c471b84 2002-11-30 alex
43 0c471b84 2002-11-30 alex GLOBAL BOOLEAN
44 0c471b84 2002-11-30 alex IRC_ADMIN(CLIENT *Client, REQUEST *Req )
45 0c471b84 2002-11-30 alex {
46 0c471b84 2002-11-30 alex CLIENT *target, *prefix;
47 0c471b84 2002-11-30 alex
48 0c471b84 2002-11-30 alex assert( Client != NULL );
49 0c471b84 2002-11-30 alex assert( Req != NULL );
50 0c471b84 2002-11-30 alex
51 0c471b84 2002-11-30 alex /* Falsche Anzahl Parameter? */
52 0c471b84 2002-11-30 alex if(( Req->argc > 1 )) return IRC_WriteStrClient( Client, ERR_NEEDMOREPARAMS_MSG, Client_ID( Client ), Req->command );
53 0c471b84 2002-11-30 alex
54 0c471b84 2002-11-30 alex /* Ziel suchen */
55 0c471b84 2002-11-30 alex if( Req->argc == 1 ) target = Client_Search( Req->argv[0] );
56 0c471b84 2002-11-30 alex else target = Client_ThisServer( );
57 0c471b84 2002-11-30 alex
58 0c471b84 2002-11-30 alex /* Prefix ermitteln */
59 0c471b84 2002-11-30 alex if( Client_Type( Client ) == CLIENT_SERVER ) prefix = Client_Search( Req->prefix );
60 0c471b84 2002-11-30 alex else prefix = Client;
61 7924fafb 2002-12-16 alex if( ! prefix ) return IRC_WriteStrClient( Client, ERR_NOSUCHNICK_MSG, Client_ID( Client ), Req->prefix );
62 0c471b84 2002-11-30 alex
63 0c471b84 2002-11-30 alex /* An anderen Server weiterleiten? */
64 0c471b84 2002-11-30 alex if( target != Client_ThisServer( ))
65 0c471b84 2002-11-30 alex {
66 e17976a1 2003-01-01 alex if(( ! target ) || ( Client_Type( target ) != CLIENT_SERVER )) return IRC_WriteStrClient( prefix, ERR_NOSUCHSERVER_MSG, Client_ID( prefix ), Req->argv[0] );
67 0c471b84 2002-11-30 alex
68 0c471b84 2002-11-30 alex /* forwarden */
69 0c471b84 2002-11-30 alex IRC_WriteStrClientPrefix( target, prefix, "ADMIN %s", Req->argv[0] );
70 0c471b84 2002-11-30 alex return CONNECTED;
71 0c471b84 2002-11-30 alex }
72 0c471b84 2002-11-30 alex
73 0c471b84 2002-11-30 alex /* mit Versionsinfo antworten */
74 0c471b84 2002-11-30 alex if( ! IRC_WriteStrClient( Client, RPL_ADMINME_MSG, Client_ID( prefix ), Conf_ServerName )) return DISCONNECTED;
75 0c471b84 2002-11-30 alex if( ! IRC_WriteStrClient( Client, RPL_ADMINLOC1_MSG, Client_ID( prefix ), Conf_ServerAdmin1 )) return DISCONNECTED;
76 0c471b84 2002-11-30 alex if( ! IRC_WriteStrClient( Client, RPL_ADMINLOC2_MSG, Client_ID( prefix ), Conf_ServerAdmin2 )) return DISCONNECTED;
77 0c471b84 2002-11-30 alex if( ! IRC_WriteStrClient( Client, RPL_ADMINEMAIL_MSG, Client_ID( prefix ), Conf_ServerAdminMail )) return DISCONNECTED;
78 0c471b84 2002-11-30 alex
79 0c471b84 2002-11-30 alex return CONNECTED;
80 0c471b84 2002-11-30 alex } /* IRC_ADMIN */
81 0c471b84 2002-11-30 alex
82 0c471b84 2002-11-30 alex
83 0c471b84 2002-11-30 alex GLOBAL BOOLEAN
84 0c471b84 2002-11-30 alex IRC_ISON( CLIENT *Client, REQUEST *Req )
85 0c471b84 2002-11-30 alex {
86 0c471b84 2002-11-30 alex CHAR rpl[COMMAND_LEN];
87 0c471b84 2002-11-30 alex CLIENT *c;
88 0c471b84 2002-11-30 alex CHAR *ptr;
89 0c471b84 2002-11-30 alex INT i;
90 0c471b84 2002-11-30 alex
91 0c471b84 2002-11-30 alex assert( Client != NULL );
92 0c471b84 2002-11-30 alex assert( Req != NULL );
93 0c471b84 2002-11-30 alex
94 0c471b84 2002-11-30 alex /* Falsche Anzahl Parameter? */
95 0c471b84 2002-11-30 alex if(( Req->argc < 1 )) return IRC_WriteStrClient( Client, ERR_NEEDMOREPARAMS_MSG, Client_ID( Client ), Req->command );
96 0c471b84 2002-11-30 alex
97 0c471b84 2002-11-30 alex strcpy( rpl, RPL_ISON_MSG );
98 0c471b84 2002-11-30 alex for( i = 0; i < Req->argc; i++ )
99 0c471b84 2002-11-30 alex {
100 0c471b84 2002-11-30 alex ptr = strtok( Req->argv[i], " " );
101 0c471b84 2002-11-30 alex while( ptr )
102 0c471b84 2002-11-30 alex {
103 0c471b84 2002-11-30 alex ngt_TrimStr( ptr );
104 0c471b84 2002-11-30 alex c = Client_Search( ptr );
105 0c471b84 2002-11-30 alex if( c && ( Client_Type( c ) == CLIENT_USER ))
106 0c471b84 2002-11-30 alex {
107 0c471b84 2002-11-30 alex /* Dieser Nick ist "online" */
108 6626395c 2002-12-26 alex strlcat( rpl, ptr, sizeof( rpl ));
109 6626395c 2002-12-26 alex strlcat( rpl, " ", sizeof( rpl ));
110 0c471b84 2002-11-30 alex }
111 0c471b84 2002-11-30 alex ptr = strtok( NULL, " " );
112 0c471b84 2002-11-30 alex }
113 0c471b84 2002-11-30 alex }
114 0c471b84 2002-11-30 alex if( rpl[strlen( rpl ) - 1] == ' ' ) rpl[strlen( rpl ) - 1] = '\0';
115 0c471b84 2002-11-30 alex
116 f0349f52 2002-12-02 alex return IRC_WriteStrClient( Client, rpl, Client_ID( Client ) );
117 0c471b84 2002-11-30 alex } /* IRC_ISON */
118 0c471b84 2002-11-30 alex
119 0c471b84 2002-11-30 alex
120 0c471b84 2002-11-30 alex GLOBAL BOOLEAN
121 0c471b84 2002-11-30 alex IRC_LINKS( CLIENT *Client, REQUEST *Req )
122 0c471b84 2002-11-30 alex {
123 0c471b84 2002-11-30 alex CLIENT *target, *from, *c;
124 0c471b84 2002-11-30 alex CHAR *mask;
125 0c471b84 2002-11-30 alex
126 0c471b84 2002-11-30 alex assert( Client != NULL );
127 0c471b84 2002-11-30 alex assert( Req != NULL );
128 0c471b84 2002-11-30 alex
129 0c471b84 2002-11-30 alex /* Falsche Anzahl Parameter? */
130 0c471b84 2002-11-30 alex if(( Req->argc > 2 )) return IRC_WriteStrClient( Client, ERR_NEEDMOREPARAMS_MSG, Client_ID( Client ), Req->command );
131 0c471b84 2002-11-30 alex
132 0c471b84 2002-11-30 alex /* Server-Mask ermitteln */
133 0c471b84 2002-11-30 alex if( Req->argc > 0 ) mask = Req->argv[Req->argc - 1];
134 0c471b84 2002-11-30 alex else mask = "*";
135 0c471b84 2002-11-30 alex
136 0c471b84 2002-11-30 alex /* Absender ermitteln */
137 0c471b84 2002-11-30 alex if( Client_Type( Client ) == CLIENT_SERVER ) from = Client_Search( Req->prefix );
138 0c471b84 2002-11-30 alex else from = Client;
139 0c471b84 2002-11-30 alex if( ! from ) return IRC_WriteStrClient( Client, ERR_NOSUCHNICK_MSG, Client_ID( Client ), Req->prefix );
140 0c471b84 2002-11-30 alex
141 0c471b84 2002-11-30 alex /* An anderen Server forwarden? */
142 0c471b84 2002-11-30 alex if( Req->argc == 2 )
143 0c471b84 2002-11-30 alex {
144 0c471b84 2002-11-30 alex target = Client_Search( Req->argv[0] );
145 e17976a1 2003-01-01 alex if(( ! target ) || ( Client_Type( target ) != CLIENT_SERVER )) return IRC_WriteStrClient( from, ERR_NOSUCHSERVER_MSG, Client_ID( from ), Req->argv[0] );
146 0c471b84 2002-11-30 alex else if( target != Client_ThisServer( )) return IRC_WriteStrClientPrefix( target, from, "LINKS %s %s", Req->argv[0], Req->argv[1] );
147 0c471b84 2002-11-30 alex }
148 0c471b84 2002-11-30 alex
149 0c471b84 2002-11-30 alex /* Wer ist der Absender? */
150 0c471b84 2002-11-30 alex if( Client_Type( Client ) == CLIENT_SERVER ) target = Client_Search( Req->prefix );
151 0c471b84 2002-11-30 alex else target = Client;
152 0c471b84 2002-11-30 alex if( ! target ) return IRC_WriteStrClient( Client, ERR_NOSUCHNICK_MSG, Client_ID( Client ), Req->prefix );
153 0c471b84 2002-11-30 alex
154 0c471b84 2002-11-30 alex c = Client_First( );
155 0c471b84 2002-11-30 alex while( c )
156 0c471b84 2002-11-30 alex {
157 0c471b84 2002-11-30 alex if( Client_Type( c ) == CLIENT_SERVER )
158 0c471b84 2002-11-30 alex {
159 0c471b84 2002-11-30 alex if( ! IRC_WriteStrClient( target, RPL_LINKS_MSG, Client_ID( target ), Client_ID( c ), Client_ID( Client_TopServer( c ) ? Client_TopServer( c ) : Client_ThisServer( )), Client_Hops( c ), Client_Info( c ))) return DISCONNECTED;
160 0c471b84 2002-11-30 alex }
161 0c471b84 2002-11-30 alex c = Client_Next( c );
162 0c471b84 2002-11-30 alex }
163 0c471b84 2002-11-30 alex
164 0c471b84 2002-11-30 alex return IRC_WriteStrClient( target, RPL_ENDOFLINKS_MSG, Client_ID( target ), mask );
165 0c471b84 2002-11-30 alex } /* IRC_LINKS */
166 0c471b84 2002-11-30 alex
167 0c471b84 2002-11-30 alex
168 0c471b84 2002-11-30 alex GLOBAL BOOLEAN
169 0c471b84 2002-11-30 alex IRC_LUSERS( CLIENT *Client, REQUEST *Req )
170 0c471b84 2002-11-30 alex {
171 0c471b84 2002-11-30 alex CLIENT *target, *from;
172 0c471b84 2002-11-30 alex
173 0c471b84 2002-11-30 alex assert( Client != NULL );
174 0c471b84 2002-11-30 alex assert( Req != NULL );
175 0c471b84 2002-11-30 alex
176 0c471b84 2002-11-30 alex /* Falsche Anzahl Parameter? */
177 0c471b84 2002-11-30 alex if(( Req->argc > 2 )) return IRC_WriteStrClient( Client, ERR_NEEDMOREPARAMS_MSG, Client_ID( Client ), Req->command );
178 0c471b84 2002-11-30 alex
179 0c471b84 2002-11-30 alex /* Absender ermitteln */
180 0c471b84 2002-11-30 alex if( Client_Type( Client ) == CLIENT_SERVER ) from = Client_Search( Req->prefix );
181 0c471b84 2002-11-30 alex else from = Client;
182 0c471b84 2002-11-30 alex if( ! from ) return IRC_WriteStrClient( Client, ERR_NOSUCHNICK_MSG, Client_ID( Client ), Req->prefix );
183 0c471b84 2002-11-30 alex
184 0c471b84 2002-11-30 alex /* An anderen Server forwarden? */
185 0c471b84 2002-11-30 alex if( Req->argc == 2 )
186 0c471b84 2002-11-30 alex {
187 0c471b84 2002-11-30 alex target = Client_Search( Req->argv[1] );
188 e17976a1 2003-01-01 alex if(( ! target ) || ( Client_Type( target ) != CLIENT_SERVER )) return IRC_WriteStrClient( from, ERR_NOSUCHSERVER_MSG, Client_ID( from ), Req->argv[1] );
189 0c471b84 2002-11-30 alex else if( target != Client_ThisServer( )) return IRC_WriteStrClientPrefix( target, from, "LUSERS %s %s", Req->argv[0], Req->argv[1] );
190 0c471b84 2002-11-30 alex }
191 0c471b84 2002-11-30 alex
192 0c471b84 2002-11-30 alex /* Wer ist der Absender? */
193 0c471b84 2002-11-30 alex if( Client_Type( Client ) == CLIENT_SERVER ) target = Client_Search( Req->prefix );
194 0c471b84 2002-11-30 alex else target = Client;
195 0c471b84 2002-11-30 alex if( ! target ) return IRC_WriteStrClient( Client, ERR_NOSUCHNICK_MSG, Client_ID( Client ), Req->prefix );
196 0c471b84 2002-11-30 alex
197 0c471b84 2002-11-30 alex IRC_Send_LUSERS( target );
198 0c471b84 2002-11-30 alex
199 0c471b84 2002-11-30 alex return CONNECTED;
200 0c471b84 2002-11-30 alex } /* IRC_LUSERS */
201 0c471b84 2002-11-30 alex
202 0c471b84 2002-11-30 alex
203 0c471b84 2002-11-30 alex GLOBAL BOOLEAN
204 0c471b84 2002-11-30 alex IRC_MOTD( CLIENT *Client, REQUEST *Req )
205 0c471b84 2002-11-30 alex {
206 0c471b84 2002-11-30 alex CLIENT *from, *target;
207 0c471b84 2002-11-30 alex
208 0c471b84 2002-11-30 alex assert( Client != NULL );
209 0c471b84 2002-11-30 alex assert( Req != NULL );
210 0c471b84 2002-11-30 alex
211 0c471b84 2002-11-30 alex /* Falsche Anzahl Parameter? */
212 0c471b84 2002-11-30 alex if( Req->argc > 1 ) return IRC_WriteStrClient( Client, ERR_NEEDMOREPARAMS_MSG, Client_ID( Client ), Req->command );
213 0c471b84 2002-11-30 alex
214 0c471b84 2002-11-30 alex /* From aus Prefix ermitteln */
215 0c471b84 2002-11-30 alex if( Client_Type( Client ) == CLIENT_SERVER ) from = Client_Search( Req->prefix );
216 0c471b84 2002-11-30 alex else from = Client;
217 7924fafb 2002-12-16 alex if( ! from ) return IRC_WriteStrClient( Client, ERR_NOSUCHNICK_MSG, Client_ID( Client ), Req->prefix );
218 0c471b84 2002-11-30 alex
219 0c471b84 2002-11-30 alex if( Req->argc == 1 )
220 0c471b84 2002-11-30 alex {
221 0c471b84 2002-11-30 alex /* an anderen Server forwarden */
222 0c471b84 2002-11-30 alex target = Client_Search( Req->argv[0] );
223 e17976a1 2003-01-01 alex if(( ! target ) || ( Client_Type( target ) != CLIENT_SERVER )) return IRC_WriteStrClient( from, ERR_NOSUCHSERVER_MSG, Client_ID( from ), Req->argv[0] );
224 0c471b84 2002-11-30 alex
225 0c471b84 2002-11-30 alex if( target != Client_ThisServer( ))
226 0c471b84 2002-11-30 alex {
227 0c471b84 2002-11-30 alex /* Ok, anderer Server ist das Ziel: forwarden */
228 0c471b84 2002-11-30 alex return IRC_WriteStrClientPrefix( target, from, "MOTD %s", Req->argv[0] );
229 0c471b84 2002-11-30 alex }
230 0c471b84 2002-11-30 alex }
231 0c471b84 2002-11-30 alex
232 0c471b84 2002-11-30 alex return IRC_Show_MOTD( from );
233 0c471b84 2002-11-30 alex } /* IRC_MOTD */
234 0c471b84 2002-11-30 alex
235 0c471b84 2002-11-30 alex
236 0c471b84 2002-11-30 alex GLOBAL BOOLEAN
237 0c471b84 2002-11-30 alex IRC_NAMES( CLIENT *Client, REQUEST *Req )
238 0c471b84 2002-11-30 alex {
239 0c471b84 2002-11-30 alex CHAR rpl[COMMAND_LEN], *ptr;
240 0c471b84 2002-11-30 alex CLIENT *target, *from, *c;
241 0c471b84 2002-11-30 alex CHANNEL *chan;
242 0c471b84 2002-11-30 alex
243 0c471b84 2002-11-30 alex assert( Client != NULL );
244 0c471b84 2002-11-30 alex assert( Req != NULL );
245 0c471b84 2002-11-30 alex
246 0c471b84 2002-11-30 alex /* Falsche Anzahl Parameter? */
247 0c471b84 2002-11-30 alex if( Req->argc > 2 ) return IRC_WriteStrClient( Client, ERR_NEEDMOREPARAMS_MSG, Client_ID( Client ), Req->command );
248 0c471b84 2002-11-30 alex
249 0c471b84 2002-11-30 alex /* From aus Prefix ermitteln */
250 0c471b84 2002-11-30 alex if( Client_Type( Client ) == CLIENT_SERVER ) from = Client_Search( Req->prefix );
251 0c471b84 2002-11-30 alex else from = Client;
252 7924fafb 2002-12-16 alex if( ! from ) return IRC_WriteStrClient( Client, ERR_NOSUCHNICK_MSG, Client_ID( Client ), Req->prefix );
253 0c471b84 2002-11-30 alex
254 0c471b84 2002-11-30 alex if( Req->argc == 2 )
255 0c471b84 2002-11-30 alex {
256 0c471b84 2002-11-30 alex /* an anderen Server forwarden */
257 0c471b84 2002-11-30 alex target = Client_Search( Req->argv[1] );
258 e17976a1 2003-01-01 alex if(( ! target ) || ( Client_Type( target ) != CLIENT_SERVER )) return IRC_WriteStrClient( from, ERR_NOSUCHSERVER_MSG, Client_ID( from ), Req->argv[1] );
259 0c471b84 2002-11-30 alex
260 0c471b84 2002-11-30 alex if( target != Client_ThisServer( ))
261 0c471b84 2002-11-30 alex {
262 0c471b84 2002-11-30 alex /* Ok, anderer Server ist das Ziel: forwarden */
263 0c471b84 2002-11-30 alex return IRC_WriteStrClientPrefix( target, from, "NAMES %s :%s", Req->argv[0], Req->argv[1] );
264 0c471b84 2002-11-30 alex }
265 0c471b84 2002-11-30 alex }
266 0c471b84 2002-11-30 alex
267 0c471b84 2002-11-30 alex if( Req->argc > 0 )
268 0c471b84 2002-11-30 alex {
269 0c471b84 2002-11-30 alex /* bestimmte Channels durchgehen */
270 0c471b84 2002-11-30 alex ptr = strtok( Req->argv[0], "," );
271 0c471b84 2002-11-30 alex while( ptr )
272 0c471b84 2002-11-30 alex {
273 0c471b84 2002-11-30 alex chan = Channel_Search( ptr );
274 0c471b84 2002-11-30 alex if( chan )
275 0c471b84 2002-11-30 alex {
276 0c471b84 2002-11-30 alex /* Namen ausgeben */
277 0c471b84 2002-11-30 alex if( ! IRC_Send_NAMES( from, chan )) return DISCONNECTED;
278 0c471b84 2002-11-30 alex }
279 0c471b84 2002-11-30 alex if( ! IRC_WriteStrClient( from, RPL_ENDOFNAMES_MSG, Client_ID( from ), ptr )) return DISCONNECTED;
280 0c471b84 2002-11-30 alex
281 0c471b84 2002-11-30 alex /* naechsten Namen ermitteln */
282 0c471b84 2002-11-30 alex ptr = strtok( NULL, "," );
283 0c471b84 2002-11-30 alex }
284 0c471b84 2002-11-30 alex return CONNECTED;
285 0c471b84 2002-11-30 alex }
286 0c471b84 2002-11-30 alex
287 0c471b84 2002-11-30 alex /* alle Channels durchgehen */
288 0c471b84 2002-11-30 alex chan = Channel_First( );
289 0c471b84 2002-11-30 alex while( chan )
290 0c471b84 2002-11-30 alex {
291 0c471b84 2002-11-30 alex /* Namen ausgeben */
292 0c471b84 2002-11-30 alex if( ! IRC_Send_NAMES( from, chan )) return DISCONNECTED;
293 0c471b84 2002-11-30 alex
294 0c471b84 2002-11-30 alex /* naechster Channel */
295 0c471b84 2002-11-30 alex chan = Channel_Next( chan );
296 0c471b84 2002-11-30 alex }
297 0c471b84 2002-11-30 alex
298 0c471b84 2002-11-30 alex /* Nun noch alle Clients ausgeben, die in keinem Channel sind */
299 0c471b84 2002-11-30 alex c = Client_First( );
300 b316c380 2002-12-26 alex snprintf( rpl, sizeof( rpl ), RPL_NAMREPLY_MSG, Client_ID( from ), "*", "*" );
301 0c471b84 2002-11-30 alex while( c )
302 0c471b84 2002-11-30 alex {
303 0c471b84 2002-11-30 alex if(( Client_Type( c ) == CLIENT_USER ) && ( Channel_FirstChannelOf( c ) == NULL ) && ( ! strchr( Client_Modes( c ), 'i' )))
304 0c471b84 2002-11-30 alex {
305 0c471b84 2002-11-30 alex /* Okay, das ist ein User: anhaengen */
306 6626395c 2002-12-26 alex if( rpl[strlen( rpl ) - 1] != ':' ) strlcat( rpl, " ", sizeof( rpl ));
307 6626395c 2002-12-26 alex strlcat( rpl, Client_ID( c ), sizeof( rpl ));
308 0c471b84 2002-11-30 alex
309 0c471b84 2002-11-30 alex if( strlen( rpl ) > ( LINE_LEN - CLIENT_NICK_LEN - 4 ))
310 0c471b84 2002-11-30 alex {
311 0c471b84 2002-11-30 alex /* Zeile wird zu lang: senden! */
312 0c471b84 2002-11-30 alex if( ! IRC_WriteStrClient( from, "%s", rpl )) return DISCONNECTED;
313 b316c380 2002-12-26 alex snprintf( rpl, sizeof( rpl ), RPL_NAMREPLY_MSG, Client_ID( from ), "*", "*" );
314 0c471b84 2002-11-30 alex }
315 0c471b84 2002-11-30 alex }
316 0c471b84 2002-11-30 alex
317 0c471b84 2002-11-30 alex /* naechster Client */
318 0c471b84 2002-11-30 alex c = Client_Next( c );
319 0c471b84 2002-11-30 alex }
320 0c471b84 2002-11-30 alex if( rpl[strlen( rpl ) - 1] != ':')
321 0c471b84 2002-11-30 alex {
322 0c471b84 2002-11-30 alex /* es wurden User gefunden */
323 0c471b84 2002-11-30 alex if( ! IRC_WriteStrClient( from, "%s", rpl )) return DISCONNECTED;
324 0c471b84 2002-11-30 alex }
325 0c471b84 2002-11-30 alex
326 0c471b84 2002-11-30 alex return IRC_WriteStrClient( from, RPL_ENDOFNAMES_MSG, Client_ID( from ), "*" );
327 0c471b84 2002-11-30 alex } /* IRC_NAMES */
328 0c471b84 2002-11-30 alex
329 0c471b84 2002-11-30 alex
330 0c471b84 2002-11-30 alex GLOBAL BOOLEAN
331 0c471b84 2002-11-30 alex IRC_STATS( CLIENT *Client, REQUEST *Req )
332 0c471b84 2002-11-30 alex {
333 bad7ac62 2002-12-02 alex CLIENT *from, *target, *cl;
334 bad7ac62 2002-12-02 alex CONN_ID con;
335 0c471b84 2002-11-30 alex CHAR query;
336 210282d0 2002-12-18 alex COMMAND *cmd;
337 0c471b84 2002-11-30 alex
338 0c471b84 2002-11-30 alex assert( Client != NULL );
339 0c471b84 2002-11-30 alex assert( Req != NULL );
340 0c471b84 2002-11-30 alex
341 0c471b84 2002-11-30 alex /* Falsche Anzahl Parameter? */
342 0c471b84 2002-11-30 alex if( Req->argc > 2 ) return IRC_WriteStrClient( Client, ERR_NEEDMOREPARAMS_MSG, Client_ID( Client ), Req->command );
343 0c471b84 2002-11-30 alex
344 0c471b84 2002-11-30 alex /* From aus Prefix ermitteln */
345 0c471b84 2002-11-30 alex if( Client_Type( Client ) == CLIENT_SERVER ) from = Client_Search( Req->prefix );
346 0c471b84 2002-11-30 alex else from = Client;
347 7924fafb 2002-12-16 alex if( ! from ) return IRC_WriteStrClient( Client, ERR_NOSUCHNICK_MSG, Client_ID( Client ), Req->prefix );
348 0c471b84 2002-11-30 alex
349 0c471b84 2002-11-30 alex if( Req->argc == 2 )
350 0c471b84 2002-11-30 alex {
351 0c471b84 2002-11-30 alex /* an anderen Server forwarden */
352 e50d568f 2002-11-30 alex target = Client_Search( Req->argv[1] );
353 e17976a1 2003-01-01 alex if(( ! target ) || ( Client_Type( target ) != CLIENT_SERVER )) return IRC_WriteStrClient( from, ERR_NOSUCHSERVER_MSG, Client_ID( from ), Req->argv[1] );
354 0c471b84 2002-11-30 alex
355 0c471b84 2002-11-30 alex if( target != Client_ThisServer( ))
356 0c471b84 2002-11-30 alex {
357 0c471b84 2002-11-30 alex /* Ok, anderer Server ist das Ziel: forwarden */
358 7924fafb 2002-12-16 alex return IRC_WriteStrClientPrefix( target, from, "STATS %s %s", Req->argv[0], Req->argv[1] );
359 0c471b84 2002-11-30 alex }
360 0c471b84 2002-11-30 alex }
361 0c471b84 2002-11-30 alex
362 0c471b84 2002-11-30 alex if( Req->argc > 0 ) query = Req->argv[0][0] ? Req->argv[0][0] : '*';
363 0c471b84 2002-11-30 alex else query = '*';
364 bad7ac62 2002-12-02 alex
365 bad7ac62 2002-12-02 alex switch ( query )
366 bad7ac62 2002-12-02 alex {
367 bad7ac62 2002-12-02 alex case 'l': /* Links */
368 bad7ac62 2002-12-02 alex case 'L':
369 bad7ac62 2002-12-02 alex con = Conn_First( );
370 bad7ac62 2002-12-02 alex while( con != NONE )
371 bad7ac62 2002-12-02 alex {
372 bad7ac62 2002-12-02 alex cl = Client_GetFromConn( con );
373 98677b43 2002-12-18 alex if( cl && (( Client_Type( cl ) == CLIENT_SERVER ) || ( cl == Client )))
374 bad7ac62 2002-12-02 alex {
375 98677b43 2002-12-18 alex /* Server link or our own connection */
376 bad7ac62 2002-12-02 alex #ifdef USE_ZLIB
377 bad7ac62 2002-12-02 alex if( Conn_Options( con ) & CONN_ZIP )
378 bad7ac62 2002-12-02 alex {
379 437f2c33 2002-12-30 alex if( ! IRC_WriteStrClient( from, RPL_STATSLINKINFOZIP_MSG, Client_ID( from ), Client_Mask( cl ), Conn_SendQ( con ), Conn_SendMsg( con ), Zip_SendBytes( con ), Conn_SendBytes( con ), Conn_RecvMsg( con ), Zip_RecvBytes( con ), Conn_RecvBytes( con ), (LONG)( time( NULL ) - Conn_StartTime( con )))) return DISCONNECTED;
380 bad7ac62 2002-12-02 alex }
381 bad7ac62 2002-12-02 alex else
382 bad7ac62 2002-12-02 alex #endif
383 bad7ac62 2002-12-02 alex {
384 bad7ac62 2002-12-02 alex if( ! IRC_WriteStrClient( from, RPL_STATSLINKINFO_MSG, Client_ID( from ), Client_Mask( cl ), Conn_SendQ( con ), Conn_SendMsg( con ), Conn_SendBytes( con ), Conn_RecvMsg( con ), Conn_RecvBytes( con ), (LONG)( time( NULL ) - Conn_StartTime( con )))) return DISCONNECTED;
385 bad7ac62 2002-12-02 alex }
386 bad7ac62 2002-12-02 alex }
387 bad7ac62 2002-12-02 alex con = Conn_Next( con );
388 bad7ac62 2002-12-02 alex }
389 bad7ac62 2002-12-02 alex break;
390 bad7ac62 2002-12-02 alex case 'm': /* IRC-Befehle */
391 bad7ac62 2002-12-02 alex case 'M':
392 210282d0 2002-12-18 alex cmd = Parse_GetCommandStruct( );
393 210282d0 2002-12-18 alex while( cmd->name )
394 210282d0 2002-12-18 alex {
395 210282d0 2002-12-18 alex if( cmd->lcount > 0 || cmd->rcount > 0 )
396 210282d0 2002-12-18 alex {
397 210282d0 2002-12-18 alex if( ! IRC_WriteStrClient( from, RPL_STATSCOMMANDS_MSG, Client_ID( from ), cmd->name, cmd->lcount, cmd->bytes, cmd->rcount )) return DISCONNECTED;
398 210282d0 2002-12-18 alex }
399 210282d0 2002-12-18 alex cmd++;
400 210282d0 2002-12-18 alex }
401 bad7ac62 2002-12-02 alex break;
402 bad7ac62 2002-12-02 alex }
403 0c471b84 2002-11-30 alex
404 0c471b84 2002-11-30 alex return IRC_WriteStrClient( from, RPL_ENDOFSTATS_MSG, Client_ID( from ), query );
405 0c471b84 2002-11-30 alex } /* IRC_STATS */
406 0c471b84 2002-11-30 alex
407 0c471b84 2002-11-30 alex
408 0c471b84 2002-11-30 alex GLOBAL BOOLEAN
409 0c471b84 2002-11-30 alex IRC_TIME( CLIENT *Client, REQUEST *Req )
410 0c471b84 2002-11-30 alex {
411 0c471b84 2002-11-30 alex CLIENT *from, *target;
412 0c471b84 2002-11-30 alex CHAR t_str[64];
413 0c471b84 2002-11-30 alex time_t t;
414 0c471b84 2002-11-30 alex
415 0c471b84 2002-11-30 alex assert( Client != NULL );
416 0c471b84 2002-11-30 alex assert( Req != NULL );
417 0c471b84 2002-11-30 alex
418 0c471b84 2002-11-30 alex /* Falsche Anzahl Parameter? */
419 0c471b84 2002-11-30 alex if( Req->argc > 1 ) return IRC_WriteStrClient( Client, ERR_NEEDMOREPARAMS_MSG, Client_ID( Client ), Req->command );
420 0c471b84 2002-11-30 alex
421 0c471b84 2002-11-30 alex /* From aus Prefix ermitteln */
422 0c471b84 2002-11-30 alex if( Client_Type( Client ) == CLIENT_SERVER ) from = Client_Search( Req->prefix );
423 0c471b84 2002-11-30 alex else from = Client;
424 7924fafb 2002-12-16 alex if( ! from ) return IRC_WriteStrClient( Client, ERR_NOSUCHNICK_MSG, Client_ID( Client ), Req->prefix );
425 0c471b84 2002-11-30 alex
426 0c471b84 2002-11-30 alex if( Req->argc == 1 )
427 0c471b84 2002-11-30 alex {
428 0c471b84 2002-11-30 alex /* an anderen Server forwarden */
429 0c471b84 2002-11-30 alex target = Client_Search( Req->argv[0] );
430 e17976a1 2003-01-01 alex if(( ! target ) || ( Client_Type( target ) != CLIENT_SERVER )) return IRC_WriteStrClient( Client, ERR_NOSUCHSERVER_MSG, Client_ID( Client ), Req->argv[0] );
431 0c471b84 2002-11-30 alex
432 0c471b84 2002-11-30 alex if( target != Client_ThisServer( ))
433 0c471b84 2002-11-30 alex {
434 0c471b84 2002-11-30 alex /* Ok, anderer Server ist das Ziel: forwarden */
435 0c471b84 2002-11-30 alex return IRC_WriteStrClientPrefix( target, from, "TIME %s", Req->argv[0] );
436 0c471b84 2002-11-30 alex }
437 0c471b84 2002-11-30 alex }
438 0c471b84 2002-11-30 alex
439 0c471b84 2002-11-30 alex t = time( NULL );
440 0c471b84 2002-11-30 alex (VOID)strftime( t_str, 60, "%A %B %d %Y -- %H:%M %z", localtime( &t ));
441 0c471b84 2002-11-30 alex return IRC_WriteStrClient( from, RPL_TIME_MSG, Client_ID( from ), Client_ID( Client_ThisServer( )), t_str );
442 0c471b84 2002-11-30 alex } /* IRC_TIME */
443 0c471b84 2002-11-30 alex
444 0c471b84 2002-11-30 alex
445 0c471b84 2002-11-30 alex GLOBAL BOOLEAN
446 0c471b84 2002-11-30 alex IRC_USERHOST( CLIENT *Client, REQUEST *Req )
447 0c471b84 2002-11-30 alex {
448 0c471b84 2002-11-30 alex CHAR rpl[COMMAND_LEN];
449 0c471b84 2002-11-30 alex CLIENT *c;
450 0c471b84 2002-11-30 alex INT max, i;
451 0c471b84 2002-11-30 alex
452 0c471b84 2002-11-30 alex assert( Client != NULL );
453 0c471b84 2002-11-30 alex assert( Req != NULL );
454 0c471b84 2002-11-30 alex
455 0c471b84 2002-11-30 alex /* Falsche Anzahl Parameter? */
456 0c471b84 2002-11-30 alex if(( Req->argc < 1 )) return IRC_WriteStrClient( Client, ERR_NEEDMOREPARAMS_MSG, Client_ID( Client ), Req->command );
457 0c471b84 2002-11-30 alex
458 0c471b84 2002-11-30 alex if( Req->argc > 5 ) max = 5;
459 0c471b84 2002-11-30 alex else max = Req->argc;
460 0c471b84 2002-11-30 alex
461 0c471b84 2002-11-30 alex strcpy( rpl, RPL_USERHOST_MSG );
462 0c471b84 2002-11-30 alex for( i = 0; i < max; i++ )
463 0c471b84 2002-11-30 alex {
464 0c471b84 2002-11-30 alex c = Client_Search( Req->argv[i] );
465 0c471b84 2002-11-30 alex if( c && ( Client_Type( c ) == CLIENT_USER ))
466 0c471b84 2002-11-30 alex {
467 0c471b84 2002-11-30 alex /* Dieser Nick ist "online" */
468 6626395c 2002-12-26 alex strlcat( rpl, Client_ID( c ), sizeof( rpl ));
469 6626395c 2002-12-26 alex if( Client_HasMode( c, 'o' )) strlcat( rpl, "*", sizeof( rpl ));
470 6626395c 2002-12-26 alex strlcat( rpl, "=", sizeof( rpl ));
471 6626395c 2002-12-26 alex if( Client_HasMode( c, 'a' )) strlcat( rpl, "-", sizeof( rpl ));
472 6626395c 2002-12-26 alex else strlcat( rpl, "+", sizeof( rpl ));
473 6626395c 2002-12-26 alex strlcat( rpl, Client_User( c ), sizeof( rpl ));
474 6626395c 2002-12-26 alex strlcat( rpl, "@", sizeof( rpl ));
475 6626395c 2002-12-26 alex strlcat( rpl, Client_Hostname( c ), sizeof( rpl ));
476 6626395c 2002-12-26 alex strlcat( rpl, " ", sizeof( rpl ));
477 0c471b84 2002-11-30 alex }
478 0c471b84 2002-11-30 alex }
479 0c471b84 2002-11-30 alex if( rpl[strlen( rpl ) - 1] == ' ' ) rpl[strlen( rpl ) - 1] = '\0';
480 0c471b84 2002-11-30 alex
481 f0349f52 2002-12-02 alex return IRC_WriteStrClient( Client, rpl, Client_ID( Client ) );
482 0c471b84 2002-11-30 alex } /* IRC_USERHOST */
483 0c471b84 2002-11-30 alex
484 0c471b84 2002-11-30 alex
485 0c471b84 2002-11-30 alex GLOBAL BOOLEAN
486 0c471b84 2002-11-30 alex IRC_VERSION( CLIENT *Client, REQUEST *Req )
487 0c471b84 2002-11-30 alex {
488 0c471b84 2002-11-30 alex CLIENT *target, *prefix;
489 0c471b84 2002-11-30 alex
490 0c471b84 2002-11-30 alex assert( Client != NULL );
491 0c471b84 2002-11-30 alex assert( Req != NULL );
492 0c471b84 2002-11-30 alex
493 0c471b84 2002-11-30 alex /* Falsche Anzahl Parameter? */
494 0c471b84 2002-11-30 alex if(( Req->argc > 1 )) return IRC_WriteStrClient( Client, ERR_NEEDMOREPARAMS_MSG, Client_ID( Client ), Req->command );
495 0c471b84 2002-11-30 alex
496 0c471b84 2002-11-30 alex /* Ziel suchen */
497 0c471b84 2002-11-30 alex if( Req->argc == 1 ) target = Client_Search( Req->argv[0] );
498 0c471b84 2002-11-30 alex else target = Client_ThisServer( );
499 0c471b84 2002-11-30 alex
500 0c471b84 2002-11-30 alex /* Prefix ermitteln */
501 0c471b84 2002-11-30 alex if( Client_Type( Client ) == CLIENT_SERVER ) prefix = Client_Search( Req->prefix );
502 0c471b84 2002-11-30 alex else prefix = Client;
503 7924fafb 2002-12-16 alex if( ! prefix ) return IRC_WriteStrClient( Client, ERR_NOSUCHNICK_MSG, Client_ID( Client ), Req->prefix );
504 0c471b84 2002-11-30 alex
505 0c471b84 2002-11-30 alex /* An anderen Server weiterleiten? */
506 0c471b84 2002-11-30 alex if( target != Client_ThisServer( ))
507 0c471b84 2002-11-30 alex {
508 e17976a1 2003-01-01 alex if(( ! target ) || ( Client_Type( target ) != CLIENT_SERVER )) return IRC_WriteStrClient( prefix, ERR_NOSUCHSERVER_MSG, Client_ID( prefix ), Req->argv[0] );
509 0c471b84 2002-11-30 alex
510 0c471b84 2002-11-30 alex /* forwarden */
511 0c471b84 2002-11-30 alex IRC_WriteStrClientPrefix( target, prefix, "VERSION %s", Req->argv[0] );
512 0c471b84 2002-11-30 alex return CONNECTED;
513 0c471b84 2002-11-30 alex }
514 0c471b84 2002-11-30 alex
515 0c471b84 2002-11-30 alex /* mit Versionsinfo antworten */
516 0c471b84 2002-11-30 alex return IRC_WriteStrClient( Client, RPL_VERSION_MSG, Client_ID( prefix ), PACKAGE, VERSION, NGIRCd_DebugLevel, Conf_ServerName, NGIRCd_VersionAddition( ));
517 0c471b84 2002-11-30 alex } /* IRC_VERSION */
518 0c471b84 2002-11-30 alex
519 0c471b84 2002-11-30 alex
520 0c471b84 2002-11-30 alex GLOBAL BOOLEAN
521 0c471b84 2002-11-30 alex IRC_WHO( CLIENT *Client, REQUEST *Req )
522 0c471b84 2002-11-30 alex {
523 0c471b84 2002-11-30 alex BOOLEAN ok, only_ops;
524 0c471b84 2002-11-30 alex CHAR flags[8], *ptr;
525 0c471b84 2002-11-30 alex CL2CHAN *cl2chan;
526 0c471b84 2002-11-30 alex CHANNEL *chan;
527 0c471b84 2002-11-30 alex CLIENT *c;
528 0c471b84 2002-11-30 alex
529 0c471b84 2002-11-30 alex assert( Client != NULL );
530 0c471b84 2002-11-30 alex assert( Req != NULL );
531 0c471b84 2002-11-30 alex
532 0c471b84 2002-11-30 alex /* Falsche Anzahl Parameter? */
533 0c471b84 2002-11-30 alex if(( Req->argc > 2 )) return IRC_WriteStrClient( Client, ERR_NEEDMOREPARAMS_MSG, Client_ID( Client ), Req->command );
534 0c471b84 2002-11-30 alex
535 0c471b84 2002-11-30 alex only_ops = FALSE;
536 0c471b84 2002-11-30 alex chan = NULL;
537 0c471b84 2002-11-30 alex
538 0c471b84 2002-11-30 alex if( Req->argc == 2 )
539 0c471b84 2002-11-30 alex {
540 0c471b84 2002-11-30 alex /* Nur OPs anzeigen? */
541 0c471b84 2002-11-30 alex if( strcmp( Req->argv[1], "o" ) == 0 ) only_ops = TRUE;
542 0c471b84 2002-11-30 alex #ifdef STRICT_RFC
543 0c471b84 2002-11-30 alex else return IRC_WriteStrClient( Client, ERR_NEEDMOREPARAMS_MSG, Client_ID( Client ), Req->command );
544 0c471b84 2002-11-30 alex #endif
545 0c471b84 2002-11-30 alex }
546 0c471b84 2002-11-30 alex
547 0c471b84 2002-11-30 alex if( Req->argc >= 1 )
548 0c471b84 2002-11-30 alex {
549 0c471b84 2002-11-30 alex /* wurde ein Channel oder Nick-Mask angegeben? */
550 0c471b84 2002-11-30 alex chan = Channel_Search( Req->argv[0] );
551 0c471b84 2002-11-30 alex }
552 0c471b84 2002-11-30 alex
553 0c471b84 2002-11-30 alex if( chan )
554 0c471b84 2002-11-30 alex {
555 0c471b84 2002-11-30 alex /* User eines Channels ausgeben */
556 0c471b84 2002-11-30 alex if( ! IRC_Send_WHO( Client, chan, only_ops )) return DISCONNECTED;
557 0c471b84 2002-11-30 alex }
558 0c471b84 2002-11-30 alex
559 0c471b84 2002-11-30 alex c = Client_First( );
560 0c471b84 2002-11-30 alex while( c )
561 0c471b84 2002-11-30 alex {
562 0c471b84 2002-11-30 alex if(( Client_Type( c ) == CLIENT_USER ) && ( ! strchr( Client_Modes( c ), 'i' )))
563 0c471b84 2002-11-30 alex {
564 0c471b84 2002-11-30 alex ok = FALSE;
565 0c471b84 2002-11-30 alex if( Req->argc == 0 ) ok = TRUE;
566 0c471b84 2002-11-30 alex else
567 0c471b84 2002-11-30 alex {
568 0c471b84 2002-11-30 alex if( strcasecmp( Req->argv[0], Client_ID( c )) == 0 ) ok = TRUE;
569 0c471b84 2002-11-30 alex else if( strcmp( Req->argv[0], "0" ) == 0 ) ok = TRUE;
570 0c471b84 2002-11-30 alex }
571 0c471b84 2002-11-30 alex
572 0c471b84 2002-11-30 alex if( ok && (( ! only_ops ) || ( strchr( Client_Modes( c ), 'o' ))))
573 0c471b84 2002-11-30 alex {
574 0c471b84 2002-11-30 alex /* Flags zusammenbasteln */
575 0c471b84 2002-11-30 alex strcpy( flags, "H" );
576 6626395c 2002-12-26 alex if( strchr( Client_Modes( c ), 'o' )) strlcat( flags, "*", sizeof( flags ));
577 0c471b84 2002-11-30 alex
578 0c471b84 2002-11-30 alex /* ausgeben */
579 0c471b84 2002-11-30 alex cl2chan = Channel_FirstChannelOf( c );
580 0c471b84 2002-11-30 alex if( cl2chan ) ptr = Channel_Name( Channel_GetChannel( cl2chan ));
581 0c471b84 2002-11-30 alex else ptr = "*";
582 0c471b84 2002-11-30 alex if( ! IRC_WriteStrClient( Client, RPL_WHOREPLY_MSG, Client_ID( Client ), ptr, Client_User( c ), Client_Hostname( c ), Client_ID( Client_Introducer( c )), Client_ID( c ), flags, Client_Hops( c ), Client_Info( c ))) return DISCONNECTED;
583 0c471b84 2002-11-30 alex }
584 0c471b84 2002-11-30 alex }
585 0c471b84 2002-11-30 alex
586 0c471b84 2002-11-30 alex /* naechster Client */
587 0c471b84 2002-11-30 alex c = Client_Next( c );
588 0c471b84 2002-11-30 alex }
589 0c471b84 2002-11-30 alex
590 0c471b84 2002-11-30 alex if( chan ) return IRC_WriteStrClient( Client, RPL_ENDOFWHO_MSG, Client_ID( Client ), Channel_Name( chan ));
591 0c471b84 2002-11-30 alex else if( Req->argc == 0 ) return IRC_WriteStrClient( Client, RPL_ENDOFWHO_MSG, Client_ID( Client ), "*" );
592 0c471b84 2002-11-30 alex else return IRC_WriteStrClient( Client, RPL_ENDOFWHO_MSG, Client_ID( Client ), Req->argv[0] );
593 0c471b84 2002-11-30 alex } /* IRC_WHO */
594 0c471b84 2002-11-30 alex
595 0c471b84 2002-11-30 alex
596 0c471b84 2002-11-30 alex GLOBAL BOOLEAN
597 0c471b84 2002-11-30 alex IRC_WHOIS( CLIENT *Client, REQUEST *Req )
598 0c471b84 2002-11-30 alex {
599 0c471b84 2002-11-30 alex CLIENT *from, *target, *c;
600 e17976a1 2003-01-01 alex CHAR str[LINE_LEN + 1];
601 0c471b84 2002-11-30 alex CL2CHAN *cl2chan;
602 0c471b84 2002-11-30 alex CHANNEL *chan;
603 0c471b84 2002-11-30 alex
604 0c471b84 2002-11-30 alex assert( Client != NULL );
605 0c471b84 2002-11-30 alex assert( Req != NULL );
606 0c471b84 2002-11-30 alex
607 e17976a1 2003-01-01 alex /* Bad number of parameters? */
608 0c471b84 2002-11-30 alex if(( Req->argc < 1 ) || ( Req->argc > 2 )) return IRC_WriteStrClient( Client, ERR_NEEDMOREPARAMS_MSG, Client_ID( Client ), Req->command );
609 0c471b84 2002-11-30 alex
610 e17976a1 2003-01-01 alex /* Search client */
611 0c471b84 2002-11-30 alex c = Client_Search( Req->argv[Req->argc - 1] );
612 0c471b84 2002-11-30 alex if(( ! c ) || ( Client_Type( c ) != CLIENT_USER )) return IRC_WriteStrClient( Client, ERR_NOSUCHNICK_MSG, Client_ID( Client ), Req->argv[Req->argc - 1] );
613 0c471b84 2002-11-30 alex
614 e17976a1 2003-01-01 alex /* Search sender of the WHOIS */
615 0c471b84 2002-11-30 alex if( Client_Type( Client ) == CLIENT_SERVER ) from = Client_Search( Req->prefix );
616 0c471b84 2002-11-30 alex else from = Client;
617 0c471b84 2002-11-30 alex if( ! from ) return IRC_WriteStrClient( Client, ERR_NOSUCHNICK_MSG, Client_ID( Client ), Req->prefix );
618 0c471b84 2002-11-30 alex
619 e17976a1 2003-01-01 alex /* Forward to other server? */
620 0c471b84 2002-11-30 alex if( Req->argc > 1 )
621 0c471b84 2002-11-30 alex {
622 e17976a1 2003-01-01 alex /* Search target server (can be specified as nick of that server!) */
623 e17976a1 2003-01-01 alex target = Client_Search( Req->argv[0] );
624 e17976a1 2003-01-01 alex if( ! target ) return IRC_WriteStrClient( from, ERR_NOSUCHSERVER_MSG, Client_ID( from ), Req->argv[0] );
625 0c471b84 2002-11-30 alex }
626 0c471b84 2002-11-30 alex else target = Client_ThisServer( );
627 0c471b84 2002-11-30 alex
628 0c471b84 2002-11-30 alex assert( target != NULL );
629 0c471b84 2002-11-30 alex
630 e17976a1 2003-01-01 alex if(( Client_NextHop( target ) != Client_ThisServer( )) && ( Client_Type( Client_NextHop( target )) == CLIENT_SERVER )) return IRC_WriteStrClientPrefix( target, from, "WHOIS %s :%s", Req->argv[0], Req->argv[1] );
631 0c471b84 2002-11-30 alex
632 e17976a1 2003-01-01 alex /* Nick, user and name */
633 0c471b84 2002-11-30 alex if( ! IRC_WriteStrClient( from, RPL_WHOISUSER_MSG, Client_ID( from ), Client_ID( c ), Client_User( c ), Client_Hostname( c ), Client_Info( c ))) return DISCONNECTED;
634 0c471b84 2002-11-30 alex
635 0c471b84 2002-11-30 alex /* Server */
636 0c471b84 2002-11-30 alex if( ! IRC_WriteStrClient( from, RPL_WHOISSERVER_MSG, Client_ID( from ), Client_ID( c ), Client_ID( Client_Introducer( c )), Client_Info( Client_Introducer( c )))) return DISCONNECTED;
637 0c471b84 2002-11-30 alex
638 0c471b84 2002-11-30 alex /* Channels */
639 b316c380 2002-12-26 alex snprintf( str, sizeof( str ), RPL_WHOISCHANNELS_MSG, Client_ID( from ), Client_ID( c ));
640 0c471b84 2002-11-30 alex cl2chan = Channel_FirstChannelOf( c );
641 0c471b84 2002-11-30 alex while( cl2chan )
642 0c471b84 2002-11-30 alex {
643 0c471b84 2002-11-30 alex chan = Channel_GetChannel( cl2chan );
644 0c471b84 2002-11-30 alex assert( chan != NULL );
645 0c471b84 2002-11-30 alex
646 e17976a1 2003-01-01 alex /* Concatenate channel names */
647 6626395c 2002-12-26 alex if( str[strlen( str ) - 1] != ':' ) strlcat( str, " ", sizeof( str ));
648 6626395c 2002-12-26 alex if( strchr( Channel_UserModes( chan, c ), 'o' )) strlcat( str, "@", sizeof( str ));
649 6626395c 2002-12-26 alex else if( strchr( Channel_UserModes( chan, c ), 'v' )) strlcat( str, "+", sizeof( str ));
650 6626395c 2002-12-26 alex strlcat( str, Channel_Name( chan ), sizeof( str ));
651 0c471b84 2002-11-30 alex
652 0c471b84 2002-11-30 alex if( strlen( str ) > ( LINE_LEN - CHANNEL_NAME_LEN - 4 ))
653 0c471b84 2002-11-30 alex {
654 e17976a1 2003-01-01 alex /* Line becomes too long: send it! */
655 0c471b84 2002-11-30 alex if( ! IRC_WriteStrClient( Client, "%s", str )) return DISCONNECTED;
656 b316c380 2002-12-26 alex snprintf( str, sizeof( str ), RPL_WHOISCHANNELS_MSG, Client_ID( from ), Client_ID( c ));
657 0c471b84 2002-11-30 alex }
658 0c471b84 2002-11-30 alex
659 e17976a1 2003-01-01 alex /* next */
660 0c471b84 2002-11-30 alex cl2chan = Channel_NextChannelOf( c, cl2chan );
661 0c471b84 2002-11-30 alex }
662 0c471b84 2002-11-30 alex if( str[strlen( str ) - 1] != ':')
663 0c471b84 2002-11-30 alex {
664 e17976a1 2003-01-01 alex /* There is data left to send: */
665 0c471b84 2002-11-30 alex if( ! IRC_WriteStrClient( Client, "%s", str )) return DISCONNECTED;
666 0c471b84 2002-11-30 alex }
667 0c471b84 2002-11-30 alex
668 0c471b84 2002-11-30 alex /* IRC-Operator? */
669 0c471b84 2002-11-30 alex if( Client_HasMode( c, 'o' ))
670 0c471b84 2002-11-30 alex {
671 0c471b84 2002-11-30 alex if( ! IRC_WriteStrClient( from, RPL_WHOISOPERATOR_MSG, Client_ID( from ), Client_ID( c ))) return DISCONNECTED;
672 0c471b84 2002-11-30 alex }
673 0c471b84 2002-11-30 alex
674 e17976a1 2003-01-01 alex /* Idle (only local clients) */
675 0c471b84 2002-11-30 alex if( Client_Conn( c ) > NONE )
676 0c471b84 2002-11-30 alex {
677 0c471b84 2002-11-30 alex if( ! IRC_WriteStrClient( from, RPL_WHOISIDLE_MSG, Client_ID( from ), Client_ID( c ), Conn_GetIdle( Client_Conn ( c )))) return DISCONNECTED;
678 0c471b84 2002-11-30 alex }
679 0c471b84 2002-11-30 alex
680 0c471b84 2002-11-30 alex /* Away? */
681 0c471b84 2002-11-30 alex if( Client_HasMode( c, 'a' ))
682 0c471b84 2002-11-30 alex {
683 0c471b84 2002-11-30 alex if( ! IRC_WriteStrClient( from, RPL_AWAY_MSG, Client_ID( from ), Client_ID( c ), Client_Away( c ))) return DISCONNECTED;
684 0c471b84 2002-11-30 alex }
685 0c471b84 2002-11-30 alex
686 0c471b84 2002-11-30 alex /* End of Whois */
687 0c471b84 2002-11-30 alex return IRC_WriteStrClient( from, RPL_ENDOFWHOIS_MSG, Client_ID( from ), Client_ID( c ));
688 0c471b84 2002-11-30 alex } /* IRC_WHOIS */
689 0c471b84 2002-11-30 alex
690 0c471b84 2002-11-30 alex
691 0c471b84 2002-11-30 alex GLOBAL BOOLEAN
692 0c471b84 2002-11-30 alex IRC_WHOWAS( CLIENT *Client, REQUEST *Req )
693 0c471b84 2002-11-30 alex {
694 0c471b84 2002-11-30 alex assert( Client != NULL );
695 0c471b84 2002-11-30 alex assert( Req != NULL );
696 0c471b84 2002-11-30 alex
697 0c471b84 2002-11-30 alex /* Falsche Anzahl Parameter? */
698 0c471b84 2002-11-30 alex if(( Req->argc < 1 ) || ( Req->argc > 3 )) return IRC_WriteStrClient( Client, ERR_NEEDMOREPARAMS_MSG, Client_ID( Client ), Req->command );
699 0c471b84 2002-11-30 alex
700 0c471b84 2002-11-30 alex /* ... */
701 0c471b84 2002-11-30 alex
702 0c471b84 2002-11-30 alex return CONNECTED;
703 0c471b84 2002-11-30 alex } /* IRC_WHOWAS */
704 0c471b84 2002-11-30 alex
705 0c471b84 2002-11-30 alex
706 0c471b84 2002-11-30 alex GLOBAL BOOLEAN
707 0c471b84 2002-11-30 alex IRC_Send_LUSERS( CLIENT *Client )
708 0c471b84 2002-11-30 alex {
709 0c471b84 2002-11-30 alex LONG cnt;
710 0c471b84 2002-11-30 alex
711 0c471b84 2002-11-30 alex assert( Client != NULL );
712 0c471b84 2002-11-30 alex
713 212d36a3 2002-12-22 alex /* Users, services and serevers in the network */
714 0c471b84 2002-11-30 alex if( ! IRC_WriteStrClient( Client, RPL_LUSERCLIENT_MSG, Client_ID( Client ), Client_UserCount( ), Client_ServiceCount( ), Client_ServerCount( ))) return DISCONNECTED;
715 0c471b84 2002-11-30 alex
716 212d36a3 2002-12-22 alex /* Number of IRC operators */
717 0c471b84 2002-11-30 alex cnt = Client_OperCount( );
718 0c471b84 2002-11-30 alex if( cnt > 0 )
719 0c471b84 2002-11-30 alex {
720 0c471b84 2002-11-30 alex if( ! IRC_WriteStrClient( Client, RPL_LUSEROP_MSG, Client_ID( Client ), cnt )) return DISCONNECTED;
721 0c471b84 2002-11-30 alex }
722 0c471b84 2002-11-30 alex
723 212d36a3 2002-12-22 alex /* Unknown connections */
724 0c471b84 2002-11-30 alex cnt = Client_UnknownCount( );
725 0c471b84 2002-11-30 alex if( cnt > 0 )
726 0c471b84 2002-11-30 alex {
727 0c471b84 2002-11-30 alex if( ! IRC_WriteStrClient( Client, RPL_LUSERUNKNOWN_MSG, Client_ID( Client ), cnt )) return DISCONNECTED;
728 0c471b84 2002-11-30 alex }
729 0c471b84 2002-11-30 alex
730 212d36a3 2002-12-22 alex /* Number of created channels */
731 0c471b84 2002-11-30 alex if( ! IRC_WriteStrClient( Client, RPL_LUSERCHANNELS_MSG, Client_ID( Client ), Channel_Count( ))) return DISCONNECTED;
732 0c471b84 2002-11-30 alex
733 212d36a3 2002-12-22 alex /* Number of local users, services and servers */
734 0c471b84 2002-11-30 alex if( ! IRC_WriteStrClient( Client, RPL_LUSERME_MSG, Client_ID( Client ), Client_MyUserCount( ), Client_MyServiceCount( ), Client_MyServerCount( ))) return DISCONNECTED;
735 0c471b84 2002-11-30 alex
736 212d36a3 2002-12-22 alex #ifndef STRICT_RFC
737 212d36a3 2002-12-22 alex /* Maximum number of local users */
738 212d36a3 2002-12-22 alex if( ! IRC_WriteStrClient( Client, RPL_LOCALUSERS_MSG, Client_ID( Client ), Client_MyUserCount( ), Client_MyMaxUserCount( ))) return DISCONNECTED;
739 212d36a3 2002-12-22 alex /* Maximum number of users in the network */
740 212d36a3 2002-12-22 alex if( ! IRC_WriteStrClient( Client, RPL_NETUSERS_MSG, Client_ID( Client ), Client_UserCount( ), Client_MaxUserCount( ))) return DISCONNECTED;
741 212d36a3 2002-12-22 alex #endif
742 212d36a3 2002-12-22 alex
743 0c471b84 2002-11-30 alex return CONNECTED;
744 0c471b84 2002-11-30 alex } /* IRC_Send_LUSERS */
745 0c471b84 2002-11-30 alex
746 0c471b84 2002-11-30 alex
747 0c471b84 2002-11-30 alex GLOBAL BOOLEAN
748 0c471b84 2002-11-30 alex IRC_Show_MOTD( CLIENT *Client )
749 0c471b84 2002-11-30 alex {
750 0c471b84 2002-11-30 alex BOOLEAN ok;
751 0c471b84 2002-11-30 alex CHAR line[127];
752 0c471b84 2002-11-30 alex FILE *fd;
753 0c471b84 2002-11-30 alex
754 0c471b84 2002-11-30 alex assert( Client != NULL );
755 0c471b84 2002-11-30 alex
756 0c471b84 2002-11-30 alex fd = fopen( Conf_MotdFile, "r" );
757 0c471b84 2002-11-30 alex if( ! fd )
758 0c471b84 2002-11-30 alex {
759 0c471b84 2002-11-30 alex Log( LOG_WARNING, "Can't read MOTD file \"%s\": %s", Conf_MotdFile, strerror( errno ));
760 0c471b84 2002-11-30 alex return IRC_WriteStrClient( Client, ERR_NOMOTD_MSG, Client_ID( Client ) );
761 0c471b84 2002-11-30 alex }
762 0c471b84 2002-11-30 alex
763 0c471b84 2002-11-30 alex IRC_WriteStrClient( Client, RPL_MOTDSTART_MSG, Client_ID( Client ), Client_ID( Client_ThisServer( )));
764 0c471b84 2002-11-30 alex while( TRUE )
765 0c471b84 2002-11-30 alex {
766 0c471b84 2002-11-30 alex if( ! fgets( line, 126, fd )) break;
767 0c471b84 2002-11-30 alex if( line[strlen( line ) - 1] == '\n' ) line[strlen( line ) - 1] = '\0';
768 0c471b84 2002-11-30 alex if( ! IRC_WriteStrClient( Client, RPL_MOTD_MSG, Client_ID( Client ), line ))
769 0c471b84 2002-11-30 alex {
770 0c471b84 2002-11-30 alex fclose( fd );
771 0c471b84 2002-11-30 alex return FALSE;
772 0c471b84 2002-11-30 alex }
773 0c471b84 2002-11-30 alex }
774 0c471b84 2002-11-30 alex ok = IRC_WriteStrClient( Client, RPL_ENDOFMOTD_MSG, Client_ID( Client ) );
775 0c471b84 2002-11-30 alex
776 0c471b84 2002-11-30 alex fclose( fd );
777 0c471b84 2002-11-30 alex
778 0c471b84 2002-11-30 alex return ok;
779 0c471b84 2002-11-30 alex } /* IRC_Show_MOTD */
780 0c471b84 2002-11-30 alex
781 0c471b84 2002-11-30 alex
782 0c471b84 2002-11-30 alex GLOBAL BOOLEAN
783 0c471b84 2002-11-30 alex IRC_Send_NAMES( CLIENT *Client, CHANNEL *Chan )
784 0c471b84 2002-11-30 alex {
785 0c471b84 2002-11-30 alex BOOLEAN is_visible, is_member;
786 0c471b84 2002-11-30 alex CHAR str[LINE_LEN + 1];
787 0c471b84 2002-11-30 alex CL2CHAN *cl2chan;
788 0c471b84 2002-11-30 alex CLIENT *cl;
789 0c471b84 2002-11-30 alex
790 0c471b84 2002-11-30 alex assert( Client != NULL );
791 0c471b84 2002-11-30 alex assert( Chan != NULL );
792 0c471b84 2002-11-30 alex
793 0c471b84 2002-11-30 alex if( Channel_IsMemberOf( Chan, Client )) is_member = TRUE;
794 0c471b84 2002-11-30 alex else is_member = FALSE;
795 0c471b84 2002-11-30 alex
796 0c471b84 2002-11-30 alex /* Alle Mitglieder suchen */
797 b316c380 2002-12-26 alex snprintf( str, sizeof( str ), RPL_NAMREPLY_MSG, Client_ID( Client ), "=", Channel_Name( Chan ));
798 0c471b84 2002-11-30 alex cl2chan = Channel_FirstMember( Chan );
799 0c471b84 2002-11-30 alex while( cl2chan )
800 0c471b84 2002-11-30 alex {
801 0c471b84 2002-11-30 alex cl = Channel_GetClient( cl2chan );
802 0c471b84 2002-11-30 alex
803 0c471b84 2002-11-30 alex if( strchr( Client_Modes( cl ), 'i' )) is_visible = FALSE;
804 0c471b84 2002-11-30 alex else is_visible = TRUE;
805 0c471b84 2002-11-30 alex
806 0c471b84 2002-11-30 alex if( is_member || is_visible )
807 0c471b84 2002-11-30 alex {
808 0c471b84 2002-11-30 alex /* Nick anhaengen */
809 6626395c 2002-12-26 alex if( str[strlen( str ) - 1] != ':' ) strlcat( str, " ", sizeof( str ));
810 6626395c 2002-12-26 alex if( strchr( Channel_UserModes( Chan, cl ), 'o' )) strlcat( str, "@", sizeof( str ));
811 6626395c 2002-12-26 alex else if( strchr( Channel_UserModes( Chan, cl ), 'v' )) strlcat( str, "+", sizeof( str ));
812 6626395c 2002-12-26 alex strlcat( str, Client_ID( cl ), sizeof( str ));
813 0c471b84 2002-11-30 alex
814 0c471b84 2002-11-30 alex if( strlen( str ) > ( LINE_LEN - CLIENT_NICK_LEN - 4 ))
815 0c471b84 2002-11-30 alex {
816 0c471b84 2002-11-30 alex /* Zeile wird zu lang: senden! */
817 0c471b84 2002-11-30 alex if( ! IRC_WriteStrClient( Client, "%s", str )) return DISCONNECTED;
818 b316c380 2002-12-26 alex snprintf( str, sizeof( str ), RPL_NAMREPLY_MSG, Client_ID( Client ), "=", Channel_Name( Chan ));
819 0c471b84 2002-11-30 alex }
820 0c471b84 2002-11-30 alex }
821 0c471b84 2002-11-30 alex
822 0c471b84 2002-11-30 alex /* naechstes Mitglied suchen */
823 0c471b84 2002-11-30 alex cl2chan = Channel_NextMember( Chan, cl2chan );
824 0c471b84 2002-11-30 alex }
825 0c471b84 2002-11-30 alex if( str[strlen( str ) - 1] != ':')
826 0c471b84 2002-11-30 alex {
827 0c471b84 2002-11-30 alex /* Es sind noch Daten da, die gesendet werden muessen */
828 0c471b84 2002-11-30 alex if( ! IRC_WriteStrClient( Client, "%s", str )) return DISCONNECTED;
829 0c471b84 2002-11-30 alex }
830 0c471b84 2002-11-30 alex
831 0c471b84 2002-11-30 alex return CONNECTED;
832 0c471b84 2002-11-30 alex } /* IRC_Send_NAMES */
833 0c471b84 2002-11-30 alex
834 0c471b84 2002-11-30 alex
835 0c471b84 2002-11-30 alex GLOBAL BOOLEAN
836 0c471b84 2002-11-30 alex IRC_Send_WHO( CLIENT *Client, CHANNEL *Chan, BOOLEAN OnlyOps )
837 0c471b84 2002-11-30 alex {
838 0c471b84 2002-11-30 alex BOOLEAN is_visible, is_member;
839 0c471b84 2002-11-30 alex CL2CHAN *cl2chan;
840 0c471b84 2002-11-30 alex CHAR flags[8];
841 0c471b84 2002-11-30 alex CLIENT *c;
842 0c471b84 2002-11-30 alex
843 0c471b84 2002-11-30 alex assert( Client != NULL );
844 0c471b84 2002-11-30 alex assert( Chan != NULL );
845 0c471b84 2002-11-30 alex
846 0c471b84 2002-11-30 alex if( Channel_IsMemberOf( Chan, Client )) is_member = TRUE;
847 0c471b84 2002-11-30 alex else is_member = FALSE;
848 0c471b84 2002-11-30 alex
849 0c471b84 2002-11-30 alex /* Alle Mitglieder suchen */
850 0c471b84 2002-11-30 alex cl2chan = Channel_FirstMember( Chan );
851 0c471b84 2002-11-30 alex while( cl2chan )
852 0c471b84 2002-11-30 alex {
853 0c471b84 2002-11-30 alex c = Channel_GetClient( cl2chan );
854 0c471b84 2002-11-30 alex
855 0c471b84 2002-11-30 alex if( strchr( Client_Modes( c ), 'i' )) is_visible = FALSE;
856 0c471b84 2002-11-30 alex else is_visible = TRUE;
857 0c471b84 2002-11-30 alex
858 0c471b84 2002-11-30 alex if( is_member || is_visible )
859 0c471b84 2002-11-30 alex {
860 0c471b84 2002-11-30 alex /* Flags zusammenbasteln */
861 0c471b84 2002-11-30 alex strcpy( flags, "H" );
862 6626395c 2002-12-26 alex if( strchr( Client_Modes( c ), 'o' )) strlcat( flags, "*", sizeof( flags ));
863 6626395c 2002-12-26 alex if( strchr( Channel_UserModes( Chan, c ), 'o' )) strlcat( flags, "@", sizeof( flags ));
864 6626395c 2002-12-26 alex else if( strchr( Channel_UserModes( Chan, c ), 'v' )) strlcat( flags, "+", sizeof( flags ));
865 0c471b84 2002-11-30 alex
866 0c471b84 2002-11-30 alex /* ausgeben */
867 0c471b84 2002-11-30 alex if(( ! OnlyOps ) || ( strchr( Client_Modes( c ), 'o' )))
868 0c471b84 2002-11-30 alex {
869 0c471b84 2002-11-30 alex if( ! IRC_WriteStrClient( Client, RPL_WHOREPLY_MSG, Client_ID( Client ), Channel_Name( Chan ), Client_User( c ), Client_Hostname( c ), Client_ID( Client_Introducer( c )), Client_ID( c ), flags, Client_Hops( c ), Client_Info( c ))) return DISCONNECTED;
870 0c471b84 2002-11-30 alex }
871 0c471b84 2002-11-30 alex }
872 0c471b84 2002-11-30 alex
873 0c471b84 2002-11-30 alex /* naechstes Mitglied suchen */
874 0c471b84 2002-11-30 alex cl2chan = Channel_NextMember( Chan, cl2chan );
875 0c471b84 2002-11-30 alex }
876 0c471b84 2002-11-30 alex return CONNECTED;
877 0c471b84 2002-11-30 alex } /* IRC_Send_WHO */
878 0c471b84 2002-11-30 alex
879 0c471b84 2002-11-30 alex
880 0c471b84 2002-11-30 alex /* -eof- */