+#include <stdarg.h>
+#include <stdio.h>
+#include <string.h>
+#include "../core/schedule.h"
+#include "../control/control.h"
+#include "../newsearch/newsearch.h"
+#include "../newsearch/parser.h"
+
+typedef struct nickwatch {
+ int id;
+
+ char term[512];
+ parsertree *tree;
+
+ struct nickwatch *next;
+} nickwatch;
+
+typedef struct nickwatchevent {
+ char description[128];
+ long numeric;
+} nickwatchevent;
+
+static nickwatch *nickwatches;
+static int nextnickwatch = 1;
+
+static void nw_dummyreply(nick *np, char *format, ...) { }
+
+static void nw_dummywall(int level, char *format, ...) { }
+
+static int nw_currentid;
+static nickwatchevent *nw_currentevent;
+
+static void nw_printnick(searchCtx *ctx, nick *sender, nick *np) {
+ char hostbuf[HOSTLEN+NICKLEN+USERLEN+4];
+
+ controlwall(NO_OPER, NL_HITS, "nickwatch(#%d, %s): %s [%s] (%s) (%s)", nw_currentid, nw_currentevent->description, visiblehostmask(np,hostbuf),
+ IPtostr(np->ipaddress), printflags(np->umodes, umodeflags), np->realname->name->content);
+}
+
+static nickwatchevent *nwe_new(nick *np, const char *format, ...) {
+ nickwatchevent *nwe;
+ va_list va;
+
+ nwe = malloc(sizeof(nickwatchevent));
+ nwe->numeric = np->numeric;
+
+ va_start(va, format);
+ vsnprintf(nwe->description, sizeof(nwe->description), format, va);
+ va_end(va);
+
+ return nwe;
+}
+
+static void nwe_free(nickwatchevent *nwe) {
+ free(nwe);
+}
+
+static void nw_sched_processevent(void *arg) {
+ nickwatchevent *nwe = arg;
+ nick *np;
+ nickwatch *nw;
+
+ np = getnickbynumeric(nwe->numeric);
+
+ if (!np) {
+ nwe_free(nwe);
+ return;
+ }
+ nw_currentevent = nwe;
+
+ for (nw = nickwatches; nw; nw = nw->next) {
+ nw_currentid = nw->id;
+ ast_nicksearch(nw->tree->root, &nw_dummyreply, mynick, &nw_dummywall, &nw_printnick, NULL, NULL, 10, np);
+ }
+
+ nwe_free(nwe);
+}
+
+static void nw_hook_newnick(int hooknum, void *arg) {
+ nick *np = arg;
+ nickwatchevent *nwe = nwe_new(np, "new user");
+ scheduleoneshot(0, nw_sched_processevent, nwe);
+}
+
+static void nw_hook_joinchannel(int hooknum, void *arg) {
+ void **args = arg;
+ channel *cp = args[0];
+ nick *np = args[1];
+ nickwatchevent *nwe = nwe_new(np, "join channel %s", cp->index->name->content);
+ scheduleoneshot(0, nw_sched_processevent, nwe);
+}
+
+static int nw_cmd_nickwatch(void *source, int cargc, char **cargv) {
+ nick *sender = source;
+ nickwatch *nw;
+ parsertree *tree;
+
+ if (cargc < 1)
+ return CMD_USAGE;
+
+ tree = parse_string(reg_nicksearch, cargv[0]);
+ if (!tree) {
+ displaystrerror(controlreply, sender, cargv[0]);
+ return CMD_ERROR;
+ }
+
+ nw = malloc(sizeof(nickwatch));
+ nw->id = nextnickwatch++;
+ strncpy(nw->term, cargv[0], sizeof(nw->term));
+ nw->tree = parse_string(reg_nicksearch, cargv[0]);
+ nw->next = nickwatches;
+ nickwatches = nw;
+
+ controlreply(sender, "Done.");
+
+ return CMD_OK;
+}
+
+static int nw_cmd_nickunwatch(void *source, int cargc, char **cargv) {
+ nick *sender = source;
+ nickwatch **pnext, *nw;
+ int id;
+
+ if (cargc < 1)
+ return CMD_USAGE;
+
+ id = atoi(cargv[0]);
+
+ for (pnext = &nickwatches; *pnext; pnext = &((*pnext)->next)) {
+ nw = *pnext;
+
+ if (nw->id == id) {
+ parse_free(nw->tree);
+ *pnext = nw->next;
+ free(nw);
+
+ controlreply(sender, "Done.");
+ return CMD_OK;
+ }
+ }
+
+ controlreply(sender, "Nickwatch #%d not found.", id);
+
+ return CMD_ERROR;
+}
+
+static int nw_cmd_nickwatches(void *source, int cargc, char **cargv) {
+ nick *sender = source;
+ nickwatch *nw;
+
+ controlreply(sender, "ID Term");
+
+ for (nw = nickwatches; nw; nw = nw->next)
+ controlreply(sender, "%-5d %s", nw->id, nw->term);
+
+ controlreply(sender, "--- End of nickwatches.");
+
+ return CMD_OK;
+}
+
+void _init(void) {
+ registercontrolhelpcmd("nickwatch", NO_OPER, 1, &nw_cmd_nickwatch, "Usage: nickwatch <nicksearch term>\nAdds a nickwatch entry.");
+ registercontrolhelpcmd("nickunwatch", NO_OPER, 1, &nw_cmd_nickunwatch, "Usage: nickunwatch <#id>\nRemoves a nickwatch entry.");
+ registercontrolhelpcmd("nickwatches", NO_OPER, 0, &nw_cmd_nickwatches, "Usage: nickwatches\nLists nickwatches.");
+
+ registerhook(HOOK_NICK_NEWNICK, &nw_hook_newnick);
+ registerhook(HOOK_CHANNEL_CREATE, &nw_hook_joinchannel);
+ registerhook(HOOK_CHANNEL_JOIN, &nw_hook_joinchannel);
+}
+
+void _fini(void) {
+ nickwatch *nw, *next;
+
+ deregistercontrolcmd("nickwatch", &nw_cmd_nickwatch);
+ deregistercontrolcmd("nickunwatch", &nw_cmd_nickunwatch);
+ deregistercontrolcmd("nickwatches", &nw_cmd_nickwatches);
+
+ deregisterhook(HOOK_NICK_NEWNICK, &nw_hook_newnick);
+ deregisterhook(HOOK_CHANNEL_CREATE, &nw_hook_joinchannel);
+ deregisterhook(HOOK_CHANNEL_JOIN, &nw_hook_joinchannel);
+
+ for (nw = nickwatches; nw; nw = next) {
+ next = nw->next;
+
+ parse_free(nw->tree);
+ free(nw);
+ }
+}