static void cmd_allow(irc_t *irc, char **cmd)
{
struct im_connection *ic;
account_t *a;
if (!cmd[2] && (a = account_get(irc->b, cmd[1])) && a->ic) {
char *format;
GSList *l;
if (strchr(irc->umode, 'b') != NULL) {
format = "%s\t%s";
} else {
format = "%-32.32s %-16.16s";
}
irc_rootmsg(irc, format, "Handle", "Nickname");
for (l = a->ic->permit; l; l = l->next) {
bee_user_t *bu = bee_user_by_handle(irc->b, a->ic, l->data);
irc_user_t *iu = bu ? bu->ui_data : NULL;
irc_rootmsg(irc, format, l->data, iu ? iu->nick : "(none)");
}
irc_rootmsg(irc, "End of list.");
return;
} else if (!cmd[2]) {
irc_user_t *iu = irc_user_by_name(irc, cmd[1]);
if (!iu || !iu->bu) {
irc_rootmsg(irc, "Nick `%s' does not exist", cmd[1]);
return;
}
ic = iu->bu->ic;
cmd[2] = iu->bu->handle;
} else if (!(a = account_get(irc->b, cmd[1]))) {
irc_rootmsg(irc, "Invalid account");
return;
} else if (!((ic = a->ic) && (a->ic->flags & OPT_LOGGED_IN))) {
irc_rootmsg(irc, "That account is not on-line");
return;
}
if (!ic->acc->prpl->rem_deny || !ic->acc->prpl->add_permit) {
irc_rootmsg(irc, "Command `%s' not supported by this protocol", cmd[0]);
} else {
imc_rem_block(ic, cmd[2]);
imc_add_allow(ic, cmd[2]);
irc_rootmsg(irc, "Buddy `%s' moved from block- to allow-list", cmd[2]);
}
}
static void cmd_info(irc_t *irc, char **cmd)
{
struct im_connection *ic;
account_t *a;
if (!cmd[2]) {
irc_user_t *iu = irc_user_by_name(irc, cmd[1]);
if (!iu || !iu->bu) {
irc_rootmsg(irc, "Nick `%s' does not exist", cmd[1]);
return;
}
ic = iu->bu->ic;
cmd[2] = iu->bu->handle;
} else if (!(a = account_get(irc->b, cmd[1]))) {
irc_rootmsg(irc, "Invalid account");
return;
} else if (!((ic = a->ic) && (a->ic->flags & OPT_LOGGED_IN))) {
irc_rootmsg(irc, "That account is not on-line");
return;
}
if (!ic->acc->prpl->get_info) {
irc_rootmsg(irc, "Command `%s' not supported by this protocol", cmd[0]);
} else {
ic->acc->prpl->get_info(ic, cmd[2]);
}
}
static void cmd_add(irc_t *irc, char **cmd)
{
account_t *a;
int add_on_server = 1;
char *handle = NULL, *s;
if (g_strcasecmp(cmd[1], "-tmp") == 0) {
MIN_ARGS(3);
add_on_server = 0;
cmd++;
}
if (!(a = account_get(irc->b, cmd[1]))) {
irc_rootmsg(irc, "Invalid account");
return;
} else if (!(a->ic && (a->ic->flags & OPT_LOGGED_IN))) {
irc_rootmsg(irc, "That account is not on-line");
return;
}
if (cmd[3]) {
if (!nick_ok(irc, cmd[3])) {
irc_rootmsg(irc, "The requested nick `%s' is invalid", cmd[3]);
return;
} else if (irc_user_by_name(irc, cmd[3])) {
irc_rootmsg(irc, "The requested nick `%s' already exists", cmd[3]);
return;
} else {
nick_set_raw(a, cmd[2], cmd[3]);
}
}
if ((a->flags & ACC_FLAG_HANDLE_DOMAINS) && cmd[2][0] != '_' &&
(!(s = strchr(cmd[2], '@')) || s[1] == '\0')) {
/* If there's no @ or it's the last char, append the user's
domain name now. Exclude handles starting with a _ so
adding _xmlconsole will keep working. */
if (s) {
*s = '\0';
}
if ((s = strchr(a->user, '@'))) {
cmd[2] = handle = g_strconcat(cmd[2], s, NULL);
}
}
if (add_on_server) {
irc_channel_t *ic;
char *s, *group = NULL;;
if ((ic = irc->root->last_channel) &&
(s = set_getstr(&ic->set, "fill_by")) &&
strcmp(s, "group") == 0 &&
(group = set_getstr(&ic->set, "group"))) {
irc_rootmsg(irc, "Adding `%s' to contact list (group %s)",
cmd[2], group);
} else {
irc_rootmsg(irc, "Adding `%s' to contact list", cmd[2]);
}
a->prpl->add_buddy(a->ic, cmd[2], group);
} else {
bee_user_t *bu;
irc_user_t *iu;
/* Only for add -tmp. For regular adds, this callback will
be called once the IM server confirms. */
if ((bu = bee_user_new(irc->b, a->ic, cmd[2], BEE_USER_LOCAL)) &&
(iu = bu->ui_data)) {
irc_rootmsg(irc, "Temporarily assigned nickname `%s' "
"to contact `%s'", iu->nick, cmd[2]);
}
}
g_free(handle);
}
static void cmd_account(irc_t *irc, char **cmd)
{
account_t *a;
int len;
if (global.conf->authmode == AUTHMODE_REGISTERED && !(irc->status & USTATUS_IDENTIFIED)) {
irc_rootmsg(irc, "This server only accepts registered users");
return;
}
len = strlen(cmd[1]);
if (len >= 1 && g_strncasecmp(cmd[1], "add", len) == 0) {
struct prpl *prpl;
MIN_ARGS(3);
if (!global.conf->allow_account_add) {
irc_rootmsg(irc, "This server does not allow adding new accounts");
return;
}
if (cmd[4] == NULL) {
for (a = irc->b->accounts; a; a = a->next) {
if (strcmp(a->pass, PASSWORD_PENDING) == 0) {
irc_rootmsg(irc, "Enter password for account %s "
"first (use /OPER)", a->tag);
return;
}
}
irc->status |= OPER_HACK_ACCOUNT_PASSWORD;
}
prpl = find_protocol(cmd[2]);
if (prpl == NULL) {
if (is_protocol_disabled(cmd[2])) {
irc_rootmsg(irc, "Protocol disabled in global config");
} else {
irc_rootmsg(irc, "Unknown protocol");
}
return;
}
for (a = irc->b->accounts; a; a = a->next) {
if (a->prpl == prpl && prpl->handle_cmp(a->user, cmd[3]) == 0) {
irc_rootmsg(irc, "Warning: You already have an account with "
"protocol `%s' and username `%s'. Are you accidentally "
"trying to add it twice?", prpl->name, cmd[3]);
}
}
a = account_add(irc->b, prpl, cmd[3], cmd[4] ? cmd[4] : PASSWORD_PENDING);
if (cmd[5]) {
irc_rootmsg(irc, "Warning: Passing a servername/other flags to `account add' "
"is now deprecated. Use `account set' instead.");
set_setstr(&a->set, "server", cmd[5]);
}
irc_rootmsg(irc, "Account successfully added with tag %s", a->tag);
if (cmd[4] == NULL) {
set_t *oauth = set_find(&a->set, "oauth");
if (oauth && bool2int(set_value(oauth))) {
*a->pass = '******';
irc_rootmsg(irc, "No need to enter a password for this "
"account since it's using OAuth");
} else {
irc_rootmsg(irc, "You can now use the /OPER command to "
"enter the password");
if (oauth) {
irc_rootmsg(irc, "Alternatively, enable OAuth if "
"the account supports it: account %s "
"set oauth on", a->tag);
}
}
}
return;
} else if (len >= 1 && g_strncasecmp(cmd[1], "list", len) == 0) {
int i = 0;
if (strchr(irc->umode, 'b')) {
irc_rootmsg(irc, "Account list:");
}
for (a = irc->b->accounts; a; a = a->next) {
char *con;
if (a->ic && (a->ic->flags & OPT_LOGGED_IN)) {
con = " (connected)";
} else if (a->ic) {
con = " (connecting)";
} else if (a->reconnect) {
con = " (awaiting reconnect)";
} else {
con = "";
}
irc_rootmsg(irc, "%2d (%s): %s, %s%s", i, a->tag, a->prpl->name, a->user, con);
i++;
}
irc_rootmsg(irc, "End of account list");
return;
} else if (cmd[2]) {
/* Try the following two only if cmd[2] == NULL */
} else if (len >= 2 && g_strncasecmp(cmd[1], "on", len) == 0) {
if (irc->b->accounts) {
irc_rootmsg(irc, "Trying to get all accounts connected...");
for (a = irc->b->accounts; a; a = a->next) {
if (!a->ic && a->auto_connect) {
if (strcmp(a->pass, PASSWORD_PENDING) == 0) {
irc_rootmsg(irc, "Enter password for account %s "
"first (use /OPER)", a->tag);
} else {
account_on(irc->b, a);
}
}
}
} else {
irc_rootmsg(irc, "No accounts known. Use `account add' to add one.");
}
return;
} else if (len >= 2 && g_strncasecmp(cmd[1], "off", len) == 0) {
irc_rootmsg(irc, "Deactivating all active (re)connections...");
for (a = irc->b->accounts; a; a = a->next) {
if (a->ic) {
account_off(irc->b, a);
} else if (a->reconnect) {
cancel_auto_reconnect(a);
}
}
return;
}
MIN_ARGS(2);
len = strlen(cmd[2]);
/* At least right now, don't accept on/off/set/del as account IDs even
if they're a proper match, since people not familiar with the new
syntax yet may get a confusing/nasty surprise. */
if (g_strcasecmp(cmd[1], "on") == 0 ||
g_strcasecmp(cmd[1], "off") == 0 ||
g_strcasecmp(cmd[1], "set") == 0 ||
g_strcasecmp(cmd[1], "del") == 0 ||
(a = account_get(irc->b, cmd[1])) == NULL) {
irc_rootmsg(irc, "Could not find account `%s'.", cmd[1]);
return;
}
if (len >= 1 && g_strncasecmp(cmd[2], "del", len) == 0) {
if (a->flags & ACC_FLAG_LOCKED) {
irc_rootmsg(irc, "Account is locked, can't delete");
}
else if (a->ic) {
irc_rootmsg(irc, "Account is still logged in, can't delete");
} else {
account_del(irc->b, a);
irc_rootmsg(irc, "Account deleted");
}
} else if (len >= 2 && g_strncasecmp(cmd[2], "on", len) == 0) {
if (a->ic) {
irc_rootmsg(irc, "Account already online");
} else if (strcmp(a->pass, PASSWORD_PENDING) == 0) {
irc_rootmsg(irc, "Enter password for account %s "
"first (use /OPER)", a->tag);
} else {
account_on(irc->b, a);
}
} else if (len >= 2 && g_strncasecmp(cmd[2], "off", len) == 0) {
if (a->ic) {
account_off(irc->b, a);
} else if (a->reconnect) {
cancel_auto_reconnect(a);
irc_rootmsg(irc, "Reconnect cancelled");
} else {
irc_rootmsg(irc, "Account already offline");
}
} else if (len >= 1 && g_strncasecmp(cmd[2], "set", len) == 0) {
cmd_set_real(irc, cmd + 2, &a->set, cmd_account_set_checkflags);
} else {
irc_rootmsg(irc,
"Unknown command: %s [...] %s. Please use \x02help commands\x02 to get a list of available commands.", "account",
cmd[2]);
}
}
static void cmd_chat(irc_t *irc, char **cmd)
{
account_t *acc;
if (g_strcasecmp(cmd[1], "add") == 0) {
char *channel, *s;
struct irc_channel *ic;
MIN_ARGS(3);
if (!(acc = account_get(irc->b, cmd[2]))) {
irc_rootmsg(irc, "Invalid account");
return;
} else if (!acc->prpl->chat_join) {
irc_rootmsg(irc, "Named chatrooms not supported on that account.");
return;
}
if (cmd[4] == NULL) {
channel = g_strdup(cmd[3]);
if ((s = strchr(channel, '@'))) {
*s = 0;
}
} else {
channel = g_strdup(cmd[4]);
}
if (strchr(CTYPES, channel[0]) == NULL) {
s = g_strdup_printf("#%s", channel);
g_free(channel);
channel = s;
irc_channel_name_strip(channel);
}
if ((ic = irc_channel_new(irc, channel)) &&
set_setstr(&ic->set, "type", "chat") &&
set_setstr(&ic->set, "chat_type", "room") &&
set_setstr(&ic->set, "account", cmd[2]) &&
set_setstr(&ic->set, "room", cmd[3])) {
irc_rootmsg(irc, "Chatroom successfully added.");
} else {
if (ic) {
irc_channel_free(ic);
}
irc_rootmsg(irc, "Could not add chatroom.");
}
g_free(channel);
} else if (g_strcasecmp(cmd[1], "with") == 0) {
irc_user_t *iu;
MIN_ARGS(2);
if ((iu = irc_user_by_name(irc, cmd[2])) &&
iu->bu && iu->bu->ic->acc->prpl->chat_with) {
if (!iu->bu->ic->acc->prpl->chat_with(iu->bu->ic, iu->bu->handle)) {
irc_rootmsg(irc, "(Possible) failure while trying to open "
"a groupchat with %s.", iu->nick);
}
} else {
irc_rootmsg(irc, "Can't open a groupchat with %s.", cmd[2]);
}
} else if (g_strcasecmp(cmd[1], "list") == 0 ||
g_strcasecmp(cmd[1], "set") == 0 ||
g_strcasecmp(cmd[1], "del") == 0) {
irc_rootmsg(irc,
"Warning: The \002chat\002 command was mostly replaced with the \002channel\002 command.");
cmd_channel(irc, cmd);
} else {
irc_rootmsg(irc,
"Unknown command: %s %s. Please use \x02help commands\x02 to get a list of available commands.", "chat",
cmd[1]);
}
}
void set_balance(struct a_list *list, char *name, int value)
{
struct account *a = account_get(list, name);
if(value > 0)
a->balance = value;
}
