1 /* +------------------------------------+
2 * | Inspire Internet Relay Chat Daemon |
3 * +------------------------------------+
5 * InspIRCd is copyright (C) 2002-2006 ChatSpike-Dev.
7 * <brain@chatspike.net>
8 * <Craig@chatspike.net>
10 * Written by Craig Edwards, Craig McLure, and others.
11 * This program is free but copyrighted software; see
12 * the file COPYING for details.
14 * ---------------------------------------------------
19 #include "inspircd_config.h"
21 #include "inspircd_io.h"
23 #include <sys/errno.h>
24 #include <sys/ioctl.h>
25 #include <sys/utsname.h>
30 #include <ext/hash_map>
38 #include <sys/types.h>
40 #include <sys/resource.h>
46 #define RUSAGE_CHILDREN -1
58 #include "inspstring.h"
60 #include "helperfuncs.h"
62 #include "socketengine.h"
64 #include "command_parse.h"
66 extern ServerConfig* Config;
67 extern InspIRCd* ServerInstance;
70 extern std::vector<Module*> modules;
71 extern std::vector<ircd_module*> factory;
74 const long duration_m = 60;
75 const long duration_h = duration_m * 60;
76 const long duration_d = duration_h * 24;
77 const long duration_w = duration_d * 7;
78 const long duration_y = duration_w * 52;
80 extern user_hash clientlist;
81 extern chan_hash chanlist;
82 extern whowas_hash whowas;
84 extern std::vector<userrec*> all_opers;
85 extern std::vector<userrec*> local_users;
87 // This table references users by file descriptor.
88 // its an array to make it VERY fast, as all lookups are referenced
89 // by an integer, meaning there is no need for a scan/search operation.
90 extern userrec* fd_ref_table[MAX_DESCRIPTORS];
93 void split_chlist(userrec* user, userrec* dest, std::string &cl)
95 std::stringstream channels(cl);
96 std::string line = "";
97 std::string cname = "";
98 while (!channels.eof())
101 line = line + cname + " ";
102 if (line.length() > 400)
104 WriteServ(user->fd,"319 %s %s :%s",user->nick, dest->nick, line.c_str());
110 WriteServ(user->fd,"319 %s %s :%s",user->nick, dest->nick, line.c_str());
114 /* XXX - perhaps this should be in cmd_whois? -- w00t */
115 void do_whois(userrec* user, userrec* dest,unsigned long signon, unsigned long idle, char* nick)
117 // bug found by phidjit - were able to whois an incomplete connection if it had sent a NICK or USER
118 if (dest->registered == 7)
120 WriteServ(user->fd,"311 %s %s %s %s * :%s",user->nick, dest->nick, dest->ident, dest->dhost, dest->fullname);
121 if ((user == dest) || (*user->oper))
123 WriteServ(user->fd,"378 %s %s :is connecting from *@%s %s",user->nick, dest->nick, dest->host, (char*)inet_ntoa(dest->ip4));
125 std::string cl = chlist(dest,user);
128 if (cl.length() > 400)
130 split_chlist(user,dest,cl);
134 WriteServ(user->fd,"319 %s %s :%s",user->nick, dest->nick, cl.c_str());
137 if (*Config->HideWhoisServer)
139 WriteServ(user->fd,"312 %s %s %s :%s",user->nick, dest->nick, *user->oper ? dest->server : Config->HideWhoisServer, *user->oper ? GetServerDescription(dest->server).c_str() : Config->Network);
143 WriteServ(user->fd,"312 %s %s %s :%s",user->nick, dest->nick, dest->server, GetServerDescription(dest->server).c_str());
147 WriteServ(user->fd,"301 %s %s :%s",user->nick, dest->nick, dest->awaymsg);
151 WriteServ(user->fd,"313 %s %s :is %s %s on %s",user->nick, dest->nick, (strchr("aeiou",*dest->oper) ? "an" : "a"),dest->oper, Config->Network);
153 if ((!signon) && (!idle))
155 FOREACH_MOD(I_OnWhois,OnWhois(user,dest));
157 if (!strcasecmp(user->server,dest->server))
159 // idle time and signon line can only be sent if youre on the same server (according to RFC)
160 WriteServ(user->fd,"317 %s %s %d %d :seconds idle, signon time",user->nick, dest->nick, abs((dest->idle_lastmsg)-TIME), dest->signon);
164 if ((idle) || (signon))
165 WriteServ(user->fd,"317 %s %s %d %d :seconds idle, signon time",user->nick, dest->nick, idle, signon);
167 WriteServ(user->fd,"318 %s %s :End of /WHOIS list.",user->nick, dest->nick);
171 WriteServ(user->fd,"401 %s %s :No such nick/channel",user->nick, nick);
172 WriteServ(user->fd,"318 %s %s :End of /WHOIS list.",user->nick, nick);
177 /* XXX - these really belong in helperfuncs perhaps -- w00t */
178 bool is_uline(const char* server)
185 return (find(Config->ulines.begin(),Config->ulines.end(),server) != Config->ulines.end());
188 int operstrcmp(char* data,char* input)
191 FOREACH_RESULT(I_OnOperCompare,OnOperCompare(data,input))
192 log(DEBUG,"operstrcmp: %d",MOD_RESULT);
195 if (MOD_RESULT == -1)
197 log(DEBUG,"strcmp fallback: '%s' '%s' %d",data,input,strcmp(data,input));
198 return strcmp(data,input);
201 long duration(const char* str)
203 char n_field[MAXBUF];
205 const char* str_end = str + strlen(str);
208 if ((!strchr(str,'s')) && (!strchr(str,'m')) && (!strchr(str,'h')) && (!strchr(str,'d')) && (!strchr(str,'w')) && (!strchr(str,'y')))
212 return duration(n.c_str());
215 for (char* i = (char*)str; i < str_end; i++)
217 // if we have digits, build up a string for the value in n_field,
218 // up to 10 digits in size.
219 if ((*i >= '0') && (*i <= '9'))
221 strlcat(n_field,i,10);
225 // we dont have a digit, check for numeric tokens
229 total += atoi(n_field);
233 total += (atoi(n_field)*duration_m);
237 total += (atoi(n_field)*duration_h);
241 total += (atoi(n_field)*duration_d);
245 total += (atoi(n_field)*duration_w);
249 total += (atoi(n_field)*duration_y);
255 // add trailing seconds
256 total += atoi(n_field);
261 /* All other ircds when doing this check usually just look for a string of *@* or *. We're smarter than that, though. */
263 bool host_matches_everyone(std::string mask, userrec* user)
265 char insanemasks[MAXBUF];
267 char itrigger[MAXBUF];
268 Config->ConfValue("insane","hostmasks",0,insanemasks,&Config->config_f);
269 Config->ConfValue("insane","trigger",0,itrigger,&Config->config_f);
271 strlcpy(itrigger,"95.5",MAXBUF);
272 if ((*insanemasks == 'y') || (*insanemasks == 't') || (*insanemasks == '1'))
275 for (user_hash::iterator u = clientlist.begin(); u != clientlist.end(); u++)
277 strlcpy(buffer,u->second->ident,MAXBUF);
278 charlcat(buffer,'@',MAXBUF);
279 strlcat(buffer,u->second->host,MAXBUF);
280 if (match(buffer,mask.c_str()))
283 float percent = ((float)matches / (float)clientlist.size()) * 100;
284 if (percent > (float)atof(itrigger))
286 WriteOpers("*** \2WARNING\2: %s tried to set a G/K/E line mask of %s, which covers %.2f%% of the network!",user->nick,mask.c_str(),percent);
292 bool ip_matches_everyone(std::string ip, userrec* user)
294 char insanemasks[MAXBUF];
295 char itrigger[MAXBUF];
296 Config->ConfValue("insane","ipmasks",0,insanemasks,&Config->config_f);
297 Config->ConfValue("insane","trigger",0,itrigger,&Config->config_f);
299 strlcpy(itrigger,"95.5",MAXBUF);
300 if ((*insanemasks == 'y') || (*insanemasks == 't') || (*insanemasks == '1'))
303 for (user_hash::iterator u = clientlist.begin(); u != clientlist.end(); u++)
305 if (match((char*)inet_ntoa(u->second->ip4),ip.c_str()))
308 float percent = ((float)matches / (float)clientlist.size()) * 100;
309 if (percent > (float)atof(itrigger))
311 WriteOpers("*** \2WARNING\2: %s tried to set a Z line mask of %s, which covers %.2f%% of the network!",user->nick,ip.c_str(),percent);
317 bool nick_matches_everyone(std::string nick, userrec* user)
319 char insanemasks[MAXBUF];
320 char itrigger[MAXBUF];
321 Config->ConfValue("insane","nickmasks",0,insanemasks,&Config->config_f);
322 Config->ConfValue("insane","trigger",0,itrigger,&Config->config_f);
324 strlcpy(itrigger,"95.5",MAXBUF);
325 if ((*insanemasks == 'y') || (*insanemasks == 't') || (*insanemasks == '1'))
328 for (user_hash::iterator u = clientlist.begin(); u != clientlist.end(); u++)
330 if (match(u->second->nick,nick.c_str()))
333 float percent = ((float)matches / (float)clientlist.size()) * 100;
334 if (percent > (float)atof(itrigger))
336 WriteOpers("*** \2WARNING\2: %s tried to set a Q line mask of %s, which covers %.2f%% of the network!",user->nick,nick.c_str(),percent);