1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169 /********************************************************************\
* BitlBee -- An IRC to other IM-networks gateway *
* *
* Copyright 2002-2010 Wilmer van der Gaast and others *
\********************************************************************/
/* MSN module - Some tables with useful data */
/*
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.
This program is distributed in the hope that it will be useful,
but WITHOUT ANY WARRANTY; without even the implied warranty of
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
GNU General Public License for more details.
You should have received a copy of the GNU General Public License with
the Debian GNU/Linux distribution in /usr/share/common-licenses/GPL;
if not, write to the Free Software Foundation, Inc., 59 Temple Place,
Suite 330, Boston, MA 02111-1307 USA
*/
#include "nogaim.h"
#include "msn.h"
const struct msn_away_state msn_away_state_list[] =
{
{ "NLN", "" },
{ "AWY", "Away" },
{ "BSY", "Busy" },
{ "IDL", "Idle" },
{ "BRB", "Be Right Back" },
{ "PHN", "On the Phone" },
{ "LUN", "Out to Lunch" },
{ "HDN", "Hidden" },
{ "", "" }
};
const struct msn_away_state *msn_away_state_by_code( char *code )
{
int i;
for( i = 0; *msn_away_state_list[i].code; i ++ )
if( g_strcasecmp( msn_away_state_list[i].code, code ) == 0 )
return( msn_away_state_list + i );
return NULL;
}
const struct msn_away_state *msn_away_state_by_name( char *name )
{
int i;
for( i = 0; *msn_away_state_list[i].code; i ++ )
if( g_strcasecmp( msn_away_state_list[i].name, name ) == 0 )
return( msn_away_state_list + i );
return NULL;
}
const struct msn_status_code msn_status_code_list[] =
{
{ 200, "Invalid syntax", 0 },
{ 201, "Invalid parameter", 0 },
{ 205, "Invalid (non-existent) handle", 0 },
{ 206, "Domain name missing", 0 },
{ 207, "Already logged in", 0 },
{ 208, "Invalid handle", STATUS_SB_IM_SPARE },
{ 209, "Forbidden nickname", 0 },
{ 210, "Buddy list too long", 0 },
{ 215, "Handle is already in list", 0 },
{ 216, "Handle is not in list", STATUS_SB_IM_SPARE },
{ 217, "Person is off-line or non-existent", STATUS_SB_IM_SPARE },
{ 218, "Already in that mode", 0 },
{ 219, "Handle is already in opposite list", 0 },
{ 223, "Too many groups", 0 },
{ 224, "Invalid group or already in list", 0 },
{ 225, "Handle is not in that group", 0 },
{ 229, "Group name too long", 0 },
{ 230, "Cannot remove that group", 0 },
{ 231, "Invalid group", 0 },
{ 240, "ADL/RML command with corrupted payload", STATUS_FATAL },
{ 241, "ADL/RML command with invalid modification", 0 },
{ 280, "Switchboard failed", STATUS_SB_FATAL },
{ 281, "Transfer to switchboard failed", 0 },
{ 300, "Required field missing", 0 },
{ 302, "Not logged in", 0 },
{ 500, "Internal server error/Account banned", STATUS_FATAL },
{ 501, "Database server error", STATUS_FATAL },
{ 502, "Command disabled", 0 },
{ 510, "File operation failed", STATUS_FATAL },
{ 520, "Memory allocation failed", STATUS_FATAL },
{ 540, "Challenge response invalid", STATUS_FATAL },
{ 600, "Server is busy", STATUS_FATAL },
{ 601, "Server is unavailable", STATUS_FATAL },
{ 602, "Peer nameserver is down", STATUS_FATAL },
{ 603, "Database connection failed", STATUS_FATAL },
{ 604, "Server is going down", STATUS_FATAL },
{ 605, "Server is unavailable", STATUS_FATAL },
{ 700, "Could not create connection", STATUS_FATAL },
{ 710, "Invalid CVR parameters", STATUS_FATAL },
{ 711, "Write is blocking", STATUS_FATAL },
{ 712, "Session is overloaded", STATUS_FATAL },
{ 713, "Calling too rapidly", STATUS_SB_IM_SPARE },
{ 714, "Too many sessions", STATUS_FATAL },
{ 715, "Not expected/Invalid argument/action", 0 },
{ 717, "Bad friend file", STATUS_FATAL },
{ 731, "Not expected/Invalid argument", 0 },
{ 800, "Changing too rapidly", 0 },
{ 910, "Server is busy", pre { line-height: 125%; }
td.linenos .normal { color: inherit; background-color: transparent; padding-left: 5px; padding-right: 5px; }
span.linenos { color: inherit; background-color: transparent; padding-left: 5px; padding-right: 5px; }
td.linenos .special { color: #000000; background-color: #ffffc0; padding-left: 5px; padding-right: 5px; }
span.linenos.special { color: #000000; background-color: #ffffc0; padding-left: 5px; padding-right: 5px; }
.highlight .hll { background-color: #ffffcc }
.highlight .c { color: #888888 } /* Comment */
.highlight .err { color: #a61717; background-color: #e3d2d2 } /* Error */
.highlight .k { color: #008800; font-weight: bold } /* Keyword */
.highlight .ch { color: #888888 } /* Comment.Hashbang */
.highlight .cm { color: #888888 } /* Comment.Multiline */
.highlight .cp { color: #cc0000; font-weight: bold } /* Comment.Preproc */
.highlight .cpf { color: #888888 } /* Comment.PreprocFile */
.highlight .c1 { color: #888888 } /* Comment.Single */
.highlight .cs { color: #cc0000; font-weight: bold; background-color: #fff0f0 } /* Comment.Special */
.highlight .gd { color: #000000; background-color: #ffdddd } /* Generic.Deleted */
.highlight .ge { font-style: italic } /* Generic.Emph */
.highlight .ges { font-weight: bold; font-style: italic } /* Generic.EmphStrong */
.highlight .gr { color: #aa0000 } /* Generic.Error */
.highlight .gh { color: #333333 } /* Generic.Heading */
.highlight .gi { color: #000000; background-color: #ddffdd } /* Generic.Inserted */
.highlight .go { color: #888888 } /* Generic.Output */
.highlight .gp { color: #555555 } /* Generic.Prompt */
.highlight .gs { font-weight: bold } /* Generic.Strong */
.highlight .gu { color: #666666 } /* Generic.Subheading */
.highlight .gt { color: #aa0000 } /* Generic.Traceback */
.highlight .kc { color: #008800; font-weight: bold } /* Keyword.Constant */
.highlight .kd { color: #008800; font-weight: bold } /* Keyword.Declaration */
.highlight .kn { color: #008800; font-weight: bold } /* Keyword.Namespace */
.highlight .kp { color: #008800 } /* Keyword.Pseudo */
.highlight .kr { color: #008800; font-weight: bold } /* Keyword.Reserved */
.highlight .kt { color: #888888; font-weight: bold } /* Keyword.Type */
.highlight .m { color: #0000DD; font-weight: bold } /* Literal.Number */
.highlight .s { color: #dd2200; background-color: #fff0f0 } /* Literal.String */
.highlight .na { color: #336699 } /* Name.Attribute */
.highlight .nb { color: #003388 } /* Name.Builtin */
.highlight .nc { color: #bb0066; font-weight: bold } /* Name.Class */
.highlight .no { color: #003366; font-weight: bold } /* Name.Constant */
.highlight .nd { color: #555555 } /* Name.Decorator */
.highlight .ne { color: #bb0066; font-weight: bold } /* Name.Exception */
.highlight .nf { color: #0066bb; font-weight: bold } /* Name.Function */
.highlight .nl { color: #336699; font-style: italic } /* Name.Label */
.highlight .nn { color: #bb0066; font-weight: bold } /* Name.Namespace */
.highlight .py { color: #336699; font-weight: bold } /* Name.Property */
.highlight .nt { color: #bb0066; font-weight: bold } /* Name.Tag */
.highlight .nv { color: #336699 } /* Name.Variable */
.highlight .ow { color: #008800 } /* Operator.Word */
.highlight .w { color: #bbbbbb } /* Text.Whitespace */
.highlight .mb { color: #0000DD; font-weight: bold } /* Literal.Number.Bin */
.highlight .mf { color: #0000DD; font-weight: bold } /* Literal.Number.Float */
.highlight .mh { color: #0000DD; font-weight: bold } /* Literal.Number.Hex */
.highlight .mi { color: #0000DD; font-weight: bold } /* Literal.Number.Integer */
.highlight .mo { color: #0000DD; font-weight: bold } /* Literal.Number.Oct */
.highlight .sa { color: #dd2200; background-color: #fff0f0 } /* Literal.String.Affix */
.highlight .sb { color: #dd2200; background-color: #fff0f0 } /* Literal.String.Backtick */
.highlight .sc { color: #dd2200; background-color: #fff0f0 } /* Literal.String.Char */
.highlight .dl { color: #dd2200; background-color: #fff0f0 } /* Literal.String.Delimiter */
.highlight .sd { color: #dd2200; background-color: #fff0f0 } /* Literal.String.Doc */
.highlight .s2 { color: #dd2200; background-color: #fff0f0 } /* Literal.String.Double */
.highlight .se { color: #0044dd; background-color: #fff0f0 } /* Literal.String.Escape */
.highlight .sh { color: #dd2200; background-color: #fff0f0 } /* Literal.String.Heredoc */
.highlight .si { color: #3333bb; background-color: #fff0f0 } /* Literal.String.Interpol */
.highlight .sx { color: #22bb22; background-color: #f0fff0 } /* Literal.String.Other */
.highlight .sr { color: #008800; background-color: #fff0ff } /* Literal.String.Regex */
.highlight .s1 { color: #dd2200; background-color: #fff0f0 } /* Literal.String.Single */
.highlight .ss { color: #aa6600; background-color: #fff0f0 } /* Literal.String.Symbol */
.highlight .bp { color: #003388 } /* Name.Builtin.Pseudo */
.highlight .fm { color: #0066bb; font-weight: bold } /* Name.Function.Magic */
.highlight .vc { color: #336699 } /* Name.Variable.Class */
.highlight .vg { color: #dd7700 } /* Name.Variable.Global */
.highlight .vi { color: #3333bb } /* Name.Variable.Instance */
.highlight .vm { color: #336699 } /* Name.Variable.Magic */
.highlight .il { color: #0000DD; font-weight: bold } /* Literal.Number.Integer.Long */ /********************************************************************\
* BitlBee -- An IRC to other IM-networks gateway *
* *
* Copyright 2002-2010 Wilmer van der Gaast and others *
\********************************************************************/
/* Some glue to put the IRC and the IM stuff together. */
/*
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.
This program is distributed in the hope that it will be useful,
but WITHOUT ANY WARRANTY; without even the implied warranty of
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
GNU General Public License for more details.
You should have received a copy of the GNU General Public License with
the Debian GNU/Linux distribution in /usr/share/common-licenses/GPL;
if not, write to the Free Software Foundation, Inc., 59 Temple Place,
Suite 330, Boston, MA 02111-1307 USA
*/
#include "bitlbee.h"
#include "dcc.h"
/* IM->IRC callbacks: Simple IM/buddy-related stuff. */
static const struct irc_user_funcs irc_user_im_funcs;
static void bee_irc_imc_connected( struct im_connection *ic )
{
irc_t *irc = (irc_t*) ic->bee->ui_data;
irc_channel_auto_joins( irc, ic->acc );
}
static void bee_irc_imc_disconnected( struct im_connection *ic )
{
/* Maybe try to send /QUITs here instead of later on. */
}
static gboolean bee_irc_user_new( bee_t *bee, bee_user_t *bu )
{
irc_user_t *iu;
irc_t *irc = (irc_t*) bee->ui_data;
char nick[MAX_NICK_LENGTH+1], *s;
memset( nick, 0, MAX_NICK_LENGTH + 1 );
strcpy( nick, nick_get( bu ) );
bu->ui_data = iu = irc_user_new( irc, nick );
iu->bu = bu;
if( set_getbool( &irc->b->set, "private" ) )
iu->last_channel = NULL;
else
iu->last_channel = irc_channel_with_user( irc, iu );
if( ( s = strchr( bu->handle, '@' ) ) )
{
iu->host = g_strdup( s + 1 );
iu->user = g_strndup( bu->handle, s - bu->handle );
}
else
{
iu->user = g_strdup( bu->handle );
if( bu->ic->acc->server )
iu->host = g_strdup( bu->ic->acc->server );
else
iu->host = g_strdup( bu->ic->acc->prpl->name );
}
while( ( s = strchr( iu->user, ' ' ) ) )
*s = '_';
if( bu->flags & BEE_USER_LOCAL )
{
char *s = set_getstr( &bee->set, "handle_unknown" );
if( strcmp( s, "add_private" ) == 0 )
iu->last_channel = NULL;
else if( strcmp( s, "add_channel" ) == 0 )
iu->last_channel = irc->default_channel;
}
iu->f = &irc_user_im_funcs;
return TRUE;
}
static gboolean bee_irc_user_free( bee_t *bee, bee_user_t *bu )
{
return irc_user_free( bee->ui_data, (irc_user_t *) bu->ui_data );
}
static gboolean bee_irc_user_status( bee_t *bee, bee_user_t *bu, bee_user_t *old )
{
irc_t *irc = bee->ui_data;
irc_user_t *iu = bu->ui_data;
/* Do this outside the if below since away state can change without
the online state changing. */
iu->flags &= ~IRC_USER_AWAY;
if( bu->flags & BEE_USER_AWAY || !( bu->flags & BEE_USER_ONLINE ) )
iu->flags |= IRC_USER_AWAY;
if( ( bu->flags & BEE_USER_ONLINE ) != ( old->flags & BEE_USER_ONLINE ) )
{
if( bu->flags & BEE_USER_ONLINE )
{
if( g_hash_table_lookup( irc->watches, iu->key ) )
irc_send_num( irc, 600, "%s %s %s %d :%s", iu->nick, iu->user,
iu->host, (int) time( NULL ), "logged online" );
}
else
{
if( g_hash_table_lookup( irc->watches, iu->key ) )
irc_send_num( irc, 601, "%s %s %s %d :%s", iu->nick, iu->user,
iu->host, (int) time( NULL ), "logged offline" );
/* Send a QUIT since those will also show up in any
query windows the user may have, plus it's only
one QUIT instead of possibly many (in case of
multiple control chans). If there's a channel that
shows offline people, a JOIN will follow. */
if( set_getbool( &bee->set, "offline_user_quits" ) )
irc_user_quit( iu, "Leaving..." );
}
}
/* Reset this one since the info may have changed. */
iu->away_reply_timeout = 0;
bee_irc_channel_update( irc, NULL, iu );
return TRUE;
}
void bee_irc_channel_update( irc_t *irc, irc_channel_t *ic, irc_user_t *iu )
{
GSList *l;
if( ic == NULL )
{
for( l = irc->channels; l; l = l->next )
{
ic = l->data;
/* TODO: Just add a type flag or so.. */
if( ic->f == irc->default_channel->f &&
( ic->flags & IRC_CHANNEL_JOINED ) )
bee_irc_channel_update( irc, ic, iu );
}
return;
}
if( iu == NULL )
{
for( l = irc->users; l; l = l->next )
{
iu = l->data;
if( iu->bu )
bee_irc_channel_update( irc, ic, l->data );
}
return;
}
if( !irc_channel_wants_user( ic, iu ) )
{
irc_channel_del_user( ic, iu, IRC_CDU_PART, NULL );
}
else
{
struct irc_control_channel *icc = ic->data;
int mode = 0;
if( !( iu->bu->flags & BEE_USER_ONLINE ) )
mode = icc->modes[0];
else if( iu->bu->flags & BEE_USER_AWAY )
mode = icc->modes[1];
else
mode = icc->modes[2];
if( !mode )
irc_channel_del_user( ic, iu, IRC_CDU_PART, NULL );
else
{
irc_channel_add_user( ic, iu );
irc_channel_user_set_mode( ic, iu, mode );
}
}
}
static gboolean bee_irc_user_msg( bee_t *bee, bee_user_t *bu, const char *msg_, time_t sent_at )
{
irc_t *irc = bee->ui_data;
irc_user_t *iu = (irc_user_t *) bu->ui_data;
const char *dst;
char *prefix = NULL;
char *wrapped, *ts = NULL;
char *msg = g_strdup( msg_ );
GSList *l;
if( sent_at > 0 && set_getbool( &irc->b->set, "display_timestamps" ) )
ts = irc_format_timestamp( irc, sent_at );
dst = irc_user_msgdest( iu );
if( dst != irc->user->nick )
{
/* if not messaging directly, call user by name */
prefix = g_strdup_printf( "%s%s%s", irc->user->nick, set_getstr( &bee->set, "to_char" ), ts ? : "" );
}
else
{
prefix = ts;
ts = NULL; /* don't double-free */
}
for( l = irc_plugins; l; l = l->next )
{
irc_plugin_t *p = l->data;
if( p->filter_msg_in )
{
char *s = p->filter_msg_in( iu, msg, 0 );
if( s )
{
if( s != msg )
g_free( msg );
msg = s;
}
else
{
/* Modules can swallow messages. */
return TRUE;
}
}
}
if( ( g_strcasecmp( set_getstr( &bee->set, "strip_html" ), "always" ) == 0 ) ||
( ( bu->ic->flags & OPT_DOES_HTML ) && set_getbool( &bee->set, "strip_html" ) ) )
{
char *s = g_strdup( msg );
strip_html( s );
g_free( msg );
msg = s;
}
wrapped = word_wrap( msg, 425 );
irc_send_msg( iu, "PRIVMSG", dst, wrapped, prefix );
g_free( wrapped );
g_free( prefix );
g_free( msg );
g_free( ts );
return TRUE;
}
static gboolean bee_irc_user_typing( bee_t *bee, bee_user_t *bu, uint32_t flags )
{
irc_t *irc = (irc_t *) bee->ui_data;
if( set_getbool( &bee->set, "typing_notice" ) )
irc_send_msg_f( (irc_user_t *) bu->ui_data, "PRIVMSG", irc->user->nick,
"\001TYPING %d\001", ( flags >> 8 ) & 3 );
else
return FALSE;
return TRUE;
}
static gboolean bee_irc_user_action_response( bee_t *bee, bee_user_t *bu, const char *action, char * const args[], void *data )
{
irc_t *irc = (irc_t *) bee->ui_data;
GString *msg = g_string_new( "\001" );
g_string_append( msg, action );
while( *args )
{
if( strchr( *args, ' ' ) )
g_string_append_printf( msg, " \"%s\"", *args );
else
g_string_append_printf( msg, " %s", *args );
args ++;
}
g_string_append_c( msg, '\001' );
irc_send_msg( (irc_user_t *) bu->ui_data, "NOTICE", irc->user->nick, msg->str, NULL );
return TRUE;
}
static gboolean bee_irc_user_nick_update( irc_user_t *iu );
static gboolean bee_irc_user_fullname( bee_t *bee, bee_user_t *bu )
{
irc_user_t *iu = (irc_user_t *) bu->ui_data;
char *s;
if( iu->fullname != iu->nick )
g_free( iu->fullname );
iu->fullname = g_strdup( bu->fullname );
/* Strip newlines (unlikely, but IRC-unfriendly so they must go)
TODO(wilmer): Do the same with away msgs again! */
for( s = iu->fullname; *s; s ++ )
if( isspace( *s ) ) *s = ' ';
if( ( bu->ic->flags & OPT_LOGGED_IN ) && set_getbool( &bee->set, "display_namechanges" ) )
{
/* People don't like this /NOTICE. Meh, let's go back to the old one.
char *msg = g_strdup_printf( "<< \002BitlBee\002 - Changed name to `%s' >>", iu->fullname );
irc_send_msg( iu, "NOTICE", irc->user->nick, msg, NULL );
*/
imcb_log( bu->ic, "User `%s' changed name to `%s'", iu->nick, iu->fullname );
}
bee_irc_user_nick_update( iu );
return TRUE;
}
static gboolean bee_irc_user_nick_hint( bee_t *bee, bee_user_t *bu, const char *hint )
{
bee_irc_user_nick_update( (irc_user_t*) bu->ui_data );
return TRUE;
}
static gboolean bee_irc_user_group( bee_t *bee, bee_user_t *bu )
{
irc_user_t *iu = (irc_user_t *) bu->ui_data;
irc_t *irc = (irc_t *) bee->ui_data;
bee_user_flags_t online;
/* Take the user offline temporarily so we can change the nick (if necessary). */
if( ( online = bu->flags & BEE_USER_ONLINE ) )
bu->flags &= ~BEE_USER_ONLINE;
bee_irc_channel_update( irc, NULL, iu );
bee_irc_user_nick_update( iu );
if( online )
{
bu->flags |= online;
bee_irc_channel_update( irc, NULL, iu );
}
return TRUE;
}
static gboolean bee_irc_user_nick_update( irc_user_t *iu )
{
bee_user_t *bu = iu->bu;
char *newnick;
if( bu->flags & BEE_USER_ONLINE )
/* Ignore if the user is visible already. */
return TRUE;
if( nick_saved( bu ) )
/* The user already assigned a nickname to this person. */
return TRUE;
newnick = nick_get( bu );
if( strcmp( iu->nick, newnick ) != 0 )
{
nick_dedupe( bu, newnick );
irc_user_set_nick( iu, newnick );
}
return TRUE;
}
void bee_irc_user_nick_reset( irc_user_t *iu )
{
bee_user_t *bu = iu->bu;
bee_user_flags_t online;
if( bu == FALSE )
return;
/* In this case, pretend the user is offline. */
if( ( online = bu->flags & BEE_USER_ONLINE ) )
bu->flags &= ~BEE_USER_ONLINE;
nick_del( bu );
bee_irc_user_nick_update( iu );
bu->flags |= online;
}
/* IRC->IM calls */
static gboolean bee_irc_user_privmsg_cb( gpointer data, gint fd, b_input_condition cond );
static gboolean bee_irc_user_privmsg( irc_user_t *iu, const char *msg )
{
const char *away;
if( iu->bu == NULL )
return FALSE;
if( ( away = irc_user_get_away( iu ) ) &&
time( NULL ) >= iu->away_reply_timeout )
{
irc_send_num( iu->irc, 301, "%s :%s", iu->nick, away );
iu->away_reply_timeout = time( NULL ) +
set_getint( &iu->irc->b->set, "away_reply_timeout" );
}
if( iu->pastebuf == NULL )
iu->pastebuf = g_string_new( msg );
else
{
b_event_remove( iu->pastebuf_timer );
g_string_append_printf( iu->pastebuf, "\n%s", msg );
}
if( set_getbool( &iu->irc->b->set, "paste_buffer" ) )
{
int delay;
if( ( delay = set_getint( &iu->irc->b->set, "paste_buffer_delay" ) ) <= 5 )
delay *= 1000;
iu->pastebuf_timer = b_timeout_add( delay, bee_irc_user_privmsg_cb, iu );
return TRUE;
}
else
{
bee_irc_user_privmsg_cb( iu, 0, 0 );
return TRUE;
}
}
static gboolean bee_irc_user_privmsg_cb( gpointer data, gint fd, b_input_condition cond )
{
irc_user_t *iu = data;
char *msg;
GSList *l;
msg = g_string_free( iu->pastebuf, FALSE );
iu->pastebuf = NULL;
iu->pastebuf_timer = 0;
for( l = irc_plugins; l; l = l->next )
{
irc_plugin_t *p = l->data;
if( p->filter_msg_out )
{
char *s = p->filter_msg_out( iu, msg, 0 );
if( s )
{
if( s != msg )
g_free( msg );
msg = s;
}
else
{
/* Modules can swallow messages. */
iu->pastebuf = NULL;
g_free( msg );
return FALSE;
}
}
}
bee_user_msg( iu->irc->b, iu->bu, msg, 0 );
g_free( msg );
return FALSE;
}
static gboolean bee_irc_user_ctcp( irc_user_t *iu, char *const *ctcp )
{
if( ctcp[1] && g_strcasecmp( ctcp[0], "DCC" ) == 0
&& g_strcasecmp( ctcp[1], "SEND" ) == 0 )
{
if( iu->bu && iu->bu->ic && iu->bu->ic->acc->prpl->transfer_request )
{
file_transfer_t *ft = dcc_request( iu->bu->ic, ctcp );
if ( ft )
iu->bu->ic->acc->prpl->transfer_request( iu->bu->ic, ft, iu->bu->handle );
return TRUE;
}
}
else if( g_strcasecmp( ctcp[0], "TYPING" ) == 0 )
{
if( iu->bu && iu->bu->ic && iu->bu->ic->acc->prpl->send_typing && ctcp[1] )
{
int st = ctcp[1][0];
if( st >= '0' && st <= '2' )
{
st <<= 8;
iu->bu->ic->acc->prpl->send_typing( iu->bu->ic, iu->bu->handle, st );
}
return TRUE;
}
}
else if( g_strcasecmp( ctcp[0], "HELP" ) == 0 && iu->bu )
{
GString *supp = g_string_new( "Supported CTCPs:" );
GList *l;
if( iu->bu->ic && iu->bu->ic->acc->prpl->transfer_request )
g_string_append( supp, " DCC SEND," );
if( iu->bu->ic && iu->bu->ic->acc->prpl->send_typing )
g_string_append( supp, " TYPING," );
if( iu->bu->ic->acc->prpl->buddy_action_list )
for( l = iu->bu->ic->acc->prpl->buddy_action_list( iu->bu ); l; l = l->next )
{
struct buddy_action *ba = l->data;
g_string_append_printf( supp, " %s (%s),",
ba->name, ba->description );
}
g_string_truncate( supp, supp->len - 1 );
irc_send_msg_f( iu, "NOTICE", iu->irc->user->nick, "\001HELP %s\001", supp->str );
g_string_free( supp, TRUE );
}
else if( iu->bu && iu->bu->ic && iu->bu->ic->acc->prpl->buddy_action )
{
iu->bu->ic->acc->prpl->buddy_action( iu->bu, ctcp[0], ctcp + 1, NULL );
}
return FALSE;
}
static const struct irc_user_funcs irc_user_im_funcs = {
bee_irc_user_privmsg,
bee_irc_user_ctcp,
};
/* IM->IRC: Groupchats */
const struct irc_channel_funcs irc_channel_im_chat_funcs;
static gboolean bee_irc_chat_new( bee_t *bee, struct groupchat *c )
{
irc_t *irc = bee->ui_data;
irc_channel_t *ic;
char *topic;
GSList *l;
int i;
/* Try to find a channel that expects to receive a groupchat.
This flag is set earlier in our current call trace. */
for( l = irc->channels; l; l = l->next )
{
ic = l->data;
if( ic->flags & IRC_CHANNEL_CHAT_PICKME )
break;
}
/* If we found none, just generate some stupid name. */
if( l == NULL ) for( i = 0; i <= 999; i ++ )
{
char name[16];
sprintf( name, "#chat_%03d", i );
if( ( ic = irc_channel_new( irc, name ) ) )
break;
}
if( ic == NULL )
return FALSE;
c->ui_data = ic;
ic->data = c;
topic = g_strdup_printf( "BitlBee groupchat: \"%s\". Please keep in mind that root-commands won't work here. Have fun!", c->title );
irc_channel_set_topic( ic, topic, irc->root );
g_free( topic );
return TRUE;
}
static gboolean bee_irc_chat_free( bee_t *bee, struct groupchat *c )
{
irc_channel_t *ic = c->ui_data;
if( ic == NULL )
return FALSE;
if( ic->flags & IRC_CHANNEL_JOINED )
irc_channel_printf( ic, "Cleaning up channel, bye!" );
ic->data = NULL;
c->ui_data = NULL;
irc_channel_del_user( ic, ic->irc->user, IRC_CDU_KICK, "Chatroom closed by server" );
return TRUE;
}
static gboolean bee_irc_chat_log( bee_t *bee, struct groupchat *c, const char *text )
{
irc_channel_t *ic = c->ui_data;
if( ic == NULL )
return FALSE;
irc_channel_printf( ic, "%s", text );
return TRUE;
}
static gboolean bee_irc_chat_msg( bee_t *bee, struct groupchat *c, bee_user_t *bu, const char *msg, time_t sent_at )
{
irc_t *irc = bee->ui_data;
irc_user_t *iu = bu->ui_data;
irc_channel_t *ic = c->ui_data;
char *ts = NULL;
if( ic == NULL )
return FALSE;
if( sent_at > 0 && set_getbool( &bee->set, "display_timestamps" ) )
ts = irc_format_timestamp( irc, sent_at );
irc_send_msg( iu, "PRIVMSG", ic->name, msg, ts );
g_free( ts );
return TRUE;
}
static gboolean bee_irc_chat_add_user( bee_t *bee, struct groupchat *c, bee_user_t *bu )
{
irc_t *irc = bee->ui_data;
irc_channel_t *ic = c->ui_data;
if( ic == NULL )
return FALSE;
irc_channel_add_user( ic, bu == bee->user ? irc->user : bu->ui_data );
return TRUE;
}
static gboolean bee_irc_chat_remove_user( bee_t *bee, struct groupchat *c, bee_user_t *bu )
{
irc_t *irc = bee->ui_data;
irc_channel_t *ic = c->ui_data;
if( ic == NULL || bu == NULL )
return FALSE;
/* TODO: Possible bug here: If a module removes $user here instead of just
using imcb_chat_free() and the channel was IRC_CHANNEL_TEMP, we get into
a broken state around here. */
irc_channel_del_user( ic, bu == bee->user ? irc->user : bu->ui_data, IRC_CDU_PART, NULL );
return TRUE;
}
static gboolean bee_irc_chat_topic( bee_t *bee, struct groupchat *c, const char *new, bee_user_t *bu )
{
irc_channel_t *ic = c->ui_data;
irc_t *irc = bee->ui_data;
irc_user_t *iu;
if( ic == NULL )
return FALSE;
if( bu == NULL )
iu = irc->root;
else if( bu == bee->user )
iu = irc->user;
else
iu = bu->ui_data;
irc_channel_set_topic( ic, new, iu );
return TRUE;
}
static gboolean bee_irc_chat_name_hint( bee_t *bee, struct groupchat *c, const char *name )
{
irc_t *irc = bee->ui_data;
irc_channel_t *ic = c->ui_data, *oic;
char stripped[MAX_NICK_LENGTH+1], *full_name;
if( ic == NULL )
return FALSE;
/* Don't rename a channel if the user's in it already. */
if( ic->flags & IRC_CHANNEL_JOINED )
return FALSE;
strncpy( stripped, name, MAX_NICK_LENGTH );
stripped[MAX_NICK_LENGTH] = '\0';
irc_channel_name_strip( stripped );
if( set_getbool( &bee->set, "lcnicks" ) )
nick_lc( stripped );
if( stripped[0] == '\0' )
return FALSE;
full_name = g_strdup_printf( "#%s", stripped );
if( ( oic = irc_channel_by_name( irc, full_name ) ) )
{
char *type, *chat_type;
type = set_getstr( &oic->set, "type" );
chat_type = set_getstr( &oic->set, "chat_type" );
if( type && chat_type && oic->data == FALSE &&
strcmp( type, "chat" ) == 0 &&
strcmp( chat_type, "groupchat" ) == 0 )
{
/* There's a channel with this name already, but it looks
like it's not in use yet. Most likely the IRC client
rejoined the channel after a reconnect. Remove it so
we can reuse its name. */
irc_channel_free( oic );
}
else
{
g_free( full_name );
return FALSE;
}
}
g_free( ic->name );
ic->name = full_name;
return TRUE;
}
static gboolean bee_irc_chat_invite( bee_t *bee, bee_user_t *bu, const char *name, const char *msg )
{
char *channel, *s;
irc_t *irc = bee->ui_data;
irc_user_t *iu = bu->ui_data;
irc_channel_t *chan;
if( strchr( CTYPES, name[0] ) )
channel = g_strdup( name );
else
channel = g_strdup_printf( "#%s", name );
if( ( s = strchr( channel, '@' ) ) )
*s = '\0';
if( strlen( channel ) > MAX_NICK_LENGTH )
{
/* If the channel name is very long (like those insane GTalk
UUID names), try if we can use the inviter's nick. */
s = g_strdup_printf( "#%s", iu->nick );
if( irc_channel_by_name( irc, s ) == NULL )
{
g_free( channel );
channel = s;
}
}
if( ( chan = irc_channel_new( irc, channel ) ) &&
set_setstr( &chan->set, "type", "chat" ) &&
set_setstr( &chan->set, "chat_type", "room" ) &&
set_setstr( &chan->set, "account", bu->ic->acc->tag ) &&
set_setstr( &chan->set, "room", (char*) name ) )
{
/* I'm assuming that if the user didn't "chat add" the room
himself but got invited, it's temporary, so make this a
temporary mapping that is removed as soon as we /PART. */
chan->flags |= IRC_CHANNEL_TEMP;
}
else
{
irc_channel_free( chan );
chan = NULL;
}
g_free( channel );
irc_send_msg_f( iu, "PRIVMSG", irc->user->nick, "<< \002BitlBee\002 - Invitation to chatroom %s >>", name );
if( msg )
irc_send_msg( iu, "PRIVMSG", irc->user->nick, msg, NULL );
if( chan )
{
irc_send_msg_f( iu, "PRIVMSG", irc->user->nick, "To join the room, just /join %s", chan->name );
irc_send_invite( iu, chan );
}
return TRUE;
}
/* IRC->IM */
static gboolean bee_irc_channel_chat_privmsg_cb( gpointer data, gint fd, b_input_condition cond );
static gboolean bee_irc_channel_chat_privmsg( irc_channel_t *ic, const char *msg )
{
struct groupchat *c = ic->data;
char *trans = NULL, *s;
if( c == NULL )
return FALSE;
if( set_getbool( &ic->set, "translate_to_nicks" ) )
{
char nick[MAX_NICK_LENGTH+1];
irc_user_t *iu;
strncpy( nick, msg, MAX_NICK_LENGTH );
nick[MAX_NICK_LENGTH] = '\0';
if( ( s = strchr( nick, ':' ) ) || ( s = strchr( nick, ',' ) ) )
{
*s = '\0';
if( ( iu = irc_user_by_name( ic->irc, nick ) ) && iu->bu &&
iu->bu->nick && irc_channel_has_user( ic, iu ) )
{
trans = g_strconcat( iu->bu->nick, msg + ( s - nick ), NULL );
msg = trans;
}
}
}
if( set_getbool( &ic->irc->b->set, "paste_buffer" ) )
{
int delay;
if( ic->pastebuf == NULL )
ic->pastebuf = g_string_new( msg );
else
{
b_event_remove( ic->pastebuf_timer );
g_string_append_printf( ic->pastebuf, "\n%s", msg );
}
if( ( delay = set_getint( &ic->irc->b->set, "paste_buffer_delay" ) ) <= 5 )
delay *= 1000;
ic->pastebuf_timer = b_timeout_add( delay, bee_irc_channel_chat_privmsg_cb, ic );
g_free( trans );
return TRUE;
}
else
bee_chat_msg( ic->irc->b, c, msg, 0 );
g_free( trans );
return TRUE;
}
static gboolean bee_irc_channel_chat_privmsg_cb( gpointer data, gint fd, b_input_condition cond )
{
irc_channel_t *ic = data;
if( ic->data )
bee_chat_msg( ic->irc->b, ic->data, ic->pastebuf->str, 0 );
g_string_free( ic->pastebuf, TRUE );
ic->pastebuf = 0;
ic->pastebuf_timer = 0;
return FALSE;
}
static gboolean bee_irc_channel_chat_join( irc_channel_t *ic )
{
char *acc_s, *room;
account_t *acc;
if( strcmp( set_getstr( &ic->set, "chat_type" ), "room" ) != 0 )
return TRUE;
if( ( acc_s = set_getstr( &ic->set, "account" ) ) &&
( room = set_getstr( &ic->set, "room" ) ) &&
( acc = account_get( ic->irc->b, acc_s ) ) &&
acc->ic && acc->prpl->chat_join )
{
char *nick;
if( !( nick = set_getstr( &ic->set, "nick" ) ) )
nick = ic->irc->user->nick;
ic->flags |= IRC_CHANNEL_CHAT_PICKME;
acc->prpl->chat_join( acc->ic, room, nick, NULL, &ic->set );
ic->flags &= ~IRC_CHANNEL_CHAT_PICKME;
return FALSE;
}
else
{
irc_send_num( ic->irc, 403, "%s :Can't join channel, account offline?", ic->name );
return FALSE;
}
}
static gboolean bee_irc_channel_chat_part( irc_channel_t *ic, const char *msg )
{
struct groupchat *c = ic->data;
if( c && c->ic->acc->prpl->chat_leave )
c->ic->acc->prpl->chat_leave( c );
/* Remove references in both directions now. We don't need each other anymore. */
ic->data = NULL;
if( c )
c->ui_data = NULL;
return TRUE;
}
static gboolean bee_irc_channel_chat_topic( irc_channel_t *ic, const char *new )
{
struct groupchat *c = ic->data;
if( c == NULL )
return FALSE;
if( c->ic->acc->prpl->chat_topic == NULL )
irc_send_num( ic->irc, 482, "%s :IM network does not support channel topics", ic->name );
else
{
/* TODO: Need more const goodness here, sigh */
char *topic = g_strdup( new );
c->ic->acc->prpl->chat_topic( c, topic );
g_free( topic );
}
/* Whatever happened, the IM module should ack the topic change. */
return FALSE;
}
static gboolean bee_irc_channel_chat_invite( irc_channel_t *ic, irc_user_t *iu )
{
struct groupchat *c = ic->data;
bee_user_t *bu = iu->bu;
if( bu == NULL )
return FALSE;
if( c )
{
if( iu->bu->ic != c->ic )
irc_send_num( ic->irc, 482, "%s :Can't mix different IM networks in one groupchat", ic->name );
else if( c->ic->acc->prpl->chat_invite )
c->ic->acc->prpl->chat_invite( c, iu->bu->handle, NULL );
else
irc_send_num( ic->irc, 482, "%s :IM protocol does not support room invitations", ic->name );
}
else if( bu->ic->acc->prpl->chat_with &&
strcmp( set_getstr( &ic->set, "chat_type" ), "groupchat" ) == 0 )
{
ic->flags |= IRC_CHANNEL_CHAT_PICKME;
iu->bu->ic->acc->prpl->chat_with( bu->ic, bu->handle );
ic->flags &= ~IRC_CHANNEL_CHAT_PICKME;
}
else
{
irc_send_num( ic->irc, 482, "%s :IM protocol does not support room invitations", ic->name );
}
return TRUE;
}
static char *set_eval_room_account( set_t *set, char *value );
static char *set_eval_chat_type( set_t *set, char *value );
static gboolean bee_irc_channel_init( irc_channel_t *ic )
{
set_t *s;
set_add( &ic->set, "account", NULL, set_eval_room_account, ic );
set_add( &ic->set, "chat_type", "groupchat", set_eval_chat_type, ic );
s = set_add( &ic->set, "nick", NULL, NULL, ic );
s->flags |= SET_NULL_OK;
set_add( &ic->set, "room", NULL, NULL, ic );
set_add( &ic->set, "translate_to_nicks", "true", set_eval_bool, ic );
/* chat_type == groupchat */
ic->flags |= IRC_CHANNEL_TEMP;
return TRUE;
}
static char *set_eval_room_account( set_t *set, char *value )
{
struct irc_channel *ic = set->data;
account_t *acc, *oa;
if( !( acc = account_get( ic->irc->b, value ) ) )
return SET_INVALID;
else if( !acc->prpl->chat_join )
{
irc_rootmsg( ic->irc, "Named chatrooms not supported on that account." );
return SET_INVALID;
}
if( set->value && ( oa = account_get( ic->irc->b, set->value ) ) &&
oa->prpl->chat_free_settings )
oa->prpl->chat_free_settings( oa, &ic->set );
if( acc->prpl->chat_add_settings )
acc->prpl->chat_add_settings( acc, &ic->set );
return g_strdup( acc->tag );
}
static char *set_eval_chat_type( set_t *set, char *value )
{
struct irc_channel *ic = set->data;
if( strcmp( value, "groupchat" ) == 0 )
ic->flags |= IRC_CHANNEL_TEMP;
else if( strcmp( value, "room" ) == 0 )
ic->flags &= ~IRC_CHANNEL_TEMP;
else
return NULL;
return value;
}
static gboolean bee_irc_channel_free( irc_channel_t *ic )
{
struct groupchat *c = ic->data;
set_del( &ic->set, "account" );
set_del( &ic->set, "chat_type" );
set_del( &ic->set, "nick" );
set_del( &ic->set, "room" );
set_del( &ic->set, "translate_to_nicks" );
ic->flags &= ~IRC_CHANNEL_TEMP;
/* That one still points at this channel. Don't. */
if( c )
c->ui_data = NULL;
return TRUE;
}
const struct irc_channel_funcs irc_channel_im_chat_funcs = {
bee_irc_channel_chat_privmsg,
bee_irc_channel_chat_join,
bee_irc_channel_chat_part,
bee_irc_channel_chat_topic,
bee_irc_channel_chat_invite,
bee_irc_channel_init,
bee_irc_channel_free,
};
/* IM->IRC: File transfers */
static file_transfer_t *bee_irc_ft_in_start( bee_t *bee, bee_user_t *bu, const char *file_name, size_t file_size )
{
return dccs_send_start( bu->ic, (irc_user_t *) bu->ui_data, file_name, file_size );
}
static gboolean bee_irc_ft_out_start( struct im_connection *ic, file_transfer_t *ft )
{
return dccs_recv_start( ft );
}
static void bee_irc_ft_close( struct im_connection *ic, file_transfer_t *ft )
{
return dcc_close( ft );
}
static void bee_irc_ft_finished( struct im_connection *ic, file_transfer_t *file )
{
dcc_file_transfer_t *df = file->priv;
if( file->bytes_transferred >= file->file_size )
dcc_finish( file );
else
df->proto_finished = TRUE;
}
const struct bee_ui_funcs irc_ui_funcs = {
bee_irc_imc_connected,
bee_irc_imc_disconnected,
bee_irc_user_new,
bee_irc_user_free,
bee_irc_user_fullname,
bee_irc_user_nick_hint,
bee_irc_user_group,
bee_irc_user_status,
bee_irc_user_msg,
bee_irc_user_typing,
bee_irc_user_action_response,
bee_irc_chat_new,
bee_irc_chat_free,
bee_irc_chat_log,
bee_irc_chat_msg,
bee_irc_chat_add_user,
bee_irc_chat_remove_user,
bee_irc_chat_topic,
bee_irc_chat_name_hint,
bee_irc_chat_invite,
bee_irc_ft_in_start,
bee_irc_ft_out_start,
bee_irc_ft_close,
bee_irc_ft_finished,
};
|
