-/*
- * (C)opyright MMV-MMVI Anselm R. Garbe <garbeam at gmail dot com>
- * (C)opyright MMV-MMVI Nico Golde <nico at ngolde dot de>
- * See LICENSE file for license details.
- */
-
+/* See LICENSE file for license details. */
#include <errno.h>
#include <netdb.h>
-#include <sys/types.h>
#include <netinet/in.h>
+#include <stdarg.h>
#include <stdio.h>
#include <stdlib.h>
-#include <limits.h>
-#include <fcntl.h>
#include <string.h>
-#include <pwd.h>
-#include <signal.h>
-#include <sys/stat.h>
-#include <sys/socket.h>
-#include <ctype.h>
#include <time.h>
#include <unistd.h>
-
-#define PING_TIMEOUT 300
-#define MAXMSG 4096
-
-enum { TOK_NICKSRV = 0, TOK_USER, TOK_CMD, TOK_CHAN, TOK_ARG, TOK_TEXT, TOK_LAST };
-
-static char *host = NULL;
-static char nick[32]; /* might change while running */
-static char message[MAXMSG]; /* message buf used for communication */
-static int irc;
-static time_t last_response;
-
-static int
-tcpopen(char *address)
-{
- int fd = 0;
- char *port;
- struct sockaddr_in addr = { 0 };
- struct hostent *hp;
- unsigned int prt;
-
- if((host = strchr(address, '!')))
- *(host++) = 0;
-
- if(!(port = strrchr(host, '!')))
- return -1;
- *port = 0;
- port++;
- if(sscanf(port, "%d", &prt) != 1)
- return -1;
-
- /* init */
- if((fd = socket(AF_INET, SOCK_STREAM, 0)) < 0)
- return -1;
- hp = gethostbyname(host);
- addr.sin_family = AF_INET;
- addr.sin_port = htons(prt);
- bcopy(hp->h_addr, &addr.sin_addr, hp->h_length);
-
- if(connect(fd, (struct sockaddr *) &addr,
- sizeof(struct sockaddr_in))) {
- close(fd);
- return -1;
- }
- return fd;
-}
-
-unsigned int
-tokenize(char **result, unsigned int reslen, char *str, char delim)
-{
- char *p, *n;
- unsigned int i = 0;
-
- if(!str)
- return 0;
- for(n = str; *n == delim; n++);
- p = n;
- for(i = 0; *n != 0;) {
- if(i == reslen)
- return i;
- if(*n == delim) {
- *n = 0;
- if(strlen(p))
- result[i++] = p;
- p = ++n;
- } else
- n++;
- }
- if((i < reslen) && (p < n) && strlen(p))
- result[i++] = p;
- return i; /* number of tokens */
+#include <sys/socket.h>
+#include <sys/time.h>
+
+#define PINGTIMEOUT 300
+#define MAXMSG 4096
+#ifndef VERSION
+#define VERSION "dev"
+#endif
+
+static void die(const char *errstr, ...);
+static void printl(char *channel, char *msg);
+static void privmsg(char *channel, char *msg);
+static void parsein(char *msg);
+static void parsesrv(char *msg);
+static int readl(int fd, unsigned int len, char *buf);
+
+static char *host = "irc6.oftc.net";
+static char *port = "6667";
+static char nick[32];
+
+static char bufin[MAXMSG], bufout[MAXMSG];
+static char channel[256];
+static int srv;
+static time_t trespond;
+
+void
+die(const char *errstr, ...) {
+ va_list ap;
+ va_start(ap, errstr);
+ vfprintf(stderr, errstr, ap);
+ va_end(ap);
+ exit(EXIT_FAILURE);
}
-static void
-print_out(char *channel, char *buf)
-{
- static char buft[18];
+void
+printl(char *channel, char *msg) {
+ static char timestr[18];
time_t t = time(0);
-
- strftime(buft, sizeof(buft), "%F %R", localtime(&t));
- fprintf(stdout, "%s: %s %s\n", channel, buft, buf);
+ strftime(timestr, sizeof timestr, "%D %R", localtime(&t));
+ fprintf(stdout, "%-12.12s: %s %s\n", channel, timestr, msg);
}
-static void
-proc_channels_privmsg(char *channel, char *buf)
-{
- snprintf(message, MAXMSG, "<%s> %s", nick, buf);
- print_out(channel, message);
- snprintf(message, MAXMSG, "PRIVMSG %s :%s\r\n", channel, buf);
- write(irc, message, strlen(message));
+void
+privmsg(char *channel, char *msg) {
+ if(channel[0] == '\0')
+ return;
+ snprintf(bufout, sizeof bufout, "<%s> %s", nick, msg);
+ printl(channel, bufout);
+ snprintf(bufout, sizeof bufout, "PRIVMSG %s :%s\r\n", channel, msg);
+ write(srv, bufout, strlen(bufout));
}
-static void
-proc_channels_input(char *buf)
-{
- char *p;
-
- if((p = strchr(buf, ' ')))
- *(p++) = 0;
- if(buf[0] != '/' && buf[0] != 0) {
- proc_channels_privmsg(buf, p);
+void
+parsein(char *msg) {
+ char *p = NULL;
+ if(msg[0] == '\0')
+ return;
+ if(msg[0] != ':') {
+ privmsg(channel, msg);
return;
}
- if((p = strchr(&buf[3], ' ')))
- *(p++) = 0;
- switch (buf[1]) {
- case 'j':
- if(buf[3] == '#')
- snprintf(message, MAXMSG, "JOIN %s\r\n", &buf[3]);
- else if(p) {
- proc_channels_privmsg(&buf[3], p + 1);
- return;
- }
- break;
- case 't':
- snprintf(message, MAXMSG, "TOPIC %s :%s\r\n", &buf[3], p);
- break;
- case 'l':
- if(p)
- snprintf(message, MAXMSG, "PART %s :%s\r\n", &buf[3], p);
- else
- snprintf(message, MAXMSG, "PART %s :sic - 300 SLOC are too much\r\n", &buf[3]);
- write(irc, message, strlen(message));
+ if(strncmp(msg + 1, "j ", 2) == 0 && (msg[3] == '#'))
+ snprintf(bufout, sizeof bufout, "JOIN %s\r\n", msg + 3);
+ else if(strncmp(msg + 1, "l ", 2) == 0)
+ snprintf(bufout, sizeof bufout, "PART %s :sic - 250 LOC are too much!\r\n", msg + 3);
+ else if(strncmp(msg + 1, "m ", 2) == 0) {
+ if((p = strchr(msg + 3, ' ')))
+ *(p++) = '\0';
+ privmsg(msg + 3, p);
return;
- break;
- default:
- snprintf(message, MAXMSG, "%s\r\n", &buf[1]);
- break;
}
- write(irc, message, strlen(message));
-}
-
-static void
-proc_server_cmd(char *buf)
-{
- char *argv[TOK_LAST], *cmd, *p;
- int i;
- if(!buf || *buf=='\0')
+ else if(strncmp(msg + 1, "s ", 2) == 0) {
+ strncpy(channel, msg + 3, sizeof channel - 1);
return;
+ }
+ else
+ snprintf(bufout, sizeof bufout, "%s\r\n", msg + 1);
+ write(srv, bufout, strlen(bufout));
+}
- for(i = 0; i < TOK_LAST; i++)
- argv[i] = NULL;
-
- /*
- <message> ::= [':' <prefix> <SPACE> ] <command> <params> <crlf>
- <prefix> ::= <servername> | <nick> [ '!' <user> ] [ '@' <host> ]
- <command> ::= <letter> { <letter> } | <number> <number> <number>
- <SPACE> ::= ' ' { ' ' }
- <params> ::= <SPACE> [ ':' <trailing> | <middle> <params> ]
- <middle> ::= <Any *non-empty* sequence of octets not including SPACE
- or NUL or CR or LF, the first of which may not be ':'>
- <trailing> ::= <Any, possibly *empty*, sequence of octets not including NUL or CR or LF>
- <crlf> ::= CR LF
- */
- if(buf[0] == ':') { /* check prefix */
- p = strchr(buf, ' ');
- *p = 0;
- for(++p; *p == ' '; p++);
- cmd = p;
- argv[TOK_NICKSRV] = &buf[1];
- if((p = strchr(buf, '!'))) {
- *p = 0;
- argv[TOK_USER] = ++p;
- }
- } else
- cmd = buf;
+void
+parsesrv(char *msg) {
+ char *chan, *cmd, *p, *txt, *usr;
- /* remove CRLFs */
- for(p = cmd; p && *p != 0; p++)
+ txt = NULL;
+ usr = host;
+ if(msg == NULL || *msg == '\0' )
+ return;
+ if(msg[0] != ':')
+ cmd = msg;
+ else {
+ if(!(p = strchr(msg, ' ')))
+ return;
+ *p = '\0';
+ usr = msg + 1;
+ cmd = ++p;
+ if((p = strchr(usr, '!')))
+ *p = '\0';
+ }
+ for(p = cmd; *p != '\0'; p++) /* remove CRLFs */
if(*p == '\r' || *p == '\n')
- *p = 0;
-
+ *p = '\0';
if((p = strchr(cmd, ':'))) {
- *p = 0;
- argv[TOK_TEXT] = ++p;
+ *p = '\0';
+ txt = ++p;
}
- tokenize(&argv[TOK_CMD], TOK_LAST - TOK_CMD, cmd, ' ');
-
- if(!strncmp("PONG", argv[TOK_CMD], 5)) {
- return;
- } else if(!strncmp("PING", argv[TOK_CMD], 5)) {
- snprintf(message, MAXMSG, "PONG %s\r\n", argv[TOK_TEXT]);
- write(irc, message, strlen(message));
- return;
- } else if(!argv[TOK_NICKSRV] || !argv[TOK_USER]) { /* server command */
- snprintf(message, MAXMSG, "%s", argv[TOK_TEXT] ? argv[TOK_TEXT] : "");
- print_out(0, message);
+ if(strncmp("PONG", cmd, 4) == 0)
return;
- } else if(!strncmp("ERROR", argv[TOK_CMD], 6))
- snprintf(message, MAXMSG, "-!- error %s",
- argv[TOK_TEXT] ? argv[TOK_TEXT] : "unknown");
- else if(!strncmp("JOIN", argv[TOK_CMD], 5)) {
- if(argv[TOK_TEXT]!=NULL){
- p = strchr(argv[TOK_TEXT], ' ');
- if(p)
- *p = 0;
- }
- argv[TOK_CHAN] = argv[TOK_TEXT];
- snprintf(message, MAXMSG, "-!- %s(%s) has joined %s",
- argv[TOK_NICKSRV], argv[TOK_USER], argv[TOK_TEXT]);
- } else if(!strncmp("PART", argv[TOK_CMD], 5)) {
- snprintf(message, MAXMSG, "-!- %s(%s) has left %s",
- argv[TOK_NICKSRV], argv[TOK_USER], argv[TOK_CHAN]);
- } else if(!strncmp("MODE", argv[TOK_CMD], 5))
- snprintf(message, MAXMSG, "-!- %s changed mode/%s -> %s %s",
- argv[TOK_NICKSRV], argv[TOK_CMD + 1],
- argv[TOK_CMD + 2], argv[TOK_CMD + 3]);
- else if(!strncmp("QUIT", argv[TOK_CMD], 5))
- snprintf(message, MAXMSG, "-!- %s(%s) has quit \"%s\"",
- argv[TOK_NICKSRV], argv[TOK_USER],
- argv[TOK_TEXT] ? argv[TOK_TEXT] : "");
- else if(!strncmp("NICK", argv[TOK_CMD], 5))
- snprintf(message, MAXMSG, "-!- %s changed nick to %s",
- argv[TOK_NICKSRV], argv[TOK_TEXT]);
- else if(!strncmp("TOPIC", argv[TOK_CMD], 6))
- snprintf(message, MAXMSG, "-!- %s changed topic to \"%s\"",
- argv[TOK_NICKSRV], argv[TOK_TEXT] ? argv[TOK_TEXT] : "");
- else if(!strncmp("KICK", argv[TOK_CMD], 5))
- snprintf(message, MAXMSG, "-!- %s kicked %s (\"%s\")",
- argv[TOK_NICKSRV], argv[TOK_ARG],
- argv[TOK_TEXT] ? argv[TOK_TEXT] : "");
- else if(!strncmp("NOTICE", argv[TOK_CMD], 7))
- snprintf(message, MAXMSG, "-!- \"%s\")",
- argv[TOK_TEXT] ? argv[TOK_TEXT] : "");
- else if(!strncmp("PRIVMSG", argv[TOK_CMD], 8))
- snprintf(message, MAXMSG, "<%s> %s",
- argv[TOK_NICKSRV], argv[TOK_TEXT] ? argv[TOK_TEXT] : "");
- if(!argv[TOK_CHAN] || !strncmp(argv[TOK_CHAN], nick, strlen(nick)))
- print_out(argv[TOK_NICKSRV], message);
- else
- print_out(argv[TOK_CHAN], message);
+ if(strncmp("PRIVMSG", cmd, 7) == 0 && txt != NULL) {
+ if(!(p = strchr(cmd, ' ')))
+ return;
+ *p = '\0';
+ chan = ++p;
+ for(; *p != '\0' && *p != ' '; p++);
+ *p = '\0';
+ snprintf(bufout, sizeof bufout, "<%s> %s", usr, txt);
+ printl(chan, bufout);
+ }
+ else if(strncmp("PING", cmd, 4) == 0 && txt != NULL) {
+ snprintf(bufout, sizeof bufout, "PONG %s\r\n", txt);
+ write(srv, bufout, strlen(bufout));
+ }
+ else {
+ if (txt != NULL)
+ (void) snprintf(bufout, sizeof bufout, ">< %s: %s", cmd, txt);
+ else
+ (void) snprintf(bufout, sizeof bufout, ">< %s: ", cmd);
+ printl(usr, bufout);
+ if(strncmp("NICK", cmd, 4) == 0 && strncmp(usr, nick, sizeof nick) == 0 && txt != NULL)
+ strncpy(nick, txt, sizeof nick - 1);
+ }
}
-static int
-read_line(int fd, unsigned int res_len, char *buf)
-{
+int
+readl(int fd, unsigned int len, char *buf) {
unsigned int i = 0;
- char c;
+ char c = '\0';
+
do {
- if(read(fd, &c, sizeof(char)) != sizeof(char))
+ if(read(fd, &c, sizeof(char)) != (ssize_t) sizeof(char))
return -1;
buf[i++] = c;
}
- while(c != '\n' && i < res_len);
- buf[i - 1] = 0; /* eliminates '\n' */
+ while(c != '\n' && i < len);
+ buf[i - 1] = '\0';
return 0;
}
-static void
-handle_server_output()
-{
- static char buf[MAXMSG];
- if(read_line(irc, MAXMSG, buf) == -1) {
- perror("sic: remote host closed connection");
- exit(EXIT_FAILURE);
- }
- proc_server_cmd(buf);
-}
int
-main(int argc, char *argv[])
-{
- char address[256];
- char *password = NULL;
- char *fullname = NULL;
- char ping_msg[512], buf[MAXMSG];
- int i, n, r, maxfd;
- struct passwd *spw = getpwuid(getuid());
+main(const int argc, char *const argv[]) {
+ int i;
struct timeval tv;
+ static struct addrinfo hints, *res, *r;
+ char ping[256];
fd_set rd;
+ char *password = NULL;
- if(!spw) {
- fprintf(stderr,"sic: getpwuid() failed\n");
- exit(EXIT_FAILURE);
- }
- snprintf(nick, sizeof(nick), "%s", spw->pw_name);
-
- if(argc == 2 && argv[1][0] == '-' && argv[1][1] == 'h')
- goto Usage;
+ strncpy(nick, getenv("USER"), sizeof nick - 1);
+ for(i = 1; i < argc; i++)
+ if(strcmp(argv[i], "-h") == 0) {
+ if(++i < argc) host = argv[i];
+ }
+ else if(strcmp(argv[i], "-p") == 0) {
+ if(++i < argc) port = argv[i];
+ }
+ else if(strcmp(argv[i], "-n") == 0) {
+ if(++i < argc) strncpy(nick, argv[i], sizeof nick - 1);
+ }
+ else if(strcmp(argv[i], "-k") == 0) {
+ if(++i < argc) password = argv[i];
+ }
+ else if(strcmp(argv[i], "-v") == 0)
+ die("sic-%s, © 2005-2009 sic engineers\n", VERSION);
+ else
+ die("usage: sic [-h host] [-p port] [-n nick] [-k keyword] [-v]\n");
- address[0] = 0;
- for(i = 1; (i + 1 < argc) && (argv[i][0] == '-'); i++) {
- switch (argv[i][1]) {
- default:
-Usage:
- fputs("usage: sic -a address [-n nick] [-f fullname] [-p password] [-v]\n",
- stdout);
- exit(EXIT_FAILURE);
- break;
- case 'a':
- strncpy(address, argv[++i], sizeof(address));
- break;
- case 'n':
- snprintf(nick, sizeof(nick), "%s", argv[++i]);
- break;
- case 'p':
- password = argv[++i];
- break;
- case 'f':
- fullname = argv[++i];
+ /* init */
+ memset(&hints, 0, sizeof hints);
+ hints.ai_family = AF_UNSPEC;
+ hints.ai_socktype = SOCK_STREAM;
+ if(getaddrinfo(host, port, &hints, &res) != 0)
+ die("error: cannot resolve hostname '%s'\n", host);
+ for(r = res; r; r = r->ai_next) {
+ if((srv = socket(r->ai_family, r->ai_socktype, r->ai_protocol)) == -1)
+ continue;
+ if(connect(srv, r->ai_addr, r->ai_addrlen) == 0)
break;
- }
+ close(srv);
}
+ freeaddrinfo(res);
+ if(!r)
+ die("error: cannot connect to host '%s'\n", host);
- if(!address[0])
- goto Usage;
-
- if((irc = tcpopen(address)) == -1) {
- fprintf(stderr, "sic: cannot connect server '%s'\n", address);
- exit(EXIT_FAILURE);
- }
/* login */
- if(password)
- snprintf(message, MAXMSG,
- "PASS %s\r\nNICK %s\r\nUSER %s localhost %s :%s\r\n",
- password, nick, nick, host, fullname ? fullname : nick);
+ if (password)
+ snprintf(bufout, sizeof bufout,
+ "PASS %s\r\nNICK %s\r\nUSER %s localhost %s :%s\r\n",
+ password, nick, nick, host, nick);
else
- snprintf(message, MAXMSG, "NICK %s\r\nUSER %s localhost %s :%s\r\n",
- nick, nick, host, fullname ? fullname : nick);
- write(irc, message, strlen(message));
-
- snprintf(ping_msg, sizeof(ping_msg), "PING %s\r\n", host);
- for(;;) {
+ snprintf(bufout, sizeof bufout, "NICK %s\r\nUSER %s localhost %s :%s\r\n",
+ nick, nick, host, nick);
+ write(srv, bufout, strlen(bufout));
+ snprintf(ping, sizeof ping, "PING %s\r\n", host);
+ channel[0] = '\0';
+ setbuf(stdout, NULL); /* unbuffered stdout */
+
+ for(;;) { /* main loop */
FD_ZERO(&rd);
- maxfd = irc;
FD_SET(0, &rd);
- FD_SET(irc, &rd);
+ FD_SET(srv, &rd);
tv.tv_sec = 120;
tv.tv_usec = 0;
- r = select(maxfd + 1, &rd, 0, 0, &tv);
- if(r < 0) {
+ i = select(srv + 1, &rd, 0, 0, &tv);
+ if(i < 0) {
if(errno == EINTR)
continue;
- perror("sic: error on select()");
- exit(EXIT_FAILURE);
- } else if(r == 0) {
- if(time(NULL) - last_response >= PING_TIMEOUT) {
- print_out(NULL, "-!- sic shutting down: ping timeout");
- exit(EXIT_FAILURE);
- }
- write(irc, ping_msg, strlen(ping_msg));
+ die("error: error on select()\n");
+ }
+ else if(i == 0) {
+ if(time(NULL) - trespond >= PINGTIMEOUT)
+ die("error: sic shutting down: parse timeout\n");
+ write(srv, ping, strlen(ping));
continue;
}
- if(FD_ISSET(irc, &rd)) {
- handle_server_output();
- last_response = time(NULL);
+ if(FD_ISSET(srv, &rd) != 0) {
+ if(readl(srv, sizeof bufin, bufin) == -1)
+ die("error: remote host closed connection\n");
+ parsesrv(bufin);
+ trespond = time(NULL);
}
- if(FD_ISSET(0, &rd)) {
- i = n = 0;
- for(;;) {
- if((i = getchar()) == EOF) {
- perror("sic: broken pipe");
- exit(EXIT_FAILURE);
- }
- if(i == '\n' || n >= sizeof(buf) - 1)
- break;
- buf[n++] = i;
- }
- buf[n] = 0;
- proc_channels_input(buf);
+ if(FD_ISSET(0, &rd) != 0) {
+ if(readl(0, sizeof bufin, bufin) == -1)
+ die("error: broken pipe\n");
+ parsein(bufin);
}
}
-
return 0;
}