// SET LANGUAGE <language>
static void
ns_cmd_set_language(struct sourceinfo *si, int parc, char *parv[])
{
char *language = parv[0];
struct language *lang;
if (!language)
{
command_fail(si, fault_needmoreparams, STR_INSUFFICIENT_PARAMS, "LANGUAGE");
command_fail(si, fault_needmoreparams, _("Valid languages are: %s"), language_names());
return;
}
lang = language_find(language);
if (strcmp(language, "default") &&
(lang == NULL || !language_is_valid(lang)))
{
command_fail(si, fault_badparams, _("Invalid language \2%s\2."), language);
command_fail(si, fault_badparams, _("Valid languages are: %s"), language_names());
return;
}
logcommand(si, CMDLOG_SET, "SET:LANGUAGE: \2%s\2", language_get_name(lang));
si->smu->language = lang;
command_success_nodata(si, _("The language for \2%s\2 has been changed to \2%s\2."), entity(si->smu)->name, language_get_name(lang));
return;
}
/*
* atheme.login
*
* XML Inputs:
* account name, password, source ip (optional)
*
* XML Outputs:
* fault 1 - insufficient parameters
* fault 3 - account is not registered
* fault 5 - invalid username and password
* fault 6 - account is frozen
* default - success (authcookie)
*
* Side Effects:
* an authcookie ticket is created for the myuser_t.
* the user's lastlogin is updated
*/
static int xmlrpcmethod_login(void *conn, int parc, char *parv[])
{
myuser_t *mu;
authcookie_t *ac;
const char *sourceip;
if (parc < 2)
{
xmlrpc_generic_error(fault_needmoreparams, "Insufficient parameters.");
return 0;
}
sourceip = parc >= 3 && *parv[2] != '\0' ? parv[2] : NULL;
if (!(mu = myuser_find(parv[0])))
{
xmlrpc_generic_error(fault_nosuch_source, "The account is not registered.");
return 0;
}
if (metadata_find(mu, "private:freeze:freezer") != NULL)
{
logcommand_external(nicksvs.me, "xmlrpc", conn, sourceip, NULL, CMDLOG_LOGIN, "failed LOGIN to \2%s\2 (frozen)", entity(mu)->name);
xmlrpc_generic_error(fault_noprivs, "The account has been frozen.");
return 0;
}
if (!verify_password(mu, parv[1]))
{
sourceinfo_t *si;
logcommand_external(nicksvs.me, "xmlrpc", conn, sourceip, NULL, CMDLOG_LOGIN, "failed LOGIN to \2%s\2 (bad password)", entity(mu)->name);
xmlrpc_generic_error(fault_authfail, "The password is not valid for this account.");
si = sourceinfo_create();
si->service = NULL;
si->sourcedesc = parv[2] != NULL && *parv[2] ? parv[2] : NULL;
si->connection = conn;
si->v = &xmlrpc_vtable;
si->force_language = language_find("en");
bad_password(si, mu);
object_unref(si);
return 0;
}
mu->lastlogin = CURRTIME;
ac = authcookie_create(mu);
logcommand_external(nicksvs.me, "xmlrpc", conn, sourceip, mu, CMDLOG_LOGIN, "LOGIN");
xmlrpc_send_string(ac->ticket);
return 0;
}
/*
* atheme.command
*
* XML inputs:
* authcookie, account name, source ip, service name, command name,
* parameters.
*
* XML outputs:
* depends on command
*
* Side Effects:
* command is executed
*/
static int xmlrpcmethod_command(void *conn, int parc, char *parv[])
{
myuser_t *mu;
service_t *svs;
command_t *cmd;
sourceinfo_t *si;
int newparc;
char *newparv[20];
struct httpddata *hd = ((connection_t *)conn)->userdata;
int i;
for (i = 0; i < parc; i++)
{
if (*parv[i] == '\0' || strchr(parv[i], '\r') || strchr(parv[i], '\n'))
{
xmlrpc_generic_error(fault_badparams, "Invalid parameters.");
return 0;
}
}
if (parc < 5)
{
xmlrpc_generic_error(fault_needmoreparams, "Insufficient parameters.");
return 0;
}
if (*parv[1] != '\0' && strlen(parv[0]) > 1)
{
if ((mu = myuser_find(parv[1])) == NULL)
{
xmlrpc_generic_error(fault_nosuch_source, "Unknown user.");
return 0;
}
if (authcookie_validate(parv[0], mu) == false)
{
xmlrpc_generic_error(fault_badauthcookie, "Invalid authcookie for this account.");
return 0;
}
}
else
mu = NULL;
/* try literal service name first, then user-configured nickname. */
svs = service_find(parv[3]);
if ((svs == NULL && (svs = service_find_nick(parv[3])) == NULL) || svs->commands == NULL)
{
slog(LG_DEBUG, "xmlrpcmethod_command(): invalid service %s", parv[3]);
xmlrpc_generic_error(fault_nosuch_source, "Invalid service name.");
return 0;
}
cmd = command_find(svs->commands, parv[4]);
if (cmd == NULL)
{
xmlrpc_generic_error(fault_nosuch_source, "Invalid command name.");
return 0;
}
memset(newparv, '\0', sizeof newparv);
newparc = parc - 5;
if (newparc > 20)
newparc = 20;
if (newparc > 0)
memcpy(newparv, parv + 5, newparc * sizeof(parv[0]));
si = sourceinfo_create();
si->smu = mu;
si->service = svs;
si->sourcedesc = parv[2][0] != '\0' ? parv[2] : NULL;
si->connection = conn;
si->v = &xmlrpc_vtable;
si->force_language = language_find("en");
command_exec(svs, si, cmd, newparc, newparv);
/* XXX: needs to be fixed up for restartable commands... */
if (!hd->sent_reply)
{
if (hd->replybuf != NULL)
xmlrpc_send_string(hd->replybuf);
else
xmlrpc_generic_error(fault_unimplemented, "Command did not return a result.");
}
object_unref(si);
return 0;
}
