2 * (C)opyright MMV-MMVI Anselm R. Garbe <garbeam at gmail dot com>
3 * (C)opyright MMV-MMVI Nico Golde <nico at ngolde dot de>
4 * See LICENSE file for license details.
10 #include <netinet/in.h>
19 #include <sys/socket.h>
24 #define PING_TIMEOUT 300
27 enum { TOK_NICKSRV = 0, TOK_USER, TOK_CMD, TOK_CHAN, TOK_ARG, TOK_TEXT, TOK_LAST };
29 static char *host = NULL;
30 static char nick[32]; /* might change while running */
31 static char message[MAXMSG]; /* message buf used for communication */
33 static time_t last_response;
36 tcpopen(char *address)
40 struct sockaddr_in addr = { 0 };
44 if((host = strchr(address, '!')))
47 if(!(port = strrchr(host, '!')))
51 if(sscanf(port, "%d", &prt) != 1)
55 if((fd = socket(AF_INET, SOCK_STREAM, 0)) < 0)
57 hp = gethostbyname(host);
58 addr.sin_family = AF_INET;
59 addr.sin_port = htons(prt);
60 bcopy(hp->h_addr, &addr.sin_addr, hp->h_length);
62 if(connect(fd, (struct sockaddr *) &addr,
63 sizeof(struct sockaddr_in))) {
71 tokenize(char **result, unsigned int reslen, char *str, char delim)
78 for(n = str; *n == delim; n++);
80 for(i = 0; *n != 0;) {
91 if((i < reslen) && (p < n) && strlen(p))
93 return i; /* number of tokens */
97 print_out(char *channel, char *buf)
102 strftime(buft, sizeof(buft), "%F %R", localtime(&t));
103 fprintf(stdout, "%s: %s %s\n", channel, buft, buf);
107 proc_channels_privmsg(char *channel, char *buf)
109 snprintf(message, MAXMSG, "<%s> %s", nick, buf);
110 print_out(channel, message);
111 snprintf(message, MAXMSG, "PRIVMSG %s :%s\r\n", channel, buf);
112 write(irc, message, strlen(message));
116 proc_channels_input(char *buf)
120 if((p = strchr(buf, ' ')))
122 if(buf[0] != '/' && buf[0] != 0) {
123 proc_channels_privmsg(buf, p);
126 if((p = strchr(&buf[3], ' ')))
131 snprintf(message, MAXMSG, "JOIN %s\r\n", &buf[3]);
133 proc_channels_privmsg(&buf[3], p + 1);
138 snprintf(message, MAXMSG, "TOPIC %s :%s\r\n", &buf[3], p);
142 snprintf(message, MAXMSG, "PART %s :%s\r\n", &buf[3], p);
144 snprintf(message, MAXMSG, "PART %s :sic - 300 SLOC are too much\r\n", &buf[3]);
145 write(irc, message, strlen(message));
149 snprintf(message, MAXMSG, "%s\r\n", &buf[1]);
152 write(irc, message, strlen(message));
156 proc_server_cmd(char *buf)
158 char *argv[TOK_LAST], *cmd, *p;
160 if(!buf || *buf=='\0')
163 for(i = 0; i < TOK_LAST; i++)
167 <message> ::= [':' <prefix> <SPACE> ] <command> <params> <crlf>
168 <prefix> ::= <servername> | <nick> [ '!' <user> ] [ '@' <host> ]
169 <command> ::= <letter> { <letter> } | <number> <number> <number>
170 <SPACE> ::= ' ' { ' ' }
171 <params> ::= <SPACE> [ ':' <trailing> | <middle> <params> ]
172 <middle> ::= <Any *non-empty* sequence of octets not including SPACE
173 or NUL or CR or LF, the first of which may not be ':'>
174 <trailing> ::= <Any, possibly *empty*, sequence of octets not including NUL or CR or LF>
177 if(buf[0] == ':') { /* check prefix */
178 p = strchr(buf, ' ');
180 for(++p; *p == ' '; p++);
182 argv[TOK_NICKSRV] = &buf[1];
183 if((p = strchr(buf, '!'))) {
185 argv[TOK_USER] = ++p;
191 for(p = cmd; p && *p != 0; p++)
192 if(*p == '\r' || *p == '\n')
195 if((p = strchr(cmd, ':'))) {
197 argv[TOK_TEXT] = ++p;
199 tokenize(&argv[TOK_CMD], TOK_LAST - TOK_CMD, cmd, ' ');
201 if(!strncmp("PONG", argv[TOK_CMD], 5)) {
203 } else if(!strncmp("PING", argv[TOK_CMD], 5)) {
204 snprintf(message, MAXMSG, "PONG %s\r\n", argv[TOK_TEXT]);
205 write(irc, message, strlen(message));
207 } else if(!argv[TOK_NICKSRV] || !argv[TOK_USER]) { /* server command */
208 snprintf(message, MAXMSG, "%s", argv[TOK_TEXT] ? argv[TOK_TEXT] : "");
209 print_out(0, message);
211 } else if(!strncmp("ERROR", argv[TOK_CMD], 6))
212 snprintf(message, MAXMSG, "-!- error %s",
213 argv[TOK_TEXT] ? argv[TOK_TEXT] : "unknown");
214 else if(!strncmp("JOIN", argv[TOK_CMD], 5)) {
215 if(argv[TOK_TEXT]!=NULL){
216 p = strchr(argv[TOK_TEXT], ' ');
220 argv[TOK_CHAN] = argv[TOK_TEXT];
221 snprintf(message, MAXMSG, "-!- %s(%s) has joined %s",
222 argv[TOK_NICKSRV], argv[TOK_USER], argv[TOK_TEXT]);
223 } else if(!strncmp("PART", argv[TOK_CMD], 5)) {
224 snprintf(message, MAXMSG, "-!- %s(%s) has left %s",
225 argv[TOK_NICKSRV], argv[TOK_USER], argv[TOK_CHAN]);
226 } else if(!strncmp("MODE", argv[TOK_CMD], 5))
227 snprintf(message, MAXMSG, "-!- %s changed mode/%s -> %s %s",
228 argv[TOK_NICKSRV], argv[TOK_CMD + 1],
229 argv[TOK_CMD + 2], argv[TOK_CMD + 3]);
230 else if(!strncmp("QUIT", argv[TOK_CMD], 5))
231 snprintf(message, MAXMSG, "-!- %s(%s) has quit \"%s\"",
232 argv[TOK_NICKSRV], argv[TOK_USER],
233 argv[TOK_TEXT] ? argv[TOK_TEXT] : "");
234 else if(!strncmp("NICK", argv[TOK_CMD], 5))
235 snprintf(message, MAXMSG, "-!- %s changed nick to %s",
236 argv[TOK_NICKSRV], argv[TOK_TEXT]);
237 else if(!strncmp("TOPIC", argv[TOK_CMD], 6))
238 snprintf(message, MAXMSG, "-!- %s changed topic to \"%s\"",
239 argv[TOK_NICKSRV], argv[TOK_TEXT] ? argv[TOK_TEXT] : "");
240 else if(!strncmp("KICK", argv[TOK_CMD], 5))
241 snprintf(message, MAXMSG, "-!- %s kicked %s (\"%s\")",
242 argv[TOK_NICKSRV], argv[TOK_ARG],
243 argv[TOK_TEXT] ? argv[TOK_TEXT] : "");
244 else if(!strncmp("NOTICE", argv[TOK_CMD], 7))
245 snprintf(message, MAXMSG, "-!- \"%s\")",
246 argv[TOK_TEXT] ? argv[TOK_TEXT] : "");
247 else if(!strncmp("PRIVMSG", argv[TOK_CMD], 8))
248 snprintf(message, MAXMSG, "<%s> %s",
249 argv[TOK_NICKSRV], argv[TOK_TEXT] ? argv[TOK_TEXT] : "");
250 if(!argv[TOK_CHAN] || !strncmp(argv[TOK_CHAN], nick, strlen(nick)))
251 print_out(argv[TOK_NICKSRV], message);
253 print_out(argv[TOK_CHAN], message);
257 read_line(int fd, unsigned int res_len, char *buf)
262 if(read(fd, &c, sizeof(char)) != sizeof(char))
266 while(c != '\n' && i < res_len);
267 buf[i - 1] = 0; /* eliminates '\n' */
272 handle_server_output()
274 static char buf[MAXMSG];
275 if(read_line(irc, MAXMSG, buf) == -1) {
276 perror("sic: remote host closed connection");
279 proc_server_cmd(buf);
283 main(int argc, char *argv[])
286 char *password = NULL;
287 char *fullname = NULL;
288 char ping_msg[512], buf[MAXMSG];
290 struct passwd *spw = getpwuid(getuid());
295 fprintf(stderr,"sic: getpwuid() failed\n");
298 snprintf(nick, sizeof(nick), "%s", spw->pw_name);
300 if(argc == 2 && argv[1][0] == '-' && argv[1][1] == 'h')
304 for(i = 1; (i + 1 < argc) && (argv[i][0] == '-'); i++) {
305 switch (argv[i][1]) {
308 fputs("usage: sic -a address [-n nick] [-f fullname] [-p password] [-v]\n",
313 strncpy(address, argv[++i], sizeof(address));
316 snprintf(nick, sizeof(nick), "%s", argv[++i]);
319 password = argv[++i];
322 fullname = argv[++i];
330 if((irc = tcpopen(address)) == -1) {
331 fprintf(stderr, "sic: cannot connect server '%s'\n", address);
336 snprintf(message, MAXMSG,
337 "PASS %s\r\nNICK %s\r\nUSER %s localhost %s :%s\r\n",
338 password, nick, nick, host, fullname ? fullname : nick);
340 snprintf(message, MAXMSG, "NICK %s\r\nUSER %s localhost %s :%s\r\n",
341 nick, nick, host, fullname ? fullname : nick);
342 write(irc, message, strlen(message));
344 snprintf(ping_msg, sizeof(ping_msg), "PING %s\r\n", host);
352 r = select(maxfd + 1, &rd, 0, 0, &tv);
356 perror("sic: error on select()");
359 if(time(NULL) - last_response >= PING_TIMEOUT) {
360 print_out(NULL, "-!- sic shutting down: ping timeout");
363 write(irc, ping_msg, strlen(ping_msg));
366 if(FD_ISSET(irc, &rd)) {
367 handle_server_output();
368 last_response = time(NULL);
370 if(FD_ISSET(0, &rd)) {
373 if((i = getchar()) == EOF) {
374 perror("sic: broken pipe");
377 if(i == '\n' || n >= sizeof(buf) - 1)
382 proc_channels_input(buf);