source: irc_send.c @ ad404ab

Last change on this file since ad404ab was eb50495, checked in by Wilmer van der Gaast <wilmer@…>, at 2010-05-04T08:45:10Z

Show offline/away status better in /WHO and /WHOIS.
  • Property mode set to 100644
File size: 10.6 KB
Line 
1  /********************************************************************\
2  * BitlBee -- An IRC to other IM-networks gateway                     *
3  *                                                                    *
4  * Copyright 2002-2010 Wilmer van der Gaast and others                *
5  \********************************************************************/
6
7/* The IRC-based UI - Sending responses to commands/etc.                */
8
9/*
10  This program is free software; you can redistribute it and/or modify
11  it under the terms of the GNU General Public License as published by
12  the Free Software Foundation; either version 2 of the License, or
13  (at your option) any later version.
14
15  This program is distributed in the hope that it will be useful,
16  but WITHOUT ANY WARRANTY; without even the implied warranty of
17  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
18  GNU General Public License for more details.
19
20  You should have received a copy of the GNU General Public License with
21  the Debian GNU/Linux distribution in /usr/share/common-licenses/GPL;
22  if not, write to the Free Software Foundation, Inc., 59 Temple Place,
23  Suite 330, Boston, MA  02111-1307  USA
24*/
25
26#include "bitlbee.h"
27
28void irc_send_num( irc_t *irc, int code, char *format, ... )
29{
30        char text[IRC_MAX_LINE];
31        va_list params;
32       
33        va_start( params, format );
34        g_vsnprintf( text, IRC_MAX_LINE, format, params );
35        va_end( params );
36       
37        irc_write( irc, ":%s %03d %s %s", irc->root->host, code, irc->user->nick ? : "*", text );
38}
39
40void irc_send_login( irc_t *irc )
41{
42        irc_send_num( irc,   1, ":Welcome to the BitlBee gateway, %s", irc->user->nick );
43        irc_send_num( irc,   2, ":Host %s is running BitlBee " BITLBEE_VERSION " " ARCH "/" CPU ".", irc->root->host );
44        irc_send_num( irc,   3, ":%s", IRCD_INFO );
45        irc_send_num( irc,   4, "%s %s %s %s", irc->root->host, BITLBEE_VERSION, UMODES UMODES_PRIV, CMODES );
46        irc_send_num( irc,   5, "PREFIX=(ov)@+ CHANTYPES=%s CHANMODES=,,,%s NICKLEN=%d NETWORK=BitlBee "
47                                "CASEMAPPING=rfc1459 MAXTARGETS=1 WATCH=128 :are supported by this server",
48                                CTYPES, CMODES, MAX_NICK_LENGTH - 1 );
49        irc_send_motd( irc );
50}
51
52void irc_send_motd( irc_t *irc )
53{
54        int fd;
55       
56        fd = open( global.conf->motdfile, O_RDONLY );
57        if( fd == -1 )
58        {
59                irc_send_num( irc, 422, ":We don't need MOTDs." );
60        }
61        else
62        {
63                char linebuf[80];       /* Max. line length for MOTD's is 79 chars. It's what most IRC networks seem to do. */
64                char *add, max;
65                int len;
66               
67                linebuf[79] = len = 0;
68                max = sizeof( linebuf ) - 1;
69               
70                irc_send_num( irc, 375, ":- %s Message Of The Day - ", irc->root->host );
71                while( read( fd, linebuf + len, 1 ) == 1 )
72                {
73                        if( linebuf[len] == '\n' || len == max )
74                        {
75                                linebuf[len] = 0;
76                                irc_send_num( irc, 372, ":- %s", linebuf );
77                                len = 0;
78                        }
79                        else if( linebuf[len] == '%' )
80                        {
81                                read( fd, linebuf + len, 1 );
82                                if( linebuf[len] == 'h' )
83                                        add = irc->root->host;
84                                else if( linebuf[len] == 'v' )
85                                        add = BITLBEE_VERSION;
86                                else if( linebuf[len] == 'n' )
87                                        add = irc->user->nick;
88                                else
89                                        add = "%";
90                               
91                                strncpy( linebuf + len, add, max - len );
92                                while( linebuf[++len] );
93                        }
94                        else if( len < max )
95                        {
96                                len ++;
97                        }
98                }
99                irc_send_num( irc, 376, ":End of MOTD" );
100                close( fd );
101        }
102}
103
104void irc_usermsg( irc_t *irc, char *format, ... )
105{
106        irc_channel_t *ic;
107        irc_user_t *iu;
108        char text[1024];
109        va_list params;
110       
111        va_start( params, format );
112        g_vsnprintf( text, sizeof( text ), format, params );
113        va_end( params );
114       
115        if( irc->last_root_cmd &&
116            irc_channel_name_ok( irc->last_root_cmd ) && 
117            ( ic = irc_channel_by_name( irc, irc->last_root_cmd ) ) &&
118            ic->flags & IRC_CHANNEL_JOINED )
119                irc_send_msg( irc->root, "PRIVMSG", irc->last_root_cmd, text, NULL );
120        else if( irc->last_root_cmd &&
121                 ( iu = irc_user_by_name( irc, irc->last_root_cmd ) ) &&
122                 iu->f == &irc_user_root_funcs )
123                irc_send_msg( iu, "PRIVMSG", irc->user->nick, text, NULL );
124        else
125        {
126                g_free( irc->last_root_cmd );
127                irc->last_root_cmd = NULL;
128               
129                irc_send_msg( irc->root, "PRIVMSG", irc->user->nick, text, NULL );
130        }
131       
132        /*return( irc_msgfrom( irc, u->nick, text ) );*/
133}
134
135void irc_send_join( irc_channel_t *ic, irc_user_t *iu )
136{
137        irc_t *irc = ic->irc;
138       
139        irc_write( irc, ":%s!%s@%s JOIN :%s", iu->nick, iu->user, iu->host, ic->name );
140       
141        if( iu == irc->user )
142        {
143                irc_write( irc, ":%s MODE %s +%s", irc->root->host, ic->name, ic->mode );
144                irc_send_names( ic );
145                if( ic->topic && *ic->topic )
146                        irc_send_topic( ic, FALSE );
147        }
148}
149
150void irc_send_part( irc_channel_t *ic, irc_user_t *iu, const char *reason )
151{
152        irc_write( ic->irc, ":%s!%s@%s PART %s :%s", iu->nick, iu->user, iu->host, ic->name, reason );
153}
154
155void irc_send_names( irc_channel_t *ic )
156{
157        GSList *l;
158        char namelist[385] = "";
159       
160        /* RFCs say there is no error reply allowed on NAMES, so when the
161           channel is invalid, just give an empty reply. */
162        for( l = ic->users; l; l = l->next )
163        {
164                irc_channel_user_t *icu = l->data;
165                irc_user_t *iu = icu->iu;
166               
167                if( strlen( namelist ) + strlen( iu->nick ) > sizeof( namelist ) - 4 )
168                {
169                        irc_send_num( ic->irc, 353, "= %s :%s", ic->name, namelist );
170                        *namelist = 0;
171                }
172               
173                if( icu->flags & IRC_CHANNEL_USER_OP )
174                        strcat( namelist, "@" );
175                else if( icu->flags & IRC_CHANNEL_USER_HALFOP )
176                        strcat( namelist, "%" );
177                else if( icu->flags & IRC_CHANNEL_USER_VOICE )
178                        strcat( namelist, "+" );
179               
180                strcat( namelist, iu->nick );
181                strcat( namelist, " " );
182        }
183       
184        if( *namelist )
185                irc_send_num( ic->irc, 353, "= %s :%s", ic->name, namelist );
186       
187        irc_send_num( ic->irc, 366, "%s :End of /NAMES list", ic->name );
188}
189
190void irc_send_topic( irc_channel_t *ic, gboolean topic_change )
191{
192        if( topic_change && ic->topic_who )
193        {
194                irc_write( ic->irc, ":%s TOPIC %s :%s", ic->topic_who, 
195                           ic->name, ic->topic && *ic->topic ? ic->topic : "" );
196        }
197        else if( ic->topic )
198        {
199                irc_send_num( ic->irc, 332, "%s :%s", ic->name, ic->topic );
200                if( ic->topic_who )
201                        irc_send_num( ic->irc, 333, "%s %s %d",
202                                      ic->name, ic->topic_who, (int) ic->topic_time );
203        }
204        else
205                irc_send_num( ic->irc, 331, "%s :No topic for this channel", ic->name );
206}
207
208void irc_send_whois( irc_user_t *iu )
209{
210        irc_t *irc = iu->irc;
211       
212        irc_send_num( irc, 311, "%s %s %s * :%s",
213                      iu->nick, iu->user, iu->host, iu->fullname );
214       
215        if( iu->bu )
216        {
217                bee_user_t *bu = iu->bu;
218               
219                irc_send_num( irc, 312, "%s %s.%s :%s network", iu->nick, bu->ic->acc->user,
220                           bu->ic->acc->server && *bu->ic->acc->server ? bu->ic->acc->server : "",
221                           bu->ic->acc->prpl->name );
222               
223                if( ( bu->status && *bu->status ) ||
224                    ( bu->status_msg && *bu->status_msg ) )
225                {
226                        int num = bu->flags & BEE_USER_AWAY ? 301 : 320;
227                       
228                        if( bu->status && bu->status_msg )
229                                irc_send_num( irc, num, "%s :%s (%s)", iu->nick, bu->status, bu->status_msg );
230                        else
231                                irc_send_num( irc, num, "%s :%s", iu->nick, bu->status ? : bu->status_msg );
232                }
233                else if( !( bu->flags & BEE_USER_ONLINE ) )
234                {
235                        irc_send_num( irc, 301, "%s :%s", iu->nick, "User is offline" );
236                }
237        }
238        else
239        {
240                irc_send_num( irc, 312, "%s %s :%s", iu->nick, irc->root->host, IRCD_INFO );
241        }
242       
243        irc_send_num( irc, 318, "%s :End of /WHOIS list", iu->nick );
244}
245
246void irc_send_who( irc_t *irc, GSList *l, const char *channel )
247{
248        gboolean is_channel = strcmp( channel, "**" ) != 0;
249       
250        while( l )
251        {
252                irc_user_t *iu = l->data;
253                if( is_channel )
254                        iu = ((irc_channel_user_t*)iu)->iu;
255                /* TODO(wilmer): Restore away/channel information here */
256                irc_send_num( irc, 352, "%s %s %s %s %s %c :0 %s",
257                              channel ? : "*", iu->user, iu->host, irc->root->host,
258                              iu->nick, iu->flags & IRC_USER_AWAY ? 'G' : 'H',
259                              iu->fullname );
260                l = l->next;
261        }
262       
263        irc_send_num( irc, 315, "%s :End of /WHO list", channel );
264}
265
266void irc_send_msg( irc_user_t *iu, const char *type, const char *dst, const char *msg, const char *prefix )
267{
268        char last = 0;
269        const char *s = msg, *line = msg;
270        char raw_msg[strlen(msg)+1024];
271       
272        while( !last )
273        {
274                if( *s == '\r' && *(s+1) == '\n' )
275                        s++;
276                if( *s == '\n' )
277                {
278                        last = s[1] == 0;
279                }
280                else
281                {
282                        last = s[0] == 0;
283                }
284                if( *s == 0 || *s == '\n' )
285                {
286                        if( g_strncasecmp( line, "/me ", 4 ) == 0 && ( !prefix || !*prefix ) &&
287                            g_strcasecmp( type, "PRIVMSG" ) == 0 )
288                        {
289                                strcpy( raw_msg, "\001ACTION " );
290                                strncat( raw_msg, line + 4, s - line - 4 );
291                                strcat( raw_msg, "\001" );
292                                irc_send_msg_raw( iu, type, dst, raw_msg );
293                        }
294                        else
295                        {
296                                *raw_msg = '\0';
297                                if( prefix && *prefix )
298                                        strcpy( raw_msg, prefix );
299                                strncat( raw_msg, line, s - line );
300                                irc_send_msg_raw( iu, type, dst, raw_msg );
301                        }
302                        line = s + 1;
303                }
304                s ++;
305        }
306}
307
308void irc_send_msg_raw( irc_user_t *iu, const char *type, const char *dst, const char *msg )
309{
310        irc_write( iu->irc, ":%s!%s@%s %s %s :%s",
311                   iu->nick, iu->user, iu->host, type, dst, msg );
312}
313
314void irc_send_msg_f( irc_user_t *iu, const char *type, const char *dst, const char *format, ... )
315{
316        char text[IRC_MAX_LINE];
317        va_list params;
318       
319        va_start( params, format );
320        g_vsnprintf( text, IRC_MAX_LINE, format, params );
321        va_end( params );
322       
323        irc_write( iu->irc, ":%s!%s@%s %s %s :%s",
324                   iu->nick, iu->user, iu->host, type, dst, text );
325}
326
327void irc_send_nick( irc_user_t *iu, const char *new )
328{
329        irc_write( iu->irc, ":%s!%s@%s NICK %s",
330                   iu->nick, iu->user, iu->host, new );
331}
332
333/* Send an update of a user's mode inside a channel, compared to what it was. */
334void irc_send_channel_user_mode_diff( irc_channel_t *ic, irc_user_t *iu,
335        irc_channel_user_flags_t old, irc_channel_user_flags_t new )
336{
337        char changes[3*(5+strlen(iu->nick))];
338        char from[strlen(ic->irc->root->nick)+strlen(ic->irc->root->user)+strlen(ic->irc->root->host)+3];
339        int n;
340       
341        *changes = '\0'; n = 0;
342        if( ( old & IRC_CHANNEL_USER_OP ) != ( new & IRC_CHANNEL_USER_OP ) )
343        {
344                n ++;
345                if( new & IRC_CHANNEL_USER_OP )
346                        strcat( changes, "+o" );
347                else
348                        strcat( changes, "-o" );
349        }
350        if( ( old & IRC_CHANNEL_USER_HALFOP ) != ( new & IRC_CHANNEL_USER_HALFOP ) )
351        {
352                n ++;
353                if( new & IRC_CHANNEL_USER_HALFOP )
354                        strcat( changes, "+h" );
355                else
356                        strcat( changes, "-h" );
357        }
358        if( ( old & IRC_CHANNEL_USER_VOICE ) != ( new & IRC_CHANNEL_USER_VOICE ) )
359        {
360                n ++;
361                if( new & IRC_CHANNEL_USER_VOICE )
362                        strcat( changes, "+v" );
363                else
364                        strcat( changes, "-v" );
365        }
366        while( n )
367        {
368                strcat( changes, " " );
369                strcat( changes, iu->nick );
370                n --;
371        }
372       
373        if( set_getbool( &ic->irc->b->set, "simulate_netsplit" ) )
374                g_snprintf( from, sizeof( from ), "%s", ic->irc->root->host );
375        else
376                g_snprintf( from, sizeof( from ), "%s!%s@%s", ic->irc->root->nick,
377                            ic->irc->root->user, ic->irc->root->host );
378       
379        irc_write( ic->irc, ":%s MODE %s %s", from, ic->name, changes );
380}
Note: See TracBrowser for help on using the repository browser.