catgirl/command.c

558 lines
14 KiB
C

/* Copyright (C) 2020 C. McEnroe <june@causal.agency>
*
* This program is free software: you can redistribute it and/or modify
* it under the terms of the GNU General Public License as published by
* the Free Software Foundation, either version 3 of the License, or
* (at your option) any later version.
*
* This program is distributed in the hope that it will be useful,
* but WITHOUT ANY WARRANTY; without even the implied warranty of
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
* GNU General Public License for more details.
*
* You should have received a copy of the GNU General Public License
* along with this program. If not, see <https://www.gnu.org/licenses/>.
*
* Additional permission under GNU GPL version 3 section 7:
*
* If you modify this Program, or any covered work, by linking or
* combining it with LibreSSL (or a modified version of that library),
* containing parts covered by the terms of the OpenSSL License and the
* original SSLeay license, the licensors of this Program grant you
* additional permission to convey the resulting work. Corresponding
* Source for a non-source form of such a combination shall include the
* source code for the parts of LibreSSL used as well as that of the
* covered work.
*/
#include <assert.h>
#include <ctype.h>
#include <stdio.h>
#include <stdlib.h>
#include <string.h>
#include <unistd.h>
#include "chat.h"
typedef void Command(uint id, char *params);
static void commandDebug(uint id, char *params) {
(void)id;
(void)params;
self.debug ^= true;
uiFormat(
Debug, Warm, NULL,
"\3%dDebug is %s", Gray, (self.debug ? "on" : "off")
);
}
static void commandQuote(uint id, char *params) {
(void)id;
if (params) ircFormat("%s\r\n", params);
}
static void echoMessage(char *cmd, uint id, char *params) {
if (!params) return;
ircFormat("%s %s :%s\r\n", cmd, idNames[id], params);
struct Message msg = {
.nick = self.nick,
.user = self.user,
.cmd = cmd,
.params[0] = idNames[id],
.params[1] = params,
};
handle(msg);
}
static void splitMessage(char *cmd, uint id, char *params) {
if (!params) return;
int overhead = snprintf(
NULL, 0, ":%s!%*s@%*s %s %s :\r\n",
self.nick,
(self.user ? 0 : network.userLen), (self.user ?: "*"),
(self.host ? 0 : network.hostLen), (self.host ?: "*"),
cmd, idNames[id]
);
assert(overhead > 0 && overhead < 512);
int chunk = 512 - overhead;
if (strlen(params) <= (size_t)chunk && !strchr(params, '\n')) {
echoMessage(cmd, id, params);
return;
}
while (*params) {
int len = 0;
for (int n = 0; params[len] != '\n' && len + n <= chunk; len += n) {
n = mblen(&params[len], 1 + strlen(&params[len]));
if (n < 0) {
n = 1;
mblen(NULL, 0);
}
if (!n) break;
}
char ch = params[len];
params[len] = '\0';
echoMessage(cmd, id, params);
params[len] = ch;
params += len;
if (ch == '\n') params++;
}
}
static void commandPrivmsg(uint id, char *params) {
splitMessage("PRIVMSG", id, params);
}
static void commandNotice(uint id, char *params) {
splitMessage("NOTICE", id, params);
}
static void commandMe(uint id, char *params) {
char buf[512];
snprintf(buf, sizeof(buf), "\1ACTION %s\1", (params ?: ""));
echoMessage("PRIVMSG", id, buf);
}
static void commandMsg(uint id, char *params) {
id = idFor(strsep(&params, " "));
splitMessage("PRIVMSG", id, params);
}
static void commandJoin(uint id, char *params) {
if (!params) params = idNames[id];
uint count = 1;
for (char *ch = params; *ch && *ch != ' '; ++ch) {
if (*ch == ',') count++;
}
ircFormat("JOIN %s\r\n", params);
replies.join += count;
replies.topic += count;
replies.names += count;
}
static void commandPart(uint id, char *params) {
if (params) {
ircFormat("PART %s :%s\r\n", idNames[id], params);
} else {
ircFormat("PART %s\r\n", idNames[id]);
}
}
static void commandQuit(uint id, char *params) {
(void)id;
set(&self.quit, (params ?: "nyaa~"));
}
static void commandNick(uint id, char *params) {
(void)id;
if (!params) return;
ircFormat("NICK :%s\r\n", params);
}
static void commandAway(uint id, char *params) {
(void)id;
if (params) {
ircFormat("AWAY :%s\r\n", params);
} else {
ircFormat("AWAY\r\n");
}
replies.away++;
}
static void commandTopic(uint id, char *params) {
if (params) {
ircFormat("TOPIC %s :%s\r\n", idNames[id], params);
} else {
ircFormat("TOPIC %s\r\n", idNames[id]);
replies.topic++;
}
}
static void commandNames(uint id, char *params) {
(void)params;
ircFormat("NAMES %s\r\n", idNames[id]);
replies.names++;
}
static void commandInvite(uint id, char *params) {
if (!params) return;
char *nick = strsep(&params, " ");
ircFormat("INVITE %s %s\r\n", nick, idNames[id]);
}
static void commandKick(uint id, char *params) {
if (!params) return;
char *nick = strsep(&params, " ");
if (params) {
ircFormat("KICK %s %s :%s\r\n", idNames[id], nick, params);
} else {
ircFormat("KICK %s %s\r\n", idNames[id], nick);
}
}
static void commandMode(uint id, char *params) {
if (id == Network) {
if (params) {
ircFormat("MODE %s %s\r\n", self.nick, params);
} else {
ircFormat("MODE %s\r\n", self.nick);
replies.mode++;
}
} else {
if (params) {
ircFormat("MODE %s %s\r\n", idNames[id], params);
} else {
ircFormat("MODE %s\r\n", idNames[id]);
replies.mode++;
}
}
}
static void channelListMode(uint id, char pm, char l, const char *params) {
int count = 1;
for (const char *ch = params; *ch; ++ch) {
if (*ch == ' ') count++;
}
char modes[ParamCap - 2] = { l, l, l, l, l, l, l, l, l, l, l, l, l };
ircFormat("MODE %s %c%.*s %s\r\n", idNames[id], pm, count, modes, params);
}
static void commandOp(uint id, char *params) {
if (params) {
channelListMode(id, '+', 'o', params);
} else {
ircFormat("PRIVMSG ChanServ :OP %s\r\n", idNames[id]);
}
}
static void commandDeop(uint id, char *params) {
channelListMode(id, '-', 'o', (params ?: self.nick));
}
static void commandVoice(uint id, char *params) {
if (params) {
channelListMode(id, '+', 'v', params);
} else {
ircFormat("PRIVMSG ChanServ :VOICE %s\r\n", idNames[id]);
}
}
static void commandDevoice(uint id, char *params) {
channelListMode(id, '-', 'v', (params ?: self.nick));
}
static void commandBan(uint id, char *params) {
if (params) {
channelListMode(id, '+', 'b', params);
} else {
ircFormat("MODE %s b\r\n", idNames[id]);
replies.ban++;
}
}
static void commandUnban(uint id, char *params) {
if (!params) return;
channelListMode(id, '-', 'b', params);
}
static void commandExcept(uint id, char *params) {
if (params) {
channelListMode(id, '+', network.excepts, params);
} else {
ircFormat("MODE %s %c\r\n", idNames[id], network.excepts);
replies.excepts++;
}
}
static void commandUnexcept(uint id, char *params) {
if (!params) return;
channelListMode(id, '-', network.excepts, params);
}
static void commandInvex(uint id, char *params) {
if (params) {
channelListMode(id, '+', network.invex, params);
} else {
ircFormat("MODE %s %c\r\n", idNames[id], network.invex);
replies.invex++;
}
}
static void commandUninvex(uint id, char *params) {
if (!params) return;
channelListMode(id, '-', network.invex, params);
}
static void commandList(uint id, char *params) {
(void)id;
if (params) {
ircFormat("LIST :%s\r\n", params);
} else {
ircFormat("LIST\r\n");
}
replies.list++;
}
static void commandWhois(uint id, char *params) {
(void)id;
if (!params) return;
ircFormat("WHOIS :%s\r\n", params);
replies.whois++;
}
static void commandNS(uint id, char *params) {
(void)id;
if (params) ircFormat("PRIVMSG NickServ :%s\r\n", params);
}
static void commandCS(uint id, char *params) {
(void)id;
if (params) ircFormat("PRIVMSG ChanServ :%s\r\n", params);
}
static void commandQuery(uint id, char *params) {
if (!params) return;
uint query = idFor(params);
idColors[query] = completeColor(id, params);
uiShowID(query);
}
static void commandWindow(uint id, char *params) {
if (!params) return;
if (isdigit(params[0])) {
uiShowNum(strtoul(params, NULL, 10));
} else {
id = idFind(params);
if (id) uiShowID(id);
}
}
static void commandMove(uint id, char *params) {
if (!params) return;
char *name = strsep(&params, " ");
if (params) {
id = idFind(name);
if (id) uiMoveID(id, strtoul(params, NULL, 10));
} else {
uiMoveID(id, strtoul(name, NULL, 10));
}
}
static void commandClose(uint id, char *params) {
if (!params) {
uiCloseID(id);
} else if (isdigit(params[0])) {
uiCloseNum(strtoul(params, NULL, 10));
} else {
id = idFind(params);
if (id) uiCloseID(id);
}
}
static void commandOpen(uint id, char *params) {
if (!params) {
urlOpenCount(id, 1);
} else if (isdigit(params[0]) && !params[1]) {
urlOpenCount(id, params[0] - '0');
} else {
urlOpenMatch(id, params);
}
}
static void commandCopy(uint id, char *params) {
urlCopyMatch(id, params);
}
static void commandIgnore(uint id, char *params) {
if (params) {
const char *pattern = ignoreAdd(params);
uiFormat(
id, Cold, NULL, "Ignoring \3%02d%s\3",
Brown, pattern
);
} else {
for (size_t i = 0; i < ignore.len; ++i) {
uiFormat(
Network, Warm, NULL, "Ignoring \3%02d%s\3",
Brown, ignore.patterns[i]
);
}
}
}
static void commandUnignore(uint id, char *params) {
if (!params) return;
if (ignoreRemove(params)) {
uiFormat(
id, Cold, NULL, "No longer ignoring \3%02d%s\3",
Brown, params
);
} else {
uiFormat(id, Cold, NULL, "Not ignoring \3%02d%s\3", Brown, params);
}
}
static void commandExec(uint id, char *params) {
execID = id;
pid_t pid = fork();
if (pid < 0) err(EX_OSERR, "fork");
if (pid) return;
close(STDIN_FILENO);
dup2(execPipe[1], STDOUT_FILENO);
dup2(utilPipe[1], STDERR_FILENO);
const char *shell = getenv("SHELL") ?: "/bin/sh";
execlp(shell, shell, "-c", params, NULL);
warn("%s", shell);
_exit(EX_UNAVAILABLE);
}
static void commandHelp(uint id, char *params) {
(void)id;
uiHide();
pid_t pid = fork();
if (pid < 0) err(EX_OSERR, "fork");
if (pid) return;
char buf[256];
snprintf(buf, sizeof(buf), "ip%s$", (params ?: "COMMANDS"));
setenv("LESS", buf, 1);
execlp("man", "man", "1", "catgirl", NULL);
dup2(utilPipe[1], STDERR_FILENO);
warn("man");
_exit(EX_UNAVAILABLE);
}
enum Flag {
BIT(Multiline),
BIT(Restricted),
};
static const struct Handler {
const char *cmd;
Command *fn;
enum Flag flags;
} Commands[] = {
{ "/away", commandAway, 0 },
{ "/ban", commandBan, 0 },
{ "/close", commandClose, 0 },
{ "/copy", commandCopy, Restricted },
{ "/cs", commandCS, 0 },
{ "/debug", commandDebug, Restricted },
{ "/deop", commandDeop, 0 },
{ "/devoice", commandDevoice, 0 },
{ "/except", commandExcept, 0 },
{ "/exec", commandExec, Multiline | Restricted },
{ "/help", commandHelp, 0 },
{ "/ignore", commandIgnore, 0 },
{ "/invex", commandInvex, 0 },
{ "/invite", commandInvite, 0 },
{ "/join", commandJoin, Restricted },
{ "/kick", commandKick, 0 },
{ "/list", commandList, 0 },
{ "/me", commandMe, 0 },
{ "/mode", commandMode, 0 },
{ "/move", commandMove, 0 },
{ "/msg", commandMsg, Multiline | Restricted },
{ "/names", commandNames, 0 },
{ "/nick", commandNick, 0 },
{ "/notice", commandNotice, Multiline },
{ "/ns", commandNS, 0 },
{ "/o", commandOpen, Restricted },
{ "/op", commandOp, 0 },
{ "/open", commandOpen, Restricted },
{ "/part", commandPart, 0 },
{ "/query", commandQuery, Restricted },
{ "/quit", commandQuit, 0 },
{ "/quote", commandQuote, Multiline | Restricted },
{ "/say", commandPrivmsg, Multiline },
{ "/topic", commandTopic, 0 },
{ "/unban", commandUnban, 0 },
{ "/unexcept", commandUnexcept, 0 },
{ "/unignore", commandUnignore, 0 },
{ "/uninvex", commandUninvex, 0 },
{ "/voice", commandVoice, 0 },
{ "/whois", commandWhois, 0 },
{ "/window", commandWindow, 0 },
};
static int compar(const void *cmd, const void *_handler) {
const struct Handler *handler = _handler;
return strcmp(cmd, handler->cmd);
}
const char *commandIsPrivmsg(uint id, const char *input) {
if (id == Network || id == Debug) return NULL;
if (input[0] != '/') return input;
const char *space = strchr(&input[1], ' ');
const char *slash = strchr(&input[1], '/');
if (slash && (!space || slash < space)) return input;
return NULL;
}
const char *commandIsNotice(uint id, const char *input) {
if (id == Network || id == Debug) return NULL;
if (strncmp(input, "/notice ", 8)) return NULL;
return &input[8];
}
const char *commandIsAction(uint id, const char *input) {
if (id == Network || id == Debug) return NULL;
if (strncmp(input, "/me ", 4)) return NULL;
return &input[4];
}
void command(uint id, char *input) {
if (id == Debug && input[0] != '/' && !self.restricted) {
commandQuote(id, input);
return;
} else if (!input[0]) {
return;
} else if (commandIsPrivmsg(id, input)) {
commandPrivmsg(id, input);
return;
} else if (input[0] == '/' && isdigit(input[1])) {
commandWindow(id, &input[1]);
return;
}
const char *cmd = strsep(&input, " ");
const char *unique = complete(None, cmd);
if (unique && !complete(None, cmd)) {
cmd = unique;
completeReject();
}
const struct Handler *handler = bsearch(
cmd, Commands, ARRAY_LEN(Commands), sizeof(*handler), compar
);
if (!handler) {
uiFormat(id, Warm, NULL, "No such command %s", cmd);
return;
}
if (self.restricted && handler->flags & Restricted) {
uiFormat(id, Warm, NULL, "Command %s is restricted", cmd);
return;
}
if (input) {
if (!(handler->flags & Multiline)) {
input[strcspn(input, "\n")] = '\0';
}
input += strspn(input, " ");
size_t len = strlen(input);
while (input[len - 1] == ' ') input[--len] = '\0';
if (!input[0]) input = NULL;
}
handler->fn(id, input);
}
void commandCompleteAdd(void) {
for (size_t i = 0; i < ARRAY_LEN(Commands); ++i) {
completeAdd(None, Commands[i].cmd, Default);
}
}