source: root_commands.c @ dd7b931

Last change on this file since dd7b931 was e31e5b8, checked in by Wilmer van der Gaast <wilmer@…>, at 2013-04-20T13:05:55Z

Merging "storage" branch which I wrote long ago. It separates generation of
XML-formatted user configs from disk I/O so we can try to start using other
mechanisms to store them (a REST API or something, for example).

  • Property mode set to 100644
File size: 37.3 KB
RevLine 
[b7d3cc34]1  /********************************************************************\
2  * BitlBee -- An IRC to other IM-networks gateway                     *
3  *                                                                    *
[0e788f5]4  * Copyright 2002-2013 Wilmer van der Gaast and others                *
[b7d3cc34]5  \********************************************************************/
6
7/* User manager (root) commands                                         */
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#define BITLBEE_CORE
27#include "commands.h"
28#include "bitlbee.h"
29#include "help.h"
[f1c2b21]30#include "ipc.h"
[b7d3cc34]31
[280c56a]32void root_command_string( irc_t *irc, char *command )
[7e563ed]33{
[24b8bbb]34        root_command( irc, split_command_parts( command ) );
[7e563ed]35}
36
[3b99524]37#define MIN_ARGS( x, y... )                                                    \
38        do                                                                     \
39        {                                                                      \
[07054a5]40                int blaat;                                                     \
41                for( blaat = 0; blaat <= x; blaat ++ )                         \
42                        if( cmd[blaat] == NULL )                               \
[3b99524]43                        {                                                      \
[e67e513]44                                irc_rootmsg( irc, "Not enough parameters given (need %d).", x ); \
[3b99524]45                                return y;                                      \
46                        }                                                      \
47        } while( 0 )
48
[f73b969]49void root_command( irc_t *irc, char *cmd[] )
[7e563ed]50{       
[6c56f42]51        int i, len;
[7e563ed]52       
53        if( !cmd[0] )
[f73b969]54                return;
[7e563ed]55       
[6c56f42]56        len = strlen( cmd[0] );
[8358691]57        for( i = 0; root_commands[i].command; i++ )
58                if( g_strncasecmp( root_commands[i].command, cmd[0], len ) == 0 )
[7e563ed]59                {
[8358691]60                        if( root_commands[i+1].command &&
61                            g_strncasecmp( root_commands[i+1].command, cmd[0], len ) == 0 )
[6c56f42]62                                /* Only match on the first letters if the match is unique. */
63                                break;
64                       
[8358691]65                        MIN_ARGS( root_commands[i].required_parameters );
[3b99524]66                       
[8358691]67                        root_commands[i].execute( irc, cmd );
[f73b969]68                        return;
[7e563ed]69                }
70       
[e67e513]71        irc_rootmsg( irc, "Unknown command: %s. Please use \x02help commands\x02 to get a list of available commands.", cmd[0] );
[7e563ed]72}
73
[f73b969]74static void cmd_help( irc_t *irc, char **cmd )
[b7d3cc34]75{
76        char param[80];
77        int i;
78        char *s;
79       
80        memset( param, 0, sizeof(param) );
81        for ( i = 1; (cmd[i] != NULL && ( strlen(param) < (sizeof(param)-1) ) ); i++ ) {
82                if ( i != 1 )   // prepend space except for the first parameter
83                        strcat(param, " ");
84                strncat( param, cmd[i], sizeof(param) - strlen(param) - 1 );
85        }
86
87        s = help_get( &(global.help), param );
88        if( !s ) s = help_get( &(global.help), "" );
89       
90        if( s )
91        {
[e67e513]92                irc_rootmsg( irc, "%s", s );
[b7d3cc34]93                g_free( s );
94        }
95        else
96        {
[e67e513]97                irc_rootmsg( irc, "Error opening helpfile." );
[b7d3cc34]98        }
99}
100
[90bbb0e]101static void cmd_account( irc_t *irc, char **cmd );
[180ab31]102static void bitlbee_whatsnew( irc_t *irc );
[90bbb0e]103
[f73b969]104static void cmd_identify( irc_t *irc, char **cmd )
[b7d3cc34]105{
[92cb8c4]106        storage_status_t status;
107        gboolean load = TRUE;
108        char *password = cmd[1];
[b7d3cc34]109       
[92cb8c4]110        if( irc->status & USTATUS_IDENTIFIED )
[e9cf291]111        {
[e67e513]112                irc_rootmsg( irc, "You're already logged in." );
[e9cf291]113                return;
114        }
115       
[060d066]116        if( cmd[1] == NULL )
117        {
118        }
119        else if( strncmp( cmd[1], "-no", 3 ) == 0 )
[92cb8c4]120        {
121                load = FALSE;
122                password = cmd[2];
[fda194f]123                if( password == NULL )
124                        irc->status |= OPER_HACK_IDENTIFY_NOLOAD;
[92cb8c4]125        }
126        else if( strncmp( cmd[1], "-force", 6 ) == 0 )
127        {
128                password = cmd[2];
[fda194f]129                if( password == NULL )
130                        irc->status |= OPER_HACK_IDENTIFY_FORCE;
[92cb8c4]131        }
132        else if( irc->b->accounts != NULL )
133        {
[e67e513]134                irc_rootmsg( irc,
[92cb8c4]135                             "You're trying to identify yourself, but already have "
136                             "at least one IM account set up. "
137                             "Use \x02identify -noload\x02 or \x02identify -force\x02 "
138                             "instead (see \x02help identify\x02)." );
139                return;
140        }
141       
142        if( password == NULL )
143        {
[e67e513]144                irc_rootmsg( irc, "About to identify, use /OPER to enter the password" );
[060d066]145                irc->status |= OPER_HACK_IDENTIFY;
146                return;
[92cb8c4]147        }
148       
149        if( load )
150                status = storage_load( irc, password );
151        else
152                status = storage_check_pass( irc->user->nick, password );
153       
[09adf08]154        switch (status) {
155        case STORAGE_INVALID_PASSWORD:
[e67e513]156                irc_rootmsg( irc, "Incorrect password" );
[09adf08]157                break;
158        case STORAGE_NO_SUCH_USER:
[e67e513]159                irc_rootmsg( irc, "The nick is (probably) not registered" );
[09adf08]160                break;
161        case STORAGE_OK:
[e67e513]162                irc_rootmsg( irc, "Password accepted%s",
[92cb8c4]163                             load ? ", settings and accounts loaded" : "" );
164                irc_setpass( irc, password );
[3183c21]165                irc->status |= USTATUS_IDENTIFIED;
[238f828]166                irc_umode_set( irc, "+R", 1 );
[6c2404e]167               
[180ab31]168                bitlbee_whatsnew( irc );
169               
[e92c4f4]170                /* The following code is a bit hairy now. With takeover
171                   support, we shouldn't immediately auto_connect in case
172                   we're going to offer taking over an existing session.
173                   Do it in 200ms since that should give the parent process
174                   enough time to come back to us. */
175                if( load )
[6c2404e]176                {
[e92c4f4]177                        irc_channel_auto_joins( irc, NULL );
[fe4f28f]178                        if( !set_getbool( &irc->default_channel->set, "auto_join" ) )
179                                irc_channel_del_user( irc->default_channel, irc->user,
180                                                      IRC_CDU_PART, "auto_join disabled "
181                                                      "for this channel." );
[e92c4f4]182                        if( set_getbool( &irc->b->set, "auto_connect" ) )
[6c2404e]183                                irc->login_source_id = b_timeout_add( 200,
184                                        cmd_identify_finish, irc );
185                }
[e92c4f4]186               
187                /* If ipc_child_identify() returns FALSE, it means we're
188                   already sure that there's no takeover target (only
189                   possible in 1-process daemon mode). Start auto_connect
190                   immediately. */
[6451d27]191                if( !ipc_child_identify( irc ) && load )
[6c2404e]192                        cmd_identify_finish( irc, 0, 0 );
193               
[09adf08]194                break;
[c121f89]195        case STORAGE_OTHER_ERROR:
[09adf08]196        default:
[e67e513]197                irc_rootmsg( irc, "Unknown error while loading configuration" );
[09adf08]198                break;
[b7d3cc34]199        }
200}
201
[6c2404e]202gboolean cmd_identify_finish( gpointer data, gint fd, b_input_condition cond )
203{
204        char *account_on[] = { "account", "on", NULL };
205        irc_t *irc = data;
206       
[6451d27]207        if( set_getbool( &irc->b->set, "auto_connect" ) )
208                cmd_account( irc, account_on );
[6c2404e]209       
[af9f2ca]210        b_event_remove( irc->login_source_id );
[f545372]211        irc->login_source_id = -1;
[6c2404e]212        return FALSE;
213}
214
[f73b969]215static void cmd_register( irc_t *irc, char **cmd )
[b7d3cc34]216{
[8d93b4a]217        char s[16];
218       
[b7d3cc34]219        if( global.conf->authmode == AUTHMODE_REGISTERED )
220        {
[e67e513]221                irc_rootmsg( irc, "This server does not allow registering new accounts" );
[f73b969]222                return;
[b7d3cc34]223        }
[060d066]224       
225        if( cmd[1] == NULL )
226        {
[e67e513]227                irc_rootmsg( irc, "About to register, use /OPER to enter the password" );
[060d066]228                irc->status |= OPER_HACK_REGISTER;
229                return;
230        }
[1ee6c18]231
[3183c21]232        switch( storage_save( irc, cmd[1], FALSE ) ) {
[a1f17d4]233                case STORAGE_ALREADY_EXISTS:
[e67e513]234                        irc_rootmsg( irc, "Nick is already registered" );
[a1f17d4]235                        break;
236                       
237                case STORAGE_OK:
[e67e513]238                        irc_rootmsg( irc, "Account successfully created" );
[3183c21]239                        irc_setpass( irc, cmd[1] );
[79e826a]240                        irc->status |= USTATUS_IDENTIFIED;
[238f828]241                        irc_umode_set( irc, "+R", 1 );
[8d93b4a]242                       
243                        /* Set this var now, or anyone who logs in to his/her
244                           newly created account for the first time gets the
245                           whatsnew story. */
246                        g_snprintf( s, sizeof( s ), "%d", BITLBEE_VERSION_CODE );
247                        set_setstr( &irc->b->set, "last_version", s );
[a1f17d4]248                        break;
249
250                default:
[e67e513]251                        irc_rootmsg( irc, "Error registering" );
[a1f17d4]252                        break;
[b7d3cc34]253        }
254}
255
[f73b969]256static void cmd_drop( irc_t *irc, char **cmd )
[b7d3cc34]257{
[a1f17d4]258        storage_status_t status;
259       
[1f92a58]260        status = storage_remove (irc->user->nick, cmd[1]);
[a1f17d4]261        switch (status) {
262        case STORAGE_NO_SUCH_USER:
[e67e513]263                irc_rootmsg( irc, "That account does not exist" );
[f73b969]264                break;
[a1f17d4]265        case STORAGE_INVALID_PASSWORD:
[e67e513]266                irc_rootmsg( irc, "Password invalid" );
[f73b969]267                break;
[a1f17d4]268        case STORAGE_OK:
[7cad7b4]269                irc_setpass( irc, NULL );
[79e826a]270                irc->status &= ~USTATUS_IDENTIFIED;
[238f828]271                irc_umode_set( irc, "-R", 1 );
[e67e513]272                irc_rootmsg( irc, "Account `%s' removed", irc->user->nick );
[f73b969]273                break;
[a1f17d4]274        default:
[e67e513]275                irc_rootmsg( irc, "Error: `%d'", status );
[f73b969]276                break;
[b7d3cc34]277        }
278}
[1f92a58]279
280static void cmd_save( irc_t *irc, char **cmd )
281{
282        if( ( irc->status & USTATUS_IDENTIFIED ) == 0 )
[aa88e50]283                irc_rootmsg( irc, "Please create an account first (see \x02help register\x02)" );
[1f92a58]284        else if( storage_save( irc, NULL, TRUE ) == STORAGE_OK )
[e67e513]285                irc_rootmsg( irc, "Configuration saved" );
[1f92a58]286        else
[e67e513]287                irc_rootmsg( irc, "Configuration could not be saved!" );
[1f92a58]288}
[b7d3cc34]289
[f536a99]290static void cmd_showset( irc_t *irc, set_t **head, char *key )
[f3579fd]291{
[09d4922]292        set_t *set;
[f536a99]293        char *val;
[f3579fd]294       
[f536a99]295        if( ( val = set_getstr( head, key ) ) )
[e67e513]296                irc_rootmsg( irc, "%s = `%s'", key, val );
[09d4922]297        else if( !( set = set_find( head, key ) ) )
[5613af7]298        {
[e67e513]299                irc_rootmsg( irc, "Setting `%s' does not exist.", key );
[5613af7]300                if( *head == irc->b->set )
[e67e513]301                        irc_rootmsg( irc, "It might be an account or channel setting. "
[5613af7]302                                     "See \x02help account set\x02 and \x02help channel set\x02." );
303        }
[09d4922]304        else if( set->flags & SET_PASSWORD )
[e67e513]305                irc_rootmsg( irc, "%s = `********' (hidden)", key );
[f3579fd]306        else
[e67e513]307                irc_rootmsg( irc, "%s is empty", key );
[f3579fd]308}
309
[e7bc722]310typedef set_t** (*cmd_set_findhead)( irc_t*, char* );
[c05eb5b]311typedef int (*cmd_set_checkflags)( irc_t*, set_t *set );
[e7bc722]312
[e907683]313static int cmd_set_real( irc_t *irc, char **cmd, set_t **head, cmd_set_checkflags checkflags )
[e7bc722]314{
[e907683]315        char *set_name = NULL, *value = NULL;
316        gboolean del = FALSE;
[e7bc722]317       
318        if( cmd[1] && g_strncasecmp( cmd[1], "-del", 4 ) == 0 )
[d4810df]319        {
320                MIN_ARGS( 2, 0 );
[e907683]321                set_name = cmd[2];
322                del = TRUE;
[d4810df]323        }
[e7bc722]324        else
325        {
[e907683]326                set_name = cmd[1];
327                value = cmd[2];
[e7bc722]328        }
329       
[e907683]330        if( set_name && ( value || del ) )
[e7bc722]331        {
332                set_t *s = set_find( head, set_name );
333                int st;
334               
[8a08d92]335                if( s && checkflags && checkflags( irc, s ) == 0 )
[e7bc722]336                        return 0;
337               
[e907683]338                if( del )
[e7bc722]339                        st = set_reset( head, set_name );
340                else
[e907683]341                        st = set_setstr( head, set_name, value );
[e7bc722]342               
[5613af7]343                if( set_getstr( head, set_name ) == NULL &&
344                    set_find( head, set_name ) )
[e7bc722]345                {
[e907683]346                        /* This happens when changing the passwd, for example.
347                           Showing these msgs instead gives slightly clearer
348                           feedback. */
[e7bc722]349                        if( st )
[e67e513]350                                irc_rootmsg( irc, "Setting changed successfully" );
[e7bc722]351                        else
[e67e513]352                                irc_rootmsg( irc, "Failed to change setting" );
[e7bc722]353                }
354                else
355                {
356                        cmd_showset( irc, head, set_name );
357                }
358        }
359        else if( set_name )
360        {
361                cmd_showset( irc, head, set_name );
362        }
363        else
364        {
365                set_t *s = *head;
366                while( s )
367                {
[06b5893]368                        if( set_isvisible( s ) )
[180ab31]369                                cmd_showset( irc, &s, s->key );
[e7bc722]370                        s = s->next;
371                }
372        }
373       
374        return 1;
375}
376
[c05eb5b]377static int cmd_account_set_checkflags( irc_t *irc, set_t *s )
378{
379        account_t *a = s->data;
380       
381        if( a->ic && s && s->flags & ACC_SET_OFFLINE_ONLY )
382        {
[e67e513]383                irc_rootmsg( irc, "This setting can only be changed when the account is %s-line", "off" );
[c05eb5b]384                return 0;
385        }
386        else if( !a->ic && s && s->flags & ACC_SET_ONLINE_ONLY )
387        {
[e67e513]388                irc_rootmsg( irc, "This setting can only be changed when the account is %s-line", "on" );
[c05eb5b]389                return 0;
390        }
391       
392        return 1;
393}
394
[f73b969]395static void cmd_account( irc_t *irc, char **cmd )
[b7d3cc34]396{
397        account_t *a;
[c7eb771]398        int len;
[b7d3cc34]399       
[3af70b0]400        if( global.conf->authmode == AUTHMODE_REGISTERED && !( irc->status & USTATUS_IDENTIFIED ) )
[b7d3cc34]401        {
[e67e513]402                irc_rootmsg( irc, "This server only accepts registered users" );
[f73b969]403                return;
[b7d3cc34]404        }
405       
[c7eb771]406        len = strlen( cmd[1] );
407       
408        if( len >= 1 && g_strncasecmp( cmd[1], "add", len ) == 0 )
[b7d3cc34]409        {
[7b23afd]410                struct prpl *prpl;
[b7d3cc34]411               
[9564e55]412                MIN_ARGS( 3 );
413               
414                if( cmd[4] == NULL )
[da60f28]415                {
[9564e55]416                        for( a = irc->b->accounts; a; a = a->next )
417                                if( strcmp( a->pass, PASSWORD_PENDING ) == 0 )
418                                {
[17f057d]419                                        irc_rootmsg( irc, "Enter password for account %s "
420                                                     "first (use /OPER)", a->tag );
[9564e55]421                                        return;
422                                }
[da60f28]423                       
424                        irc->status |= OPER_HACK_ACCOUNT_ADD;
425                }
[b7d3cc34]426               
[a9a7287]427                prpl = find_protocol( cmd[2] );
[b7d3cc34]428               
[7b23afd]429                if( prpl == NULL )
[b7d3cc34]430                {
[e67e513]431                        irc_rootmsg( irc, "Unknown protocol" );
[f73b969]432                        return;
[b7d3cc34]433                }
[593971d]434               
435                for( a = irc->b->accounts; a; a = a->next )
436                        if( a->prpl == prpl && prpl->handle_cmp( a->user, cmd[3] ) == 0 )
[e67e513]437                                irc_rootmsg( irc, "Warning: You already have an account with "
[593971d]438                                             "protocol `%s' and username `%s'. Are you accidentally "
439                                             "trying to add it twice?", prpl->name, cmd[3] );
440               
[9564e55]441                a = account_add( irc->b, prpl, cmd[3], cmd[4] ? cmd[4] : PASSWORD_PENDING );
[b7d3cc34]442                if( cmd[5] )
[30ce1ce]443                {
[e67e513]444                        irc_rootmsg( irc, "Warning: Passing a servername/other flags to `account add' "
[30ce1ce]445                                          "is now deprecated. Use `account set' instead." );
[5100caa]446                        set_setstr( &a->set, "server", cmd[5] );
[30ce1ce]447                }
[b7d3cc34]448               
[ce199b7]449                irc_rootmsg( irc, "Account successfully added with tag %s", a->tag );
450               
451                if( cmd[4] == NULL )
452                {
453                        set_t *oauth = set_find( &a->set, "oauth" );
454                        if( oauth && bool2int( set_value( oauth ) ) )
455                        {
456                                *a->pass = '\0';
457                                irc_rootmsg( irc, "No need to enter a password for this "
458                                             "account since it's using OAuth" );
459                        }
460                        else
461                        {
462                                irc_rootmsg( irc, "You can now use the /OPER command to "
463                                             "enter the password" );
464                                if( oauth )
[644b808]465                                        irc_rootmsg( irc, "Alternatively, enable OAuth if "
[ce199b7]466                                                     "the account supports it: account %s "
467                                                     "set oauth on", a->tag );
468                        }
469                }
[9564e55]470               
[e907683]471                return;
[b7d3cc34]472        }
[c7eb771]473        else if( len >= 1 && g_strncasecmp( cmd[1], "list", len ) == 0 )
[b7d3cc34]474        {
475                int i = 0;
476               
[e6e1f18]477                if( strchr( irc->umode, 'b' ) )
[e67e513]478                        irc_rootmsg( irc, "Account list:" );
[e6e1f18]479               
[d860a8d]480                for( a = irc->b->accounts; a; a = a->next )
[b7d3cc34]481                {
482                        char *con;
483                       
[0da65d5]484                        if( a->ic && ( a->ic->flags & OPT_LOGGED_IN ) )
[b7d3cc34]485                                con = " (connected)";
[0da65d5]486                        else if( a->ic )
[b7d3cc34]487                                con = " (connecting)";
488                        else if( a->reconnect )
489                                con = " (awaiting reconnect)";
490                        else
491                                con = "";
492                       
[e67e513]493                        irc_rootmsg( irc, "%2d (%s): %s, %s%s", i, a->tag, a->prpl->name, a->user, con );
[b7d3cc34]494                       
495                        i ++;
496                }
[e67e513]497                irc_rootmsg( irc, "End of account list" );
[e907683]498               
499                return;
500        }
501        else if( cmd[2] )
502        {
503                /* Try the following two only if cmd[2] == NULL */
[b7d3cc34]504        }
[c7eb771]505        else if( len >= 2 && g_strncasecmp( cmd[1], "on", len ) == 0 )
[b7d3cc34]506        {
[e907683]507                if ( irc->b->accounts )
[b7d3cc34]508                {
[e67e513]509                        irc_rootmsg( irc, "Trying to get all accounts connected..." );
[e907683]510               
511                        for( a = irc->b->accounts; a; a = a->next )
512                                if( !a->ic && a->auto_connect )
[9564e55]513                                {
514                                        if( strcmp( a->pass, PASSWORD_PENDING ) == 0 )
[17f057d]515                                                irc_rootmsg( irc, "Enter password for account %s "
516                                                             "first (use /OPER)", a->tag );
[9564e55]517                                        else
518                                                account_on( irc->b, a );
519                                }
[e907683]520                } 
[b7d3cc34]521                else
522                {
[e67e513]523                        irc_rootmsg( irc, "No accounts known. Use `account add' to add one." );
[b7d3cc34]524                }
[e907683]525               
526                return;
[b7d3cc34]527        }
[c7eb771]528        else if( len >= 2 && g_strncasecmp( cmd[1], "off", len ) == 0 )
[b7d3cc34]529        {
[e67e513]530                irc_rootmsg( irc, "Deactivating all active (re)connections..." );
[e907683]531               
532                for( a = irc->b->accounts; a; a = a->next )
[b7d3cc34]533                {
[0da65d5]534                        if( a->ic )
[d860a8d]535                                account_off( irc->b, a );
[b7d3cc34]536                        else if( a->reconnect )
537                                cancel_auto_reconnect( a );
[e907683]538                }
539               
540                return;
541        }
542       
543        MIN_ARGS( 2 );
[c7eb771]544        len = strlen( cmd[2] );
[e907683]545       
546        /* At least right now, don't accept on/off/set/del as account IDs even
547           if they're a proper match, since people not familiar with the new
548           syntax yet may get a confusing/nasty surprise. */
549        if( g_strcasecmp( cmd[1], "on" ) == 0 ||
550            g_strcasecmp( cmd[1], "off" ) == 0 ||
551            g_strcasecmp( cmd[1], "set" ) == 0 ||
552            g_strcasecmp( cmd[1], "del" ) == 0 ||
553            ( a = account_get( irc->b, cmd[1] ) ) == NULL )
554        {
[2c18fcd]555                irc_rootmsg( irc, "Could not find account `%s'.", cmd[1] );
[e907683]556               
557                return;
558        }
559       
[c7eb771]560        if( len >= 1 && g_strncasecmp( cmd[2], "del", len ) == 0 )
[e907683]561        {
562                if( a->ic )
563                {
[e67e513]564                        irc_rootmsg( irc, "Account is still logged in, can't delete" );
[b7d3cc34]565                }
566                else
567                {
[e907683]568                        account_del( irc->b, a );
[e67e513]569                        irc_rootmsg( irc, "Account deleted" );
[b7d3cc34]570                }
571        }
[c7eb771]572        else if( len >= 2 && g_strncasecmp( cmd[2], "on", len ) == 0 )
[5100caa]573        {
[e907683]574                if( a->ic )
[e67e513]575                        irc_rootmsg( irc, "Account already online" );
[9564e55]576                else if( strcmp( a->pass, PASSWORD_PENDING ) == 0 )
[17f057d]577                        irc_rootmsg( irc, "Enter password for account %s "
578                                     "first (use /OPER)", a->tag );
[e907683]579                else
580                        account_on( irc->b, a );
581        }
[c7eb771]582        else if( len >= 2 && g_strncasecmp( cmd[2], "off", len ) == 0 )
[e907683]583        {
584                if( a->ic )
585                {
586                        account_off( irc->b, a );
587                }
588                else if( a->reconnect )
589                {
590                        cancel_auto_reconnect( a );
[e67e513]591                        irc_rootmsg( irc, "Reconnect cancelled" );
[e907683]592                }
593                else
594                {
[e67e513]595                        irc_rootmsg( irc, "Account already offline" );
[e907683]596                }
597        }
[c7eb771]598        else if( len >= 1 && g_strncasecmp( cmd[2], "set", len ) == 0 )
[e907683]599        {
600                cmd_set_real( irc, cmd + 2, &a->set, cmd_account_set_checkflags );
[5100caa]601        }
[b7d3cc34]602        else
603        {
[e67e513]604                irc_rootmsg( irc, "Unknown command: %s [...] %s. Please use \x02help commands\x02 to get a list of available commands.", "account", cmd[2] );
[b7d3cc34]605        }
606}
607
[e907683]608static void cmd_channel( irc_t *irc, char **cmd )
[c133d4b8]609{
610        irc_channel_t *ic;
[c7eb771]611        int len;
612       
613        len = strlen( cmd[1] );
[c133d4b8]614       
[c7eb771]615        if( len >= 1 && g_strncasecmp( cmd[1], "list", len ) == 0 )
[36562b0]616        {
617                GSList *l;
618                int i = 0;
619               
620                if( strchr( irc->umode, 'b' ) )
[e67e513]621                        irc_rootmsg( irc, "Channel list:" );
[36562b0]622               
623                for( l = irc->channels; l; l = l->next )
624                {
625                        irc_channel_t *ic = l->data;
626                       
[e67e513]627                        irc_rootmsg( irc, "%2d. %s, %s channel%s", i, ic->name,
[36562b0]628                                     set_getstr( &ic->set, "type" ),
629                                     ic->flags & IRC_CHANNEL_JOINED ? " (joined)" : "" );
630                       
631                        i ++;
632                }
[e67e513]633                irc_rootmsg( irc, "End of channel list" );
[e907683]634               
635                return;
[36562b0]636        }
[e907683]637       
638        if( ( ic = irc_channel_get( irc, cmd[1] ) ) == NULL )
[a4d920b]639        {
[4f22a68c]640                /* If this doesn't match any channel, maybe this is the short
641                   syntax (only works when used inside a channel). */
[f7ca587]642                if( ( ic = irc->root->last_channel ) &&
643                    ( len = strlen( cmd[1] ) ) &&
644                    g_strncasecmp( cmd[1], "set", len ) == 0 )
[4f22a68c]645                        cmd_set_real( irc, cmd + 1, &ic->set, NULL );
646                else
[e67e513]647                        irc_rootmsg( irc, "Could not find channel `%s'", cmd[1] );
[4f22a68c]648               
[e907683]649                return;
650        }
651       
[4f22a68c]652        MIN_ARGS( 2 );
653        len = strlen( cmd[2] );
654       
[c7eb771]655        if( len >= 1 && g_strncasecmp( cmd[2], "set", len ) == 0 )
[e907683]656        {
657                cmd_set_real( irc, cmd + 2, &ic->set, NULL );
658        }
[c7eb771]659        else if( len >= 1 && g_strncasecmp( cmd[2], "del", len ) == 0 )
[e907683]660        {
661                if( !( ic->flags & IRC_CHANNEL_JOINED ) &&
[a4d920b]662                    ic != ic->irc->default_channel )
663                {
[e67e513]664                        irc_rootmsg( irc, "Channel %s deleted.", ic->name );
[a4d920b]665                        irc_channel_free( ic );
666                }
667                else
[e67e513]668                        irc_rootmsg( irc, "Couldn't remove channel (main channel %s or "
[a4d920b]669                                          "channels you're still in cannot be deleted).",
[5266354]670                                          irc->default_channel->name );
[a4d920b]671        }
[c133d4b8]672        else
673        {
[e67e513]674                irc_rootmsg( irc, "Unknown command: %s [...] %s. Please use \x02help commands\x02 to get a list of available commands.", "channel", cmd[1] );
[c133d4b8]675        }
676}
677
[f73b969]678static void cmd_add( irc_t *irc, char **cmd )
[b7d3cc34]679{
680        account_t *a;
[f0cb961]681        int add_on_server = 1;
[06eef80]682        char *handle = NULL, *s;
[f8de26f]683       
684        if( g_strcasecmp( cmd[1], "-tmp" ) == 0 )
685        {
[77fc000c]686                MIN_ARGS( 3 );
[f0cb961]687                add_on_server = 0;
[7adc657]688                cmd ++;
[f8de26f]689        }
[b7d3cc34]690       
[dbb0ce3]691        if( !( a = account_get( irc->b, cmd[1] ) ) )
[b7d3cc34]692        {
[e67e513]693                irc_rootmsg( irc, "Invalid account" );
[f73b969]694                return;
[b7d3cc34]695        }
[0da65d5]696        else if( !( a->ic && ( a->ic->flags & OPT_LOGGED_IN ) ) )
[b7d3cc34]697        {
[e67e513]698                irc_rootmsg( irc, "That account is not on-line" );
[f73b969]699                return;
[b7d3cc34]700        }
701       
702        if( cmd[3] )
703        {
704                if( !nick_ok( cmd[3] ) )
705                {
[e67e513]706                        irc_rootmsg( irc, "The requested nick `%s' is invalid", cmd[3] );
[f73b969]707                        return;
[b7d3cc34]708                }
[dbb0ce3]709                else if( irc_user_by_name( irc, cmd[3] ) )
[b7d3cc34]710                {
[e67e513]711                        irc_rootmsg( irc, "The requested nick `%s' already exists", cmd[3] );
[f73b969]712                        return;
[b7d3cc34]713                }
714                else
715                {
[b1f818b]716                        nick_set_raw( a, cmd[2], cmd[3] );
[b7d3cc34]717                }
718        }
[f8de26f]719       
[06eef80]720        if( ( a->flags & ACC_FLAG_HANDLE_DOMAINS ) && cmd[2][0] != '_' &&
721            ( !( s = strchr( cmd[2], '@' ) ) || s[1] == '\0' ) )
722        {
723                /* If there's no @ or it's the last char, append the user's
724                   domain name now. Exclude handles starting with a _ so
725                   adding _xmlconsole will keep working. */
726                if( s )
727                        *s = '\0';
728                if( ( s = strchr( a->user, '@' ) ) )
729                        cmd[2] = handle = g_strconcat( cmd[2], s, NULL );
730        }
731       
[f0cb961]732        if( add_on_server )
[f1d488e]733        {
734                irc_channel_t *ic;
735                char *s, *group = NULL;;
736               
[f7ca587]737                if( ( ic = irc->root->last_channel ) &&
[f1d488e]738                    ( s = set_getstr( &ic->set, "fill_by" ) ) &&
739                    strcmp( s, "group" ) == 0 &&
740                    ( group = set_getstr( &ic->set, "group" ) ) )
[e67e513]741                        irc_rootmsg( irc, "Adding `%s' to contact list (group %s)",
[f1d488e]742                                     cmd[2], group );
743                else
[e67e513]744                        irc_rootmsg( irc, "Adding `%s' to contact list", cmd[2] );
[f1d488e]745               
746                a->prpl->add_buddy( a->ic, cmd[2], group );
747        }
[7adc657]748        else
[f1d488e]749        {
750                bee_user_t *bu;
751                irc_user_t *iu;
752               
[dbb0ce3]753                /* Only for add -tmp. For regular adds, this callback will
754                   be called once the IM server confirms. */
[f1d488e]755                if( ( bu = bee_user_new( irc->b, a->ic, cmd[2], BEE_USER_LOCAL ) ) &&
756                    ( iu = bu->ui_data ) )
[e67e513]757                        irc_rootmsg( irc, "Temporarily assigned nickname `%s' "
[f1d488e]758                                     "to contact `%s'", iu->nick, cmd[2] );
759        }
[f0cb961]760       
[06eef80]761        g_free( handle );
[b7d3cc34]762}
763
[dbb0ce3]764static void cmd_remove( irc_t *irc, char **cmd )
765{
766        irc_user_t *iu;
767        bee_user_t *bu;
768        char *s;
769       
770        if( !( iu = irc_user_by_name( irc, cmd[1] ) ) || !( bu = iu->bu ) )
771        {
[e67e513]772                irc_rootmsg( irc, "Buddy `%s' not found", cmd[1] );
[dbb0ce3]773                return;
774        }
775        s = g_strdup( bu->handle );
776       
777        bu->ic->acc->prpl->remove_buddy( bu->ic, bu->handle, NULL );
[b1f818b]778        nick_del( bu );
[5e98ff0]779        if( g_slist_find( irc->users, iu ) )
780                bee_user_free( irc->b, bu );
[dbb0ce3]781       
[e67e513]782        irc_rootmsg( irc, "Buddy `%s' (nick %s) removed from contact list", s, cmd[1] );
[dbb0ce3]783        g_free( s );
784       
785        return;
786}
787
[f73b969]788static void cmd_info( irc_t *irc, char **cmd )
[b7d3cc34]789{
[0da65d5]790        struct im_connection *ic;
[b7d3cc34]791        account_t *a;
792       
793        if( !cmd[2] )
794        {
[aa44bdd]795                irc_user_t *iu = irc_user_by_name( irc, cmd[1] );
796                if( !iu || !iu->bu )
[b7d3cc34]797                {
[e67e513]798                        irc_rootmsg( irc, "Nick `%s' does not exist", cmd[1] );
[f73b969]799                        return;
[b7d3cc34]800                }
[aa44bdd]801                ic = iu->bu->ic;
802                cmd[2] = iu->bu->handle;
[b7d3cc34]803        }
[aa44bdd]804        else if( !( a = account_get( irc->b, cmd[1] ) ) )
[b7d3cc34]805        {
[e67e513]806                irc_rootmsg( irc, "Invalid account" );
[f73b969]807                return;
[b7d3cc34]808        }
[0da65d5]809        else if( !( ( ic = a->ic ) && ( a->ic->flags & OPT_LOGGED_IN ) ) )
[b7d3cc34]810        {
[e67e513]811                irc_rootmsg( irc, "That account is not on-line" );
[f73b969]812                return;
[b7d3cc34]813        }
814       
[0da65d5]815        if( !ic->acc->prpl->get_info )
[b7d3cc34]816        {
[e67e513]817                irc_rootmsg( irc, "Command `%s' not supported by this protocol", cmd[0] );
[b7d3cc34]818        }
[f73b969]819        else
820        {
[0da65d5]821                ic->acc->prpl->get_info( ic, cmd[2] );
[f73b969]822        }
[b7d3cc34]823}
824
[f73b969]825static void cmd_rename( irc_t *irc, char **cmd )
[b7d3cc34]826{
[9a9b520]827        irc_user_t *iu, *old;
[a429907]828        gboolean del = g_strcasecmp( cmd[1], "-del" ) == 0;
[b7d3cc34]829       
[a429907]830        iu = irc_user_by_name( irc, cmd[del ? 2 : 1] );
[57c96f7]831       
832        if( iu == NULL )
[0baed0d]833        {
[e67e513]834                irc_rootmsg( irc, "Nick `%s' does not exist", cmd[1] );
[0baed0d]835        }
[a429907]836        else if( del )
837        {
838                if( iu->bu )
839                        bee_irc_user_nick_reset( iu );
[e67e513]840                irc_rootmsg( irc, "Nickname reset to `%s'", iu->nick );
[a429907]841        }
[57c96f7]842        else if( iu == irc->user )
[b7d3cc34]843        {
[e67e513]844                irc_rootmsg( irc, "Use /nick to change your own nickname" );
[b7d3cc34]845        }
[f73b969]846        else if( !nick_ok( cmd[2] ) )
[b7d3cc34]847        {
[e67e513]848                irc_rootmsg( irc, "Nick `%s' is invalid", cmd[2] );
[b7d3cc34]849        }
[9a9b520]850        else if( ( old = irc_user_by_name( irc, cmd[2] ) ) && old != iu )
[b7d3cc34]851        {
[e67e513]852                irc_rootmsg( irc, "Nick `%s' already exists", cmd[2] );
[b7d3cc34]853        }
[f73b969]854        else
[b7d3cc34]855        {
[57c96f7]856                if( !irc_user_set_nick( iu, cmd[2] ) )
857                {
[e67e513]858                        irc_rootmsg( irc, "Error while changing nick" );
[57c96f7]859                        return;
860                }
861               
862                if( iu == irc->root )
[f73b969]863                {
[7125cb3]864                        /* If we're called internally (user did "set root_nick"),
865                           let's not go O(INF). :-) */
[1195cec]866                        if( strcmp( cmd[0], "set_rename" ) != 0 )
[57c96f7]867                                set_setstr( &irc->b->set, "root_nick", cmd[2] );
[f73b969]868                }
[57c96f7]869                else if( iu->bu )
[f73b969]870                {
[b1f818b]871                        nick_set( iu->bu, cmd[2] );
[f73b969]872                }
873               
[e67e513]874                irc_rootmsg( irc, "Nick successfully changed" );
[b7d3cc34]875        }
876}
877
[1195cec]878char *set_eval_root_nick( set_t *set, char *new_nick )
879{
880        irc_t *irc = set->data;
881       
[0a6e5d1]882        if( strcmp( irc->root->nick, new_nick ) != 0 )
[1195cec]883        {
[0a6e5d1]884                char *cmd[] = { "set_rename", irc->root->nick, new_nick, NULL };
[1195cec]885               
886                cmd_rename( irc, cmd );
887        }
888       
[0a6e5d1]889        return strcmp( irc->root->nick, new_nick ) == 0 ? new_nick : SET_INVALID;
[1195cec]890}
[0baed0d]891
[f73b969]892static void cmd_block( irc_t *irc, char **cmd )
[b7d3cc34]893{
[0da65d5]894        struct im_connection *ic;
[b7d3cc34]895        account_t *a;
896       
[2272cb3]897        if( !cmd[2] && ( a = account_get( irc->b, cmd[1] ) ) && a->ic )
[87b6a3e]898        {
899                char *format;
900                GSList *l;
901               
902                if( strchr( irc->umode, 'b' ) != NULL )
903                        format = "%s\t%s";
904                else
[57ef864]905                        format = "%-32.32s  %-16.16s";
[87b6a3e]906               
[e67e513]907                irc_rootmsg( irc, format, "Handle", "Nickname" );
[0da65d5]908                for( l = a->ic->deny; l; l = l->next )
[87b6a3e]909                {
[2272cb3]910                        bee_user_t *bu = bee_user_by_handle( irc->b, a->ic, l->data );
911                        irc_user_t *iu = bu ? bu->ui_data : NULL;
[e67e513]912                        irc_rootmsg( irc, format, l->data, iu ? iu->nick : "(none)" );
[87b6a3e]913                }
[e67e513]914                irc_rootmsg( irc, "End of list." );
[87b6a3e]915               
916                return;
917        }
918        else if( !cmd[2] )
[b7d3cc34]919        {
[2272cb3]920                irc_user_t *iu = irc_user_by_name( irc, cmd[1] );
921                if( !iu || !iu->bu )
[b7d3cc34]922                {
[e67e513]923                        irc_rootmsg( irc, "Nick `%s' does not exist", cmd[1] );
[f73b969]924                        return;
[b7d3cc34]925                }
[2272cb3]926                ic = iu->bu->ic;
927                cmd[2] = iu->bu->handle;
[b7d3cc34]928        }
[2272cb3]929        else if( !( a = account_get( irc->b, cmd[1] ) ) )
[b7d3cc34]930        {
[e67e513]931                irc_rootmsg( irc, "Invalid account" );
[f73b969]932                return;
[b7d3cc34]933        }
[0da65d5]934        else if( !( ( ic = a->ic ) && ( a->ic->flags & OPT_LOGGED_IN ) ) )
[b7d3cc34]935        {
[e67e513]936                irc_rootmsg( irc, "That account is not on-line" );
[f73b969]937                return;
[b7d3cc34]938        }
939       
[0da65d5]940        if( !ic->acc->prpl->add_deny || !ic->acc->prpl->rem_permit )
[b7d3cc34]941        {
[e67e513]942                irc_rootmsg( irc, "Command `%s' not supported by this protocol", cmd[0] );
[b7d3cc34]943        }
944        else
945        {
[84b045d]946                imc_rem_allow( ic, cmd[2] );
947                imc_add_block( ic, cmd[2] );
[e67e513]948                irc_rootmsg( irc, "Buddy `%s' moved from allow- to block-list", cmd[2] );
[b7d3cc34]949        }
950}
951
[f73b969]952static void cmd_allow( irc_t *irc, char **cmd )
[b7d3cc34]953{
[0da65d5]954        struct im_connection *ic;
[b7d3cc34]955        account_t *a;
956       
[2272cb3]957        if( !cmd[2] && ( a = account_get( irc->b, cmd[1] ) ) && a->ic )
[87b6a3e]958        {
959                char *format;
960                GSList *l;
961               
962                if( strchr( irc->umode, 'b' ) != NULL )
963                        format = "%s\t%s";
964                else
[57ef864]965                        format = "%-32.32s  %-16.16s";
[87b6a3e]966               
[e67e513]967                irc_rootmsg( irc, format, "Handle", "Nickname" );
[0da65d5]968                for( l = a->ic->permit; l; l = l->next )
[87b6a3e]969                {
[2272cb3]970                        bee_user_t *bu = bee_user_by_handle( irc->b, a->ic, l->data );
971                        irc_user_t *iu = bu ? bu->ui_data : NULL;
[e67e513]972                        irc_rootmsg( irc, format, l->data, iu ? iu->nick : "(none)" );
[87b6a3e]973                }
[e67e513]974                irc_rootmsg( irc, "End of list." );
[87b6a3e]975               
976                return;
977        }
978        else if( !cmd[2] )
[b7d3cc34]979        {
[2272cb3]980                irc_user_t *iu = irc_user_by_name( irc, cmd[1] );
981                if( !iu || !iu->bu )
[b7d3cc34]982                {
[e67e513]983                        irc_rootmsg( irc, "Nick `%s' does not exist", cmd[1] );
[f73b969]984                        return;
[b7d3cc34]985                }
[2272cb3]986                ic = iu->bu->ic;
987                cmd[2] = iu->bu->handle;
[b7d3cc34]988        }
[2272cb3]989        else if( !( a = account_get( irc->b, cmd[1] ) ) )
[b7d3cc34]990        {
[e67e513]991                irc_rootmsg( irc, "Invalid account" );
[f73b969]992                return;
[b7d3cc34]993        }
[0da65d5]994        else if( !( ( ic = a->ic ) && ( a->ic->flags & OPT_LOGGED_IN ) ) )
[b7d3cc34]995        {
[e67e513]996                irc_rootmsg( irc, "That account is not on-line" );
[f73b969]997                return;
[b7d3cc34]998        }
999       
[0da65d5]1000        if( !ic->acc->prpl->rem_deny || !ic->acc->prpl->add_permit )
[b7d3cc34]1001        {
[e67e513]1002                irc_rootmsg( irc, "Command `%s' not supported by this protocol", cmd[0] );
[b7d3cc34]1003        }
1004        else
1005        {
[84b045d]1006                imc_rem_block( ic, cmd[2] );
1007                imc_add_allow( ic, cmd[2] );
[b7d3cc34]1008               
[e67e513]1009                irc_rootmsg( irc, "Buddy `%s' moved from block- to allow-list", cmd[2] );
[b7d3cc34]1010        }
1011}
1012
[f73b969]1013static void cmd_yesno( irc_t *irc, char **cmd )
[b7d3cc34]1014{
1015        query_t *q = NULL;
1016        int numq = 0;
1017       
1018        if( irc->queries == NULL )
1019        {
[65a4a64]1020                /* Alright, alright, let's add a tiny easter egg here. */
1021                static irc_t *last_irc = NULL;
1022                static time_t last_time = 0;
1023                static int times = 0;
1024                static const char *msg[] = {
1025                        "Oh yeah, that's right.",
1026                        "Alright, alright. Now go back to work.",
1027                        "Buuuuuuuuuuuuuuuurp... Excuse me!",
1028                        "Yes?",
1029                        "No?",
1030                };
1031               
1032                if( last_irc == irc && time( NULL ) - last_time < 15 )
1033                {
1034                        if( ( ++times >= 3 ) )
1035                        {
[e67e513]1036                                irc_rootmsg( irc, "%s", msg[rand()%(sizeof(msg)/sizeof(char*))] );
[65a4a64]1037                                last_irc = NULL;
1038                                times = 0;
1039                                return;
1040                        }
1041                }
1042                else
1043                {
1044                        last_time = time( NULL );
1045                        last_irc = irc;
1046                        times = 0;
1047                }
1048               
[e67e513]1049                irc_rootmsg( irc, "Did I ask you something?" );
[f73b969]1050                return;
[b7d3cc34]1051        }
1052       
1053        /* If there's an argument, the user seems to want to answer another question than the
1054           first/last (depending on the query_order setting) one. */
1055        if( cmd[1] )
1056        {
1057                if( sscanf( cmd[1], "%d", &numq ) != 1 )
1058                {
[e67e513]1059                        irc_rootmsg( irc, "Invalid query number" );
[f73b969]1060                        return;
[b7d3cc34]1061                }
1062               
1063                for( q = irc->queries; q; q = q->next, numq -- )
1064                        if( numq == 0 )
1065                                break;
1066               
1067                if( !q )
1068                {
[e67e513]1069                        irc_rootmsg( irc, "Uhm, I never asked you something like that..." );
[f73b969]1070                        return;
[b7d3cc34]1071                }
1072        }
1073       
1074        if( g_strcasecmp( cmd[0], "yes" ) == 0 )
1075                query_answer( irc, q, 1 );
1076        else if( g_strcasecmp( cmd[0], "no" ) == 0 )
1077                query_answer( irc, q, 0 );
1078}
1079
[f73b969]1080static void cmd_set( irc_t *irc, char **cmd )
[b7d3cc34]1081{
[e907683]1082        cmd_set_real( irc, cmd, &irc->b->set, NULL );
[b7d3cc34]1083}
1084
[f73b969]1085static void cmd_blist( irc_t *irc, char **cmd )
[b7d3cc34]1086{
1087        int online = 0, away = 0, offline = 0;
[4c3519a]1088        GSList *l;
[aefa533e]1089        char s[256];
1090        char *format;
[b7d3cc34]1091        int n_online = 0, n_away = 0, n_offline = 0;
1092       
1093        if( cmd[1] && g_strcasecmp( cmd[1], "all" ) == 0 )
1094                online = offline = away = 1;
1095        else if( cmd[1] && g_strcasecmp( cmd[1], "offline" ) == 0 )
1096                offline = 1;
1097        else if( cmd[1] && g_strcasecmp( cmd[1], "away" ) == 0 )
1098                away = 1;
1099        else if( cmd[1] && g_strcasecmp( cmd[1], "online" ) == 0 )
1100                online = 1;
1101        else
[449a51d]1102                online = away = 1;
[b7d3cc34]1103       
[aefa533e]1104        if( strchr( irc->umode, 'b' ) != NULL )
1105                format = "%s\t%s\t%s";
1106        else
1107                format = "%-16.16s  %-40.40s  %s";
1108       
[e67e513]1109        irc_rootmsg( irc, format, "Nick", "Handle/Account", "Status" );
[b7d3cc34]1110       
[acd7959]1111        if( irc->root->last_channel &&
1112            strcmp( set_getstr( &irc->root->last_channel->set, "type" ), "control" ) != 0 )
[ac2717b]1113                irc->root->last_channel = NULL;
1114       
[4c3519a]1115        for( l = irc->users; l; l = l->next )
[b7d3cc34]1116        {
[4c3519a]1117                irc_user_t *iu = l->data;
1118                bee_user_t *bu = iu->bu;
1119               
[ac2717b]1120                if( !bu || ( irc->root->last_channel && !irc_channel_wants_user( irc->root->last_channel, iu ) ) ||
1121                    ( bu->flags & ( BEE_USER_ONLINE | BEE_USER_AWAY ) ) != BEE_USER_ONLINE )
[4c3519a]1122                        continue;
1123               
[aefa533e]1124                if( online == 1 )
1125                {
[449a51d]1126                        char st[256] = "Online";
1127                       
[4c3519a]1128                        if( bu->status_msg )
1129                                g_snprintf( st, sizeof( st ) - 1, "Online (%s)", bu->status_msg );
[449a51d]1130                       
[17f057d]1131                        g_snprintf( s, sizeof( s ) - 1, "%s %s", bu->handle, bu->ic->acc->tag );
[e67e513]1132                        irc_rootmsg( irc, format, iu->nick, s, st );
[aefa533e]1133                }
1134               
[b7d3cc34]1135                n_online ++;
1136        }
1137
[4c3519a]1138        for( l = irc->users; l; l = l->next )
[b7d3cc34]1139        {
[4c3519a]1140                irc_user_t *iu = l->data;
1141                bee_user_t *bu = iu->bu;
1142               
[ac2717b]1143                if( !bu || ( irc->root->last_channel && !irc_channel_wants_user( irc->root->last_channel, iu ) ) ||
1144                    !( bu->flags & BEE_USER_ONLINE ) || !( bu->flags & BEE_USER_AWAY ) )
[4c3519a]1145                        continue;
1146               
[aefa533e]1147                if( away == 1 )
1148                {
[17f057d]1149                        g_snprintf( s, sizeof( s ) - 1, "%s %s", bu->handle, bu->ic->acc->tag );
[e67e513]1150                        irc_rootmsg( irc, format, iu->nick, s, irc_user_get_away( iu ) );
[aefa533e]1151                }
[b7d3cc34]1152                n_away ++;
1153        }
1154       
[4c3519a]1155        for( l = irc->users; l; l = l->next )
[b7d3cc34]1156        {
[4c3519a]1157                irc_user_t *iu = l->data;
1158                bee_user_t *bu = iu->bu;
1159               
[ac2717b]1160                if( !bu || ( irc->root->last_channel && !irc_channel_wants_user( irc->root->last_channel, iu ) ) ||
1161                    bu->flags & BEE_USER_ONLINE )
[4c3519a]1162                        continue;
1163               
[aefa533e]1164                if( offline == 1 )
1165                {
[17f057d]1166                        g_snprintf( s, sizeof( s ) - 1, "%s %s", bu->handle, bu->ic->acc->tag );
[e67e513]1167                        irc_rootmsg( irc, format, iu->nick, s, "Offline" );
[aefa533e]1168                }
[b7d3cc34]1169                n_offline ++;
1170        }
1171       
[e67e513]1172        irc_rootmsg( irc, "%d buddies (%d available, %d away, %d offline)", n_online + n_away + n_offline, n_online, n_away, n_offline );
[b7d3cc34]1173}
1174
[f73b969]1175static void cmd_qlist( irc_t *irc, char **cmd )
[b7d3cc34]1176{
1177        query_t *q = irc->queries;
1178        int num;
1179       
1180        if( !q )
1181        {
[e67e513]1182                irc_rootmsg( irc, "There are no pending questions." );
[f73b969]1183                return;
[b7d3cc34]1184        }
1185       
[e67e513]1186        irc_rootmsg( irc, "Pending queries:" );
[b7d3cc34]1187       
1188        for( num = 0; q; q = q->next, num ++ )
[0da65d5]1189                if( q->ic ) /* Not necessary yet, but it might come later */
[17f057d]1190                        irc_rootmsg( irc, "%d, %s: %s", num, q->ic->acc->tag, q->question );
[5c09a59]1191                else
[e67e513]1192                        irc_rootmsg( irc, "%d, BitlBee: %s", num, q->question );
[b7d3cc34]1193}
1194
[a9a7287]1195static void cmd_chat( irc_t *irc, char **cmd )
1196{
1197        account_t *acc;
1198       
1199        if( g_strcasecmp( cmd[1], "add" ) == 0 )
1200        {
[07054a5]1201                char *channel, *s;
[7b71feb]1202                struct irc_channel *ic;
[07054a5]1203               
1204                MIN_ARGS( 3 );
[a9a7287]1205               
[7b71feb]1206                if( !( acc = account_get( irc->b, cmd[2] ) ) )
[a9a7287]1207                {
[e67e513]1208                        irc_rootmsg( irc, "Invalid account" );
[a9a7287]1209                        return;
1210                }
[5a75d15]1211                else if( !acc->prpl->chat_join )
1212                {
[e67e513]1213                        irc_rootmsg( irc, "Named chatrooms not supported on that account." );
[5a75d15]1214                        return;
1215                }
[a9a7287]1216               
[07054a5]1217                if( cmd[4] == NULL )
1218                {
1219                        channel = g_strdup( cmd[3] );
1220                        if( ( s = strchr( channel, '@' ) ) )
1221                                *s = 0;
1222                }
1223                else
1224                {
1225                        channel = g_strdup( cmd[4] );
1226                }
1227               
1228                if( strchr( CTYPES, channel[0] ) == NULL )
1229                {
[7b71feb]1230                        s = g_strdup_printf( "#%s", channel );
[07054a5]1231                        g_free( channel );
1232                        channel = s;
[134a02c]1233                       
1234                        irc_channel_name_strip( channel );
[07054a5]1235                }
1236               
[5a75d15]1237                if( ( ic = irc_channel_new( irc, channel ) ) &&
[547ea68]1238                    set_setstr( &ic->set, "type", "chat" ) &&
[5a75d15]1239                    set_setstr( &ic->set, "chat_type", "room" ) &&
1240                    set_setstr( &ic->set, "account", cmd[2] ) &&
1241                    set_setstr( &ic->set, "room", cmd[3] ) )
1242                {
[e67e513]1243                        irc_rootmsg( irc, "Chatroom successfully added." );
[5a75d15]1244                }
1245                else
[a9a7287]1246                {
[5a75d15]1247                        if( ic )
1248                                irc_channel_free( ic );
[a9a7287]1249                       
[e67e513]1250                        irc_rootmsg( irc, "Could not add chatroom." );
[d995c9b]1251                }
[d7db346]1252                g_free( channel );
[d995c9b]1253        }
[39f93f0]1254        else if( g_strcasecmp( cmd[1], "with" ) == 0 )
1255        {
[c1a8a16]1256                irc_user_t *iu;
[3b99524]1257               
1258                MIN_ARGS( 2 );
[39f93f0]1259               
[c1a8a16]1260                if( ( iu = irc_user_by_name( irc, cmd[2] ) ) &&
1261                    iu->bu && iu->bu->ic->acc->prpl->chat_with )
[39f93f0]1262                {
[c1a8a16]1263                        if( !iu->bu->ic->acc->prpl->chat_with( iu->bu->ic, iu->bu->handle ) )
[39f93f0]1264                        {
[e67e513]1265                                irc_rootmsg( irc, "(Possible) failure while trying to open "
[c1a8a16]1266                                                  "a groupchat with %s.", iu->nick );
[39f93f0]1267                        }
1268                }
1269                else
1270                {
[e67e513]1271                        irc_rootmsg( irc, "Can't open a groupchat with %s.", cmd[2] );
[39f93f0]1272                }
1273        }
[7cd2e8a]1274        else if( g_strcasecmp( cmd[1], "list" ) == 0 ||
1275                 g_strcasecmp( cmd[1], "set" ) == 0 ||
1276                 g_strcasecmp( cmd[1], "del" ) == 0 )
1277        {
[e67e513]1278                irc_rootmsg( irc, "Warning: The \002chat\002 command was mostly replaced with the \002channel\002 command." );
[7cd2e8a]1279                cmd_channel( irc, cmd );
1280        }
[a9a7287]1281        else
1282        {
[e67e513]1283                irc_rootmsg( irc, "Unknown command: %s %s. Please use \x02help commands\x02 to get a list of available commands.", "chat", cmd[1] );
[a9a7287]1284        }
[fa29d093]1285}
1286
[f1d488e]1287static void cmd_group( irc_t *irc, char **cmd )
1288{
1289        GSList *l;
1290        int len;
1291       
1292        len = strlen( cmd[1] );
1293        if( g_strncasecmp( cmd[1], "list", len ) == 0 )
1294        {
1295                int n = 0;
1296               
1297                if( strchr( irc->umode, 'b' ) )
[e67e513]1298                        irc_rootmsg( irc, "Group list:" );
[f1d488e]1299               
1300                for( l = irc->b->groups; l; l = l->next )
1301                {
1302                        bee_group_t *bg = l->data;
[e67e513]1303                        irc_rootmsg( irc, "%d. %s", n ++, bg->name );
[f1d488e]1304                }
[e67e513]1305                irc_rootmsg( irc, "End of group list" );
[f1d488e]1306        }
[c2cc24c]1307        else if( g_strncasecmp(cmd[1], "info", len ) == 0 )
1308        {
[e4f5ca8]1309                bee_group_t *bg;
[c2cc24c]1310                int n = 0;
1311
1312                MIN_ARGS(2);
[e4f5ca8]1313                bg = bee_group_by_name( irc->b, cmd[2], FALSE );
[c2cc24c]1314
1315                if( bg )
1316                {
1317                        if( strchr(irc->umode, 'b') )
1318                                irc_rootmsg( irc, "Members of %s:", cmd[2] );
1319                        for( l = irc->b->users; l; l = l->next )
1320                        {
1321                                bee_user_t *bu = l->data;
1322                                if( bu->group == bg )
1323                                        irc_rootmsg( irc, "%d. %s", n ++, bu->nick ? : bu->handle );
1324                        }
1325                        irc_rootmsg( irc, "End of member list" );
1326                }
1327                else
1328                        irc_rootmsg( irc, "Unknown group: %s. Please use \x02group list\x02 to get a list of available groups.", cmd[2] );
1329        }
[f1d488e]1330        else
1331        {
[e67e513]1332                irc_rootmsg( irc, "Unknown command: %s %s. Please use \x02help commands\x02 to get a list of available commands.", "group", cmd[1] );
[f1d488e]1333        }
1334}
1335
[b8a491d]1336static void cmd_transfer( irc_t *irc, char **cmd )
[2c2df7d]1337{
1338        GSList *files = irc->file_transfers;
1339        enum { LIST, REJECT, CANCEL };
1340        int subcmd = LIST;
1341        int fid;
1342
1343        if( !files )
1344        {
[e67e513]1345                irc_rootmsg( irc, "No pending transfers" );
[2c2df7d]1346                return;
1347        }
1348
[b8a491d]1349        if( cmd[1] && ( strcmp( cmd[1], "reject" ) == 0 ) )
[2c2df7d]1350        {
1351                subcmd = REJECT;
1352        }
[b8a491d]1353        else if( cmd[1] && ( strcmp( cmd[1], "cancel" ) == 0 ) && 
1354                 cmd[2] && ( sscanf( cmd[2], "%d", &fid ) == 1 ) )
[2c2df7d]1355        {
1356                subcmd = CANCEL;
1357        }
1358
1359        for( ; files; files = g_slist_next( files ) )
1360        {
1361                file_transfer_t *file = files->data;
1362               
1363                switch( subcmd ) {
1364                case LIST:
1365                        if ( file->status == FT_STATUS_LISTENING )
[e67e513]1366                                irc_rootmsg( irc, 
[2c2df7d]1367                                        "Pending file(id %d): %s (Listening...)", file->local_id, file->file_name);
1368                        else 
1369                        {
1370                                int kb_per_s = 0;
[44961cb]1371                                time_t diff = time( NULL ) - file->started ? : 1;
[2c2df7d]1372                                if ( ( file->started > 0 ) && ( file->bytes_transferred > 0 ) )
1373                                        kb_per_s = file->bytes_transferred / 1024 / diff;
1374                                       
[e67e513]1375                                irc_rootmsg( irc, 
[2c2df7d]1376                                        "Pending file(id %d): %s (%10zd/%zd kb, %d kb/s)", file->local_id, file->file_name, 
1377                                        file->bytes_transferred/1024, file->file_size/1024, kb_per_s);
1378                        }
1379                        break;
1380                case REJECT:
1381                        if( file->status == FT_STATUS_LISTENING )
1382                        {
[e67e513]1383                                irc_rootmsg( irc, "Rejecting file transfer for %s", file->file_name );
[9d4352c]1384                                imcb_file_canceled( file->ic, file, "Denied by user" );
[2c2df7d]1385                        }
1386                        break;
1387                case CANCEL:
1388                        if( file->local_id == fid )
1389                        {
[e67e513]1390                                irc_rootmsg( irc, "Canceling file transfer for %s", file->file_name );
[9d4352c]1391                                imcb_file_canceled( file->ic, file, "Canceled by user" );
[2c2df7d]1392                        }
1393                        break;
1394                }
1395        }
1396}
1397
[3cd4016]1398static void cmd_nick( irc_t *irc, char **cmd )
1399{
[e67e513]1400        irc_rootmsg( irc, "This command is deprecated. Try: account %s set display_name", cmd[1] );
[3cd4016]1401}
1402
[180ab31]1403/* Maybe this should be a stand-alone command as well? */
1404static void bitlbee_whatsnew( irc_t *irc )
1405{
1406        int last = set_getint( &irc->b->set, "last_version" );
[674a01d]1407        char s[16], *msg;
[180ab31]1408       
1409        if( last >= BITLBEE_VERSION_CODE )
1410                return;
1411       
[674a01d]1412        msg = help_get_whatsnew( &(global.help), last );
[180ab31]1413       
[674a01d]1414        if( msg )
[e67e513]1415                irc_rootmsg( irc, "%s: This seems to be your first time using this "
[180ab31]1416                                  "this version of BitlBee. Here's a list of new "
1417                                  "features you may like to know about:\n\n%s\n",
[674a01d]1418                                  irc->user->nick, msg );
1419       
1420        g_free( msg );
[180ab31]1421       
1422        g_snprintf( s, sizeof( s ), "%d", BITLBEE_VERSION_CODE );
1423        set_setstr( &irc->b->set, "last_version", s );
1424}
1425
[6c56f42]1426/* IMPORTANT: Keep this list sorted! The short command logic needs that. */
[8358691]1427command_t root_commands[] = {
[d860a8d]1428        { "account",        1, cmd_account,        0 },
[6c56f42]1429        { "add",            2, cmd_add,            0 },
[2272cb3]1430        { "allow",          1, cmd_allow,          0 },
[4c3519a]1431        { "blist",          0, cmd_blist,          0 },
[2272cb3]1432        { "block",          1, cmd_block,          0 },
[c133d4b8]1433        { "channel",        1, cmd_channel,        0 },
1434        { "chat",           1, cmd_chat,           0 },
[6c56f42]1435        { "drop",           1, cmd_drop,           0 },
[9d4352c]1436        { "ft",             0, cmd_transfer,       0 },
[f1d488e]1437        { "group",          1, cmd_group,          0 },
[6c56f42]1438        { "help",           0, cmd_help,           0 }, 
[060d066]1439        { "identify",       0, cmd_identify,       0 },
[aa44bdd]1440        { "info",           1, cmd_info,           0 },
[3cd4016]1441        { "nick",           1, cmd_nick,           0 },
[6c56f42]1442        { "no",             0, cmd_yesno,          0 },
[9d4352c]1443        { "qlist",          0, cmd_qlist,          0 },
[060d066]1444        { "register",       0, cmd_register,       0 },
[dbb0ce3]1445        { "remove",         1, cmd_remove,         0 },
[0298d11]1446        { "rename",         2, cmd_rename,         0 },
[6c56f42]1447        { "save",           0, cmd_save,           0 },
[0298d11]1448        { "set",            0, cmd_set,            0 },
[9d4352c]1449        { "transfer",       0, cmd_transfer,       0 },
[0298d11]1450        { "yes",            0, cmd_yesno,          0 },
[8358691]1451        /* Not expecting too many plugins adding root commands so just make a
1452           dumb array with some empty entried at the end. */
1453        { NULL },
1454        { NULL },
1455        { NULL },
1456        { NULL },
1457        { NULL },
1458        { NULL },
1459        { NULL },
1460        { NULL },
1461        { NULL },
[0298d11]1462};
[8358691]1463static const int num_root_commands = sizeof( root_commands ) / sizeof( command_t );
1464
1465gboolean root_command_add( const char *command, int params, void (*func)(irc_t *, char **args), int flags )
1466{
1467        int i;
1468       
1469        if( root_commands[num_root_commands-2].command )
1470                /* Planning fail! List is full. */
1471                return FALSE;
1472       
1473        for( i = 0; root_commands[i].command; i++ )
1474        {
1475                if( g_strcasecmp( root_commands[i].command, command ) == 0 )
1476                        return FALSE;
1477                else if( g_strcasecmp( root_commands[i].command, command ) > 0 )
1478                        break;
1479        }
1480        memmove( root_commands + i + 1, root_commands + i,
1481                 sizeof( command_t ) * ( num_root_commands - i - 1 ) );
1482       
1483        root_commands[i].command = g_strdup( command );
1484        root_commands[i].required_parameters = params;
1485        root_commands[i].execute = func;
1486        root_commands[i].flags = flags;
1487       
1488        return TRUE;
1489}
Note: See TracBrowser for help on using the repository browser.