123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417418419420421422423424425426427428429430431432433434435436437438439440441442443444445446447448449450451452453454455456457458459460461462463464465466467468469470471472473474475476477478479480481482483484485486487488489 |
- /*
- * ngIRCd -- The Next Generation IRC Daemon
- * Copyright (c)2001-2008 Alexander Barton (alex@barton.de)
- *
- * 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.
- * Please read the file COPYING, README and AUTHORS for more information.
- *
- * Sending IRC commands over the network
- */
- #include "portab.h"
- #include "imp.h"
- #include <assert.h>
- #ifdef PROTOTYPES
- # include <stdarg.h>
- #else
- # include <varargs.h>
- #endif
- #include <stdio.h>
- #include <string.h>
- #include "defines.h"
- #include "conn-func.h"
- #include "client.h"
- #include "channel.h"
- #include "exp.h"
- #include "irc-write.h"
- #define SEND_TO_USER 1
- #define SEND_TO_SERVER 2
- static char *Get_Prefix PARAMS((CLIENT *Target, CLIENT *Client));
- static void cb_writeStrServersPrefixFlag PARAMS((CLIENT *Client,
- CLIENT *Prefix, void *Buffer));
- #ifdef PROTOTYPES
- GLOBAL bool
- IRC_WriteStrClient( CLIENT *Client, char *Format, ... )
- #else
- GLOBAL bool
- IRC_WriteStrClient( Client, Format, va_alist )
- CLIENT *Client;
- char *Format;
- va_dcl
- #endif
- {
- char buffer[1000];
- bool ok = CONNECTED;
- va_list ap;
- assert( Client != NULL );
- assert( Format != NULL );
- #ifdef PROTOTYPES
- va_start( ap, Format );
- #else
- va_start( ap );
- #endif
- vsnprintf( buffer, 1000, Format, ap );
- va_end( ap );
- /* to the client itself */
- ok = IRC_WriteStrClientPrefix( Client, Client_ThisServer( ), "%s", buffer );
- return ok;
- } /* IRC_WriteStrClient */
- #ifdef PROTOTYPES
- GLOBAL bool
- IRC_WriteStrClientPrefix( CLIENT *Client, CLIENT *Prefix, char *Format, ... )
- #else
- GLOBAL bool
- IRC_WriteStrClientPrefix( Client, Prefix, Format, va_alist )
- CLIENT *Client;
- CLIENT *Prefix;
- char *Format;
- va_dcl
- #endif
- {
- /* send text to local and remote clients */
- char buffer[1000];
- va_list ap;
- assert( Client != NULL );
- assert( Format != NULL );
- assert( Prefix != NULL );
- #ifdef PROTOTYPES
- va_start( ap, Format );
- #else
- va_start( ap );
- #endif
- vsnprintf( buffer, 1000, Format, ap );
- va_end( ap );
- return Conn_WriteStr( Client_Conn( Client_NextHop( Client )), ":%s %s", Get_Prefix( Client_NextHop( Client ), Prefix ), buffer );
- } /* IRC_WriteStrClientPrefix */
- #ifdef PROTOTYPES
- GLOBAL bool
- IRC_WriteStrChannel( CLIENT *Client, CHANNEL *Chan, bool Remote, char *Format, ... )
- #else
- GLOBAL bool
- IRC_WriteStrChannel( Client, Chan, Remote, Format, va_alist )
- CLIENT *Client;
- CHANNEL *Chan;
- bool Remote;
- char *Format;
- va_dcl
- #endif
- {
- char buffer[1000];
- va_list ap;
- assert( Client != NULL );
- assert( Format != NULL );
- #ifdef PROTOTYPES
- va_start( ap, Format );
- #else
- va_start( ap );
- #endif
- vsnprintf( buffer, 1000, Format, ap );
- va_end( ap );
- return IRC_WriteStrChannelPrefix( Client, Chan, Client_ThisServer( ), Remote, "%s", buffer );
- } /* IRC_WriteStrChannel */
- /**
- * send message to all clients in the same channel, but only send message
- * once per remote server.
- */
- #ifdef PROTOTYPES
- GLOBAL bool
- IRC_WriteStrChannelPrefix( CLIENT *Client, CHANNEL *Chan, CLIENT *Prefix, bool Remote, char *Format, ... )
- #else
- GLOBAL bool
- IRC_WriteStrChannelPrefix( Client, Chan, Prefix, Remote, Format, va_alist )
- CLIENT *Client;
- CHANNEL *Chan;
- CLIENT *Prefix;
- bool Remote;
- char *Format;
- va_dcl
- #endif
- {
- bool ok = CONNECTED;
- char buffer[1000];
- CL2CHAN *cl2chan;
- CONN_ID conn;
- CLIENT *c;
- va_list ap;
- assert( Client != NULL );
- assert( Chan != NULL );
- assert( Prefix != NULL );
- assert( Format != NULL );
- #ifdef PROTOTYPES
- va_start( ap, Format );
- #else
- va_start( ap );
- #endif
- vsnprintf( buffer, 1000, Format, ap );
- va_end( ap );
- Conn_ClearFlags( );
- cl2chan = Channel_FirstMember( Chan );
- while( cl2chan )
- {
- c = Channel_GetClient( cl2chan );
- if( ! Remote )
- {
- if( Client_Conn( c ) <= NONE ) c = NULL;
- else if( Client_Type( c ) == CLIENT_SERVER ) c = NULL;
- }
- if( c ) c = Client_NextHop( c );
- if( c && ( c != Client ))
- {
- /* Ok, another Client */
- conn = Client_Conn( c );
- if( Client_Type( c ) == CLIENT_SERVER ) Conn_SetFlag( conn, SEND_TO_SERVER );
- else Conn_SetFlag( conn, SEND_TO_USER );
- }
- cl2chan = Channel_NextMember( Chan, cl2chan );
- }
- conn = Conn_First( );
- while( conn != NONE )
- {
- /* do we need to send data via this connection? */
- if( Conn_Flag( conn ) == SEND_TO_SERVER) ok = Conn_WriteStr( conn, ":%s %s", Client_ID( Prefix ), buffer );
- else if( Conn_Flag( conn ) == SEND_TO_USER ) ok = Conn_WriteStr( conn, ":%s %s", Client_Mask( Prefix ), buffer );
- if( ! ok ) break;
- conn = Conn_Next( conn );
- }
- return ok;
- } /* IRC_WriteStrChannelPrefix */
- #ifdef PROTOTYPES
- GLOBAL void
- IRC_WriteStrServers( CLIENT *ExceptOf, char *Format, ... )
- #else
- GLOBAL void
- IRC_WriteStrServers( ExceptOf, Format, va_alist )
- CLIENT *ExceptOf;
- char *Format;
- va_dcl
- #endif
- {
- char buffer[1000];
- va_list ap;
- assert( Format != NULL );
- #ifdef PROTOTYPES
- va_start( ap, Format );
- #else
- va_start( ap );
- #endif
- vsnprintf( buffer, 1000, Format, ap );
- va_end( ap );
- IRC_WriteStrServersPrefix( ExceptOf, Client_ThisServer( ), "%s", buffer );
- } /* IRC_WriteStrServers */
- #ifdef PROTOTYPES
- GLOBAL void
- IRC_WriteStrServersPrefix( CLIENT *ExceptOf, CLIENT *Prefix, char *Format, ... )
- #else
- GLOBAL void
- IRC_WriteStrServersPrefix( ExceptOf, Prefix, Format, va_alist )
- CLIENT *ExceptOf;
- CLIENT *Prefix;
- char *Format;
- va_dcl
- #endif
- {
- char buffer[1000];
- va_list ap;
- assert( Format != NULL );
- assert( Prefix != NULL );
- #ifdef PROTOTYPES
- va_start( ap, Format );
- #else
- va_start( ap );
- #endif
- vsnprintf( buffer, 1000, Format, ap );
- va_end( ap );
- IRC_WriteStrServersPrefixFlag( ExceptOf, Prefix, '\0', "%s", buffer );
- } /* IRC_WriteStrServersPrefix */
- #ifdef PROTOTYPES
- GLOBAL void
- IRC_WriteStrServersPrefixFlag( CLIENT *ExceptOf, CLIENT *Prefix, char Flag, char *Format, ... )
- #else
- GLOBAL void
- IRC_WriteStrServersPrefixFlag( ExceptOf, Prefix, Flag, Format, va_alist )
- CLIENT *ExceptOf;
- CLIENT *Prefix;
- char Flag;
- char *Format;
- va_dcl
- #endif
- {
- char buffer[1000];
- va_list ap;
- assert( Format != NULL );
- assert( Prefix != NULL );
- #ifdef PROTOTYPES
- va_start( ap, Format );
- #else
- va_start( ap );
- #endif
- vsnprintf( buffer, 1000, Format, ap );
- va_end( ap );
- IRC_WriteStrServersPrefixFlag_CB(ExceptOf, Prefix, Flag,
- cb_writeStrServersPrefixFlag, buffer);
- } /* IRC_WriteStrServersPrefixFlag */
- GLOBAL void
- IRC_WriteStrServersPrefixFlag_CB(CLIENT *ExceptOf, CLIENT *Prefix, char Flag,
- void (*callback)(CLIENT *, CLIENT *, void *), void *cb_data)
- {
- CLIENT *c;
- c = Client_First();
- while(c) {
- if (Client_Type(c) == CLIENT_SERVER && Client_Conn(c) > NONE &&
- c != Client_ThisServer() && c != ExceptOf) {
- /* Found a target server, do the flags match? */
- if (Flag == '\0' || strchr(Client_Flags(c), Flag))
- callback(c, Prefix, cb_data);
- }
- c = Client_Next(c);
- }
- } /* IRC_WriteStrServersPrefixFlag */
- /**
- * send message to all clients that are in the same channels as the client sending this message.
- * only send message once per reote server.
- */
- #ifdef PROTOTYPES
- GLOBAL bool
- IRC_WriteStrRelatedPrefix( CLIENT *Client, CLIENT *Prefix, bool Remote, char *Format, ... )
- #else
- GLOBAL bool
- IRC_WriteStrRelatedPrefix( Client, Prefix, Remote, Format, va_alist )
- CLIENT *Client;
- CLIENT *Prefix;
- bool Remote;
- char *Format;
- va_dcl
- #endif
- {
- bool ok = CONNECTED;
- CL2CHAN *chan_cl2chan, *cl2chan;
- char buffer[1000];
- CHANNEL *chan;
- CONN_ID conn;
- va_list ap;
- CLIENT *c;
- assert( Client != NULL );
- assert( Prefix != NULL );
- assert( Format != NULL );
- #ifdef PROTOTYPES
- va_start( ap, Format );
- #else
- va_start( ap );
- #endif
- vsnprintf( buffer, 1000, Format, ap );
- va_end( ap );
- Conn_ClearFlags( );
- chan_cl2chan = Channel_FirstChannelOf( Client );
- while( chan_cl2chan )
- {
- chan = Channel_GetChannel( chan_cl2chan );
- cl2chan = Channel_FirstMember( chan );
- while( cl2chan )
- {
- c = Channel_GetClient( cl2chan );
- if( ! Remote )
- {
- if( Client_Conn( c ) <= NONE ) c = NULL;
- else if( Client_Type( c ) == CLIENT_SERVER ) c = NULL;
- }
- if( c ) c = Client_NextHop( c );
- if( c && ( c != Client ))
- {
- conn = Client_Conn( c );
- if( Client_Type( c ) == CLIENT_SERVER ) Conn_SetFlag( conn, SEND_TO_SERVER );
- else Conn_SetFlag( conn, SEND_TO_USER );
- }
- cl2chan = Channel_NextMember( chan, cl2chan );
- }
- chan_cl2chan = Channel_NextChannelOf( Client, chan_cl2chan );
- }
- conn = Conn_First( );
- while( conn != NONE )
- {
- /* send data via this connection? */
- if( Conn_Flag( conn ) == SEND_TO_SERVER ) ok = Conn_WriteStr( conn, ":%s %s", Client_ID( Prefix ), buffer );
- else if( Conn_Flag( conn ) == SEND_TO_USER ) ok = Conn_WriteStr( conn, ":%s %s", Client_Mask( Prefix ), buffer );
- if( ! ok ) break;
- conn = Conn_Next( conn );
- }
- return ok;
- } /* IRC_WriteStrRelatedPrefix */
- /**
- * Send WALLOPS message.
- */
- #ifdef PROTOTYPES
- GLOBAL void
- IRC_SendWallops(CLIENT *Client, CLIENT *From, const char *Format, ...)
- #else
- GLOBAL void
- IRC_SendWallops(Client, From, Format, va_alist )
- CLIENT *Client;
- CLIENT *From;
- char *Format;
- va_dcl
- #endif
- {
- va_list ap;
- char msg[1000];
- CLIENT *to;
- #ifdef PROTOTYPES
- va_start(ap, Format);
- #else
- va_start(ap);
- #endif
- vsnprintf(msg, 1000, Format, ap);
- va_end(ap);
- for (to=Client_First(); to != NULL; to=Client_Next(to)) {
- if (Client_Conn(to) == NONE) /* no local connection */
- continue;
- switch (Client_Type(to)) {
- case CLIENT_USER:
- if (Client_HasMode(to, 'w'))
- IRC_WriteStrClientPrefix(to, From,
- "WALLOPS :%s", msg);
- break;
- case CLIENT_SERVER:
- if (to != Client)
- IRC_WriteStrClientPrefix(to, From,
- "WALLOPS :%s", msg);
- break;
- }
- }
- } /* IRC_SendWallops */
- GLOBAL void
- IRC_SetPenalty( CLIENT *Client, time_t Seconds )
- {
- CONN_ID c;
- assert( Client != NULL );
- assert( Seconds > 0 );
- if( Client_Type( Client ) == CLIENT_SERVER ) return;
- c = Client_Conn( Client );
- if (c > NONE)
- Conn_SetPenalty(c, Seconds);
- } /* IRC_SetPenalty */
- static char *
- Get_Prefix( CLIENT *Target, CLIENT *Client )
- {
- assert( Target != NULL );
- assert( Client != NULL );
- if( Client_Type( Target ) == CLIENT_SERVER ) return Client_ID( Client );
- else return Client_Mask( Client );
- } /* Get_Prefix */
- static void
- cb_writeStrServersPrefixFlag(CLIENT *Client, CLIENT *Prefix, void *Buffer)
- {
- IRC_WriteStrClientPrefix(Client, Prefix, "%s", Buffer);
- } /* cb_writeStrServersPrefixFlag */
- /* -eof- */
|