//Released under the terms of the gpl as this file uses a bit of quake derived code. All sections of the like are marked as such // changes name to while in channel // mode command #include "../plugin.h" #include #include #define irccvars "IRC Console Variables" vmcvar_t irc_debug = {"irc_debug", "0", irccvars, 0}; vmcvar_t irc_motd = {"irc_motd", "1", irccvars, 0}; vmcvar_t irc_nick = {"irc_nick", "anonymous", irccvars, 0}; vmcvar_t irc_altnick = {"irc_altnick", "unnamed", irccvars, 0}; vmcvar_t irc_realname = {"irc_realname", "FTE IRC-Plugin http://www.fteqw.com", irccvars, 0}; vmcvar_t irc_ident = {"irc_ident", "FTE", irccvars, 0}; vmcvar_t irc_timestamp = {"irc_timestamp", "0", irccvars, 0}; #undef irccvars vmcvar_t *cvarlist[] ={ &irc_debug, &irc_motd, &irc_nick, &irc_altnick, &irc_realname, &irc_ident, &irc_timestamp }; char commandname[64]; // belongs to magic tokenizer char subvar[9][1000]; // etghack char casevar[9][1000]; //numbered_command #define DEFAULTCONSOLE "" #define RELEASE "Febuary 2 2006" void (*Con_TrySubPrint)(char *subname, char *text); void Con_FakeSubPrint(char *subname, char *text) { Con_Print(text); } void Con_SubPrintf(char *subname, char *format, ...) { va_list argptr; static char string[1024]; char lwr[128]; int i; va_start (argptr, format); vsnprintf (string, sizeof(string), format,argptr); va_end (argptr); if (format[0] == '^' && format[1] == '2') { //Cmd_AddText("say $\\", false); //Cmd_AddText(string+2, false); //Cmd_AddText("\n", false); } strlcpy(lwr, commandname, sizeof(lwr)); for (i = strlen(lwr); *subname && i < sizeof(lwr)-2; i++, subname++) { if (*subname >= 'A' && *subname <= 'Z') lwr[i] = *subname - 'A' + 'a'; else lwr[i] = *subname; } lwr[i] = '\0'; Con_TrySubPrint(lwr, string); } //porting zone: #define COLOURGREEN "^2" #define COLORWHITE "^7" #define COLOURWHITE "^7" // word #define COLOURRED "^1" #define COLOURYELLOW "^3" #define COLOURPURPLE "^5" #define COLOURBLUE "^4" #define COLOURINDIGO "^6" #define IRC_Malloc malloc #define IRC_Free free #define TL_NETGETPACKETERROR "NET_GetPacket Error %s\n" #define TOKENSIZE 1024 char com_token[TOKENSIZE]; char *COM_Parse (char *data) //this is taken out of quake { int c; int len; len = 0; com_token[0] = 0; if (!data) return NULL; // skip whitespace skipwhite: while ( (c = *data) <= ' ') { if (c == 0) return NULL; // end of file; data++; } // skip // comments if (c=='/') { if (data[1] == '/') { while (*data && *data != '\n') data++; goto skipwhite; } } // handle quoted strings specially if (c == '\"') { data++; while (1) { if (len >= TOKENSIZE-1) return data; c = *data++; if (c=='\"' || !c) { com_token[len] = 0; return data; } com_token[len] = c; len++; } } // parse a regular word do { if (len >= TOKENSIZE-1) return data; com_token[len] = c; data++; len++; c = *data; } while (c>32); com_token[len] = 0; return data; } //\r\n is used to end a line. //meaning \0s are valid. //but never used cos it breaks strings #define IRC_MAXNICKLEN 32 //9 and a null term #define IRC_MAXMSGLEN 512 char defaultuser[IRC_MAXNICKLEN+1] = "Unknown"; typedef struct { char server[64]; int port; qhandle_t socket; char nick[IRC_MAXNICKLEN]; char pwd[64]; char realname[128]; char hostname[128]; char autochannels[128]; int nickcycle; char defaultdest[IRC_MAXNICKLEN];//channel or nick char bufferedinmessage[IRC_MAXMSGLEN+1]; //there is a max size for protocol. (conveinient eh?) (and it's text format) int bufferedinammount; } ircclient_t; ircclient_t *ircclient; void IRC_InitCvars(void) { vmcvar_t *v; int i; for (v = cvarlist[0],i=0; i < sizeof(cvarlist)/sizeof(cvarlist[0]); v++, i++) v->handle = Cvar_Register(v->name, v->string, v->flags, v->group); } int IRC_CvarUpdate(void) // perhaps void instead? { vmcvar_t *v; int i; for (v = cvarlist[0],i=0; i < sizeof(cvarlist)/sizeof(cvarlist[0]); v++, i++) v->modificationcount = Cvar_Update(v->handle, &v->modificationcount, v->string, &v->value); return 0; } void IRC_Command(char *args); int IRC_ExecuteCommand(int *args); int IRC_ConExecuteCommand(int *args); int IRC_Frame(int *args); int Plug_Init(int *args) { if ( Plug_Export("Tick", IRC_Frame) && Plug_Export("ExecuteCommand", IRC_ExecuteCommand)) { if (BUILTINISVALID(GetPluginName)) { char *s; GetPluginName(0, commandname, sizeof(commandname)); while((s = strchr(commandname, '/'))) { //strip off the leading slashes. memmove(commandname, s+1, strlen(s)); } } else strlcpy(commandname, "irc", sizeof(commandname)); Cmd_AddCommand(commandname); if (!Plug_Export("ConExecuteCommand", IRC_ConExecuteCommand)) { Con_Print("IRC Client Plugin Loaded in single-console mode\n"); Con_TrySubPrint = Con_FakeSubPrint; } else { Con_Print("IRC Client Plugin Loaded\n"); Con_TrySubPrint = Con_SubPrint; } IRC_InitCvars(); return true; } else { Con_Print("IRC Client Plugin failed\n"); } return false; } int IRC_ExecuteCommand(int *args) { char cmd[8]; Cmd_Argv(0, cmd, sizeof(cmd)); if (!strcmp(cmd, commandname)) { IRC_Command(ircclient?ircclient->defaultdest:""); return true; } return false; } int IRC_ConExecuteCommand(int *args) { char buffer[256]; int cmdlen; Cmd_Argv(0, buffer, sizeof(buffer)); if (!ircclient) { if (*buffer == '/') IRC_Command(""); else Con_TrySubPrint(buffer, "You were disconnected\n"); return true; } cmdlen = strlen(commandname); IRC_Command(buffer+cmdlen); return true; } void IRC_AddClientMessage(ircclient_t *irc, char *msg) { char output[4096]; strcpy(output, msg); strcat(output, "\n"); Net_Send(irc->socket, output, strlen(output)); //FIXME: This needs rewriting to cope with errors. if (irc_debug.value == 1) { Con_SubPrintf(DEFAULTCONSOLE,COLOURYELLOW "<< %s \n",msg); } } ircclient_t *IRC_Connect(char *server, int defport) { ircclient_t *irc; unsigned long _true = true; irc = IRC_Malloc(sizeof(ircclient_t)); if (!irc) return NULL; memset(irc, 0, sizeof(ircclient_t)); irc->socket = Net_TCPConnect(server, defport); //port is only used if the url doesn't contain one. It's a default. //not yet blocking. So no frequent attempts please... //non blocking prevents connect from returning worthwhile sensible value. if ((int)irc->socket < 0) { Con_Printf("IRC_OpenSocket: couldn't connect\n"); IRC_Free(irc); return NULL; } strlcpy(irc->server, server, sizeof(irc->server)); IRC_CvarUpdate(); strcpy(irc->nick, irc_nick.string); strcpy(irc->realname, "anonymous"); strcpy(irc->hostname, "anonymous"); strcpy(irc->autochannels, ""); // gethostname(irc->hostname, sizeof(irc->hostname)); // irc->hostname[sizeof(irc->hostname)-1] = 0; return irc; } void IRC_SetPass(ircclient_t *irc, char *pass) { if (pass != "") IRC_AddClientMessage(irc, va("PASS %s", pass)); } void IRC_SetNick(ircclient_t *irc, char *nick) { strlcpy(irc->nick, nick, sizeof(irc->nick)); // broken IRC_AddClientMessage(irc, va("NICK %s", irc->nick)); irc->nickcycle=0; } void IRC_SetUser(ircclient_t *irc, char *user) { IRC_CvarUpdate(); IRC_AddClientMessage(irc, va("USER %s %s %s :%s", irc_ident.string, irc->hostname, irc->server, irc_realname.string)); } /* ATTN: Spike # (just for reference) == Ctrl+K in mirc to put the color code symbol in now to have a background color, you must specify a forground color first (#0,15) , denotes end of forground color, and start of background color irc colors work in many strange ways: #0-#15 for forground color // the code currently converts to this one, which is not the "proper" irc way, read the next one to understand. Still need to support it, just not output as it. #00-#15 for forground color (note #010 to #015 is not valid) --- this is the "proper" irc way, because I could say "#11+1=2" (which means I want 1+1=2 to appear black (1), but instead it will come out as indigo (11) and look like this: +1=2) background examples: (note #0,15 (white forground, light gray background) #00,15 (white forground, light gray background) // proper way #15,0 (white forground, light gray background) #15,00 (white forground, light gray background) // proper way I hope this makes sense to you, to be able to edit the IRC_FilterMircColours function ~ Moodles */ void IRC_FilterMircColours(char *msg) { int i; int chars; while(*msg) { if (*msg == 3) { chars = 2; if (msg[1] >= '0' && msg[1] <= '9') { i = msg[1]- '0'; if (msg[2] >= '0' && msg[2] <= '9') { i = i*10 + (msg[2]-'0'); chars = 3; } } else i = msg[1]; switch(i) { case 0: msg[1] = '7'; //white break; case 1: msg[1] = '0'; //black break; case 2: msg[1] = '4'; //darkblue break; case 3: msg[1] = '2'; //darkgreen break; case 4: msg[1] = '1'; //red break; case 5: msg[1] = '1'; //brown break; case 6: msg[1] = '5'; //purple break; case 7: msg[1] = '3'; //orange break; case 8: msg[1] = '3'; //yellow break; case 9: msg[1] = '2'; //lightgreen break; case 10: msg[1] = '6'; //darkcyan break; case 11: msg[1] = '6'; //lightcyan break; case 12: msg[1] = '4'; //lightblue break; case 13: msg[1] = '5'; //pink break; case 14: msg[1] = '7'; //grey break; case 15: msg[1] = '7'; //lightgrey break; default: msg++; continue; } *msg = '^'; msg+=2; if (chars==3) memmove(msg, msg+1, strlen(msg)); continue; } msg++; } } #define IRC_DONE 0 #define IRC_CONTINUE 1 #define IRC_KILL 2 void magic_tokenizer(int word,char *thestring) { char *temp; int i = 1; strcpy(casevar[1],thestring); temp = strchr(casevar[1], ' '); while (i < 8) { i++; if (temp != NULL) { strcpy(casevar[i],temp+1); } else { strcpy(casevar[i], ""); } temp=strchr(casevar[i], ' '); } //Con_SubPrintf(DEFAULTCONSOLE,COLOURRED "^11: %s ^22: %s ^33: %s ^44: %s ^55: %s ^66: %s ^77: %s ^88: %s\n",var[1],var[2],var[3],var[4],var[5],var[6],var[7],var[8]); //return var[word]+offset; } /*char *magic_tokenizer2(int word,char *thestring) { char *temp; int i = 1; strcpy(var[1],thestring); temp = strchr(var[1], ' '); while (i < 8) { i++; if (temp != NULL) { strcpy(var[i],temp+1); } else { strcpy(var[i], ""); } temp=strchr(var[i], ' '); } //Con_SubPrintf(DEFAULTCONSOLE,COLOURRED "^11: %s ^22: %s ^33: %s ^44: %s ^55: %s ^66: %s ^77: %s ^88: %s\n",var[1],var[2],var[3],var[4],var[5],var[6],var[7],var[8]); return var[word]; }*/ void magic_etghack(char *thestring) { char *temp; int i = 1; strcpy(subvar[1],thestring); temp = strchr(subvar[1], ' '); while (i < 8) { i++; if (temp != NULL) { strcpy(subvar[i],temp+1); } else { strcpy(subvar[i], ""); } temp=strchr(subvar[i], ' '); } //Con_SubPrintf(DEFAULTCONSOLE,COLOURRED "^11: %s ^22: %s ^33: %s ^44: %s ^55: %s ^66: %s ^77: %s ^88: %s\n",var[1],var[2],var[3],var[4],var[5],var[6],var[7],var[8]); // return subvar[word]; } //================================================== void numbered_command(int comm,char *msg,ircclient_t *irc) { magic_tokenizer(0,msg); switch (comm) { case 001: case 002: case 003: case 004: case 005: { Con_SubPrintf(DEFAULTCONSOLE, COLOURYELLOW "SERVER STATS: %s\n",casevar[3]); break; } case 250: case 251: case 252: case 253: case 254: case 255: { break; } case 301: /* #define RPL_AWAY 301 */ { char *username = strtok(casevar[3], " "); char *awaymessage = casevar[4]+1; Con_SubPrintf(DEFAULTCONSOLE,"WHOIS: <%s> (Away Message: %s)\n",username,awaymessage); break; } case 311: /* #define RPL_WHOISUSER 311 */ { char *username = strtok(casevar[3], " "); char *ident = strtok(casevar[4], " "); char *address = strtok(casevar[5], " "); char *realname = casevar[7]+1; Con_SubPrintf(DEFAULTCONSOLE,"WHOIS: <%s> (Ident: %s) (Address: %s) (Realname: %s) \n", username, ident, address, realname); break; } case 312: /* #define RPL_WHOISSERVER 312 */ { char *username = strtok(casevar[3], " "); char *serverhostname = strtok(casevar[4], " "); char *servername = casevar[5]+1; Con_SubPrintf(DEFAULTCONSOLE,"WHOIS: <%s> (Server: %s) (Server Name: %s) \n", username, serverhostname, servername); break; } case 317: /* #define RPL_WHOISIDLE 317 */ { char *username = strtok(casevar[3], " "); char *secondsidle = strtok(casevar[4], " "); char *signontime = strtok(casevar[5], " "); time_t t; const struct tm *tm; char buffer[100]; t=strtoul(signontime, 0, 0); tm=localtime(&t); strftime (buffer, 100, "%a %b %d %H:%M:%S", tm); Con_SubPrintf(DEFAULTCONSOLE,"WHOIS: <%s> (Idle Time: %s seconds) (Signon Time: %s) \n", username, secondsidle, buffer); break; } case 318: /* #define RPL_ENDOFWHOIS 318 */ { char *endofwhois = casevar[4]+1; Con_SubPrintf(DEFAULTCONSOLE,"WHOIS: %s\n", endofwhois); break; } case 319: /* #define RPL_WHOISCHANNELS 319 */ { char *username = strtok(casevar[3], " "); char *channels = casevar[4]+1; Con_SubPrintf(DEFAULTCONSOLE,"WHOIS: <%s> (Channels: %s)\n",username,channels); break; } case 322: /* #define RPL_LIST 322 */ { Con_SubPrintf(DEFAULTCONSOLE, "%s\n", msg); break; } case 372: case 375: case 376: { char *motdmessage = casevar[3]+1; IRC_CvarUpdate(); if (irc_motd.value == 2) Con_SubPrintf(DEFAULTCONSOLE, "MOTD: %s\n", motdmessage); else if (irc_motd.value) Con_SubPrintf(DEFAULTCONSOLE, "%s\n", motdmessage); break; } case 378: { Con_SubPrintf(DEFAULTCONSOLE, "%s\n", msg); break; } case 433: case 438: /* #define ERR_NICKNAMEINUSE 433 */ case 453: { char *nickname = strtok(casevar[4], " "); char *badnickname = ":Nickname"; char *seedednick; if ( !strcasecmp(nickname,badnickname) ) // bug with ircd, the nickname actually shifts position. { nickname = strtok(casevar[3], " "); } IRC_CvarUpdate(); Con_SubPrintf(DEFAULTCONSOLE, COLOURRED "ERROR: <%s> is already in use.\n",nickname); if (!strcmp(nickname,irc_nick.string)) { IRC_SetNick(irc, irc_altnick.string); } else if (!strcmp(nickname,irc_altnick.string)) { Con_SubPrintf(DEFAULTCONSOLE, COLOURRED "ERROR: <%s> AND <%s> both in use. Attempting generic nickname.\n",irc_nick.string,irc_altnick.string); seedednick = va("FTE%i",rand()); IRC_SetNick(irc, seedednick); } else { seedednick = va("FTE%i",rand()); IRC_SetNick(irc, seedednick); } /*if (irc->nickcycle >= 99) //this is just silly. return IRC_KILL; if (!irc->nickcycle) //sequentially try the next one up IRC_SetNick(irc, irc_altnick.string); else IRC_SetNick(irc, va("%s%i", irc_nick.string, irc->nickcycle)); irc->nickcycle++;*/ break; } case 432: /* #define ERR_ERRONEUSNICKNAME 432 */ { Con_SubPrintf(DEFAULTCONSOLE, "Erroneous/invalid nickname given\n"); break; } } } //================================================== int IRC_ClientFrame(ircclient_t *irc) { char prefix[64]; int ret; char *nextmsg, *msg; char *raw; char var[9][1000]; char *temp; char temp2[4096]; int i = 1; ret = Net_Recv(irc->socket, irc->bufferedinmessage+irc->bufferedinammount, sizeof(irc->bufferedinmessage)-1 - irc->bufferedinammount); if (ret == 0) return IRC_KILL; if (ret < 0) { if (ret == N_WOULDBLOCK) { if (!irc->bufferedinammount) //if we are half way through a message, read any possible conjunctions. return IRC_DONE; //remove } else return IRC_KILL; } if (ret>0) irc->bufferedinammount+=ret; irc->bufferedinmessage[irc->bufferedinammount] = '\0'; nextmsg = strstr(irc->bufferedinmessage, "\r\n"); if (!nextmsg) return IRC_DONE; *nextmsg = '\0'; nextmsg+=2; msg = irc->bufferedinmessage; strcpy(var[1],msg); temp = strchr(var[1], ' '); while (i < 8) { i++; if (temp != NULL) { strcpy(var[i],temp+1); } else { strcpy(var[i], ""); } temp=strchr(var[i], ' '); } strcpy(temp2,var[2]); raw = strtok(temp2, " "); IRC_CvarUpdate(); // is this the right place for it? raw = strtok(var[2], " "); if (irc_debug.value == 1) { Con_SubPrintf(DEFAULTCONSOLE,COLOURRED "!!!!! ^11: %s ^22: %s ^33: %s ^44: %s ^55: %s ^66: %s ^77: %s ^88: %s\n",var[1],var[2],var[3],var[4],var[5],var[6],var[7],var[8]); } if (*msg == ':') //we need to strip off the prefix { char *sp = strchr(msg, ' '); if (!sp) { Con_SubPrintf(DEFAULTCONSOLE, "Ignoring bad message\n%s\n", msg); memmove(irc->bufferedinmessage, nextmsg, irc->bufferedinammount - (msg-irc->bufferedinmessage)); irc->bufferedinammount-=nextmsg-irc->bufferedinmessage; return IRC_CONTINUE; } if (sp-msg >= sizeof(prefix)) strlcpy(prefix, msg+1, sizeof(prefix)); else strlcpy(prefix, msg+1, sp-msg); msg = sp; while(*msg == ' ') msg++; } else strcpy(prefix, irc->server); if (!strncmp(var[1], "NOTICE AUTH ", 12)) { Con_SubPrintf(DEFAULTCONSOLE, COLOURGREEN "SERVER NOTICE: %s\n", var[3]+1); } else if (!strncmp(var[1], "PING ", 5)) { IRC_AddClientMessage(irc, va("PONG %s", var[2])); } else if (!strncmp(var[2], "NOTICE ", 6)) { char *exc = strchr(prefix, '!'); char *col = strchr(msg+6, ':'); char *end; char *to = msg + 7; char *servernotice = var[4]+1; char *etghack; if (!strncmp(var[4]+1, "\1", 1)) { char delimiters[] = "!"; char *username = strtok(var[1]+1, delimiters); char *ctcpreplytype = strtok(var[4]+2, " "); char *ctcpreply = var[5]; Con_SubPrintf(DEFAULTCONSOLE," %s FROM %s: %s\n",ctcpreplytype,username,ctcpreply); } else if (exc && col) { *col = '\0'; col++; while(*to <= ' ' && *to) to++; for (end = to + strlen(to)-1; end >= to && *end <= ' '; end--) *end = '\0'; if (!strcmp(to, irc_nick.string)) to = prefix; //This was directed straight at us. //So change the 'to', to the 'from'. for (end = to; *end; end++) { if (*end >= 'A' && *end <= 'Z') *end = *end + 'a' - 'A'; } *exc = '\0'; if (!strncmp(col, "\001", 1)) { end = strchr(col+1, '\001'); if (end) *end = '\0'; if (!strncmp(col+1, "ACTION ", 7)) { IRC_FilterMircColours(col+8); Con_SubPrintf(to, COLOURGREEN "***%s "COLORWHITE"%s\n", prefix, col+8); //from client } } else { IRC_FilterMircColours(col); Con_SubPrintf(DEFAULTCONSOLE, COLOURGREEN "NOTICE: -%s- %s\n", prefix, col); //from client } } else { //Con_SubPrintf(DEFAULTCONSOLE, COLOURGREEN "SERVER NOTICE: <%s> %s\n", prefix, servernotice); //direct server message etghack = strtok(var[1],"\n"); //strcpy(etghack,servernotice); Con_SubPrintf(DEFAULTCONSOLE, COLOURGREEN "SERVER NOTICE: <%s> %s\n", prefix, etghack); while (1) { etghack = strtok(NULL, "\n"); //strcpy(etghack,strtok(NULL, "\n")); if (etghack == NULL) { break; break; } magic_etghack(etghack); if (atoi(subvar[2]) != 0) numbered_command(atoi(subvar[2]),etghack,ircclient); else Con_SubPrintf(DEFAULTCONSOLE, COLOURGREEN "SERVER NOTICE: <%s> %s\n", prefix, subvar[4]); } } } else if (!strncmp(var[2], "PRIVMSG ", 7)) //no autoresponses to notice please, and any autoresponses should be in the form of a notice { char *exc = strchr(prefix, '!'); char *col = strchr(msg+6, ':'); char *end; char *to = msg + 7; //message takes the form :FROM PRIVMSG TO :MESSAGE if (BUILTINISVALID(LocalSound)) LocalSound ("misc/talk.wav"); if ((!stricmp(var[4]+1, "\1VERSION\1")) && (!strncmp(var[2], "PRIVMSG ", 7))) { char *username; char delimiters[] = "!"; username = strtok(var[1]+1, delimiters); IRC_AddClientMessage(irc, va("NOTICE %s :\1VERSION FTEQW-IRC-Plugin Release: %s", username, RELEASE)); } else if ((!stricmp(var[4]+1, "\1TIME\1")) && (!strncmp(var[2], "PRIVMSG ", 7))) { char delimiters[] = "!"; char *username = strtok(var[1], delimiters); time_t t; const struct tm *tm; char buffer[100]; time(&t); tm=localtime(&t); strftime (buffer, 100, "%a %b %d %H:%M:%S", tm); IRC_AddClientMessage(irc, va("NOTICE %s :\1TIME %s\1", username, buffer)); } else if (exc && col) { *col = '\0'; col++; while(*to <= ' ' && *to) to++; for (end = to + strlen(to)-1; end >= to && *end <= ' '; end--) *end = '\0'; if (!strcmp(to, irc_nick.string)) to = prefix; //This was directed straight at us. //So change the 'to', to the 'from'. for (end = to; *end; end++) { if (*end >= 'A' && *end <= 'Z') *end = *end + 'a' - 'A'; } *exc = '\0'; if (!strncmp(col, "\001", 1)) { end = strchr(col+1, '\001'); if (end) *end = '\0'; if (!strncmp(col+1, "ACTION ", 7)) { IRC_FilterMircColours(col+8); Con_SubPrintf(to, COLOURGREEN "***%s "COLORWHITE"%s\n", prefix, col+8); //from client } else if (!strncmp(col+1, "PING ", 5)) { Con_SubPrintf(to, "Ping from %s\n", prefix); //from client // IRC_AddClientMessage(irc, va("PRIVMSG %s :\001PING %s\001\r\n", prefix, col+6)); } else { if (end)//put it back on. might as well. *end = '\001'; Con_SubPrintf(to, COLOURGREEN "%s: "COLORWHITE"%s\n", prefix, col); //from client } } else { IRC_FilterMircColours(col); Con_SubPrintf(to, COLOURGREEN "%s: %s\n", prefix, col); //from client } } else Con_SubPrintf(DEFAULTCONSOLE, COLOURGREEN "SERVER: <%s> %s\n", prefix, msg); //direct server message } else if (!strncmp(var[2], "MODE ", 5)) { char *username = strtok(var[1]+1, "! "); char *mode = strtok(var[4], " "); char *target = strtok(var[5], " "); char channel[100]; if (!strncmp(var[3], "#", 1)) { strcpy(channel,strtok(var[3], " ")); } else { strcpy(channel,DEFAULTCONSOLE); } if ((!strncmp(mode+1,"o", 1)) || (!strncmp(mode+1,"v",1))) // ops or voice { Con_SubPrintf(channel,COLOURGREEN "%s sets mode %s on %s\n",username,mode,target); } else { Con_SubPrintf(channel,COLOURGREEN "%s sets mode %s\n",username,mode); } } else if (!strncmp(var[2], "KICK ", 5)) { char *username = strtok(var[1]+1, "!"); char *channel = strtok(var[3], " "); char *target = strtok(var[4], " "); char *reason = var[5]+1; Con_SubPrintf(channel,COLOURGREEN "%s was kicked from %s Reason: '%s' by %s\n",target,channel,reason,username); } else if (!strncmp(msg, "NICK ", 5)) { char *exc = strchr(prefix, '!'); char *col = strchr(msg+5, ':'); if (exc && col) { *exc = '\0'; //fixme: print this in all channels as appropriate. Con_SubPrintf(DEFAULTCONSOLE, COLOURGREEN "%s changes name to %s\n", prefix, col+1); if (BUILTINISVALID(Con_RenameSub)) Con_RenameSub(prefix, col+1); //if we were pming to them, rename accordingly. } else Con_SubPrintf(DEFAULTCONSOLE, COLOURGREEN ":%s%s\n", prefix, msg+6); } else if (!strncmp(msg, "PART ", 5)) { char *exc = strchr(prefix, '!'); char *col = strchr(msg+5, ':'); if (!col) col = msg+5; else col+=1; if (exc) { if (!col) col = DEFAULTCONSOLE; *exc = '\0'; Con_SubPrintf(col, "%s leaves channel %s\n", prefix, col); } else Con_SubPrintf(DEFAULTCONSOLE, COLOURGREEN ":%sPART %s\n", prefix, msg+5); } else if (!strncmp(msg, "JOIN ", 5)) { char *exc = strchr(prefix, '!'); char *col = strchr(msg+5, ':'); if (exc && col) { *exc = '\0'; Con_SubPrintf(col+1, COLOURGREEN "%s joins channel %s\n", prefix, col+1); } else Con_SubPrintf(DEFAULTCONSOLE, COLOURGREEN ":%sJOIN %s\n", prefix, msg+5); } else if (!strncmp(msg, "372 ", 4)) { char *text = strstr(msg, ":-"); if (text) Con_SubPrintf(DEFAULTCONSOLE, "%s\n", text+2); else Con_SubPrintf(DEFAULTCONSOLE, "%s\n", msg); } else if (!strncmp(msg, "331 ", 4) ||//no topic !strncmp(msg, "332 ", 4)) //the topic { char *topic; char *chan; topic = COM_Parse(msg); topic = COM_Parse(topic); topic = COM_Parse(topic); while(*topic == ' ') topic++; if (*topic == ':') { topic++; chan = com_token; } else { topic = "No topic"; chan = DEFAULTCONSOLE; } Con_SubPrintf(chan, "Topic on channel %s is: "COLOURGREEN"%s\n", chan, topic); } else if (!strncmp(msg, "353 ", 4)) //the names of people on a channel { char *eq = strstr(msg, "="); char *eq2 = strstr(msg, "@"); // @ means the channel is +s (secret) char *channel = strtok(var[5], " "); char *str; int secret = 0; if (eq) { char *end; eq++; str = strstr(eq, ":"); while(*eq == ' ') eq++; for (end = eq; *end>' '&&*end !=':'; end++) ; *end = '\0'; str++; } else if (eq2) { char *end; secret = 1; eq2++; str = strstr(eq2, ":"); while(*eq2 == ' ') eq2++; for (end = eq2; *end>' '&&*end !=':'; end++) ; *end = '\0'; str++; } else { eq = "Corrupted_Message"; str = NULL; } Con_SubPrintf(channel, va("Users on channel %s:\n", channel)); while (str) { str = COM_Parse(str); if (*com_token == '@') //they're an operator Con_SubPrintf(channel, COLOURGREEN"@"COLORWHITE"%s\n", com_token+1); else if (*com_token == '%') //they've got half-op Con_SubPrintf(channel, COLOURGREEN"%"COLORWHITE"%s\n", com_token+1); else if (*com_token == '+') //they've got voice Con_SubPrintf(channel, COLOURGREEN"+"COLORWHITE"%s\n", com_token+1); else Con_SubPrintf(channel, " %s\n", com_token); } if (secret == 1) { Con_SubPrintf(channel, "%s is secret (+s)\n",channel); } } // would be great to convert the above to work better else if (atoi(raw) != 0) { char *rawparameter = strtok(var[4], " "); char *rawmessage = var[5]; char *wholerawmessage = var[4]; //Con_SubPrintf(DEFAULTCONSOLE,"$$$ %s $$$\n",raw); numbered_command(atoi(raw),msg,ircclient); } else if (!strncmp(msg, "422 ", 4) || !strncmp(msg, "376 ", 4)) { //no motd || end of motd //send automagic channel join messages. if (*irc->autochannels) IRC_AddClientMessage(irc, va("JOIN %s", irc->autochannels)); } /* else if (!strncmp(msg, "401 ", 4)) { dprintf("Nickname/channel does not exist\n", msg); } else if (!strncmp(msg, "402 ", 4)) { dprintf("No such server\n", msg); } else if (!strncmp(msg, "403 ", 4)) { dprintf("No such channel\n", msg); } else if (!strncmp(msg, "404 ", 4)) { dprintf("Cannot send to that channel\n", msg); } else if (!strncmp(msg, "405 ", 4)) { dprintf("You may not join annother channel\n", msg); } else if (!strncmp(msg, "406 ", 4)) { dprintf("Nickname does not exist\n", msg); } else if (!strncmp(msg, "407 ", 4)) { dprintf("Too many targets. Try to specify a specific nickname.\n", msg); } else if (!strncmp(msg, "409 ", 4)) { dprintf("No origin specified\n", msg); } else if (!strncmp(msg, "411 ", 4)) { dprintf("No recipient given.\n", msg); } else if (!strncmp(msg, "412 ", 4)) { dprintf("No text given\n", msg); } else if (!strncmp(msg, "413 ", 4)) { dprintf("No top level domain specified\n", msg); } else if (!strncmp(msg, "414 ", 4)) { dprintf("Wildcard in toplevel domain\n", msg); } else if (!strncmp(msg, "421 ", 4)) { dprintf("Unknown command.\n", msg); } else if (!strncmp(msg, "422 ", 4)) { dprintf("MOTD file is missing (awww)\n", msg); } else if (!strncmp(msg, "423 ", 4)) { dprintf("No administrative info is available\n", msg); } else if (!strncmp(msg, "424 ", 4)) { dprintf("Generic file error\n", msg); } else if (!strncmp(msg, "441 ", 4)) { dprintf("User isn't in that channel\n", msg); } else if (!strncmp(msg, "442 ", 4)) { dprintf("You are not on that channel\n", msg); } else if (!strncmp(msg, "443 ", 4)) { dprintf("The user is already on that channel\n", msg); } else if (!strncmp(msg, "444 ", 4)) { dprintf("User not logged in\n", msg); } else if (!strncmp(msg, "445 ", 4)) { dprintf("SUMMON has been disabled\n", msg); } else if (!strncmp(msg, "446 ", 4)) { dprintf("USERS has been disabled\n", msg); } else if (!strncmp(msg, "451 ", 4)) { dprintf("You have not registered\n", msg); } 461 ERR_NEEDMOREPARAMS " :Not enough parameters" - Returned by the server by numerous commands to indicate to the client that it didn't supply enough parameters. 462 ERR_ALREADYREGISTRED ":You may not reregister" - Returned by the server to any link which tries to change part of the registered details (such as password or user details from second USER message). 463 ERR_NOPERMFORHOST ":Your host isn't among the privileged" - Returned to a client which attempts to register with a server which does not been setup to allow connections from the host the attempted connection is tried. -------------------------------------------------------------------------------- Page 47 464 ERR_PASSWDMISMATCH ":Password incorrect" - Returned to indicate a failed attempt at registering a connection for which a password was required and was either not given or incorrect. 465 ERR_YOUREBANNEDCREEP ":You are banned from this server" - Returned after an attempt to connect and register yourself with a server which has been setup to explicitly deny connections to you. 467 ERR_KEYSET " :Channel key already set" 471 ERR_CHANNELISFULL " :Cannot join channel (+l)" 472 ERR_UNKNOWNMODE " :is unknown mode char to me" 473 ERR_INVITEONLYCHAN " :Cannot join channel (+i)" 474 ERR_BANNEDFROMCHAN " :Cannot join channel (+b)" 475 ERR_BADCHANNELKEY " :Cannot join channel (+k)" 481 ERR_NOPRIVILEGES ":Permission Denied- You're not an IRC operator" - Any command requiring operator privileges to operate must return this error to indicate the attempt was unsuccessful. 482 ERR_CHANOPRIVSNEEDED " :You're not channel operator" - Any command requiring 'chanop' privileges (such as MODE messages) must return this error if the client making the attempt is not a chanop on the specified channel. 483 ERR_CANTKILLSERVER ":You cant kill a server!" - Any attempts to use the KILL command on a server are to be refused and this error returned directly to the client. -------------------------------------------------------------------------------- Page 48 491 ERR_NOOPERHOST ":No O-lines for your host" - If a client sends an OPER message and the server has not been configured to allow connections from the client's host as an operator, this error must be returned. 501 ERR_UMODEUNKNOWNFLAG ":Unknown MODE flag" - Returned by the server to indicate that a MODE message was sent with a nickname parameter and that the a mode flag sent was not recognized. 502 ERR_USERSDONTMATCH ":Cant change mode for other users" - Error sent to any user trying to view or change the user mode for a user other than themselves. 6.2 Command responses. 300 RPL_NONE Dummy reply number. Not used. 302 RPL_USERHOST ":[{}]" - Reply format used by USERHOST to list replies to the query list. The reply string is composed as follows: ::= ['*'] '=' <'+'|'-'> The '*' indicates whether the client has registered as an Operator. The '-' or '+' characters represent whether the client has set an AWAY message or not respectively. 303 RPL_ISON ":[ {}]" - Reply format used by ISON to list replies to the query list. 301 RPL_AWAY " :" -------------------------------------------------------------------------------- Page 49 305 RPL_UNAWAY ":You are no longer marked as being away" 306 RPL_NOWAWAY ":You have been marked as being away" - These replies are used with the AWAY command (if allowed). RPL_AWAY is sent to any client sending a PRIVMSG to a client which is away. RPL_AWAY is only sent by the server to which the client is connected. Replies RPL_UNAWAY and RPL_NOWAWAY are sent when the client removes and sets an AWAY message. 311 RPL_WHOISUSER " * :" 312 RPL_WHOISSERVER " :" 313 RPL_WHOISOPERATOR " :is an IRC operator" 317 RPL_WHOISIDLE " :seconds idle" 318 RPL_ENDOFWHOIS " :End of /WHOIS list" 319 RPL_WHOISCHANNELS " :{[@|+]}" - Replies 311 - 313, 317 - 319 are all replies generated in response to a WHOIS message. Given that there are enough parameters present, the answering server must either formulate a reply out of the above numerics (if the query nick is found) or return an error reply. The '*' in RPL_WHOISUSER is there as the literal character and not as a wild card. For each reply set, only RPL_WHOISCHANNELS may appear more than once (for long lists of channel names). The '@' and '+' characters next to the channel name indicate whether a client is a channel operator or has been granted permission to speak on a moderated channel. The RPL_ENDOFWHOIS reply is used to mark the end of processing a WHOIS message. 314 RPL_WHOWASUSER " * :" 369 RPL_ENDOFWHOWAS " :End of WHOWAS" - When replying to a WHOWAS message, a server must use the replies RPL_WHOWASUSER, RPL_WHOISSERVER or ERR_WASNOSUCHNICK for each nickname in the presented -------------------------------------------------------------------------------- Page 50 list. At the end of all reply batches, there must be RPL_ENDOFWHOWAS (even if there was only one reply and it was an error). 321 RPL_LISTSTART "Channel :Users Name" 322 RPL_LIST " <# visible> :" 323 RPL_LISTEND ":End of /LIST" - Replies RPL_LISTSTART, RPL_LIST, RPL_LISTEND mark the start, actual replies with data and end of the server's response to a LIST command. If there are no channels available to return, only the start and end reply must be sent. 324 RPL_CHANNELMODEIS " " 331 RPL_NOTOPIC " :No topic is set" 332 RPL_TOPIC " :" - When sending a TOPIC message to determine the channel topic, one of two replies is sent. If the topic is set, RPL_TOPIC is sent back else RPL_NOTOPIC. 341 RPL_INVITING " " - Returned by the server to indicate that the attempted INVITE message was successful and is being passed onto the end client. 342 RPL_SUMMONING " :Summoning user to IRC" - Returned by a server answering a SUMMON message to indicate that it is summoning that user. 351 RPL_VERSION ". :" - Reply by the server showing its version details. The is the version of the software being -------------------------------------------------------------------------------- Page 51 used (including any patchlevel revisions) and the is used to indicate if the server is running in "debug mode". The "comments" field may contain any comments about the version or further version details. 352 RPL_WHOREPLY " \ [*][@|+] : " 315 RPL_ENDOFWHO " :End of /WHO list" - The RPL_WHOREPLY and RPL_ENDOFWHO pair are used to answer a WHO message. The RPL_WHOREPLY is only sent if there is an appropriate match to the WHO query. If there is a list of parameters supplied with a WHO message, a RPL_ENDOFWHO must be sent after processing each list item with being the item. 353 RPL_NAMREPLY " :[[@|+] [[@|+] [...]]]" 366 RPL_ENDOFNAMES " :End of /NAMES list" - To reply to a NAMES message, a reply pair consisting of RPL_NAMREPLY and RPL_ENDOFNAMES is sent by the server back to the client. If there is no channel found as in the query, then only RPL_ENDOFNAMES is returned. The exception to this is when a NAMES message is sent with no parameters and all visible channels and contents are sent back in a series of RPL_NAMEREPLY messages with a RPL_ENDOFNAMES to mark the end. 364 RPL_LINKS " : " 365 RPL_ENDOFLINKS " :End of /LINKS list" - In replying to the LINKS message, a server must send replies back using the RPL_LINKS numeric and mark the end of the list using an RPL_ENDOFLINKS reply. 367 RPL_BANLIST " " 368 RPL_ENDOFBANLIST -------------------------------------------------------------------------------- Page 52 " :End of channel ban list" - When listing the active 'bans' for a given channel, a server is required to send the list back using the RPL_BANLIST and RPL_ENDOFBANLIST messages. A separate RPL_BANLIST is sent for each active banid. After the banids have been listed (or if none present) a RPL_ENDOFBANLIST must be sent. 371 RPL_INFO ":" 374 RPL_ENDOFINFO ":End of /INFO list" - A server responding to an INFO message is required to send all its 'info' in a series of RPL_INFO messages with a RPL_ENDOFINFO reply to indicate the end of the replies. 375 RPL_MOTDSTART ":- Message of the day - " 376 RPL_ENDOFMOTD ":End of /MOTD command" - When responding to the MOTD message and the MOTD file is found, the file is displayed line by line, with each line no longer than 80 characters, using RPL_MOTD format replies. These should be surrounded by a RPL_MOTDSTART (before the RPL_MOTDs) and an RPL_ENDOFMOTD (after). 381 RPL_YOUREOPER ":You are now an IRC operator" - RPL_YOUREOPER is sent back to a client which has just successfully issued an OPER message and gained operator status. 382 RPL_REHASHING " :Rehashing" - If the REHASH option is used and an operator sends a REHASH message, an RPL_REHASHING is sent back to the operator. 391 RPL_TIME -------------------------------------------------------------------------------- Page 53 " :" - When replying to the TIME message, a server must send the reply using the RPL_TIME format above. The string showing the time need only contain the correct day and time there. There is no further requirement for the time string. 392 RPL_USERSSTART ":UserID Terminal Host" 393 RPL_USERS ":%-8s %-9s %-8s" 394 RPL_ENDOFUSERS ":End of users" 395 RPL_NOUSERS ":Nobody logged in" - If the USERS message is handled by a server, the replies RPL_USERSTART, RPL_USERS, RPL_ENDOFUSERS and RPL_NOUSERS are used. RPL_USERSSTART must be sent first, following by either a sequence of RPL_USERS or a single RPL_NOUSER. Following this is RPL_ENDOFUSERS. 200 RPL_TRACELINK "Link \ " 201 RPL_TRACECONNECTING "Try. " 202 RPL_TRACEHANDSHAKE "H.S. " 203 RPL_TRACEUNKNOWN "???? []" 204 RPL_TRACEOPERATOR "Oper " 205 RPL_TRACEUSER "User " 206 RPL_TRACESERVER "Serv S C \ @" 208 RPL_TRACENEWTYPE " 0 " 261 RPL_TRACELOG "File " - The RPL_TRACE* are all returned by the server in response to the TRACE message. How many are returned is dependent on the the TRACE message and -------------------------------------------------------------------------------- Page 54 whether it was sent by an operator or not. There is no predefined order for which occurs first. Replies RPL_TRACEUNKNOWN, RPL_TRACECONNECTING and RPL_TRACEHANDSHAKE are all used for connections which have not been fully established and are either unknown, still attempting to connect or in the process of completing the 'server handshake'. RPL_TRACELINK is sent by any server which handles a TRACE message and has to pass it on to another server. The list of RPL_TRACELINKs sent in response to a TRACE command traversing the IRC network should reflect the actual connectivity of the servers themselves along that path. RPL_TRACENEWTYPE is to be used for any connection which does not fit in the other categories but is being displayed anyway. 211 RPL_STATSLINKINFO " \ \