]> git.netwichtig.de Git - user/henk/code/inspircd.git/blob - src/users.cpp
Optimisation of optimisation :P ty w00tie
[user/henk/code/inspircd.git] / src / users.cpp
1 /*       +------------------------------------+
2  *       | Inspire Internet Relay Chat Daemon |
3  *       +------------------------------------+
4  *
5  *  InspIRCd is copyright (C) 2002-2006 ChatSpike-Dev.
6  *                       E-mail:
7  *                <brain@chatspike.net>
8  *                <Craig@chatspike.net>
9  *     
10  * Written by Craig Edwards, Craig McLure, and others.
11  * This program is free but copyrighted software; see
12  *            the file COPYING for details.
13  *
14  * ---------------------------------------------------
15  */
16
17 using namespace std;
18
19 #include "inspircd_config.h" 
20 #include "channels.h"
21 #include "connection.h"
22 #include "users.h"
23 #include "inspircd.h"
24 #include <stdio.h>
25 #ifdef THREADED_DNS
26 #include <pthread.h>
27 #include <signal.h>
28 #endif
29 #include "inspstring.h"
30 #include "commands.h"
31 #include "helperfuncs.h"
32 #include "typedefs.h"
33 #include "socketengine.h"
34 #include "hashcomp.h"
35 #include "message.h"
36 #include "wildcard.h"
37 #include "xline.h"
38 #include "cull_list.h"
39
40 extern InspIRCd* ServerInstance;
41 extern int WHOWAS_STALE;
42 extern int WHOWAS_MAX;
43 extern std::vector<Module*> modules;
44 extern std::vector<ircd_module*> factory;
45 extern std::vector<InspSocket*> module_sockets;
46 extern int MODCOUNT;
47 extern InspSocket* socket_ref[MAX_DESCRIPTORS];
48 extern time_t TIME;
49 extern userrec* fd_ref_table[MAX_DESCRIPTORS];
50 extern ServerConfig *Config;
51 extern user_hash clientlist;
52 extern whowas_hash whowas;
53 extern std::vector<userrec*> local_users;
54
55 std::vector<userrec*> all_opers;
56
57 typedef std::map<irc::string,char*> opertype_t;
58 typedef opertype_t operclass_t;
59
60 opertype_t opertypes;
61 operclass_t operclass;
62
63 void ReadClassesAndTypes()
64 {
65         char TypeName[MAXBUF],Classes[MAXBUF],ClassName[MAXBUF],CommandList[MAXBUF];
66         for (opertype_t::iterator n = opertypes.begin(); n != opertypes.end(); n++)
67         {
68                 if (n->second)
69                         delete[] n->second;
70         }
71         for (operclass_t::iterator n = operclass.begin(); n != operclass.end(); n++)
72         {
73                 if (n->second)
74                         delete[] n->second;
75         }
76         opertypes.clear();
77         operclass.clear();
78         for (int j =0; j < Config->ConfValueEnum("type",&Config->config_f); j++)
79         {
80                 Config->ConfValue("type","name",j,TypeName,&Config->config_f);
81                 Config->ConfValue("type","classes",j,Classes,&Config->config_f);
82                 opertypes[TypeName] = strdup(Classes);
83                 log(DEBUG,"Read oper TYPE '%s' with classes '%s'",TypeName,Classes);
84         }
85         for (int k =0; k < Config->ConfValueEnum("class",&Config->config_f); k++)
86         {
87                 Config->ConfValue("class","name",k,ClassName,&Config->config_f);
88                 Config->ConfValue("class","commands",k,CommandList,&Config->config_f);
89                 operclass[ClassName] = strdup(CommandList);
90                 log(DEBUG,"Read oper CLASS '%s' with commands '%s'",ClassName,CommandList);
91         }
92 }
93
94 template<typename T> inline string ConvToStr(const T &in)
95 {
96         stringstream tmp;
97         if (!(tmp << in)) return string();
98         return tmp.str();
99 }
100
101 userrec::userrec()
102 {
103         // the PROPER way to do it, AVOID bzero at *ALL* costs
104         *password = *nick = *ident = *host = *dhost = *fullname = *modes = *awaymsg = *oper = 0;
105         server = (char*)FindServerNamePtr(Config->ServerName);
106         reset_due = TIME;
107         lines_in = fd = lastping = signon = idle_lastmsg = nping = registered = 0;
108         timeout = flood = port = bytes_in = bytes_out = cmds_in = cmds_out = 0;
109         haspassed = dns_done = false;
110         recvq = "";
111         sendq = "";
112         chans.clear();
113         invites.clear();
114 }
115
116 userrec::~userrec()
117 {
118 }
119
120 void userrec::MakeHost(char* nhost)
121 {
122         /* This is much faster than snprintf */
123         char* t = nhost;
124         for(char* n = ident; *n; n++)
125                 *t++ = *n;
126         *t++ = '@';
127         for(char* n = host; *n; n++)
128                 *t++ = *n;
129         *t = 0;
130 }
131
132 void userrec::CloseSocket()
133 {
134         shutdown(this->fd,2);
135         close(this->fd);
136 }
137  
138 char* userrec::GetFullHost()
139 {
140         static char result[MAXBUF];
141         char* t = result;
142         for(char* n = nick; *n; n++)
143                 *t++ = *n;
144         *t++ = '!';
145         for(char* n = ident; *n; n++)
146                 *t++ = *n;
147         *t++ = '@';
148         for(char* n = dhost; *n; n++)
149                 *t++ = *n;
150         *t = 0;
151         return result;
152 }
153
154 char* userrec::MakeWildHost()
155 {
156         static char nresult[MAXBUF];
157         char* t = nresult;
158         *t++ = '*';     *t++ = '!';
159         *t++ = '*';     *t++ = '@';
160         for(char* n = dhost; *n; n++)
161                 *t++ = *n;
162         *t = 0;
163         return nresult;
164 }
165
166 int userrec::ReadData(void* buffer, size_t size)
167 {
168         if (this->fd > -1)
169         {
170                 return read(this->fd, buffer, size);
171         }
172         else return 0;
173 }
174
175
176 char* userrec::GetFullRealHost()
177 {
178         static char fresult[MAXBUF];
179         char* t = fresult;
180         for(char* n = nick; *n; n++)
181                 *t++ = *n;
182         *t++ = '!';
183         for(char* n = ident; *n; n++)
184                 *t++ = *n;
185         *t++ = '@';
186         for(char* n = host; *n; n++)
187                 *t++ = *n;
188         *t = 0;
189         return fresult;
190 }
191
192 bool userrec::IsInvited(irc::string &channel)
193 {
194         for (InvitedList::iterator i = invites.begin(); i != invites.end(); i++)
195         {
196                 irc::string compare = i->channel;
197                 if (compare == channel)
198                 {
199                         return true;
200                 }
201         }
202         return false;
203 }
204
205 InvitedList* userrec::GetInviteList()
206 {
207         return &invites;
208 }
209
210 void userrec::InviteTo(irc::string &channel)
211 {
212         Invited i;
213         i.channel = channel;
214         invites.push_back(i);
215 }
216
217 void userrec::RemoveInvite(irc::string &channel)
218 {
219         log(DEBUG,"Removing invites");
220         if (invites.size())
221         {
222                 for (InvitedList::iterator i = invites.begin(); i != invites.end(); i++)
223                 {
224                         irc::string compare = i->channel;
225                         if (compare == channel)
226                         {
227                                 invites.erase(i);
228                                 return;
229                         }
230                 }
231         }
232 }
233
234 bool userrec::HasPermission(std::string &command)
235 {
236         char* mycmd;
237         char* savept;
238         char* savept2;
239         
240         // users on remote servers can completely bypass
241         // all permissions based checks.
242         // This prevents desyncs when one server has different
243         // type/class tags to another.
244         if (!IS_LOCAL(this))
245                 return true;
246         
247         // are they even an oper at all?
248         if (*this->oper)
249         {
250                 opertype_t::iterator iter_opertype = opertypes.find(this->oper);
251                 if (iter_opertype != opertypes.end())
252                 {
253                         char* Classes = strdup(iter_opertype->second);
254                         char* myclass = strtok_r(Classes," ",&savept);
255                         while (myclass)
256                         {
257                                 operclass_t::iterator iter_operclass = operclass.find(myclass);
258                                 if (iter_operclass != operclass.end())
259                                 {
260                                         char* CommandList = strdup(iter_operclass->second);
261                                         mycmd = strtok_r(CommandList," ",&savept2);
262                                         while (mycmd)
263                                         {
264                                                 if ((!strcasecmp(mycmd,command.c_str())) || (*mycmd == '*'))
265                                                 {
266                                                         free(Classes);
267                                                         free(CommandList);
268                                                         return true;
269                                                 }
270                                                 mycmd = strtok_r(NULL," ",&savept2);
271                                         }
272                                         free(CommandList);
273                                 }
274                                 myclass = strtok_r(NULL," ",&savept);
275                         }
276                         free(Classes);
277                 }
278         }
279         return false;
280 }
281
282
283 bool userrec::AddBuffer(std::string a)
284 {
285         std::string b = "";
286         char* n = (char*)a.c_str();
287         for (char* i = n; *i; i++)
288         {
289                 if ((*i != '\r') && (*i != '\0') && (*i != 7))
290                         b = b + *i;
291         }
292         std::stringstream stream(recvq);
293         stream << b;
294         recvq = stream.str();
295         unsigned int i = 0;
296         // count the size of the first line in the buffer.
297         while (i < recvq.length())
298         {
299                 if (recvq[i++] == '\n')
300                         break;
301         }
302         if (recvq.length() > (unsigned)this->recvqmax)
303         {
304                 this->SetWriteError("RecvQ exceeded");
305                 WriteOpers("*** User %s RecvQ of %d exceeds connect class maximum of %d",this->nick,recvq.length(),this->recvqmax);
306         }
307         // return false if we've had more than 600 characters WITHOUT
308         // a carriage return (this is BAD, drop the socket)
309         return (i < 600);
310 }
311
312 bool userrec::BufferIsReady()
313 {
314         unsigned int t = recvq.length();
315         for (unsigned int i = 0; i < t; i++)
316                 if (recvq[i] == '\n')
317                         return true;
318         return false;
319 }
320
321 void userrec::ClearBuffer()
322 {
323         recvq = "";
324 }
325
326 std::string userrec::GetBuffer()
327 {
328         if (recvq == "")
329                 return "";
330         char* line = (char*)recvq.c_str();
331         std::string ret = "";
332         while ((*line != '\n') && (*line))
333         {
334                 ret = ret + *line;
335                 line++;
336         }
337         if ((*line == '\n') || (*line == '\r'))
338                 line++;
339         recvq = line;
340         return ret;
341 }
342
343 void userrec::AddWriteBuf(std::string data)
344 {
345         if (this->GetWriteError() != "")
346                 return;
347         if (sendq.length() + data.length() > (unsigned)this->sendqmax)
348         {
349                 /* Fix by brain - Set the error text BEFORE calling writeopers, because
350                  * if we dont it'll recursively  call here over and over again trying
351                  * to repeatedly add the text to the sendq!
352                  */
353                 this->SetWriteError("SendQ exceeded");
354                 WriteOpers("*** User %s SendQ of %d exceeds connect class maximum of %d",this->nick,sendq.length() + data.length(),this->sendqmax);
355                 return;
356         }
357         std::stringstream stream;
358         stream << sendq << data;
359         sendq = stream.str();
360 }
361
362 // send AS MUCH OF THE USERS SENDQ as we are able to (might not be all of it)
363 void userrec::FlushWriteBuf()
364 {
365         if ((sendq.length()) && (this->fd != FD_MAGIC_NUMBER))
366         {
367                 char* tb = (char*)this->sendq.c_str();
368                 int n_sent = write(this->fd,tb,this->sendq.length());
369                 if (n_sent == -1)
370                 {
371                         this->SetWriteError(strerror(errno));
372                 }
373                 else
374                 {
375                         // advance the queue
376                         tb += n_sent;
377                         this->sendq = tb;
378                         // update the user's stats counters
379                         this->bytes_out += n_sent;
380                         this->cmds_out++;
381                 }
382         }
383 }
384
385 void userrec::SetWriteError(std::string error)
386 {
387         log(DEBUG,"Setting error string for %s to '%s'",this->nick,error.c_str());
388         // don't try to set the error twice, its already set take the first string.
389         if (this->WriteError == "")
390                 this->WriteError = error;
391 }
392
393 std::string userrec::GetWriteError()
394 {
395         return this->WriteError;
396 }
397
398 void AddOper(userrec* user)
399 {
400         log(DEBUG,"Oper added to optimization list");
401         all_opers.push_back(user);
402 }
403
404 void DeleteOper(userrec* user)
405 {
406         for (std::vector<userrec*>::iterator a = all_opers.begin(); a < all_opers.end(); a++)
407         {
408                 if (*a == user)
409                 {
410                         log(DEBUG,"Oper removed from optimization list");
411                         all_opers.erase(a);
412                         return;
413                 }
414         }
415 }
416
417 void kill_link(userrec *user,const char* r)
418 {
419         user_hash::iterator iter = clientlist.find(user->nick);
420
421         char reason[MAXBUF];
422
423         strlcpy(reason,r,MAXBUF-1);
424
425         if (strlen(reason)>MAXQUIT)
426         {
427                 reason[MAXQUIT-1] = '\0';
428         }
429
430         log(DEBUG,"kill_link: %s '%s'",user->nick,reason);
431         Write(user->fd,"ERROR :Closing link (%s@%s) [%s]",user->ident,user->host,reason);
432         log(DEBUG,"closing fd %d",user->fd);
433
434         if (user->registered == 7) {
435                 purge_empty_chans(user);
436                 FOREACH_MOD(I_OnUserQuit,OnUserQuit(user,reason));
437                 WriteCommonExcept(user,"QUIT :%s",reason);
438         }
439
440         user->FlushWriteBuf();
441
442         FOREACH_MOD(I_OnUserDisconnect,OnUserDisconnect(user));
443
444         if (user->fd > -1)
445         {
446                 if (Config->GetIOHook(user->port))
447                 {
448                         try
449                         {
450                                 Config->GetIOHook(user->port)->OnRawSocketClose(user->fd);
451                         }
452                         catch (ModuleException& modexcept)
453                         {
454                                 log(DEBUG,"Module exception cought: %s",modexcept.GetReason());
455                         }
456                 }
457                 ServerInstance->SE->DelFd(user->fd);
458                 user->CloseSocket();
459         }
460
461         // this must come before the WriteOpers so that it doesnt try to fill their buffer with anything
462         // if they were an oper with +s.
463         if (user->registered == 7) {
464                 // fix by brain: only show local quits because we only show local connects (it just makes SENSE)
465                 if (user->fd > -1)
466                         WriteOpers("*** Client exiting: %s!%s@%s [%s]",user->nick,user->ident,user->host,reason);
467                 AddWhoWas(user);
468         }
469
470         if (iter != clientlist.end())
471         {
472                 log(DEBUG,"deleting user hash value %lx",(unsigned long)user);
473                 if (user->fd > -1)
474                 {
475                         fd_ref_table[user->fd] = NULL;
476                         if (find(local_users.begin(),local_users.end(),user) != local_users.end())
477                         {
478                                 local_users.erase(find(local_users.begin(),local_users.end(),user));
479                                 log(DEBUG,"Delete local user");
480                         }
481                 }
482                 clientlist.erase(iter);
483         }
484         delete user;
485 }
486
487 /* adds or updates an entry in the whowas list */
488 void AddWhoWas(userrec* u)
489 {
490         whowas_hash::iterator iter = whowas.find(u->nick);
491         WhoWasUser *a = new WhoWasUser();
492         strlcpy(a->nick,u->nick,NICKMAX-1);
493         strlcpy(a->ident,u->ident,IDENTMAX);
494         strlcpy(a->dhost,u->dhost,63);
495         strlcpy(a->host,u->host,63);
496         strlcpy(a->fullname,u->fullname,MAXGECOS);
497         if (u->server)
498                 strlcpy(a->server,u->server,256);
499         a->signon = u->signon;
500
501         /* MAX_WHOWAS:   max number of /WHOWAS items
502          * WHOWAS_STALE: number of hours before a WHOWAS item is marked as stale and
503          *               can be replaced by a newer one
504          */
505
506         if (iter == whowas.end())
507         {
508                 if (whowas.size() >= (unsigned)WHOWAS_MAX)
509                 {
510                         for (whowas_hash::iterator i = whowas.begin(); i != whowas.end(); i++)
511                         {
512                                 // 3600 seconds in an hour ;)
513                                 if ((i->second->signon)<(TIME-(WHOWAS_STALE*3600)))
514                                 {
515                                         // delete an old one
516                                         if (i->second) delete i->second;
517                                         whowas.erase(i);
518                                         // replace with new one
519                                         whowas[a->nick] = a;
520                                         log(DEBUG,"added WHOWAS entry, purged an old record");
521                                         return;
522                                 }
523                         }
524                         // no space left and user doesnt exist. Don't leave ram in use!
525                         delete a;
526                 }
527                 else
528                 {
529                         log(DEBUG,"added fresh WHOWAS entry");
530                         whowas[a->nick] = a;
531                 }
532         }
533         else
534         {
535                 log(DEBUG,"updated WHOWAS entry");
536                 if (iter->second) delete iter->second;
537                 iter->second = a;
538         }
539 }
540
541 /* add a client connection to the sockets list */
542 void AddClient(int socket, int port, bool iscached, in_addr ip4)
543 {
544         std::string tempnick = ConvToStr(socket) + "-unknown";
545         user_hash::iterator iter = clientlist.find(tempnick);
546         const char *ipaddr = inet_ntoa(ip4);
547         int j = 0;
548
549         // fix by brain.
550         // as these nicknames are 'RFC impossible', we can be sure nobody is going to be
551         // using one as a registered connection. As theyre per fd, we can also safely assume
552         // that we wont have collisions. Therefore, if the nick exists in the list, its only
553         // used by a dead socket, erase the iterator so that the new client may reclaim it.
554         // this was probably the cause of 'server ignores me when i hammer it with reconnects'
555         // issue in earlier alphas/betas
556         if (iter != clientlist.end())
557         {
558                 userrec* goner = iter->second;
559                 delete goner;
560                 clientlist.erase(iter);
561         }
562
563         log(DEBUG,"AddClient: %d %d %s",socket,port,ipaddr);
564         
565         clientlist[tempnick] = new userrec();
566         clientlist[tempnick]->fd = socket;
567         strlcpy(clientlist[tempnick]->nick,tempnick.c_str(),NICKMAX-1);
568
569         /* Smarter than your average bear^H^H^H^Hset of strlcpys. */
570         for (char* temp = (char*)ipaddr; *temp && j < 64; temp++, j++)
571                 clientlist[tempnick]->dhost[j] = clientlist[tempnick]->host[j] = *temp;
572         clientlist[tempnick]->dhost[j] = clientlist[tempnick]->host[j] = 0;
573
574         clientlist[tempnick]->server = (char*)FindServerNamePtr(Config->ServerName);
575         /* We don't need range checking here, we KNOW 'unknown\0' will fit into the ident field. */
576         strcpy(clientlist[tempnick]->ident, "unknown");
577
578         clientlist[tempnick]->registered = 0;
579         clientlist[tempnick]->signon = TIME + Config->dns_timeout;
580         clientlist[tempnick]->lastping = 1;
581         clientlist[tempnick]->ip4 = ip4;
582         clientlist[tempnick]->port = port;
583
584         // set the registration timeout for this user
585         unsigned long class_regtimeout = 90;
586         int class_flood = 0;
587         long class_threshold = 5;
588         long class_sqmax = 262144;      // 256kb
589         long class_rqmax = 4096;        // 4k
590
591         for (ClassVector::iterator i = Config->Classes.begin(); i != Config->Classes.end(); i++)
592         {
593                 if ((i->type == CC_ALLOW) && (match(ipaddr,i->host.c_str())))
594                 {
595                         class_regtimeout = (unsigned long)i->registration_timeout;
596                         class_flood = i->flood;
597                         clientlist[tempnick]->pingmax = i->pingtime;
598                         class_threshold = i->threshold;
599                         class_sqmax = i->sendqmax;
600                         class_rqmax = i->recvqmax;
601                         break;
602                 }
603         }
604
605         clientlist[tempnick]->nping = TIME+clientlist[tempnick]->pingmax + Config->dns_timeout;
606         clientlist[tempnick]->timeout = TIME+class_regtimeout;
607         clientlist[tempnick]->flood = class_flood;
608         clientlist[tempnick]->threshold = class_threshold;
609         clientlist[tempnick]->sendqmax = class_sqmax;
610         clientlist[tempnick]->recvqmax = class_rqmax;
611
612         ucrec a;
613         a.channel = NULL;
614         a.uc_modes = 0;
615         clientlist[tempnick]->chans.resize(MAXCHANS);
616
617         fd_ref_table[socket] = clientlist[tempnick];
618         local_users.push_back(clientlist[tempnick]);
619
620         if (local_users.size() > Config->SoftLimit)
621         {
622                 kill_link(clientlist[tempnick],"No more connections allowed");
623                 return;
624         }
625
626         if (local_users.size() >= MAXCLIENTS)
627         {
628                 kill_link(clientlist[tempnick],"No more connections allowed");
629                 return;
630         }
631
632         // this is done as a safety check to keep the file descriptors within range of fd_ref_table.
633         // its a pretty big but for the moment valid assumption:
634         // file descriptors are handed out starting at 0, and are recycled as theyre freed.
635         // therefore if there is ever an fd over 65535, 65536 clients must be connected to the
636         // irc server at once (or the irc server otherwise initiating this many connections, files etc)
637         // which for the time being is a physical impossibility (even the largest networks dont have more
638         // than about 10,000 users on ONE server!)
639         if ((unsigned)socket >= MAX_DESCRIPTORS)
640         {
641                 kill_link(clientlist[tempnick],"Server is full");
642                 return;
643         }
644         char* e = matches_exception(ipaddr);
645         if (!e)
646         {
647                 char* r = matches_zline(ipaddr);
648                 if (r)
649                 {
650                         char reason[MAXBUF];
651                         snprintf(reason,MAXBUF,"Z-Lined: %s",r);
652                         kill_link(clientlist[tempnick],reason);
653                         return;
654                 }
655         }
656
657         ServerInstance->SE->AddFd(socket,true,X_ESTAB_CLIENT);
658
659         WriteServ(clientlist[tempnick]->fd,"NOTICE Auth :*** Looking up your hostname...");
660 }
661
662 long FindMatchingGlobal(userrec* user)
663 {
664         long x = 0;
665         for (user_hash::const_iterator a = clientlist.begin(); a != clientlist.end(); a++)
666         {
667                 if (a->second->ip4.s_addr == user->ip4.s_addr)
668                         x++;
669         }
670         return x;
671 }
672
673 long FindMatchingLocal(userrec* user)
674 {
675         long x = 0;
676         for (std::vector<userrec*>::const_iterator a = local_users.begin(); a != local_users.end(); a++)
677         {
678                 userrec* comp = (userrec*)(*a);
679                 if (comp->ip4.s_addr == user->ip4.s_addr)
680                         x++;
681         }
682         return x;
683 }
684
685 void FullConnectUser(userrec* user, CullList* Goners)
686 {
687         ServerInstance->stats->statsConnects++;
688         user->idle_lastmsg = TIME;
689         log(DEBUG,"ConnectUser: %s",user->nick);
690
691         ConnectClass a = GetClass(user);
692         
693         if (a.type == CC_DENY)
694         {
695                 Goners->AddItem(user,"Unauthorised connection");
696                 return;
697         }
698         if ((*(a.pass.c_str())) && (!user->haspassed))
699         {
700                 Goners->AddItem(user,"Invalid password");
701                 return;
702         }
703         if (FindMatchingLocal(user) > a.maxlocal)
704         {
705                 Goners->AddItem(user,"No more connections allowed from your host via this connect class (local)");
706                 WriteOpers("*** WARNING: maximum LOCAL connections (%ld) exceeded for IP %s",a.maxlocal,(char*)inet_ntoa(user->ip4));
707                 return;
708         }
709         else if (FindMatchingGlobal(user) > a.maxglobal)
710         {
711                 Goners->AddItem(user,"No more connections allowed from your host via this connect class (global)");
712                 WriteOpers("*** WARNING: maximum GLOBAL connections (%ld) exceeded for IP %s",a.maxglobal,(char*)inet_ntoa(user->ip4));
713                 return;
714         }
715
716         char match_against[MAXBUF];
717         snprintf(match_against,MAXBUF,"%s@%s",user->ident,user->host);
718         char* e = matches_exception(match_against);
719         if (!e)
720         {
721                 char* r = matches_gline(match_against);
722                 if (r)
723                 {
724                         char reason[MAXBUF];
725                         snprintf(reason,MAXBUF,"G-Lined: %s",r);
726                         Goners->AddItem(user,reason);
727                         return;
728                 }
729                 r = matches_kline(user->host);
730                 if (r)
731                 {
732                         char reason[MAXBUF];
733                         snprintf(reason,MAXBUF,"K-Lined: %s",r);
734                         Goners->AddItem(user,reason);
735                         return;
736                 }
737         }
738
739
740         WriteServ(user->fd,"NOTICE Auth :Welcome to \002%s\002!",Config->Network);
741         WriteServ(user->fd,"001 %s :Welcome to the %s IRC Network %s!%s@%s",user->nick,Config->Network,user->nick,user->ident,user->host);
742         WriteServ(user->fd,"002 %s :Your host is %s, running version %s",user->nick,Config->ServerName,VERSION);
743         WriteServ(user->fd,"003 %s :This server was created %s %s",user->nick,__TIME__,__DATE__);
744         WriteServ(user->fd,"004 %s %s %s iowghrasxRVSCWBG lvhopsmntikrcaqbegIOLQRSKVHGCNT vhobeIaqglk",user->nick,Config->ServerName,VERSION);
745         // anfl @ #ratbox, efnet reminded me that according to the RFC this cant contain more than 13 tokens per line...
746         // so i'd better split it :)
747         std::stringstream out(Config->data005);
748         std::string token = "";
749         std::string line5 = "";
750         int token_counter = 0;
751         while (!out.eof())
752         {
753                 out >> token;
754                 line5 = line5 + token + " ";
755                 token_counter++;
756                 if ((token_counter >= 13) || (out.eof() == true))
757                 {
758                         WriteServ(user->fd,"005 %s %s:are supported by this server",user->nick,line5.c_str());
759                         line5 = "";
760                         token_counter = 0;
761                 }
762         }
763         ShowMOTD(user);
764
765         // fix 3 by brain, move registered = 7 below these so that spurious modes and host changes dont go out
766         // onto the network and produce 'fake direction'
767         FOREACH_MOD(I_OnUserConnect,OnUserConnect(user));
768         FOREACH_MOD(I_OnGlobalConnect,OnGlobalConnect(user));
769         user->registered = 7;
770         WriteOpers("*** Client connecting on port %lu: %s!%s@%s [%s]",(unsigned long)user->port,user->nick,user->ident,user->host,(char*)inet_ntoa(user->ip4));
771 }
772
773 /* re-allocates a nick in the user_hash after they change nicknames,
774  * returns a pointer to the new user as it may have moved */
775
776 userrec* ReHashNick(char* Old, char* New)
777 {
778         //user_hash::iterator newnick;
779         user_hash::iterator oldnick = clientlist.find(Old);
780
781         log(DEBUG,"ReHashNick: %s %s",Old,New);
782
783         if (!strcasecmp(Old,New))
784         {
785                 log(DEBUG,"old nick is new nick, skipping");
786                 return oldnick->second;
787         }
788
789         if (oldnick == clientlist.end()) return NULL; /* doesnt exist */
790
791         log(DEBUG,"ReHashNick: Found hashed nick %s",Old);
792
793         userrec* olduser = oldnick->second;
794         clientlist[New] = olduser;
795         clientlist.erase(oldnick);
796
797         log(DEBUG,"ReHashNick: Nick rehashed as %s",New);
798
799         return clientlist[New];
800 }
801
802 void force_nickchange(userrec* user,const char* newnick)
803 {
804         char nick[MAXBUF];
805         int MOD_RESULT = 0;
806
807         *nick = 0;
808
809         FOREACH_RESULT(I_OnUserPreNick,OnUserPreNick(user,newnick));
810         if (MOD_RESULT) {
811                 ServerInstance->stats->statsCollisions++;
812                 kill_link(user,"Nickname collision");
813                 return;
814         }
815         if (matches_qline(newnick))
816         {
817                 ServerInstance->stats->statsCollisions++;
818                 kill_link(user,"Nickname collision");
819                 return;
820         }
821
822         if (user)
823         {
824                 if (newnick)
825                 {
826                         strlcpy(nick,newnick,MAXBUF-1);
827                 }
828                 if (user->registered == 7)
829                 {
830                         char* pars[1];
831                         pars[0] = nick;
832                         std::string cmd = "NICK";
833                         ServerInstance->Parser->CallHandler(cmd,pars,1,user);
834                 }
835         }
836 }
837