+/* +------------------------------------+
+ * | Inspire Internet Relay Chat Daemon |
+ * +------------------------------------+
+ *
+ * InspIRCd: (C) 2002-2008 InspIRCd Development Team
+ * See: http://www.inspircd.org/wiki/index.php/Credits
+ *
+ * This program is free but copyrighted software; see
+ * the file COPYING for details.
+ *
+ * ---------------------------------------------------
+ */
+
+/* $Core: libIRCDcommand_parse */
+
+#include "inspircd.h"
+#include "wildcard.h"
+#include "xline.h"
+#include "socketengine.h"
+#include "socket.h"
+#include "command_parse.h"
+#include "exitcodes.h"
+
+/* Directory Searching for Unix-Only */
+#ifndef WIN32
+#include <dirent.h>
+#include <dlfcn.h>
+#endif
+
+int InspIRCd::PassCompare(Extensible* ex, const char* data,const char* input, const char* hashtype)
+{
+ int MOD_RESULT = 0;
+ FOREACH_RESULT_I(this,I_OnPassCompare,OnPassCompare(ex, data, input, hashtype))
+ if (MOD_RESULT == 1)
+ return 0;
+ if (MOD_RESULT == -1)
+ return 1;
+ return strcmp(data,input);
+}
+
+/* LoopCall is used to call a command classes handler repeatedly based on the contents of a comma seperated list.
+ * There are two overriden versions of this method, one of which takes two potential lists and the other takes one.
+ * We need a version which takes two potential lists for JOIN, because a JOIN may contain two lists of items at once,
+ * the channel names and their keys as follows:
+ * JOIN #chan1,#chan2,#chan3 key1,,key3
+ * Therefore, we need to deal with both lists concurrently. The first instance of this method does that by creating
+ * two instances of irc::commasepstream and reading them both together until the first runs out of tokens.
+ * The second version is much simpler and just has the one stream to read, and is used in NAMES, WHOIS, PRIVMSG etc.
+ * Both will only parse until they reach ServerInstance->Config->MaxTargets number of targets, to stop abuse via spam.
+ */
+int CommandParser::LoopCall(User* user, Command* CommandObj, const char* const* parameters, int pcnt, unsigned int splithere, unsigned int extra)
+{
+ /* First check if we have more than one item in the list, if we don't we return zero here and the handler
+ * which called us just carries on as it was.
+ */
+ if (!strchr(parameters[splithere],','))
+ return 0;
+
+ /** Some lame ircds will weed out dupes using some shitty O(n^2) algorithm.
+ * By using std::map (thanks for the idea w00t) we can cut this down a ton.
+ * ...VOOODOOOO!
+ */
+ std::map<irc::string, bool> dupes;
+
+ /* Create two lists, one for channel names, one for keys
+ */
+ irc::commasepstream items1(parameters[splithere]);
+ irc::commasepstream items2(parameters[extra]);
+ std::string extrastuff;
+ std::string item;
+ unsigned int max = 0;
+
+ /* Attempt to iterate these lists and call the command objech
+ * which called us, for every parameter pair until there are
+ * no more left to parse.
+ */
+ while (items1.GetToken(item) && (max++ < ServerInstance->Config->MaxTargets))
+ {
+ if (dupes.find(item.c_str()) == dupes.end())
+ {
+ const char* new_parameters[MAXPARAMETERS];
+
+ for (int t = 0; (t < pcnt) && (t < MAXPARAMETERS); t++)
+ new_parameters[t] = parameters[t];
+
+ if (!items2.GetToken(extrastuff))
+ extrastuff = "";
+
+ new_parameters[splithere] = item.c_str();
+ new_parameters[extra] = extrastuff.c_str();
+
+ CommandObj->Handle(new_parameters,pcnt,user);
+
+ dupes[item.c_str()] = true;
+ }
+ }
+ return 1;
+}
+
+int CommandParser::LoopCall(User* user, Command* CommandObj, const char* const* parameters, int pcnt, unsigned int splithere)
+{
+ /* First check if we have more than one item in the list, if we don't we return zero here and the handler
+ * which called us just carries on as it was.
+ */
+ if (!strchr(parameters[splithere],','))
+ return 0;
+
+ std::map<irc::string, bool> dupes;
+
+ /* Only one commasepstream here */
+ irc::commasepstream items1(parameters[splithere]);
+ std::string item;
+ unsigned int max = 0;
+
+ /* Parse the commasepstream until there are no tokens remaining.
+ * Each token we parse out, call the command handler that called us
+ * with it
+ */
+ while (items1.GetToken(item) && (max++ < ServerInstance->Config->MaxTargets))
+ {
+ if (dupes.find(item.c_str()) == dupes.end())
+ {
+ const char* new_parameters[MAXPARAMETERS];
+
+ for (int t = 0; (t < pcnt) && (t < MAXPARAMETERS); t++)
+ new_parameters[t] = parameters[t];
+
+ new_parameters[splithere] = item.c_str();
+
+ /* Execute the command handler over and over. If someone pulls our user
+ * record out from under us (e.g. if we /kill a comma sep list, and we're
+ * in that list ourselves) abort if we're gone.
+ */
+ CommandObj->Handle(new_parameters,pcnt,user);
+
+ dupes[item.c_str()] = true;
+ }
+ }
+ /* By returning 1 we tell our caller that nothing is to be done,
+ * as all the previous calls handled the data. This makes the parent
+ * return without doing any processing.
+ */
+ return 1;
+}
+
+bool CommandParser::IsValidCommand(const std::string &commandname, int pcnt, User * user)
+{
+ Commandable::iterator n = cmdlist.find(commandname);
+
+ if (n != cmdlist.end())
+ {
+ if ((pcnt>=n->second->min_params) && (n->second->source != "<core>"))
+ {
+ if (IS_LOCAL(user) && n->second->flags_needed)
+ {
+ if (user->IsModeSet(n->second->flags_needed))
+ {
+ return (user->HasPermission(commandname));
+ }
+ }
+ else
+ {
+ return true;
+ }
+ }
+ }
+ return false;
+}
+
+Command* CommandParser::GetHandler(const std::string &commandname)
+{
+ Commandable::iterator n = cmdlist.find(commandname);
+ if (n != cmdlist.end())
+ return n->second;
+
+ return NULL;
+}
+
+// calls a handler function for a command
+
+CmdResult CommandParser::CallHandler(const std::string &commandname,const char* const* parameters, int pcnt, User *user)
+{
+ Commandable::iterator n = cmdlist.find(commandname);
+
+ if (n != cmdlist.end())
+ {
+ if (pcnt >= n->second->min_params)
+ {
+ bool bOkay = false;
+
+ if (IS_LOCAL(user) && n->second->flags_needed)
+ {
+ /* if user is local, and flags are needed .. */
+
+ if (user->IsModeSet(n->second->flags_needed))
+ {
+ /* if user has the flags, and now has the permissions, go ahead */
+ if (user->HasPermission(commandname))
+ bOkay = true;
+ }
+ }
+ else
+ {
+ /* remote or no flags required anyway */
+ bOkay = true;
+ }
+
+ if (bOkay)
+ {
+ return n->second->Handle(parameters,pcnt,user);
+ }
+ }
+ }
+ return CMD_INVALID;
+}
+
+void CommandParser::DoLines(User* current, bool one_only)
+{
+ // while there are complete lines to process...
+ unsigned int floodlines = 0;
+
+ while (current->BufferIsReady())
+ {
+ if (current->MyClass)
+ {
+ if (ServerInstance->Time() > current->reset_due)
+ {
+ current->reset_due = ServerInstance->Time() + current->MyClass->GetThreshold();
+ current->lines_in = 0;
+ }
+
+ if (++current->lines_in > current->MyClass->GetFlood() && current->MyClass->GetFlood())
+ {
+ ServerInstance->FloodQuitUser(current);
+ return;
+ }
+
+ if ((++floodlines > current->MyClass->GetFlood()) && (current->MyClass->GetFlood() != 0))
+ {
+ ServerInstance->FloodQuitUser(current);
+ return;
+ }
+ }
+
+ // use GetBuffer to copy single lines into the sanitized string
+ std::string single_line = current->GetBuffer();
+ current->bytes_in += single_line.length();
+ current->cmds_in++;
+ if (single_line.length() > MAXBUF - 2) // MAXBUF is 514 to allow for neccessary line terminators
+ single_line.resize(MAXBUF - 2); // So to trim to 512 here, we use MAXBUF - 2
+
+ // ProcessBuffer returns false if the user has gone over penalty
+ if (!ServerInstance->Parser->ProcessBuffer(single_line, current) || one_only)
+ break;
+ }
+}
+
+bool CommandParser::ProcessCommand(User *user, std::string &cmd)
+{
+ const char *command_p[MAXPARAMETERS];
+ int items = 0;
+ irc::tokenstream tokens(cmd);
+ std::string command;
+ tokens.GetToken(command);
+
+ /* A client sent a nick prefix on their command (ick)
+ * rhapsody and some braindead bouncers do this --
+ * the rfc says they shouldnt but also says the ircd should
+ * discard it if they do.
+ */
+ if (*command.c_str() == ':')
+ tokens.GetToken(command);
+
+ while (tokens.GetToken(para[items]) && (items < MAXPARAMETERS))
+ {
+ command_p[items] = para[items].c_str();
+ items++;
+ }
+
+ std::transform(command.begin(), command.end(), command.begin(), ::toupper);
+
+ int MOD_RESULT = 0;
+ FOREACH_RESULT(I_OnPreCommand,OnPreCommand(command,command_p,items,user,false,cmd));
+ if (MOD_RESULT == 1) {
+ return true;
+ }
+
+ /* find the command, check it exists */
+ Commandable::iterator cm = cmdlist.find(command);
+
+ if (cm == cmdlist.end())
+ {
+ if (user->registered == REG_ALL)
+ {
+ user->WriteNumeric(421, "%s %s :Unknown command",user->nick,command.c_str());
+ }
+ ServerInstance->stats->statsUnknown++;
+ return true;
+ }
+
+ /* Modify the user's penalty */
+ bool do_more = true;
+ if (!user->ExemptFromPenalty)
+ {
+ user->IncreasePenalty(cm->second->Penalty);
+ do_more = (user->Penalty < 10);
+ if (!do_more)
+ user->OverPenalty = true;
+ }
+
+ /* activity resets the ping pending timer */
+ if (user->MyClass)
+ user->nping = ServerInstance->Time() + user->MyClass->GetPingTime();
+
+ if (cm->second->flags_needed)
+ {
+ if (!user->IsModeSet(cm->second->flags_needed))
+ {
+ user->WriteNumeric(481, "%s :Permission Denied - You do not have the required operator privileges",user->nick);
+ return do_more;
+ }
+ if (!user->HasPermission(command))
+ {
+ user->WriteNumeric(481, "%s :Permission Denied - Oper type %s does not have access to command %s",user->nick,user->oper,command.c_str());
+ return do_more;
+ }
+ }
+ if ((user->registered == REG_ALL) && (!IS_OPER(user)) && (cm->second->IsDisabled()))
+ {
+ /* command is disabled! */
+ user->WriteNumeric(421, "%s %s :This command has been disabled.",user->nick,command.c_str());
+ ServerInstance->SNO->WriteToSnoMask('d', "%s denied for %s (%s@%s)",
+ command.c_str(), user->nick, user->ident, user->host);
+ return do_more;
+ }
+ if (items < cm->second->min_params)
+ {
+ user->WriteNumeric(461, "%s %s :Not enough parameters.", user->nick, command.c_str());
+ if ((ServerInstance->Config->SyntaxHints) && (user->registered == REG_ALL) && (cm->second->syntax.length()))
+ user->WriteNumeric(304, "%s :SYNTAX %s %s", user->nick, cm->second->command.c_str(), cm->second->syntax.c_str());
+ return do_more;
+ }
+ if ((user->registered != REG_ALL) && (!cm->second->WorksBeforeReg()))
+ {
+ user->WriteNumeric(451, "%s :You have not registered",command.c_str());
+ return do_more;
+ }
+ else
+ {
+ /* passed all checks.. first, do the (ugly) stats counters. */
+ cm->second->use_count++;
+ cm->second->total_bytes += cmd.length();
+
+ /* module calls too */
+ MOD_RESULT = 0;
+ FOREACH_RESULT(I_OnPreCommand,OnPreCommand(command,command_p,items,user,true,cmd));
+ if (MOD_RESULT == 1)
+ return do_more;
+
+ /*
+ * WARNING: be careful, the user may be deleted soon
+ */
+ CmdResult result = cm->second->Handle(command_p,items,user);
+
+ FOREACH_MOD(I_OnPostCommand,OnPostCommand(command, command_p, items, user, result,cmd));
+ return do_more;
+ }
+}
+
+bool CommandParser::RemoveCommands(const char* source)
+{
+ Commandable::iterator i,safei;
+ for (i = cmdlist.begin(); i != cmdlist.end(); i++)
+ {
+ safei = i;
+ safei++;
+ if (safei != cmdlist.end())
+ {
+ RemoveCommand(safei, source);
+ }
+ }
+ safei = cmdlist.begin();
+ if (safei != cmdlist.end())
+ {
+ RemoveCommand(safei, source);
+ }
+ return true;
+}
+
+void CommandParser::RemoveCommand(Commandable::iterator safei, const char* source)
+{
+ Command* x = safei->second;
+ if (x->source == std::string(source))
+ {
+ cmdlist.erase(safei);
+ delete x;
+ }
+}
+
+bool CommandParser::ProcessBuffer(std::string &buffer,User *user)
+{
+ std::string::size_type a;
+
+ if (!user)
+ return true;
+
+ while ((a = buffer.rfind("\n")) != std::string::npos)
+ buffer.erase(a);
+ while ((a = buffer.rfind("\r")) != std::string::npos)
+ buffer.erase(a);
+
+ if (buffer.length())
+ {
+ ServerInstance->Logs->Log("USERINPUT", DEBUG,"C[%d] I :%s %s",user->GetFd(), user->nick, buffer.c_str());
+ return this->ProcessCommand(user,buffer);
+ }
+
+ return true;
+}
+
+bool CommandParser::CreateCommand(Command *f, void* so_handle)
+{
+ if (so_handle)
+ {
+ if (RFCCommands.find(f->command) == RFCCommands.end())
+ RFCCommands[f->command] = so_handle;
+ else
+ {
+ ServerInstance->Logs->Log("COMMAND",DEFAULT,"ERK! Somehow, we loaded a cmd_*.so file twice! Only the first instance is being recorded.");
+ return false;
+ }
+ }
+
+ /* create the command and push it onto the table */
+ if (cmdlist.find(f->command) == cmdlist.end())
+ {
+ cmdlist[f->command] = f;
+ return true;
+ }
+ else return false;
+}
+
+CommandParser::CommandParser(InspIRCd* Instance) : ServerInstance(Instance)
+{
+ para.resize(128);
+}
+
+bool CommandParser::FindSym(void** v, void* h, const std::string &name)
+{
+ *v = dlsym(h, "init_command");
+ const char* err = dlerror();
+ if (err && !(*v))
+ {
+ ServerInstance->Logs->Log("COMMAND",SPARSE, "Error loading core command %s: %s\n", name.c_str(), err);
+ return false;
+ }
+ return true;
+}
+
+bool CommandParser::ReloadCommand(const char* cmd, User* user)
+{
+ char filename[MAXBUF];
+ char commandname[MAXBUF];
+ int y = 0;
+
+ for (const char* x = cmd; *x; x++, y++)
+ commandname[y] = toupper(*x);
+
+ commandname[y] = 0;
+
+ SharedObjectList::iterator command = RFCCommands.find(commandname);
+
+ if (command != RFCCommands.end())
+ {
+ Command* cmdptr = cmdlist.find(commandname)->second;
+ cmdlist.erase(cmdlist.find(commandname));
+
+ for (char* x = commandname; *x; x++)
+ *x = tolower(*x);
+
+
+ delete cmdptr;
+ dlclose(command->second);
+ RFCCommands.erase(command);
+
+ snprintf(filename, MAXBUF, "cmd_%s.so", commandname);
+ const char* err = this->LoadCommand(filename);
+ if (err)
+ {
+ if (user)
+ user->WriteServ("NOTICE %s :*** Error loading 'cmd_%s.so': %s", user->nick, cmd, err);
+ return false;
+ }
+
+ return true;
+ }
+
+ return false;
+}
+
+CmdResult cmd_reload::Handle(const char* const* parameters, int /* pcnt */, User *user)
+{
+ user->WriteServ("NOTICE %s :*** Reloading command '%s'",user->nick, parameters[0]);
+ if (ServerInstance->Parser->ReloadCommand(parameters[0], user))
+ {
+ user->WriteServ("NOTICE %s :*** Successfully reloaded command '%s'", user->nick, parameters[0]);
+ ServerInstance->SNO->WriteToSnoMask('A', "RELOAD: %s reloaded the '%s' command.", user->nick, parameters[0]);
+ return CMD_SUCCESS;
+ }
+ else
+ {
+ user->WriteServ("NOTICE %s :*** Could not reload command '%s' -- fix this problem, then /REHASH as soon as possible!", user->nick, parameters[0]);
+ return CMD_FAILURE;
+ }
+}
+
+const char* CommandParser::LoadCommand(const char* name)
+{
+ char filename[MAXBUF];
+ void* h;
+ Command* (*cmd_factory_func)(InspIRCd*);
+
+ /* Command already exists? Succeed silently - this is needed for REHASH */
+ if (RFCCommands.find(name) != RFCCommands.end())
+ {
+ ServerInstance->Logs->Log("COMMAND",DEBUG,"Not reloading command %s/%s, it already exists", LIBRARYDIR, name);
+ return NULL;
+ }
+
+ snprintf(filename, MAXBUF, "%s/%s", LIBRARYDIR, name);
+ h = dlopen(filename, RTLD_NOW | RTLD_GLOBAL);
+
+ if (!h)
+ {
+ const char* n = dlerror();
+ ServerInstance->Logs->Log("COMMAND",SPARSE, "Error loading core command %s: %s", name, n);
+ return n;
+ }
+
+ if (this->FindSym((void **)&cmd_factory_func, h, name))
+ {
+ Command* newcommand = cmd_factory_func(ServerInstance);
+ this->CreateCommand(newcommand, h);
+ }
+ return NULL;
+}
+
+void CommandParser::SetupCommandTable(User* user)
+{
+ RFCCommands.clear();
+
+ if (!user)
+ {
+ printf("\nLoading core commands");
+ fflush(stdout);
+ }
+
+ DIR* library = opendir(LIBRARYDIR);
+ if (library)
+ {
+ dirent* entry = NULL;
+ while ((entry = readdir(library)))
+ {
+ if (match(entry->d_name, "cmd_*.so"))
+ {
+ if (!user)
+ {
+ printf(".");
+ fflush(stdout);
+ }
+ const char* err = this->LoadCommand(entry->d_name);
+ if (err)
+ {
+ if (user)
+ {
+ user->WriteServ("NOTICE %s :*** Failed to load core command %s: %s", user->nick, entry->d_name, err);
+ }
+ else
+ {
+ printf("Error loading %s: %s", entry->d_name, err);
+ exit(EXIT_STATUS_BADHANDLER);
+ }
+ }
+ }
+ }
+ closedir(library);
+ if (!user)
+ printf("\n");
+ }
+
+ if (cmdlist.find("RELOAD") == cmdlist.end())
+ this->CreateCommand(new cmd_reload(ServerInstance));
+}
+
+int CommandParser::TranslateUIDs(TranslateType to, const std::string &source, std::string &dest)
+{
+ User* user = NULL;
+ std::string item;
+ int translations = 0;
+ dest.clear();
+
+ switch (to)
+ {
+ case TR_NICK:
+ /* Translate single nickname */
+ user = ServerInstance->FindNick(source);
+ if (user)
+ {
+ dest = user->uuid;
+ translations++;
+ }
+ else
+ dest = source;
+ break;
+ case TR_NICKLIST:
+ {
+ /* Translate comma seperated list of nicknames */
+ irc::commasepstream items(source);
+ while (items.GetToken(item))
+ {
+ user = ServerInstance->FindNick(item);
+ if (user)
+ {
+ dest.append(user->uuid);
+ translations++;
+ }
+ else
+ dest.append(item);
+ dest.append(",");
+ }
+ if (!dest.empty())
+ dest.erase(dest.end() - 1);
+ }
+ break;
+ case TR_SPACENICKLIST:
+ {
+ /* Translate space seperated list of nicknames */
+ irc::spacesepstream items(source);
+ while (items.GetToken(item))
+ {
+ user = ServerInstance->FindNick(item);
+ if (user)
+ {
+ dest.append(user->uuid);
+ translations++;
+ }
+ else
+ dest.append(item);
+ dest.append(" ");
+ }
+ if (!dest.empty())
+ dest.erase(dest.end() - 1);
+ }
+ break;
+ case TR_END:
+ case TR_TEXT:
+ default:
+ /* Do nothing */
+ dest = source;
+ break;
+ }
+
+ return translations;
+}
+