static void cmd_drop(irc_t *irc, char **cmd)
{
storage_status_t status;
status = auth_check_pass(irc, irc->user->nick, cmd[1]);
if (status == STORAGE_OK) {
status = storage_remove(irc->user->nick);
}
switch (status) {
case STORAGE_NO_SUCH_USER:
irc_rootmsg(irc, "That account does not exist");
break;
case STORAGE_INVALID_PASSWORD:
irc_rootmsg(irc, "Password invalid");
break;
case STORAGE_OK:
irc_setpass(irc, NULL);
irc->status &= ~USTATUS_IDENTIFIED;
irc_umode_set(irc, "-R", 1);
irc_rootmsg(irc, "Account `%s' removed", irc->user->nick);
break;
default:
irc_rootmsg(irc, "Error: `%d'", status);
break;
}
}
static void irc_cmd_mode( irc_t *irc, char **cmd )
{
if( irc_channel_name_ok( cmd[1] ) )
{
irc_channel_t *ic;
if( ( ic = irc_channel_by_name( irc, cmd[1] ) ) == NULL )
irc_send_num( irc, 403, "%s :No such channel", cmd[1] );
else if( cmd[2] )
{
if( *cmd[2] == '+' || *cmd[2] == '-' )
irc_send_num( irc, 477, "%s :Can't change channel modes", cmd[1] );
else if( *cmd[2] == 'b' )
irc_send_num( irc, 368, "%s :No bans possible", cmd[1] );
}
else
irc_send_num( irc, 324, "%s +%s", cmd[1], ic->mode );
}
else
{
if( nick_cmp( cmd[1], irc->user->nick ) == 0 )
{
if( cmd[2] )
irc_umode_set( irc, cmd[2], 0 );
else
irc_send_num( irc, 221, "+%s", irc->umode );
}
else
irc_send_num( irc, 502, ":Don't touch their modes" );
}
}
static void ipc_child_cmd_takeover_yes( void *data )
{
irc_t *irc = data, *old = NULL;
char *to_auth[] = { "TAKEOVER", "AUTH", irc->user->nick, irc->password, NULL };
/* Master->New connection */
ipc_to_master_str( "TAKEOVER AUTH %s :%s\r\n",
irc->user->nick, irc->password );
if( global.conf->runmode == RUNMODE_DAEMON )
{
GSList *l;
for( l = irc_connection_list; l; l = l->next )
{
old = l->data;
if( irc != old &&
irc->user->nick && old->user->nick &&
irc->password && old->password &&
strcmp( irc->user->nick, old->user->nick ) == 0 &&
strcmp( irc->password, old->password ) == 0 )
break;
}
if( l == NULL )
{
to_auth[1] = "FAIL";
ipc_child_cmd_takeover( irc, to_auth );
return;
}
}
/* Drop credentials, we'll shut down soon and shouldn't overwrite
any settings. */
irc_rootmsg( irc, "Trying to take over existing session" );
irc_desync( irc );
if( old )
{
ipc_child_recv_fd = dup( irc->fd );
ipc_child_cmd_takeover( old, to_auth );
}
/* TODO: irc_setpass() should do all of this. */
irc_setpass( irc, NULL );
irc->status &= ~USTATUS_IDENTIFIED;
irc_umode_set( irc, "-R", 1 );
if( old )
irc_abort( irc, FALSE, NULL );
}
static void cmd_register(irc_t *irc, char **cmd)
{
char s[16];
if (global.conf->authmode == AUTHMODE_REGISTERED) {
irc_rootmsg(irc, "This server does not allow registering new accounts");
return;
}
if (cmd[1] == NULL) {
irc_rootmsg(irc, "About to register, use /OPER to enter the password");
irc->status |= OPER_HACK_REGISTER;
return;
}
switch (storage_save(irc, cmd[1], FALSE)) {
case STORAGE_ALREADY_EXISTS:
irc_rootmsg(irc, "Nick is already registered");
break;
case STORAGE_OK:
irc_rootmsg(irc, "Account successfully created");
irc_setpass(irc, cmd[1]);
irc->status |= USTATUS_IDENTIFIED;
irc_umode_set(irc, "+R", 1);
if (irc->caps & CAP_SASL) {
irc_user_t *iu = irc->user;
irc_send_num(irc, 900, "%s!%s@%s %s :You are now logged in as %s",
iu->nick, iu->user, iu->host, iu->nick, iu->nick);
}
/* Set this var now, or anyone who logs in to his/her
newly created account for the first time gets the
whatsnew story. */
g_snprintf(s, sizeof(s), "%d", BITLBEE_VERSION_CODE);
set_setstr(&irc->b->set, "last_version", s);
break;
default:
irc_rootmsg(irc, "Error registering");
break;
}
}
static void irc_cmd_oper( irc_t *irc, char **cmd )
{
/* Very non-standard evil but useful/secure hack, see below. */
if( irc->status & OPER_HACK_ANY )
return irc_cmd_oper_hack( irc, cmd );
if( global.conf->oper_pass &&
( strncmp( global.conf->oper_pass, "md5:", 4 ) == 0 ?
md5_verify_password( cmd[2], global.conf->oper_pass + 4 ) == 0 :
strcmp( cmd[2], global.conf->oper_pass ) == 0 ) )
{
irc_umode_set( irc, "+o", 1 );
irc_send_num( irc, 381, ":Password accepted" );
}
else
{
irc_send_num( irc, 491, ":Incorrect password" );
}
}
static void irc_cmd_nick( irc_t *irc, char **cmd )
{
irc_user_t *iu;
if( ( iu = irc_user_by_name( irc, cmd[1] ) ) && iu != irc->user )
{
irc_send_num( irc, 433, "%s :This nick is already in use", cmd[1] );
}
else if( !nick_ok( cmd[1] ) )
{
/* [SH] Invalid characters. */
irc_send_num( irc, 432, "%s :This nick contains invalid characters", cmd[1] );
}
else if( irc->status & USTATUS_LOGGED_IN )
{
/* WATCH OUT: iu from the first if reused here to check if the
new nickname is the same (other than case, possibly). If it
is, no need to reset identify-status. */
if( ( irc->status & USTATUS_IDENTIFIED ) && iu != irc->user )
{
irc_setpass( irc, NULL );
irc->status &= ~USTATUS_IDENTIFIED;
irc_umode_set( irc, "-R", 1 );
irc_rootmsg( irc, "Changing nicks resets your identify status. "
"Re-identify or register a new account if you want "
"your configuration to be saved. See \x02help "
"nick_changes\x02." );
}
if( strcmp( cmd[1], irc->user->nick ) != 0 )
irc_user_set_nick( irc->user, cmd[1] );
}
else
{
g_free( irc->user->nick );
irc->user->nick = g_strdup( cmd[1] );
irc_check_login( irc );
}
}
static void irc_cmd_nick( irc_t *irc, char **cmd )
{
irc_user_t *iu;
if( ( iu = irc_user_by_name( irc, cmd[1] ) ) && iu != irc->user )
{
irc_send_num( irc, 433, "%s :This nick is already in use", cmd[1] );
}
else if( !nick_ok( cmd[1] ) )
{
/* [SH] Invalid characters. */
irc_send_num( irc, 432, "%s :This nick contains invalid characters", cmd[1] );
}
else if( irc->status & USTATUS_LOGGED_IN )
{
if( irc->status & USTATUS_IDENTIFIED )
{
irc_setpass( irc, NULL );
irc->status &= ~USTATUS_IDENTIFIED;
irc_umode_set( irc, "-R", 1 );
irc_usermsg( irc, "Changing nicks resets your identify status. "
"Re-identify or register a new account if you want "
"your configuration to be saved. See \x02help "
"nick_changes\x02." );
}
irc_user_set_nick( irc->user, cmd[1] );
}
else
{
g_free( irc->user->nick );
irc->user->nick = g_strdup( cmd[1] );
irc_check_login( irc );
}
}
static void cmd_identify(irc_t *irc, char **cmd)
{
storage_status_t status;
gboolean load = TRUE;
char *password = cmd[1];
if (irc->status & USTATUS_IDENTIFIED) {
irc_rootmsg(irc, "You're already logged in.");
return;
}
if (cmd[1] == NULL) {
} else if (strncmp(cmd[1], "-no", 3) == 0) {
load = FALSE;
password = cmd[2];
if (password == NULL) {
irc->status |= OPER_HACK_IDENTIFY_NOLOAD;
}
} else if (strncmp(cmd[1], "-force", 6) == 0) {
password = cmd[2];
if (password == NULL) {
irc->status |= OPER_HACK_IDENTIFY_FORCE;
}
} else if (irc->b->accounts != NULL) {
irc_rootmsg(irc,
"You're trying to identify yourself, but already have "
"at least one IM account set up. "
"Use \x02identify -noload\x02 or \x02identify -force\x02 "
"instead (see \x02help identify\x02).");
return;
}
if (password == NULL) {
irc_rootmsg(irc, "About to identify, use /OPER to enter the password");
irc->status |= OPER_HACK_IDENTIFY;
return;
}
status = auth_check_pass(irc, irc->user->nick, password);
if (load && (status == STORAGE_OK)) {
status = storage_load(irc, password);
}
switch (status) {
case STORAGE_INVALID_PASSWORD:
irc_rootmsg(irc, "Incorrect password");
break;
case STORAGE_NO_SUCH_USER:
irc_rootmsg(irc, "The nick is (probably) not registered");
break;
case STORAGE_OK:
irc_rootmsg(irc, "Password accepted%s",
load ? ", settings and accounts loaded" : "");
irc->status |= USTATUS_IDENTIFIED;
irc_umode_set(irc, "+R", 1);
if (irc->caps & CAP_SASL) {
irc_user_t *iu = irc->user;
irc_send_num(irc, 900, "%s!%s@%s %s :You are now logged in as %s",
iu->nick, iu->user, iu->host, iu->nick, iu->nick);
}
bitlbee_whatsnew(irc);
/* The following code is a bit hairy now. With takeover
support, we shouldn't immediately auto_connect in case
we're going to offer taking over an existing session.
Do it in 200ms since that should give the parent process
enough time to come back to us. */
if (load) {
irc_channel_auto_joins(irc, NULL);
if (!set_getbool(&irc->default_channel->set, "auto_join")) {
irc_channel_del_user(irc->default_channel, irc->user,
IRC_CDU_PART, "auto_join disabled "
"for this channel.");
}
if (set_getbool(&irc->b->set, "auto_connect")) {
irc->login_source_id = b_timeout_add(200,
cmd_identify_finish, irc);
}
}
/* If ipc_child_identify() returns FALSE, it means we're
already sure that there's no takeover target (only
possible in 1-process daemon mode). Start auto_connect
immediately. */
if (!ipc_child_identify(irc) && load) {
cmd_identify_finish(irc, 0, 0);
}
break;
case STORAGE_OTHER_ERROR:
default:
irc_rootmsg(irc, "Unknown error while loading configuration");
break;
}
}
