Made on IRCNow

Blob

Date:: Sat Sep 7 17:57:31 2002 UTC
Message:: - IRC+-Protokoll ist nun abschaltbar.
Actions:: History | Blame | Raw File
1 /*
2  * ngIRCd -- The Next Generation IRC Daemon
3  * Copyright (c)2001,2002 by Alexander Barton (alex@barton.de)
4  *
5  * Dieses Programm ist freie Software. Sie koennen es unter den Bedingungen
6  * der GNU General Public License (GPL), wie von der Free Software Foundation
7  * herausgegeben, weitergeben und/oder modifizieren, entweder unter Version 2
8  * der Lizenz oder (wenn Sie es wuenschen) jeder spaeteren Version.
9  * Naehere Informationen entnehmen Sie bitter der Datei COPYING. Eine Liste
10  * der an ngIRCd beteiligten Autoren finden Sie in der Datei AUTHORS.
11  *
12  * $Id: irc-server.c,v 1.17 2002/09/07 17:57:31 alex Exp $
13  *
14  * irc-server.c: IRC-Befehle fuer Server-Links
15  */
16 
17 
18 #include "portab.h"
19 
20 #include "imp.h"
21 #include <assert.h>
22 #include <stdio.h>
23 #include <stdlib.h>
24 #include <string.h>
25 
26 #include "resolve.h"
27 #include "conf.h"
28 #include "conn.h"
29 #include "client.h"
30 #include "channel.h"
31 #include "irc-write.h"
32 #include "log.h"
33 #include "messages.h"
34 #include "parse.h"
35 #include "ngircd.h"
36 
37 #include "exp.h"
38 #include "irc-server.h"
39 
40 
41 GLOBAL BOOLEAN
42 IRC_SERVER( CLIENT *Client, REQUEST *Req )
43 {
44 	CHAR str[LINE_LEN], *ptr;
45 	CLIENT *from, *c, *cl;
46 	CL2CHAN *cl2chan;
47 	INT max_hops, i;
48 	CHANNEL *chan;
49 	BOOLEAN ok;
50 	
51 	assert( Client != NULL );
52 	assert( Req != NULL );
53 
54 	/* Fehler liefern, wenn kein lokaler Client */
55 	if( Client_Conn( Client ) <= NONE ) return IRC_WriteStrClient( Client, ERR_UNKNOWNCOMMAND_MSG, Client_ID( Client ), Req->command );
56 
57 	if( Client_Type( Client ) == CLIENT_GOTPASSSERVER )
58 	{
59 		/* Verbindung soll als Server-Server-Verbindung registriert werden */
60 		Log( LOG_DEBUG, "Connection %d: got SERVER command (new server link) ...", Client_Conn( Client ));
61 
62 		/* Falsche Anzahl Parameter? */
63 		if(( Req->argc != 2 ) && ( Req->argc != 3 )) return IRC_WriteStrClient( Client, ERR_NEEDMOREPARAMS_MSG, Client_ID( Client ), Req->command );
64 
65 		/* Ist dieser Server bei uns konfiguriert? */
66 		for( i = 0; i < Conf_Server_Count; i++ ) if( strcasecmp( Req->argv[0], Conf_Server[i].name ) == 0 ) break;
67 		if( i >= Conf_Server_Count )
68 		{
69 			/* Server ist nicht konfiguriert! */
70 			Log( LOG_ERR, "Connection %d: Server \"%s\" not configured here!", Client_Conn( Client ), Req->argv[0] );
71 			Conn_Close( Client_Conn( Client ), NULL, "Server not configured here", TRUE );
72 			return DISCONNECTED;
73 		}
74 		if( strcmp( Client_Password( Client ), Conf_Server[i].pwd ) != 0 )
75 		{
76 			/* Falsches Passwort */
77 			Log( LOG_ERR, "Connection %d: Bad password for server \"%s\"!", Client_Conn( Client ), Req->argv[0] );
78 			Conn_Close( Client_Conn( Client ), NULL, "Bad password", TRUE );
79 			return DISCONNECTED;
80 		}
81 		
82 		/* Ist ein Server mit dieser ID bereits registriert? */
83 		if( ! Client_CheckID( Client, Req->argv[0] )) return DISCONNECTED;
84 
85 		/* Server-Strukturen fuellen ;-) */
86 		Client_SetID( Client, Req->argv[0] );
87 		Client_SetHops( Client, 1 );
88 		Client_SetInfo( Client, Req->argv[Req->argc - 1] );
89 		
90 		/* Meldet sich der Server bei uns an (d.h., bauen nicht wir
91 		 * selber die Verbindung zu einem anderen Server auf)? */
92 		if( Client_Token( Client ) != TOKEN_OUTBOUND )
93 		{
94 			/* Eingehende Verbindung: Unseren SERVER- und PASS-Befehl senden */
95 			ok = TRUE;
96 			if( ! IRC_WriteStrClient( Client, "PASS %s %s", Conf_Server[i].pwd, NGIRCd_ProtoID )) ok = FALSE;
97 			else ok = IRC_WriteStrClient( Client, "SERVER %s 1 :%s", Conf_ServerName, Conf_ServerInfo );
98 			if( ! ok )
99 			{
100 				Conn_Close( Client_Conn( Client ), "Unexpected server behavior!", NULL, FALSE );
101 				return DISCONNECTED;
102 			}
103 			Client_SetIntroducer( Client, Client );
104 			Client_SetToken( Client, 1 );
105 		}
106 		else
107 		{
108 			/* Ausgehende verbindung, SERVER und PASS wurden von uns bereits
109 			 * an die Gegenseite uerbermittelt */
110 			Client_SetToken( Client, atoi( Req->argv[1] ));
111 		}
112 
113 		Log( LOG_NOTICE|LOG_snotice, "Server \"%s\" registered (connection %d, 1 hop - direct link).", Client_ID( Client ), Client_Conn( Client ));
114 
115 		Client_SetType( Client, CLIENT_SERVER );
116 
117 		/* maximalen Hop Count ermitteln */
118 		max_hops = 0;
119 		c = Client_First( );
120 		while( c )
121 		{
122 			if( Client_Hops( c ) > max_hops ) max_hops = Client_Hops( c );
123 			c = Client_Next( c );
124 		}
125 		
126 		/* Alle bisherigen Server dem neuen Server bekannt machen,
127 		 * die bisherigen Server ueber den neuen informierenn */
128 		for( i = 0; i < ( max_hops + 1 ); i++ )
129 		{
130 			c = Client_First( );
131 			while( c )
132 			{
133 				if(( Client_Type( c ) == CLIENT_SERVER ) && ( c != Client ) && ( c != Client_ThisServer( )) && ( Client_Hops( c ) == i ))
134 				{
135 					if( Client_Conn( c ) > NONE )
136 					{
137 						/* Dem gefundenen Server gleich den neuen
138 						 * Server bekannt machen */
139 						if( ! IRC_WriteStrClient( c, "SERVER %s %d %d :%s", Client_ID( Client ), Client_Hops( Client ) + 1, Client_MyToken( Client ), Client_Info( Client ))) return DISCONNECTED;
140 					}
141 					
142 					/* Den neuen Server ueber den alten informieren */
143 					if( ! IRC_WriteStrClientPrefix( Client, Client_Hops( c ) == 1 ? Client_ThisServer( ) : Client_Introducer( c ), "SERVER %s %d %d :%s", Client_ID( c ), Client_Hops( c ) + 1, Client_MyToken( c ), Client_Info( c ))) return DISCONNECTED;
144 				}
145 				c = Client_Next( c );
146 			}
147 		}
148 
149 		/* alle User dem neuen Server bekannt machen */
150 		c = Client_First( );
151 		while( c )
152 		{
153 			if( Client_Type( c ) == CLIENT_USER )
154 			{
155 				/* User an neuen Server melden */
156 				if( ! IRC_WriteStrClient( Client, "NICK %s %d %s %s %d +%s :%s", Client_ID( c ), Client_Hops( c ) + 1, Client_User( c ), Client_Hostname( c ), Client_MyToken( Client_Introducer( c )), Client_Modes( c ), Client_Info( c ))) return DISCONNECTED;
157 			}
158 			c = Client_Next( c );
159 		}
160 
161 		/* Channels dem neuen Server bekannt machen */
162 		chan = Channel_First( );
163 		while( chan )
164 		{
165 #ifdef IRCPLUS
166 			/* Wenn unterstuetzt, CHANINFO senden */
167 			if( strchr( Client_Flags( Client ), 'C' ))
168 			{
169 				/* CHANINFO senden */
170 				if( ! IRC_WriteStrClient( Client, "CHANINFO %s +%s :%s", Channel_Name( chan ), Channel_Modes( chan ), Channel_Topic( chan ))) return DISCONNECTED;
171 			}
172 #endif
173 
174 			/* alle Member suchen */
175 			cl2chan = Channel_FirstMember( chan );
176 			sprintf( str, "NJOIN %s :", Channel_Name( chan ));
177 			while( cl2chan )
178 			{
179 				cl = Channel_GetClient( cl2chan );
180 				assert( cl != NULL );
181 
182 				/* Nick, ggf. mit Modes, anhaengen */
183 				if( str[strlen( str ) - 1] != ':' ) strcat( str, "," );
184 				if( strchr( Channel_UserModes( chan, cl ), 'v' )) strcat( str, "+" );
185 				if( strchr( Channel_UserModes( chan, cl ), 'o' )) strcat( str, "@" );
186 				strcat( str, Client_ID( cl ));
187 
188 				if( strlen( str ) > ( LINE_LEN - CLIENT_NICK_LEN - 8 ))
189 				{
190 					/* Zeile senden */
191 					if( ! IRC_WriteStrClient( Client, str )) return DISCONNECTED;
192 					sprintf( str, "NJOIN %s :", Channel_Name( chan ));
193 				}
194 				
195 				cl2chan = Channel_NextMember( chan, cl2chan );
196 			}
197 
198 			/* noch Daten da? */
199 			if( str[strlen( str ) - 1] != ':')
200 			{
201 				/* Ja; Also senden ... */
202 				if( ! IRC_WriteStrClient( Client, str )) return DISCONNECTED;
203 			}
204 
205 			/* naechsten Channel suchen */
206 			chan = Channel_Next( chan );
207 		}
208 		
209 		return CONNECTED;
210 	}
211 	else if( Client_Type( Client ) == CLIENT_SERVER )
212 	{
213 		/* Neuer Server wird im Netz angekuendigt */
214 
215 		/* Falsche Anzahl Parameter? */
216 		if( Req->argc != 4 ) return IRC_WriteStrClient( Client, ERR_NEEDMOREPARAMS_MSG, Client_ID( Client ), Req->command );
217 
218 		/* Ist ein Server mit dieser ID bereits registriert? */
219 		if( ! Client_CheckID( Client, Req->argv[0] )) return DISCONNECTED;
220 
221 		/* Ueberfluessige Hostnamen aus Info-Text entfernen */
222 		ptr = strchr( Req->argv[3] + 2, '[' );
223 		if( ! ptr ) ptr = Req->argv[3];
224 
225 		from = Client_Search( Req->prefix );
226 		if( ! from )
227 		{
228 			/* Hm, Server, der diesen einfuehrt, ist nicht bekannt!? */
229 			Log( LOG_ALERT, "Unknown ID in prefix of SERVER: \"%s\"! (on connection %d)", Req->prefix, Client_Conn( Client ));
230 			Conn_Close( Client_Conn( Client ), NULL, "Unknown ID in prefix of SERVER", TRUE );
231 			return DISCONNECTED;
232 		}
233 
234 		/* Neue Client-Struktur anlegen */
235 		c = Client_NewRemoteServer( Client, Req->argv[0], from, atoi( Req->argv[1] ), atoi( Req->argv[2] ), ptr, TRUE );
236 		if( ! c )
237 		{
238 			/* Neue Client-Struktur konnte nicht angelegt werden */
239 			Log( LOG_ALERT, "Can't create client structure for server! (on connection %d)", Client_Conn( Client ));
240 			Conn_Close( Client_Conn( Client ), NULL, "Can't allocate client structure for remote server", TRUE );
241 			return DISCONNECTED;
242 		}
243 
244 		/* Log-Meldung zusammenbauen und ausgeben */
245 		if(( Client_Hops( c ) > 1 ) && ( Req->prefix[0] )) sprintf( str, "connected to %s, ", Client_ID( from ));
246 		else strcpy( str, "" );
247 		Log( LOG_NOTICE|LOG_snotice, "Server \"%s\" registered (via %s, %s%d hop%s).", Client_ID( c ), Client_ID( Client ), str, Client_Hops( c ), Client_Hops( c ) > 1 ? "s": "" );
248 
249 		/* Andere Server informieren */
250 		IRC_WriteStrServersPrefix( Client, from, "SERVER %s %d %d :%s", Client_ID( c ), Client_Hops( c ) + 1, Client_MyToken( c ), Client_Info( c ));
251 
252 		return CONNECTED;
253 	}
254 	else return IRC_WriteStrClient( Client, ERR_NEEDMOREPARAMS_MSG, Client_ID( Client ), Req->command );
255 } /* IRC_SERVER */
256 
257 
258 GLOBAL BOOLEAN
259 IRC_NJOIN( CLIENT *Client, REQUEST *Req )
260 {
261 	CHAR str[COMMAND_LEN], *channame, *ptr, modes[8];
262 	BOOLEAN is_op, is_voiced;
263 	CHANNEL *chan;
264 	CLIENT *c;
265 	
266 	assert( Client != NULL );
267 	assert( Req != NULL );
268 
269 	if( Client_Type( Client ) != CLIENT_SERVER ) return IRC_WriteStrClient( Client, ERR_NOTREGISTEREDSERVER_MSG, Client_ID( Client ));
270 
271 	/* Falsche Anzahl Parameter? */
272 	if( Req->argc != 2 ) return IRC_WriteStrClient( Client, ERR_NEEDMOREPARAMS_MSG, Client_ID( Client ), Req->command );
273 
274 	strncpy( str, Req->argv[1], COMMAND_LEN - 1 );
275 	str[COMMAND_LEN - 1] = '\0';
276 
277 	channame = Req->argv[0];
278 	ptr = strtok( str, "," );
279 	while( ptr )
280 	{
281 		is_op = is_voiced = FALSE;
282 		
283 		/* Prefixe abschneiden */
284 		while(( *ptr == '@' ) || ( *ptr == '+' ))
285 		{
286 			if( *ptr == '@' ) is_op = TRUE;
287 			if( *ptr == '+' ) is_voiced = TRUE;
288 			ptr++;
289 		}
290 
291 		c = Client_Search( ptr );
292 		if( c )
293 		{
294 			Channel_Join( c, channame );
295 			chan = Channel_Search( channame );
296 			assert( chan != NULL );
297 			
298 			if( is_op ) Channel_UserModeAdd( chan, c, 'o' );
299 			if( is_voiced ) Channel_UserModeAdd( chan, c, 'v' );
300 
301 			/* im Channel bekannt machen */
302 			IRC_WriteStrChannelPrefix( Client, chan, c, FALSE, "JOIN :%s", channame );
303 
304 			/* Channel-User-Modes setzen */
305 			strcpy( modes, Channel_UserModes( chan, c ));
306 			if( modes[0] )
307 			{
308 				/* Modes im Channel bekannt machen */
309 				IRC_WriteStrChannelPrefix( Client, chan, Client, FALSE, "MODE %s +%s %s", channame, modes, Client_ID( c ));
310 			}
311 		}
312 		else Log( LOG_ERR, "Got NJOIN for unknown nick \"%s\" for channel \"%s\"!", ptr, channame );
313 		
314 		/* naechsten Nick suchen */
315 		ptr = strtok( NULL, "," );
316 	}
317 
318 	/* an andere Server weiterleiten */
319 	IRC_WriteStrServersPrefix( Client, Client_ThisServer( ), "NJOIN %s :%s", Req->argv[0], Req->argv[1] );
320 
321 	return CONNECTED;
322 } /* IRC_NJOIN */
323 
324 
325 GLOBAL BOOLEAN
326 IRC_SQUIT( CLIENT *Client, REQUEST *Req )
327 {
328 	CLIENT *target;
329 	CHAR msg[LINE_LEN + 64];
330 
331 	assert( Client != NULL );
332 	assert( Req != NULL );
333 
334 	/* SQUIT ist nur fuer Server erlaubt */
335 	if( Client_Type( Client ) != CLIENT_SERVER ) return IRC_WriteStrClient( Client, ERR_NOTREGISTERED_MSG, Client_ID( Client ));
336 
337 	/* Falsche Anzahl Parameter? */
338 	if( Req->argc != 2 ) return IRC_WriteStrClient( Client, ERR_NEEDMOREPARAMS_MSG, Client_ID( Client ), Req->command );
339 
340 	Log( LOG_DEBUG, "Got SQUIT from %s for \"%s\": \"%s\" ...", Client_ID( Client ), Req->argv[0], Req->argv[1] );
341 
342 	/* SQUIT an alle Server weiterleiten */
343 	IRC_WriteStrServers( Client, "SQUIT %s :%s", Req->argv[0], Req->argv[1] );
344 
345 	target = Client_Search( Req->argv[0] );
346 	if( ! target )
347 	{
348 		/* Den Server kennen wir nicht (mehr), also nichts zu tun. */
349 		Log( LOG_WARNING, "Got SQUIT from %s for unknown server \"%s\"!?", Client_ID( Client ), Req->argv[0] );
350 		return CONNECTED;
351 	}
352 
353 	if( Req->argv[1][0] )
354 	{
355 		if( strlen( Req->argv[1] ) > LINE_LEN ) Req->argv[1][LINE_LEN] = '\0';
356 		sprintf( msg, "%s (SQUIT from %s).", Req->argv[1], Client_ID( Client ));
357 	}
358 	else sprintf( msg, "Got SQUIT from %s.", Client_ID( Client ));
359 
360 	if( Client_Conn( target ) > NONE )
361 	{
362 		/* dieser Server hat die Connection */
363 		if( Req->argv[1][0] ) Conn_Close( Client_Conn( target ), msg, Req->argv[1], TRUE );
364 		else Conn_Close( Client_Conn( target ), msg, NULL, TRUE );
365 		return DISCONNECTED;
366 	}
367 	else
368 	{
369 		/* Verbindung hielt anderer Server */
370 		Client_Destroy( target, msg, Req->argv[1], FALSE );
371 		return CONNECTED;
372 	}
373 } /* IRC_SQUIT */
374 
375 
376 /* -eof- */