-#include <stdio.h>\r
-#include <stdlib.h>\r
-#include <stdarg.h>\r
-#include <string.h>\r
-#include <time.h>\r
-\r
-#include "../control/control.h"\r
-#include "../nick/nick.h"\r
-#include "../localuser/localuserchannel.h"\r
-\r
-int controlkill(void *sender, int cargc, char **cargv);\r
-int controlopchan(void *sender, int cargc, char **cargv);\r
-int controlkick(void *sender, int cargc, char **cargv);\r
-\r
-void _init() {\r
- registercontrolhelpcmd("kill",NO_OPER,2,&controlkill,"Usage: kill nick <reason>\nKill specificed user.");\r
- registercontrolhelpcmd("opchan",NO_OPER,2,&controlopchan,"Usage: opchan channel nick\nGive user +o on channel.");\r
- registercontrolhelpcmd("kick",NO_OPER,3,&controlkick,"Usage: kick channel user <reason>\nKick a user from the given channel");\r
-}\r
-\r
-void _fini() {\r
- deregistercontrolcmd("kill",controlkill); \r
- deregistercontrolcmd("opchan",controlopchan);\r
- deregistercontrolcmd("kick",controlkick);\r
-}\r
-\r
-int controlkick(void *sender, int cargc, char **cargv) {\r
- nick *np=(nick *)sender;\r
- nick *victim;\r
- channel *cp;\r
- modechanges changes;\r
- nick *target;\r
-\r
- if (cargc<2) {\r
- controlreply(sender,"Usage: kick channel user <reason>");\r
- return CMD_ERROR;\r
- }\r
-\r
- if ((cp=findchannel(cargv[0]))!=NULL) {\r
- if (cargv[1][0]=='#') {\r
- if (!(target=getnickbynumericstr(cargv[1]+1))) {\r
- controlreply(np,"Sorry, couldn't find numeric %s",cargv[0]+1);\r
- return CMD_ERROR;\r
- }\r
- } else {\r
- if ((target=getnickbynick(cargv[1]))==NULL) {\r
- controlreply(np,"Sorry, couldn't find that user");\r
- return CMD_ERROR;\r
- }\r
- }\r
-\r
- if(cargc > 2) {\r
- irc_send("%s K %s %s :%s",mynumeric->content,cp->index->name->content,longtonumeric(target->numeric,5),cargv[2]);\r
- } else {\r
- irc_send("%s K %s %s :Kicked",mynumeric->content,cp->index->name->content,longtonumeric(target->numeric,5));\r
- }\r
- delnickfromchannel(cp, target->numeric, 1);\r
-\r
- controlreply(sender,"Put Kick for %s from %s.", target->nick, cp->index->name->content);\r
- controlwall(NO_OPER, NL_KICKS, "%s/%s sent KICK for %s!%s@%s from %s", np->nick, np->authname, target->nick, target->ident, target->host->name->content,cp->index->name->content);\r
-\r
- } else {\r
- controlreply(np,"Couldn't find channel %s.",cargv[0]);\r
- return;\r
- }\r
-\r
- return CMD_OK;\r
-}\r
-\r
-int controlopchan(void *source, int cargc, char **cargv) {\r
- nick *sender=(nick *)source;\r
- nick *victim;\r
- channel *cp;\r
- modechanges changes;\r
- nick *target;\r
- unsigned long *lp;\r
-\r
- if (cargc<2) {\r
- controlreply(sender,"Usage: opchan channel user");\r
- return CMD_ERROR;\r
- }\r
- \r
- if ((cp=findchannel(cargv[0]))!=NULL) {\r
- if (cargv[1][0]=='#') {\r
- if (!(target=getnickbynumericstr(cargv[1]+1))) {\r
- controlreply(sender,"Sorry, couldn't find numeric %s",cargv[0]+1);\r
- return CMD_ERROR;\r
- }\r
- } else {\r
- if ((target=getnickbynick(cargv[1]))==NULL) {\r
- controlreply((nick *)sender,"Sorry, couldn't find that user");\r
- return CMD_ERROR;\r
- }\r
- }\r
-\r
- if ((lp=getnumerichandlefromchanhash(cp->users,target->numeric))==NULL) {\r
- controlreply((nick *)sender,"Sorry, User not on channel");\r
- return CMD_ERROR;\r
- }\r
-\r
- (*lp)|=CUMODE_OP;\r
- irc_send("%s OM %s +o %s",mynumeric->content,cp->index->name->content,longtonumeric(target->numeric,5));\r
- controlreply(sender,"Put mode +o %s on %s.", target->nick, cp->index->name->content); \r
- } else {\r
- controlreply(sender,"Couldn't find channel %s.",cargv[0]);\r
- return;\r
- }\r
- \r
- return CMD_OK;\r
-}\r
-\r
-int controlkill(void *sender, int cargc, char **cargv) {\r
- nick *target;\r
- char buf[BUFSIZE];\r
- int i;\r
- nick *np = (nick *)sender;\r
- \r
- if (cargc<1) {\r
- controlreply(np,"Usage: kill <user> <reason>");\r
- return CMD_ERROR;\r
- }\r
- \r
- if (cargv[0][0]=='#') {\r
- if (!(target=getnickbynumericstr(cargv[0]+1))) {\r
- controlreply(np,"Sorry, couldn't find numeric %s",cargv[0]+1);\r
- return CMD_ERROR;\r
- }\r
- } else {\r
- if ((target=getnickbynick(cargv[0]))==NULL) {\r
- controlreply(np,"Sorry, couldn't find that user");\r
- return CMD_ERROR;\r
- }\r
- }\r
-\r
- killuser(NULL, target, (cargc>1)?cargv[1]:"Killed");\r
- controlreply(np,"KILL sent.");\r
- controlwall(NO_OPER, NL_KILLS, "%s/%s sent KILL for %s!%s@%s (%s)", np->nick, np->authname, target->nick, target->ident, target->host->name->content,(cargc>1)?cargv[1]:"Killed");\r
-\r
- return CMD_OK;\r
-}\r
+#include <stdio.h>
+#include <stdlib.h>
+#include <stdarg.h>
+#include <string.h>
+#include <strings.h>
+#include <time.h>
+
+#include "../control/control.h"
+#include "../nick/nick.h"
+#include "../newsearch/newsearch.h"
+#include "../lib/irc_string.h"
+#include "../lib/strlfunc.h"
+#include "../localuser/localuserchannel.h"
+#include "../geoip/geoip.h"
+#include "../lib/version.h"
+#include "../core/modules.h"
+
+MODULE_VERSION("");
+
+int controlkill(void *sender, int cargc, char **cargv);
+int controlopchan(void *sender, int cargc, char **cargv);
+int controlkick(void *sender, int cargc, char **cargv);
+int controlspewchan(void *sender, int cargc, char **cargv);
+int controlspew(void *sender, int cargc, char **cargv);
+int controlresync(void *sender, int cargc, char **cargv);
+int controlbroadcast(void *sender, int cargc, char **cargv);
+int controlobroadcast(void *sender, int cargc, char **cargv);
+int controlmbroadcast(void *sender, int cargc, char **cargv);
+int controlsbroadcast(void *sender, int cargc, char **cargv);
+int controlcbroadcast(void *sender, int cargc, char **cargv);
+
+void _init() {
+/* registercontrolhelpcmd("kill", NO_OPER, 2, &controlkill, "Usage: kill <nick> ?reason?\nKill specified user with given reason (or 'Killed').");*/
+ registercontrolhelpcmd("kick", NO_OPER, 3, &controlkick, "Usage: kick <channel> <user> ?reason?\nKick a user from the given channel, with given reason (or 'Kicked').");
+
+ registercontrolhelpcmd("spewchan", NO_OPER, 1, &controlspewchan, "Usage: spewchan <pattern>\nShows all channels which are matched by the given pattern");
+
+ registercontrolhelpcmd("spew", NO_OPER, 1, &controlspew, "Usage: spew <pattern>\nShows all userss which are matched by the given pattern");
+
+ /* doesnt seem to work for me + pointless command?(paul)
+ registercontrolhelpcmd("resync", NO_OPER, 1, &controlresync, "Usage: resync <channel>\nResyncs a desynched channel"); */
+
+ registercontrolhelpcmd("broadcast", NO_OPER, 1, &controlbroadcast, "Usage: broadcast <text>\nSends a message to all users.");
+ registercontrolhelpcmd("obroadcast", NO_OPER, 1, &controlobroadcast, "Usage: obroadcast <text>\nSends a message to all IRC operators.");
+ registercontrolhelpcmd("mbroadcast", NO_OPER, 2, &controlmbroadcast, "Usage: mbroadcast <mask> <text>\nSends a message to all users matching the mask");
+ registercontrolhelpcmd("sbroadcast", NO_OPER, 2, &controlsbroadcast, "Usage: sbroadcast <mask> <text>\nSends a message to all users on specific server(s).");
+ registercontrolhelpcmd("cbroadcast", NO_OPER, 2, &controlcbroadcast, "Usage: cbroadcast <2 letter country> <text>\nSends a message to all users in the specified country (GeoIP must be loaded).");
+}
+
+void _fini() {
+ deregistercontrolcmd("obroadcast", controlobroadcast);
+ deregistercontrolcmd("sbroadcast", controlsbroadcast);
+ deregistercontrolcmd("mbroadcast", controlmbroadcast);
+ deregistercontrolcmd("broadcast", controlbroadcast);
+
+ /* deregistercontrolcmd("resync", controlresync); */
+ deregistercontrolcmd("spew", controlspew);
+ deregistercontrolcmd("spewchan", controlspewchan);
+
+/* deregistercontrolcmd("kill", controlkill); */
+ deregistercontrolcmd("kick", controlkick);
+}
+
+int controlkick(void *sender, int cargc, char **cargv) {
+ nick *np=(nick *)sender;
+ channel *cp;
+ nick *target;
+
+ if (cargc<2)
+ return CMD_USAGE;
+
+ if ((cp=findchannel(cargv[0]))==NULL) {
+ controlreply(np,"Couldn't find that channel.");
+ return CMD_ERROR;
+ }
+
+ if ((target=getnickbynick(cargv[1]))==NULL) {
+ controlreply(np,"Sorry, couldn't find that user");
+ return CMD_ERROR;
+ }
+
+ controlwall(NO_OPER, NL_KICKKILLS, "%s/%s sent KICK for %s!%s@%s on %s (%s)", np->nick, np->authname, target->nick, target->ident, target->host->name->content,cp->index->name->content, (cargc>2)?cargv[2]:"Kicked");
+ localkickuser(NULL, cp, target, (cargc>2)?cargv[2]:"Kicked");
+ controlreply(sender, "KICK sent.");
+
+ return CMD_OK;
+}
+
+/* NO checking to see if it's us or anyone important */
+int controlkill(void *sender, int cargc, char **cargv) {
+ nick *target;
+ nick *np = (nick *)sender;
+
+ if (cargc<1)
+ return CMD_USAGE;
+
+ if ((target=getnickbynick(cargv[0]))==NULL) {
+ controlreply(np,"Sorry, couldn't find that user.");
+ return CMD_ERROR;
+ }
+
+ controlwall(NO_OPER, NL_KICKKILLS, "%s/%s sent KILL for %s!%s@%s (%s)", np->nick, np->authname, target->nick, target->ident, target->host->name->content, (cargc>1)?cargv[1]:"Killed");
+ killuser(NULL, target, (cargc>1)?cargv[1]:"Killed");
+ controlreply(np, "KILL sent.");
+
+ return CMD_OK;
+}
+
+int controlresync(void *sender, int cargc, char **cargv) {
+ nick *np = (nick*)sender;
+ channel *cp;
+ modechanges changes;
+ int a;
+
+ if (cargc < 1)
+ return CMD_USAGE;
+
+ cp = findchannel(cargv[0]);
+
+ if (cp == NULL) {
+ controlreply(np, "No such channel.");
+
+ return CMD_ERROR;
+ }
+
+ controlwall(NO_OPER, NL_MISC, "%s/%s RESYNC'ed %s", np->nick, np->authname, cp->index->name->content);
+
+ irc_send("%s CM %s o", mynumeric->content, cp->index->name->content);
+
+ localsetmodeinit(&changes, cp, mynick);
+
+ for(a=0;a<cp->users->hashsize;a++) {
+ if (cp->users->content[a] != nouser) {
+ nick *np2 = getnickbynumeric(cp->users->content[a]);
+
+ /* make newserv believe that this user is not opped */
+ if (cp->users->content[a] & CUMODE_OP)
+ cp->users->content[a] &= ~CUMODE_OP;
+ else if (!IsService(np2)) /* if the user wasn't opped before and is not a service we don't care about him */
+ continue;
+
+ /* now reop him */
+ localdosetmode_nick(&changes, np2, MC_OP);
+ }
+ }
+
+ localsetmodeflush(&changes, 1);
+
+ controlreply(np, "Done.");
+
+ return CMD_OK;
+}
+
+int controlspew(void *sender, int cargc, char **cargv) {
+ searchASTExpr *tree;
+
+ if(cargc < 1)
+ return CMD_USAGE;
+
+ tree = NSASTNode(match_parse, NSASTNode(hostmask_parse), NSASTLiteral(cargv[0]));
+ return ast_nicksearch(tree, controlreply, sender, controlnswall, printnick, NULL, NULL, 500);
+}
+
+/* this function is the definition of horrible */
+int controlspewchan(void *sender, int cargc, char **cargv) {
+ nick *np = (nick*)sender;
+ nick *np2;
+ int i, a, ccount = 0, morecservices, ucount, cscount;
+ chanindex *cip;
+ channel *cp;
+ char cservices[300];
+ char strcscount[40];
+
+ if (cargc < 1)
+ return CMD_USAGE;
+
+ for (i=0; i<CHANNELHASHSIZE; i++) {
+ for (cip=chantable[i]; cip; cip=cip->next) {
+ if ((cp = cip->channel) != NULL && match2strings(cargv[0], cip->name->content)) {
+ /* find channel services */
+ cservices[0] = '\0';
+ cscount = ucount = morecservices = 0;
+
+ for (a=0;a<cp->users->hashsize;a++) {
+ if (cp->users->content[a] != nouser) {
+ np2 = getnickbynumeric(cp->users->content[a]);
+
+ if (IsService(np2)) {
+ cscount++;
+
+ if (strlen(cservices) < 100) {
+ if (cservices[0])
+ strlcat(cservices, ", ", sizeof(cservices));
+
+ strlcat(cservices, np2->nick, sizeof(cservices));
+ } else {
+ morecservices++;
+ }
+ }
+
+ ucount++;
+ }
+ }
+
+ if (morecservices)
+ snprintf(cservices + strlen(cservices), sizeof(cservices), " and %d more", morecservices);
+
+ snprintf(strcscount, sizeof(strcscount), "%d", cscount);
+
+ /* TODO: print this channel ;; @slug -- WTF? */
+ controlreply(np, "%-30s %5ld %-8s%s%s%-11s%s%s%s",
+ cip->name->content,
+ ucount,
+ ucount != 1 ? "users" : "user",
+ *cservices ? "- found " : "",
+ *cservices ? strcscount : "",
+ *cservices ? (strchr(cservices, ',') ? " chanservs" : " chanserv") : "",
+ *cservices ? "(" : "",
+ *cservices ? cservices : "",
+ *cservices ? ")" : "");
+
+ ccount++;
+
+ if (ccount > 1000)
+ break; /* Don't ever list more than 1000 channels */
+ }
+ }
+ }
+
+ if (ccount > 1000)
+ controlreply(np, "More than 1000 matching channels were found. Please use a more specific pattern.");
+ else
+ controlreply(np, "Found %d channels matching specified pattern.", ccount);
+
+ return CMD_OK;
+}
+
+int controlbroadcast(void *sender, int cargc, char **cargv) {
+ nick *np = (nick*)sender;
+
+ if (cargc<1)
+ return CMD_USAGE;
+
+ controlwall(NO_OPER, NL_BROADCASTS, "%s/%s sent a broadcast: %s", np->nick, np->authname, cargv[0]);
+
+ irc_send("%s O $* :(Broadcast) %s", longtonumeric(mynick->numeric,5), cargv[0]);
+
+ controlreply(np, "Message broadcasted.");
+
+ return CMD_OK;
+}
+
+int controlmbroadcast(void *sender, int cargc, char **cargv) {
+ nick *np = (nick*)sender;
+
+ if (cargc<2)
+ return CMD_USAGE;
+
+ controlwall(NO_OPER, NL_BROADCASTS, "%s/%s sent an mbroadcast to %s: %s", np->nick, np->authname, cargv[0], cargv[1]);
+
+ irc_send("%s O $@%s :(mBroadcast) %s", longtonumeric(mynick->numeric,5), cargv[0], cargv[1]);
+
+ controlreply(np, "Message mbroadcasted.");
+
+ return CMD_OK;
+}
+
+int controlsbroadcast(void *sender, int cargc, char **cargv) {
+ nick *np = (nick *)sender;
+
+ if(cargc<2)
+ return CMD_USAGE;
+
+ controlwall(NO_OPER, NL_BROADCASTS, "%s/%s sent an sbroadcast to %s: %s", np->nick, np->authname, cargv[0], cargv[1]);
+
+ irc_send("%s O $%s :(sBroadcast) %s", longtonumeric(mynick->numeric,5), cargv[0], cargv[1]);
+
+ controlreply(np, "Message sbroadcasted.");
+
+ return CMD_OK;
+}
+
+int controlobroadcast(void *sender, int cargc, char **cargv) {
+ nick *np = (nick *)sender, *nip;
+ int i;
+
+ if(cargc<1)
+ return CMD_USAGE;
+
+ controlwall(NO_OPER, NL_BROADCASTS, "%s/%s sent an obroadcast: %s", np->nick, np->authname, cargv[0]);
+
+ for(i=0;i<NICKHASHSIZE;i++)
+ for(nip=nicktable[i];nip;nip=nip->next)
+ if(nip && IsOper(nip))
+ controlnotice(nip, "(oBroadcast) %s", cargv[0]);
+
+ controlreply(np, "Message obroadcasted.");
+
+ return CMD_OK;
+}
+
+int controlcbroadcast(void *sender, int cargc, char **cargv) {
+ nick *np = (nick *)sender, *nip;
+ int i, ext, target;
+ GeoIP_LookupCode l;
+
+ if(cargc < 2)
+ return CMD_USAGE;
+
+ ext = findnickext("geoip");
+ if(ext == -1) {
+ controlreply(np, "Geoip module not loaded.");
+ return CMD_ERROR;
+ }
+
+ l = ndlsym("geoip", "geoip_lookupcode");
+ target = l(cargv[0]);
+
+ if(target == -1) {
+ controlreply(np, "Invalid country.");
+ return CMD_ERROR;
+ }
+
+ controlwall(NO_OPER, NL_BROADCASTS, "%s/%s sent a cbroadcast %s: %s", np->nick, np->authname, cargv[0], cargv[1]);
+
+ for(i=0;i<NICKHASHSIZE;i++)
+ for(nip=nicktable[i];nip;nip=nip->next)
+ if(nip && ((int)((long)nip->exts[ext]) == target))
+ controlnotice(nip, "(cBroadcast) %s", cargv[1]);
+
+ controlreply(np, "Message cbroadcasted.");
+
+ return CMD_OK;
+}