]> git.netwichtig.de Git - user/henk/code/inspircd.git/blob - src/users.cpp
Optimizations and code tidyups. QA please check that svsnick and other forced nick...
[user/henk/code/inspircd.git] / src / users.cpp
1 /*       +------------------------------------+
2  *       | Inspire Internet Relay Chat Daemon |
3  *       +------------------------------------+
4  *
5  *  InspIRCd: (C) 2002-2007 InspIRCd Development Team
6  * See: http://www.inspircd.org/wiki/index.php/Credits
7  *
8  * This program is free but copyrighted software; see
9  *            the file COPYING for details.
10  *
11  * ---------------------------------------------------
12  */
13
14 #include "inspircd.h"
15 #include "configreader.h"
16 #include "channels.h"
17 #include "users.h"
18 #include <stdarg.h>
19 #include "socketengine.h"
20 #include "wildcard.h"
21 #include "xline.h"
22 #include "commands/cmd_whowas.h"
23
24 static unsigned long already_sent[MAX_DESCRIPTORS] = {0};
25
26 /* XXX: Used for speeding up WriteCommon operations */
27 unsigned long uniq_id = 0;
28
29 bool InitTypes(ServerConfig* conf, const char* tag)
30 {
31         if (conf->opertypes.size())
32         {
33                 for (opertype_t::iterator n = conf->opertypes.begin(); n != conf->opertypes.end(); n++)
34                 {
35                         if (n->second)
36                                 delete[] n->second;
37                 }
38         }
39
40         conf->opertypes.clear();
41         return true;
42 }
43
44 bool InitClasses(ServerConfig* conf, const char* tag)
45 {
46         if (conf->operclass.size())
47         {
48                 for (operclass_t::iterator n = conf->operclass.begin(); n != conf->operclass.end(); n++)
49                 {
50                         if (n->second)
51                                 delete[] n->second;
52                 }
53         }
54
55         conf->operclass.clear();
56         return true;
57 }
58
59 bool DoType(ServerConfig* conf, const char* tag, char** entries, ValueList &values, int* types)
60 {
61         const char* TypeName = values[0].GetString();
62         const char* Classes = values[1].GetString();
63
64         conf->opertypes[TypeName] = strnewdup(Classes);
65         return true;
66 }
67
68 bool DoClass(ServerConfig* conf, const char* tag, char** entries, ValueList &values, int* types)
69 {
70         const char* ClassName = values[0].GetString();
71         const char* CommandList = values[1].GetString();
72
73         conf->operclass[ClassName] = strnewdup(CommandList);
74         return true;
75 }
76
77 bool DoneClassesAndTypes(ServerConfig* conf, const char* tag)
78 {
79         return true;
80 }
81
82 std::string userrec::ProcessNoticeMasks(const char *sm)
83 {
84         bool adding = true, oldadding = false;
85         const char *c = sm;
86         std::string output;
87
88         while (c && *c)
89         {
90                 switch (*c)
91                 {
92                         case '+':
93                                 adding = true;
94                         break;
95                         case '-':
96                                 adding = false;
97                         break;
98                         case '*':
99                                 for (unsigned char d = 'A'; d <= 'z'; d++)
100                                 {
101                                         if (ServerInstance->SNO->IsEnabled(d))
102                                         {
103                                                 if ((!IsNoticeMaskSet(d) && adding) || (IsNoticeMaskSet(d) && !adding))
104                                                 {
105                                                         if ((oldadding != adding) || (!output.length()))
106                                                                 output += (adding ? '+' : '-');
107
108                                                         this->SetNoticeMask(d, adding);
109
110                                                         output += d;
111                                                 }
112                                         }
113                                         oldadding = adding;
114                                 }
115                         break;
116                         default:
117                                 if ((*c >= 'A') && (*c <= 'z') && (ServerInstance->SNO->IsEnabled(*c)))
118                                 {
119                                         if ((!IsNoticeMaskSet(*c) && adding) || (IsNoticeMaskSet(*c) && !adding))
120                                         {
121                                                 if ((oldadding != adding) || (!output.length()))
122                                                         output += (adding ? '+' : '-');
123
124                                                 this->SetNoticeMask(*c, adding);
125
126                                                 output += *c;
127                                         }
128                                 }
129                                 oldadding = adding;
130                         break;
131                 }
132
133                 *c++;
134         }
135
136         return output;
137 }
138
139 void userrec::StartDNSLookup()
140 {
141         try
142         {
143                 bool cached;
144                 const char* ip = this->GetIPString();
145
146                 /* Special case for 4in6 (Have i mentioned i HATE 4in6?) */
147                 if (!strncmp(ip, "0::ffff:", 8))
148                         res_reverse = new UserResolver(this->ServerInstance, this, ip + 8, DNS_QUERY_PTR4, cached);
149                 else
150                         res_reverse = new UserResolver(this->ServerInstance, this, ip, this->GetProtocolFamily() == AF_INET ? DNS_QUERY_PTR4 : DNS_QUERY_PTR6, cached);
151
152                 this->ServerInstance->AddResolver(res_reverse, cached);
153         }
154         catch (CoreException& e)
155         {
156                 ServerInstance->Log(DEBUG,"Error in resolver: %s",e.GetReason());
157         }
158 }
159
160 UserResolver::UserResolver(InspIRCd* Instance, userrec* user, std::string to_resolve, QueryType qt, bool &cache) :
161         Resolver(Instance, to_resolve, qt, cache), bound_user(user)
162 {
163         this->fwd = (qt == DNS_QUERY_A || qt == DNS_QUERY_AAAA);
164         this->bound_fd = user->GetFd();
165 }
166
167 void UserResolver::OnLookupComplete(const std::string &result, unsigned int ttl, bool cached)
168 {
169         if ((!this->fwd) && (ServerInstance->SE->GetRef(this->bound_fd) == this->bound_user))
170         {
171                 this->bound_user->stored_host = result;
172                 try
173                 {
174                         /* Check we didnt time out */
175                         if (this->bound_user->registered != REG_ALL)
176                         {
177                                 bool cached;
178 #ifdef IPV6
179                                 if (this->bound_user->GetProtocolFamily() == AF_INET6)
180                                 {
181                                         /* IPV6 forward lookup (with possibility of 4in6) */
182                                         const char* ip = this->bound_user->GetIPString();
183                                         bound_user->res_forward = new UserResolver(this->ServerInstance, this->bound_user, result, (!strncmp(ip, "0::ffff:", 8) ? DNS_QUERY_A : DNS_QUERY_AAAA), cached);
184                                 }
185                                 else
186                                         /* IPV4 lookup (mixed protocol mode) */
187 #endif
188                                 /* IPV4 lookup (ipv4 only mode) */
189                                 bound_user->res_forward = new UserResolver(this->ServerInstance, this->bound_user, result, DNS_QUERY_A, cached);
190                                 this->ServerInstance->AddResolver(bound_user->res_forward, cached);
191                         }
192                 }
193                 catch (CoreException& e)
194                 {
195                         ServerInstance->Log(DEBUG,"Error in resolver: %s",e.GetReason());
196                 }
197         }
198         else if ((this->fwd) && (ServerInstance->SE->GetRef(this->bound_fd) == this->bound_user))
199         {
200                 /* Both lookups completed */
201                 std::string result2("0::ffff:");
202                 result2.append(result);
203                 if (this->bound_user->GetIPString() == result || this->bound_user->GetIPString() == result2)
204                 {
205                         std::string hostname = this->bound_user->stored_host;
206                         if (hostname.length() < 65)
207                         {
208                                 /* Check we didnt time out */
209                                 if ((this->bound_user->registered != REG_ALL) && (!this->bound_user->dns_done))
210                                 {
211                                         /* Hostnames starting with : are not a good thing (tm) */
212                                         if (*(hostname.c_str()) == ':')
213                                                 hostname.insert(0, "0");
214
215                                         this->bound_user->WriteServ("NOTICE Auth :*** Found your hostname (%s)%s", hostname.c_str(), (cached ? " -- cached" : ""));
216                                         this->bound_user->dns_done = true;
217                                         strlcpy(this->bound_user->dhost, hostname.c_str(),64);
218                                         strlcpy(this->bound_user->host, hostname.c_str(),64);
219                                         /* Invalidate cache */
220                                         this->bound_user->InvalidateCache();
221                                 }
222                         }
223                         else
224                         {
225                                 if (!this->bound_user->dns_done)
226                                 {
227                                         this->bound_user->WriteServ("NOTICE Auth :*** Your hostname is longer than the maximum of 64 characters, using your IP address (%s) instead.", this->bound_user->GetIPString());
228                                         this->bound_user->dns_done = true;
229                                 }
230                         }
231                 }
232                 else
233                 {
234                         if (!this->bound_user->dns_done)
235                         {
236                                 this->bound_user->WriteServ("NOTICE Auth :*** Your hostname does not match up with your IP address. Sorry, using your IP address (%s) instead.", this->bound_user->GetIPString());
237                                 this->bound_user->dns_done = true;
238                         }
239                 }
240         }
241 }
242
243 void UserResolver::OnError(ResolverError e, const std::string &errormessage)
244 {
245         if (ServerInstance->SE->GetRef(this->bound_fd) == this->bound_user)
246         {
247                 /* Since dns timeout is implemented outside of the resolver, this was a race condition that could result in this message being sent *after*
248                  * the user was fully connected. This check fixes that issue  - Special */
249                 if (!this->bound_user->dns_done)
250                 {
251                         /* Error message here */
252                         this->bound_user->WriteServ("NOTICE Auth :*** Could not resolve your hostname: %s; using your IP address (%s) instead.", errormessage.c_str(), this->bound_user->GetIPString());
253                         this->bound_user->dns_done = true;
254                 }
255         }
256 }
257
258
259 bool userrec::IsNoticeMaskSet(unsigned char sm)
260 {
261         return (snomasks[sm-65]);
262 }
263
264 void userrec::SetNoticeMask(unsigned char sm, bool value)
265 {
266         snomasks[sm-65] = value;
267 }
268
269 const char* userrec::FormatNoticeMasks()
270 {
271         static char data[MAXBUF];
272         int offset = 0;
273
274         for (int n = 0; n < 64; n++)
275         {
276                 if (snomasks[n])
277                         data[offset++] = n+65;
278         }
279
280         data[offset] = 0;
281         return data;
282 }
283
284
285
286 bool userrec::IsModeSet(unsigned char m)
287 {
288         return (modes[m-65]);
289 }
290
291 void userrec::SetMode(unsigned char m, bool value)
292 {
293         modes[m-65] = value;
294 }
295
296 const char* userrec::FormatModes()
297 {
298         static char data[MAXBUF];
299         int offset = 0;
300         for (int n = 0; n < 64; n++)
301         {
302                 if (modes[n])
303                         data[offset++] = n+65;
304         }
305         data[offset] = 0;
306         return data;
307 }
308
309 void userrec::DecrementModes()
310 {
311         for (int n = 0; n < 64; n++)
312         {
313                 if (modes[n])
314                 {
315                         ModeHandler* mh = ServerInstance->Modes->FindMode(n+65, MODETYPE_USER);
316                         if (mh)
317                                 mh->ChangeCount(-1);
318                 }
319         }
320 }
321
322 userrec::userrec(InspIRCd* Instance) : ServerInstance(Instance)
323 {
324         // the PROPER way to do it, AVOID bzero at *ALL* costs
325         *password = *nick = *ident = *host = *dhost = *fullname = *awaymsg = *oper = 0;
326         server = (char*)Instance->FindServerNamePtr(Instance->Config->ServerName);
327         reset_due = ServerInstance->Time();
328         age = ServerInstance->Time(true);
329         lines_in = lastping = signon = idle_lastmsg = nping = registered = 0;
330         ChannelCount = timeout = flood = bytes_in = bytes_out = cmds_in = cmds_out = 0;
331         muted = exempt = haspassed = dns_done = false;
332         fd = -1;
333         recvq.clear();
334         sendq.clear();
335         WriteError.clear();
336         res_forward = res_reverse = NULL;
337         Visibility = NULL;
338         ip = NULL;
339         chans.clear();
340         invites.clear();
341         memset(modes,0,sizeof(modes));
342         memset(snomasks,0,sizeof(snomasks));
343         /* Invalidate cache */
344         operquit = cached_fullhost = cached_hostip = cached_makehost = cached_fullrealhost = NULL;
345 }
346
347 userrec::~userrec()
348 {
349         this->InvalidateCache();
350         this->DecrementModes();
351         if (operquit)
352                 free(operquit);
353         if (ip)
354         {
355                 clonemap::iterator x = ServerInstance->local_clones.find(this->GetIPString());
356                 if (x != ServerInstance->local_clones.end())
357                 {
358                         x->second--;
359                         if (!x->second)
360                         {
361                                 ServerInstance->local_clones.erase(x);
362                         }
363                 }
364
365                 clonemap::iterator y = ServerInstance->global_clones.find(this->GetIPString());
366                 if (y != ServerInstance->global_clones.end())
367                 {
368                         y->second--;
369                         if (!y->second)
370                         {
371                                 ServerInstance->global_clones.erase(y);
372                         }
373                 }
374
375                 if (this->GetProtocolFamily() == AF_INET)
376                 {
377                         delete (sockaddr_in*)ip;
378                 }
379 #ifdef SUPPORT_IP6LINKS
380                 else
381                 {
382                         delete (sockaddr_in6*)ip;
383                 }
384 #endif
385         }
386 }
387
388 char* userrec::MakeHost()
389 {
390         if (this->cached_makehost)
391                 return this->cached_makehost;
392
393         char nhost[MAXBUF];
394         /* This is much faster than snprintf */
395         char* t = nhost;
396         for(char* n = ident; *n; n++)
397                 *t++ = *n;
398         *t++ = '@';
399         for(char* n = host; *n; n++)
400                 *t++ = *n;
401         *t = 0;
402
403         this->cached_makehost = strdup(nhost);
404
405         return this->cached_makehost;
406 }
407
408 char* userrec::MakeHostIP()
409 {
410         if (this->cached_hostip)
411                 return this->cached_hostip;
412
413         char ihost[MAXBUF];
414         /* This is much faster than snprintf */
415         char* t = ihost;
416         for(char* n = ident; *n; n++)
417                 *t++ = *n;
418         *t++ = '@';
419         for(const char* n = this->GetIPString(); *n; n++)
420                 *t++ = *n;
421         *t = 0;
422
423         this->cached_hostip = strdup(ihost);
424
425         return this->cached_hostip;
426 }
427
428 void userrec::CloseSocket()
429 {
430         shutdown(this->fd,2);
431         close(this->fd);
432 }
433
434 char* userrec::GetFullHost()
435 {
436         if (this->cached_fullhost)
437                 return this->cached_fullhost;
438
439         char result[MAXBUF];
440         char* t = result;
441         for(char* n = nick; *n; n++)
442                 *t++ = *n;
443         *t++ = '!';
444         for(char* n = ident; *n; n++)
445                 *t++ = *n;
446         *t++ = '@';
447         for(char* n = dhost; *n; n++)
448                 *t++ = *n;
449         *t = 0;
450
451         this->cached_fullhost = strdup(result);
452
453         return this->cached_fullhost;
454 }
455
456 char* userrec::MakeWildHost()
457 {
458         static char nresult[MAXBUF];
459         char* t = nresult;
460         *t++ = '*';     *t++ = '!';
461         *t++ = '*';     *t++ = '@';
462         for(char* n = dhost; *n; n++)
463                 *t++ = *n;
464         *t = 0;
465         return nresult;
466 }
467
468 int userrec::ReadData(void* buffer, size_t size)
469 {
470         if (IS_LOCAL(this))
471         {
472 #ifndef WIN32
473                 return read(this->fd, buffer, size);
474 #else
475                 return recv(this->fd, (char*)buffer, size, 0);
476 #endif
477         }
478         else
479                 return 0;
480 }
481
482
483 char* userrec::GetFullRealHost()
484 {
485         if (this->cached_fullrealhost)
486                 return this->cached_fullrealhost;
487
488         char fresult[MAXBUF];
489         char* t = fresult;
490         for(char* n = nick; *n; n++)
491                 *t++ = *n;
492         *t++ = '!';
493         for(char* n = ident; *n; n++)
494                 *t++ = *n;
495         *t++ = '@';
496         for(char* n = host; *n; n++)
497                 *t++ = *n;
498         *t = 0;
499
500         this->cached_fullrealhost = strdup(fresult);
501
502         return this->cached_fullrealhost;
503 }
504
505 bool userrec::IsInvited(const irc::string &channel)
506 {
507         for (InvitedList::iterator i = invites.begin(); i != invites.end(); i++)
508         {
509                 if (channel == *i)
510                 {
511                         return true;
512                 }
513         }
514         return false;
515 }
516
517 InvitedList* userrec::GetInviteList()
518 {
519         return &invites;
520 }
521
522 void userrec::InviteTo(const irc::string &channel)
523 {
524         invites.push_back(channel);
525 }
526
527 void userrec::RemoveInvite(const irc::string &channel)
528 {
529         for (InvitedList::iterator i = invites.begin(); i != invites.end(); i++)
530         {
531                 if (channel == *i)
532                 {
533                         invites.erase(i);
534                         return;
535                 }
536         }
537 }
538
539 bool userrec::HasPermission(const std::string &command)
540 {
541         char* mycmd;
542         char* savept;
543         char* savept2;
544
545         /*
546          * users on remote servers can completely bypass all permissions based checks.
547          * This prevents desyncs when one server has different type/class tags to another.
548          * That having been said, this does open things up to the possibility of source changes
549          * allowing remote kills, etc - but if they have access to the src, they most likely have
550          * access to the conf - so it's an end to a means either way.
551          */
552         if (!IS_LOCAL(this))
553                 return true;
554
555         // are they even an oper at all?
556         if (IS_OPER(this))
557         {
558                 opertype_t::iterator iter_opertype = ServerInstance->Config->opertypes.find(this->oper);
559                 if (iter_opertype != ServerInstance->Config->opertypes.end())
560                 {
561                         char* Classes = strdup(iter_opertype->second);
562                         char* myclass = strtok_r(Classes," ",&savept);
563                         while (myclass)
564                         {
565                                 operclass_t::iterator iter_operclass = ServerInstance->Config->operclass.find(myclass);
566                                 if (iter_operclass != ServerInstance->Config->operclass.end())
567                                 {
568                                         char* CommandList = strdup(iter_operclass->second);
569                                         mycmd = strtok_r(CommandList," ",&savept2);
570                                         while (mycmd)
571                                         {
572                                                 if ((!strcasecmp(mycmd,command.c_str())) || (*mycmd == '*'))
573                                                 {
574                                                         free(Classes);
575                                                         free(CommandList);
576                                                         return true;
577                                                 }
578                                                 mycmd = strtok_r(NULL," ",&savept2);
579                                         }
580                                         free(CommandList);
581                                 }
582                                 myclass = strtok_r(NULL," ",&savept);
583                         }
584                         free(Classes);
585                 }
586         }
587         return false;
588 }
589
590 /** NOTE: We cannot pass a const reference to this method.
591  * The string is changed by the workings of the method,
592  * so that if we pass const ref, we end up copying it to
593  * something we can change anyway. Makes sense to just let
594  * the compiler do that copy for us.
595  */
596 bool userrec::AddBuffer(std::string a)
597 {
598         try
599         {
600                 std::string::size_type i = a.rfind('\r');
601
602                 while (i != std::string::npos)
603                 {
604                         a.erase(i, 1);
605                         i = a.rfind('\r');
606                 }
607
608                 if (a.length())
609                         recvq.append(a);
610
611                 if (recvq.length() > (unsigned)this->recvqmax)
612                 {
613                         this->SetWriteError("RecvQ exceeded");
614                         ServerInstance->WriteOpers("*** User %s RecvQ of %d exceeds connect class maximum of %d",this->nick,recvq.length(),this->recvqmax);
615                         return false;
616                 }
617
618                 return true;
619         }
620
621         catch (...)
622         {
623                 ServerInstance->Log(DEBUG,"Exception in userrec::AddBuffer()");
624                 return false;
625         }
626 }
627
628 bool userrec::BufferIsReady()
629 {
630         return (recvq.find('\n') != std::string::npos);
631 }
632
633 void userrec::ClearBuffer()
634 {
635         recvq.clear();
636 }
637
638 std::string userrec::GetBuffer()
639 {
640         try
641         {
642                 if (!recvq.length())
643                         return "";
644
645                 /* Strip any leading \r or \n off the string.
646                  * Usually there are only one or two of these,
647                  * so its is computationally cheap to do.
648                  */
649                 std::string::iterator t = recvq.begin();
650                 while (t != recvq.end() && (*t == '\r' || *t == '\n'))
651                 {
652                         recvq.erase(t);
653                         t = recvq.begin();
654                 }
655
656                 for (std::string::iterator x = recvq.begin(); x != recvq.end(); x++)
657                 {
658                         /* Find the first complete line, return it as the
659                          * result, and leave the recvq as whats left
660                          */
661                         if (*x == '\n')
662                         {
663                                 std::string ret = std::string(recvq.begin(), x);
664                                 recvq.erase(recvq.begin(), x + 1);
665                                 return ret;
666                         }
667                 }
668                 return "";
669         }
670
671         catch (...)
672         {
673                 ServerInstance->Log(DEBUG,"Exception in userrec::GetBuffer()");
674                 return "";
675         }
676 }
677
678 void userrec::AddWriteBuf(const std::string &data)
679 {
680         if (*this->GetWriteError())
681                 return;
682
683         if (sendq.length() + data.length() > (unsigned)this->sendqmax)
684         {
685                 /*
686                  * Fix by brain - Set the error text BEFORE calling writeopers, because
687                  * if we dont it'll recursively  call here over and over again trying
688                  * to repeatedly add the text to the sendq!
689                  */
690                 this->SetWriteError("SendQ exceeded");
691                 ServerInstance->WriteOpers("*** User %s SendQ of %d exceeds connect class maximum of %d",this->nick,sendq.length() + data.length(),this->sendqmax);
692                 return;
693         }
694
695         try
696         {
697                 if (data.length() > MAXBUF - 2) /* MAXBUF has a value of 514, to account for line terminators */
698                         sendq.append(data.substr(0,MAXBUF - 4)).append("\r\n"); /* MAXBUF-4 = 510 */
699                 else
700                         sendq.append(data);
701         }
702         catch (...)
703         {
704                 this->SetWriteError("SendQ exceeded");
705                 ServerInstance->WriteOpers("*** User %s SendQ got an exception",this->nick);
706         }
707 }
708
709 // send AS MUCH OF THE USERS SENDQ as we are able to (might not be all of it)
710 void userrec::FlushWriteBuf()
711 {
712         try
713         {
714                 if ((this->fd == FD_MAGIC_NUMBER) || (*this->GetWriteError()))
715                 {
716                         sendq.clear();
717                 }
718                 if ((sendq.length()) && (this->fd != FD_MAGIC_NUMBER))
719                 {
720                         int old_sendq_length = sendq.length();
721 #ifndef WIN32
722                 int n_sent = write(this->fd, this->sendq.data(), this->sendq.length());
723 #else
724                 int n_sent = send(this->fd, (const char*)this->sendq.data(), this->sendq.length(), 0);
725 #endif
726                         if (n_sent == -1)
727                         {
728                                 if (errno == EAGAIN)
729                                 {
730                                         /* The socket buffer is full. This isnt fatal,
731                                          * try again later.
732                                          */
733                                         this->ServerInstance->SE->WantWrite(this);
734                                 }
735                                 else
736                                 {
737                                         /* Fatal error, set write error and bail
738                                          */
739                                         this->SetWriteError(strerror(errno));
740                                         return;
741                                 }
742                         }
743                         else
744                         {
745                                 /* advance the queue */
746                                 if (n_sent)
747                                         this->sendq = this->sendq.substr(n_sent);
748                                 /* update the user's stats counters */
749                                 this->bytes_out += n_sent;
750                                 this->cmds_out++;
751                                 if (n_sent != old_sendq_length)
752                                         this->ServerInstance->SE->WantWrite(this);
753                         }
754                 }
755         }
756
757         catch (...)
758         {
759                 ServerInstance->Log(DEBUG,"Exception in userrec::FlushWriteBuf()");
760         }
761
762         if (this->sendq.empty())
763         {
764                 FOREACH_MOD(I_OnBufferFlushed,OnBufferFlushed(this));
765         }
766 }
767
768 void userrec::SetWriteError(const std::string &error)
769 {
770         try
771         {
772                 // don't try to set the error twice, its already set take the first string.
773                 if (this->WriteError.empty())
774                         this->WriteError = error;
775         }
776
777         catch (...)
778         {
779                 ServerInstance->Log(DEBUG,"Exception in userrec::SetWriteError()");
780         }
781 }
782
783 const char* userrec::GetWriteError()
784 {
785         return this->WriteError.c_str();
786 }
787
788 void userrec::Oper(const std::string &opertype)
789 {
790         try
791         {
792                 this->modes[UM_OPERATOR] = 1;
793                 this->WriteServ("MODE %s :+o", this->nick);
794                 FOREACH_MOD(I_OnOper, OnOper(this, opertype));
795                 ServerInstance->Log(DEFAULT,"OPER: %s!%s@%s opered as type: %s", this->nick, this->ident, this->host, opertype.c_str());
796                 strlcpy(this->oper, opertype.c_str(), NICKMAX - 1);
797                 ServerInstance->all_opers.push_back(this);
798                 FOREACH_MOD(I_OnPostOper,OnPostOper(this, opertype));
799         }
800
801         catch (...)
802         {
803                 ServerInstance->Log(DEBUG,"Exception in userrec::Oper()");
804         }
805 }
806
807 void userrec::UnOper()
808 {
809         try
810         {
811                 if (IS_OPER(this))
812                 {
813                         // unset their oper type (what IS_OPER checks), and remove +o
814                         *this->oper = 0;
815                         this->modes[UM_OPERATOR] = 0;
816
817                         // remove them from the opers list.
818                         for (std::vector<userrec*>::iterator a = ServerInstance->all_opers.begin(); a < ServerInstance->all_opers.end(); a++)
819                         {
820                                 if (*a == this)
821                                 {
822                                         ServerInstance->all_opers.erase(a);
823                                         return;
824                                 }
825                         }
826                 }
827         }
828
829         catch (...)
830         {
831                 ServerInstance->Log(DEBUG,"Exception in userrec::UnOper()");
832         }
833 }
834
835 void userrec::QuitUser(InspIRCd* Instance, userrec *user, const std::string &quitreason, const char* operreason)
836 {
837         user->muted = true;
838         Instance->GlobalCulls.AddItem(user, quitreason.c_str(), operreason);
839 }
840
841 /* adds or updates an entry in the whowas list */
842 void userrec::AddToWhoWas()
843 {
844         command_t* whowas_command = ServerInstance->Parser->GetHandler("WHOWAS");
845         if (whowas_command)
846         {
847                 std::deque<classbase*> params;
848                 params.push_back(this);
849                 whowas_command->HandleInternal(WHOWAS_ADD, params);
850         }
851 }
852
853 /* add a client connection to the sockets list */
854 void userrec::AddClient(InspIRCd* Instance, int socket, int port, bool iscached, int socketfamily, sockaddr* ip)
855 {
856         std::string tempnick = ConvToStr(socket) + "-unknown";
857         user_hash::iterator iter = Instance->clientlist->find(tempnick);
858         char ipaddr[MAXBUF];
859 #ifdef IPV6
860         if (socketfamily == AF_INET6)
861                 inet_ntop(AF_INET6, &((const sockaddr_in6*)ip)->sin6_addr, ipaddr, sizeof(ipaddr));
862         else
863 #endif
864         inet_ntop(AF_INET, &((const sockaddr_in*)ip)->sin_addr, ipaddr, sizeof(ipaddr));
865         userrec* New;
866         int j = 0;
867
868         Instance->unregistered_count++;
869
870         /*
871          * fix by brain.
872          * as these nicknames are 'RFC impossible', we can be sure nobody is going to be
873          * using one as a registered connection. As they are per fd, we can also safely assume
874          * that we wont have collisions. Therefore, if the nick exists in the list, its only
875          * used by a dead socket, erase the iterator so that the new client may reclaim it.
876          * this was probably the cause of 'server ignores me when i hammer it with reconnects'
877          * issue in earlier alphas/betas
878          */
879         if (iter != Instance->clientlist->end())
880         {
881                 userrec* goner = iter->second;
882                 DELETE(goner);
883                 Instance->clientlist->erase(iter);
884         }
885
886         New = new userrec(Instance);
887         (*(Instance->clientlist))[tempnick] = New;
888         New->fd = socket;
889         strlcpy(New->nick,tempnick.c_str(),NICKMAX-1);
890
891         New->server = Instance->FindServerNamePtr(Instance->Config->ServerName);
892         /* We don't need range checking here, we KNOW 'unknown\0' will fit into the ident field. */
893         strcpy(New->ident, "unknown");
894
895         New->registered = REG_NONE;
896         New->signon = Instance->Time() + Instance->Config->dns_timeout;
897         New->lastping = 1;
898
899         New->SetSockAddr(socketfamily, ipaddr, port);
900
901         /* Smarter than your average bear^H^H^H^Hset of strlcpys. */
902         for (const char* temp = New->GetIPString(); *temp && j < 64; temp++, j++)
903                 New->dhost[j] = New->host[j] = *temp;
904         New->dhost[j] = New->host[j] = 0;
905
906         Instance->AddLocalClone(New);
907         Instance->AddGlobalClone(New);
908
909         /*
910          * First class check. We do this again in FullConnect after DNS is done, and NICK/USER is recieved.
911          * See my note down there for why this is required. DO NOT REMOVE. :) -- w00t
912          */
913         ConnectClass* i = New->GetClass();
914
915         if (!i)
916         {
917                 userrec::QuitUser(Instance, New, "Access denied by configuration");
918                 return;
919         }
920
921         New->CheckClass();
922
923         New->pingmax = i->GetPingTime();
924         New->nping = Instance->Time() + i->GetPingTime() + Instance->Config->dns_timeout;
925         New->timeout = Instance->Time() + i->GetRegTimeout();
926         New->flood = i->GetFlood();
927         New->threshold = i->GetThreshold();
928         New->sendqmax = i->GetSendqMax();
929         New->recvqmax = i->GetRecvqMax();
930
931         Instance->local_users.push_back(New);
932
933         if ((Instance->local_users.size() > Instance->Config->SoftLimit) || (Instance->local_users.size() >= MAXCLIENTS))
934         {
935                 Instance->WriteOpers("*** Warning: softlimit value has been reached: %d clients", Instance->Config->SoftLimit);
936                 userrec::QuitUser(Instance, New,"No more connections allowed");
937                 return;
938         }
939
940         /*
941          * XXX -
942          * this is done as a safety check to keep the file descriptors within range of fd_ref_table.
943          * its a pretty big but for the moment valid assumption:
944          * file descriptors are handed out starting at 0, and are recycled as theyre freed.
945          * therefore if there is ever an fd over 65535, 65536 clients must be connected to the
946          * irc server at once (or the irc server otherwise initiating this many connections, files etc)
947          * which for the time being is a physical impossibility (even the largest networks dont have more
948          * than about 10,000 users on ONE server!)
949          */
950 #ifndef WINDOWS
951         if ((unsigned int)socket >= MAX_DESCRIPTORS)
952         {
953                 userrec::QuitUser(Instance, New, "Server is full");
954                 return;
955         }
956 #endif
957
958         New->exempt = (Instance->XLines->matches_exception(New) != NULL);
959         if (!New->exempt)
960         {
961                 ZLine* r = Instance->XLines->matches_zline(ipaddr);
962                 if (r)
963                 {
964                         char reason[MAXBUF];
965                         if (*Instance->Config->MoronBanner)
966                                 New->WriteServ("NOTICE %s :*** %s", New->nick, Instance->Config->MoronBanner);
967                         snprintf(reason,MAXBUF,"Z-Lined: %s",r->reason);
968                         userrec::QuitUser(Instance, New, reason);
969                         return;
970                 }
971         }
972
973         if (socket > -1)
974         {
975                 if (!Instance->SE->AddFd(New))
976                 {
977                         userrec::QuitUser(Instance, New, "Internal error handling connection");
978                         return;
979                 }
980         }
981
982         /* NOTE: even if dns lookups are *off*, we still need to display this.
983          * BOPM and other stuff requires it.
984          */
985         New->WriteServ("NOTICE Auth :*** Looking up your hostname...");
986 }
987
988 unsigned long userrec::GlobalCloneCount()
989 {
990         clonemap::iterator x = ServerInstance->global_clones.find(this->GetIPString());
991         if (x != ServerInstance->global_clones.end())
992                 return x->second;
993         else
994                 return 0;
995 }
996
997 unsigned long userrec::LocalCloneCount()
998 {
999         clonemap::iterator x = ServerInstance->local_clones.find(this->GetIPString());
1000         if (x != ServerInstance->local_clones.end())
1001                 return x->second;
1002         else
1003                 return 0;
1004 }
1005
1006 /*
1007  * Check class restrictions
1008  */
1009 void userrec::CheckClass()
1010 {
1011         ConnectClass* a = this->GetClass();
1012
1013         if ((!a) || (a->GetType() == CC_DENY))
1014         {
1015                 userrec::QuitUser(ServerInstance, this, "Unauthorised connection");
1016                 return;
1017         }
1018         else if ((a->GetMaxLocal()) && (this->LocalCloneCount() > a->GetMaxLocal()))
1019         {
1020                 userrec::QuitUser(ServerInstance, this, "No more connections allowed from your host via this connect class (local)");
1021                 ServerInstance->WriteOpers("*** WARNING: maximum LOCAL connections (%ld) exceeded for IP %s", a->GetMaxLocal(), this->GetIPString());
1022                 return;
1023         }
1024         else if ((a->GetMaxGlobal()) && (this->GlobalCloneCount() > a->GetMaxGlobal()))
1025         {
1026                 userrec::QuitUser(ServerInstance, this, "No more connections allowed from your host via this connect class (global)");
1027                 ServerInstance->WriteOpers("*** WARNING: maximum GLOBAL connections (%ld) exceeded for IP %s", a->GetMaxGlobal(), this->GetIPString());
1028                 return;
1029         }
1030 }
1031
1032 void userrec::FullConnect()
1033 {
1034         ServerInstance->stats->statsConnects++;
1035         this->idle_lastmsg = ServerInstance->Time();
1036
1037         /*
1038          * You may be thinking "wtf, we checked this in userrec::AddClient!" - and yes, we did, BUT.
1039          * At the time AddClient is called, we don't have a resolved host, by here we probably do - which
1040          * may put the user into a totally seperate class with different restrictions! so we *must* check again.
1041          * Don't remove this! -- w00t
1042          */
1043         this->CheckClass();
1044         
1045         /* Check the password, if one is required by the user's connect class.
1046          * This CANNOT be in CheckClass(), because that is called prior to PASS as well!
1047          */
1048         if ((!this->GetClass()->GetPass().empty()) && (!this->haspassed))
1049         {
1050                 userrec::QuitUser(ServerInstance, this, "Invalid password");
1051                 return;
1052         }
1053         
1054         if (!this->exempt)
1055         {
1056                 GLine* r = ServerInstance->XLines->matches_gline(this);
1057
1058                 if (r)
1059                 {
1060                         this->muted = true;
1061                         char reason[MAXBUF];
1062                         if (*ServerInstance->Config->MoronBanner)
1063                                 this->WriteServ("NOTICE %s :*** %s", this->nick, ServerInstance->Config->MoronBanner);
1064                         snprintf(reason,MAXBUF,"G-Lined: %s",r->reason);
1065                         ServerInstance->GlobalCulls.AddItem(this, reason);
1066                         return;
1067                 }
1068
1069                 KLine* n = ServerInstance->XLines->matches_kline(this);
1070
1071                 if (n)
1072                 {
1073                         this->muted = true;
1074                         char reason[MAXBUF];
1075                         if (*ServerInstance->Config->MoronBanner)
1076                                 this->WriteServ("NOTICE %s :*** %s", this, ServerInstance->Config->MoronBanner);
1077                         snprintf(reason,MAXBUF,"K-Lined: %s",n->reason);
1078                         ServerInstance->GlobalCulls.AddItem(this, reason);
1079                         return;
1080                 }
1081         }
1082
1083         this->WriteServ("NOTICE Auth :Welcome to \002%s\002!",ServerInstance->Config->Network);
1084         this->WriteServ("001 %s :Welcome to the %s IRC Network %s!%s@%s",this->nick, ServerInstance->Config->Network, this->nick, this->ident, this->host);
1085         this->WriteServ("002 %s :Your host is %s, running version %s",this->nick,ServerInstance->Config->ServerName,VERSION);
1086         this->WriteServ("003 %s :This server was created %s %s", this->nick, __TIME__, __DATE__);
1087         this->WriteServ("004 %s %s %s %s %s %s", this->nick, ServerInstance->Config->ServerName, VERSION, ServerInstance->Modes->UserModeList().c_str(), ServerInstance->Modes->ChannelModeList().c_str(), ServerInstance->Modes->ParaModeList().c_str());
1088
1089         ServerInstance->Config->Send005(this);
1090
1091         this->ShowMOTD();
1092
1093         /* Now registered */
1094         if (ServerInstance->unregistered_count)
1095                 ServerInstance->unregistered_count--;
1096
1097         /* Trigger LUSERS output, give modules a chance too */
1098         int MOD_RESULT = 0;
1099         FOREACH_RESULT(I_OnPreCommand, OnPreCommand("LUSERS", NULL, 0, this, true, "LUSERS"));
1100         if (!MOD_RESULT)
1101                 ServerInstance->CallCommandHandler("LUSERS", NULL, 0, this);
1102
1103         /*
1104          * fix 3 by brain, move registered = 7 below these so that spurious modes and host
1105          * changes dont go out onto the network and produce 'fake direction'.
1106          */
1107         FOREACH_MOD(I_OnUserConnect,OnUserConnect(this));
1108
1109         this->registered = REG_ALL;
1110
1111         FOREACH_MOD(I_OnPostConnect,OnPostConnect(this));
1112
1113         ServerInstance->SNO->WriteToSnoMask('c',"Client connecting on port %d: %s!%s@%s [%s] [%s]", this->GetPort(), this->nick, this->ident, this->host, this->GetIPString(), this->fullname);
1114 }
1115
1116 /** userrec::UpdateNick()
1117  * re-allocates a nick in the user_hash after they change nicknames,
1118  * returns a pointer to the new user as it may have moved
1119  */
1120 userrec* userrec::UpdateNickHash(const char* New)
1121 {
1122         try
1123         {
1124                 //user_hash::iterator newnick;
1125                 user_hash::iterator oldnick = ServerInstance->clientlist->find(this->nick);
1126
1127                 if (!strcasecmp(this->nick,New))
1128                         return oldnick->second;
1129
1130                 if (oldnick == ServerInstance->clientlist->end())
1131                         return NULL; /* doesnt exist */
1132
1133                 userrec* olduser = oldnick->second;
1134                 (*(ServerInstance->clientlist))[New] = olduser;
1135                 ServerInstance->clientlist->erase(oldnick);
1136                 return olduser;
1137         }
1138
1139         catch (...)
1140         {
1141                 ServerInstance->Log(DEBUG,"Exception in userrec::UpdateNickHash()");
1142                 return NULL;
1143         }
1144 }
1145
1146 void userrec::InvalidateCache()
1147 {
1148         /* Invalidate cache */
1149         if (cached_fullhost)
1150                 free(cached_fullhost);
1151         if (cached_hostip)
1152                 free(cached_hostip);
1153         if (cached_makehost)
1154                 free(cached_makehost);
1155         if (cached_fullrealhost)
1156                 free(cached_fullrealhost);
1157         cached_fullhost = cached_hostip = cached_makehost = cached_fullrealhost = NULL;
1158 }
1159
1160 bool userrec::ForceNickChange(const char* newnick)
1161 {
1162         try
1163         {
1164                 int MOD_RESULT = 0;
1165
1166                 this->InvalidateCache();
1167
1168                 FOREACH_RESULT(I_OnUserPreNick,OnUserPreNick(this, newnick));
1169
1170                 if (MOD_RESULT)
1171                 {
1172                         ServerInstance->stats->statsCollisions++;
1173                         return false;
1174                 }
1175
1176                 if (ServerInstance->XLines->matches_qline(newnick))
1177                 {
1178                         ServerInstance->stats->statsCollisions++;
1179                         return false;
1180                 }
1181
1182                 if (this->registered == REG_ALL)
1183                 {
1184                         return (ServerInstance->Parser->CallHandler("NICK", &newnick, 1, this) == CMD_SUCCESS);
1185                 }
1186                 return false;
1187         }
1188
1189         catch (...)
1190         {
1191                 ServerInstance->Log(DEBUG,"Exception in userrec::ForceNickChange()");
1192                 return false;
1193         }
1194 }
1195
1196 void userrec::SetSockAddr(int protocol_family, const char* ip, int port)
1197 {
1198         switch (protocol_family)
1199         {
1200 #ifdef SUPPORT_IP6LINKS
1201                 case AF_INET6:
1202                 {
1203                         sockaddr_in6* sin = new sockaddr_in6;
1204                         sin->sin6_family = AF_INET6;
1205                         sin->sin6_port = port;
1206                         inet_pton(AF_INET6, ip, &sin->sin6_addr);
1207                         this->ip = (sockaddr*)sin;
1208                 }
1209                 break;
1210 #endif
1211                 case AF_INET:
1212                 {
1213                         sockaddr_in* sin = new sockaddr_in;
1214                         sin->sin_family = AF_INET;
1215                         sin->sin_port = port;
1216                         inet_pton(AF_INET, ip, &sin->sin_addr);
1217                         this->ip = (sockaddr*)sin;
1218                 }
1219                 break;
1220                 default:
1221                         ServerInstance->Log(DEBUG,"Ut oh, I dont know protocol %d to be set on '%s'!", protocol_family, this->nick);
1222                 break;
1223         }
1224 }
1225
1226 int userrec::GetPort()
1227 {
1228         if (this->ip == NULL)
1229                 return 0;
1230
1231         switch (this->GetProtocolFamily())
1232         {
1233 #ifdef SUPPORT_IP6LINKS
1234                 case AF_INET6:
1235                 {
1236                         sockaddr_in6* sin = (sockaddr_in6*)this->ip;
1237                         return sin->sin6_port;
1238                 }
1239                 break;
1240 #endif
1241                 case AF_INET:
1242                 {
1243                         sockaddr_in* sin = (sockaddr_in*)this->ip;
1244                         return sin->sin_port;
1245                 }
1246                 break;
1247                 default:
1248                 break;
1249         }
1250         return 0;
1251 }
1252
1253 int userrec::GetProtocolFamily()
1254 {
1255         if (this->ip == NULL)
1256                 return 0;
1257
1258         sockaddr_in* sin = (sockaddr_in*)this->ip;
1259         return sin->sin_family;
1260 }
1261
1262 const char* userrec::GetIPString()
1263 {
1264         static char buf[1024];
1265
1266         if (this->ip == NULL)
1267                 return "";
1268
1269         switch (this->GetProtocolFamily())
1270         {
1271 #ifdef SUPPORT_IP6LINKS
1272                 case AF_INET6:
1273                 {
1274                         static char temp[1024];
1275
1276                         sockaddr_in6* sin = (sockaddr_in6*)this->ip;
1277                         inet_ntop(sin->sin6_family, &sin->sin6_addr, buf, sizeof(buf));
1278                         /* IP addresses starting with a : on irc are a Bad Thing (tm) */
1279                         if (*buf == ':')
1280                         {
1281                                 strlcpy(&temp[1], buf, sizeof(temp) - 1);
1282                                 *temp = '0';
1283                                 return temp;
1284                         }
1285                         return buf;
1286                 }
1287                 break;
1288 #endif
1289                 case AF_INET:
1290                 {
1291                         sockaddr_in* sin = (sockaddr_in*)this->ip;
1292                         inet_ntop(sin->sin_family, &sin->sin_addr, buf, sizeof(buf));
1293                         return buf;
1294                 }
1295                 break;
1296                 default:
1297                 break;
1298         }
1299         return "";
1300 }
1301
1302 const char* userrec::GetIPString(char* buf)
1303 {
1304         if (this->ip == NULL)
1305         {
1306                 *buf = 0;
1307                 return buf;
1308         }
1309
1310         switch (this->GetProtocolFamily())
1311         {
1312 #ifdef SUPPORT_IP6LINKS
1313                 case AF_INET6:
1314                 {
1315                         static char temp[1024];
1316
1317                         sockaddr_in6* sin = (sockaddr_in6*)this->ip;
1318                         inet_ntop(sin->sin6_family, &sin->sin6_addr, buf, sizeof(buf));
1319                         /* IP addresses starting with a : on irc are a Bad Thing (tm) */
1320                         if (*buf == ':')
1321                         {
1322                                 strlcpy(&temp[1], buf, sizeof(temp) - 1);
1323                                 *temp = '0';
1324                                 strlcpy(buf, temp, sizeof(temp));
1325                         }
1326                         return buf;
1327                 }
1328                 break;
1329 #endif
1330                 case AF_INET:
1331                 {
1332                         sockaddr_in* sin = (sockaddr_in*)this->ip;
1333                         inet_ntop(sin->sin_family, &sin->sin_addr, buf, sizeof(buf));
1334                         return buf;
1335                 }
1336                 break;
1337
1338                 default:
1339                 break;
1340         }
1341         return "";
1342 }
1343
1344 /** NOTE: We cannot pass a const reference to this method.
1345  * The string is changed by the workings of the method,
1346  * so that if we pass const ref, we end up copying it to
1347  * something we can change anyway. Makes sense to just let
1348  * the compiler do that copy for us.
1349  */
1350 void userrec::Write(std::string text)
1351 {
1352 #ifdef WINDOWS
1353         if ((this->fd < 0) || (this->m_internalFd > MAX_DESCRIPTORS))
1354 #else
1355         if ((this->fd < 0) || (this->fd > MAX_DESCRIPTORS))
1356 #endif
1357                 return;
1358
1359         try
1360         {
1361                 /* ServerInstance->Log(DEBUG,"C[%d] <- %s", this->GetFd(), text.c_str());
1362                  * WARNING: The above debug line is VERY loud, do NOT
1363                  * enable it till we have a good way of filtering it
1364                  * out of the logs (e.g. 1.2 would be good).
1365                  */
1366                 text.append("\r\n");
1367         }
1368         catch (...)
1369         {
1370                 ServerInstance->Log(DEBUG,"Exception in userrec::Write() std::string::append");
1371                 return;
1372         }
1373
1374         if (ServerInstance->Config->GetIOHook(this->GetPort()))
1375         {
1376                 try
1377                 {
1378                         ServerInstance->Config->GetIOHook(this->GetPort())->OnRawSocketWrite(this->fd, text.data(), text.length());
1379                 }
1380                 catch (CoreException& modexcept)
1381                 {
1382                         ServerInstance->Log(DEBUG, "%s threw an exception: %s", modexcept.GetSource(), modexcept.GetReason());
1383                 }
1384         }
1385         else
1386         {
1387                 this->AddWriteBuf(text);
1388         }
1389         ServerInstance->stats->statsSent += text.length();
1390         this->ServerInstance->SE->WantWrite(this);
1391 }
1392
1393 /** Write()
1394  */
1395 void userrec::Write(const char *text, ...)
1396 {
1397         va_list argsPtr;
1398         char textbuffer[MAXBUF];
1399
1400         va_start(argsPtr, text);
1401         vsnprintf(textbuffer, MAXBUF, text, argsPtr);
1402         va_end(argsPtr);
1403
1404         this->Write(std::string(textbuffer));
1405 }
1406
1407 void userrec::WriteServ(const std::string& text)
1408 {
1409         char textbuffer[MAXBUF];
1410
1411         snprintf(textbuffer,MAXBUF,":%s %s",ServerInstance->Config->ServerName,text.c_str());
1412         this->Write(std::string(textbuffer));
1413 }
1414
1415 /** WriteServ()
1416  *  Same as Write(), except `text' is prefixed with `:server.name '.
1417  */
1418 void userrec::WriteServ(const char* text, ...)
1419 {
1420         va_list argsPtr;
1421         char textbuffer[MAXBUF];
1422
1423         va_start(argsPtr, text);
1424         vsnprintf(textbuffer, MAXBUF, text, argsPtr);
1425         va_end(argsPtr);
1426
1427         this->WriteServ(std::string(textbuffer));
1428 }
1429
1430
1431 void userrec::WriteFrom(userrec *user, const std::string &text)
1432 {
1433         char tb[MAXBUF];
1434
1435         snprintf(tb,MAXBUF,":%s %s",user->GetFullHost(),text.c_str());
1436
1437         this->Write(std::string(tb));
1438 }
1439
1440
1441 /* write text from an originating user to originating user */
1442
1443 void userrec::WriteFrom(userrec *user, const char* text, ...)
1444 {
1445         va_list argsPtr;
1446         char textbuffer[MAXBUF];
1447
1448         va_start(argsPtr, text);
1449         vsnprintf(textbuffer, MAXBUF, text, argsPtr);
1450         va_end(argsPtr);
1451
1452         this->WriteFrom(user, std::string(textbuffer));
1453 }
1454
1455
1456 /* write text to an destination user from a source user (e.g. user privmsg) */
1457
1458 void userrec::WriteTo(userrec *dest, const char *data, ...)
1459 {
1460         char textbuffer[MAXBUF];
1461         va_list argsPtr;
1462
1463         va_start(argsPtr, data);
1464         vsnprintf(textbuffer, MAXBUF, data, argsPtr);
1465         va_end(argsPtr);
1466
1467         this->WriteTo(dest, std::string(textbuffer));
1468 }
1469
1470 void userrec::WriteTo(userrec *dest, const std::string &data)
1471 {
1472         dest->WriteFrom(this, data);
1473 }
1474
1475
1476 void userrec::WriteCommon(const char* text, ...)
1477 {
1478         char textbuffer[MAXBUF];
1479         va_list argsPtr;
1480
1481         if (this->registered != REG_ALL)
1482                 return;
1483
1484         va_start(argsPtr, text);
1485         vsnprintf(textbuffer, MAXBUF, text, argsPtr);
1486         va_end(argsPtr);
1487
1488         this->WriteCommon(std::string(textbuffer));
1489 }
1490
1491 void userrec::WriteCommon(const std::string &text)
1492 {
1493         try
1494         {
1495                 bool sent_to_at_least_one = false;
1496                 char tb[MAXBUF];
1497
1498                 if (this->registered != REG_ALL)
1499                         return;
1500
1501                 uniq_id++;
1502
1503                 /* We dont want to be doing this n times, just once */
1504                 snprintf(tb,MAXBUF,":%s %s",this->GetFullHost(),text.c_str());
1505                 std::string out = tb;
1506
1507                 for (UCListIter v = this->chans.begin(); v != this->chans.end(); v++)
1508                 {
1509                         CUList* ulist = v->first->GetUsers();
1510                         for (CUList::iterator i = ulist->begin(); i != ulist->end(); i++)
1511                         {
1512                                 if ((IS_LOCAL(i->first)) && (already_sent[i->first->fd] != uniq_id))
1513                                 {
1514                                         already_sent[i->first->fd] = uniq_id;
1515                                         i->first->Write(out);
1516                                         sent_to_at_least_one = true;
1517                                 }
1518                         }
1519                 }
1520
1521                 /*
1522                  * if the user was not in any channels, no users will receive the text. Make sure the user
1523                  * receives their OWN message for WriteCommon
1524                  */
1525                 if (!sent_to_at_least_one)
1526                 {
1527                         this->Write(std::string(tb));
1528                 }
1529         }
1530
1531         catch (...)
1532         {
1533                 ServerInstance->Log(DEBUG,"Exception in userrec::WriteCommon()");
1534         }
1535 }
1536
1537
1538 /* write a formatted string to all users who share at least one common
1539  * channel, NOT including the source user e.g. for use in QUIT
1540  */
1541
1542 void userrec::WriteCommonExcept(const char* text, ...)
1543 {
1544         char textbuffer[MAXBUF];
1545         va_list argsPtr;
1546
1547         va_start(argsPtr, text);
1548         vsnprintf(textbuffer, MAXBUF, text, argsPtr);
1549         va_end(argsPtr);
1550
1551         this->WriteCommonExcept(std::string(textbuffer));
1552 }
1553
1554 void userrec::WriteCommonQuit(const std::string &normal_text, const std::string &oper_text)
1555 {
1556         char tb1[MAXBUF];
1557         char tb2[MAXBUF];
1558
1559         if (this->registered != REG_ALL)
1560                 return;
1561
1562         uniq_id++;
1563         snprintf(tb1,MAXBUF,":%s QUIT :%s",this->GetFullHost(),normal_text.c_str());
1564         snprintf(tb2,MAXBUF,":%s QUIT :%s",this->GetFullHost(),oper_text.c_str());
1565         std::string out1 = tb1;
1566         std::string out2 = tb2;
1567
1568         for (UCListIter v = this->chans.begin(); v != this->chans.end(); v++)
1569         {
1570                 CUList *ulist = v->first->GetUsers();
1571                 for (CUList::iterator i = ulist->begin(); i != ulist->end(); i++)
1572                 {
1573                         if (this != i->first)
1574                         {
1575                                 if ((IS_LOCAL(i->first)) && (already_sent[i->first->fd] != uniq_id))
1576                                 {
1577                                         already_sent[i->first->fd] = uniq_id;
1578                                         i->first->Write(IS_OPER(i->first) ? out2 : out1);
1579                                 }
1580                         }
1581                 }
1582         }
1583 }
1584
1585 void userrec::WriteCommonExcept(const std::string &text)
1586 {
1587         char tb1[MAXBUF];
1588         std::string out1;
1589
1590         if (this->registered != REG_ALL)
1591                 return;
1592
1593         uniq_id++;
1594         snprintf(tb1,MAXBUF,":%s %s",this->GetFullHost(),text.c_str());
1595         out1 = tb1;
1596
1597         for (UCListIter v = this->chans.begin(); v != this->chans.end(); v++)
1598         {
1599                 CUList *ulist = v->first->GetUsers();
1600                 for (CUList::iterator i = ulist->begin(); i != ulist->end(); i++)
1601                 {
1602                         if (this != i->first)
1603                         {
1604                                 if ((IS_LOCAL(i->first)) && (already_sent[i->first->fd] != uniq_id))
1605                                 {
1606                                         already_sent[i->first->fd] = uniq_id;
1607                                         i->first->Write(out1);
1608                                 }
1609                         }
1610                 }
1611         }
1612
1613 }
1614
1615 void userrec::WriteWallOps(const std::string &text)
1616 {
1617         if (!IS_OPER(this) && IS_LOCAL(this))
1618                 return;
1619
1620         std::string wallop("WALLOPS :");
1621         wallop.append(text);
1622
1623         for (std::vector<userrec*>::const_iterator i = ServerInstance->local_users.begin(); i != ServerInstance->local_users.end(); i++)
1624         {
1625                 userrec* t = *i;
1626                 if (t->modes[UM_WALLOPS])
1627                         this->WriteTo(t,wallop);
1628         }
1629 }
1630
1631 void userrec::WriteWallOps(const char* text, ...)
1632 {
1633         char textbuffer[MAXBUF];
1634         va_list argsPtr;
1635
1636         va_start(argsPtr, text);
1637         vsnprintf(textbuffer, MAXBUF, text, argsPtr);
1638         va_end(argsPtr);
1639
1640         this->WriteWallOps(std::string(textbuffer));
1641 }
1642
1643 /* return 0 or 1 depending if users u and u2 share one or more common channels
1644  * (used by QUIT, NICK etc which arent channel specific notices)
1645  *
1646  * The old algorithm in 1.0 for this was relatively inefficient, iterating over
1647  * the first users channels then the second users channels within the outer loop,
1648  * therefore it was a maximum of x*y iterations (upon returning 0 and checking
1649  * all possible iterations). However this new function instead checks against the
1650  * channel's userlist in the inner loop which is a std::map<userrec*,userrec*>
1651  * and saves us time as we already know what pointer value we are after.
1652  * Don't quote me on the maths as i am not a mathematician or computer scientist,
1653  * but i believe this algorithm is now x+(log y) maximum iterations instead.
1654  */
1655 bool userrec::SharesChannelWith(userrec *other)
1656 {
1657         if ((!other) || (this->registered != REG_ALL) || (other->registered != REG_ALL))
1658                 return false;
1659
1660         /* Outer loop */
1661         for (UCListIter i = this->chans.begin(); i != this->chans.end(); i++)
1662         {
1663                 /* Eliminate the inner loop (which used to be ~equal in size to the outer loop)
1664                  * by replacing it with a map::find which *should* be more efficient
1665                  */
1666                 if (i->first->HasUser(other))
1667                         return true;
1668         }
1669         return false;
1670 }
1671
1672 bool userrec::ChangeName(const char* gecos)
1673 {
1674         if (!strcmp(gecos, this->fullname))
1675                 return true;
1676
1677         if (IS_LOCAL(this))
1678         {
1679                 int MOD_RESULT = 0;
1680                 FOREACH_RESULT(I_OnChangeLocalUserGECOS,OnChangeLocalUserGECOS(this,gecos));
1681                 if (MOD_RESULT)
1682                         return false;
1683                 FOREACH_MOD(I_OnChangeName,OnChangeName(this,gecos));
1684         }
1685         strlcpy(this->fullname,gecos,MAXGECOS+1);
1686
1687         return true;
1688 }
1689
1690 bool userrec::ChangeDisplayedHost(const char* host)
1691 {
1692         if (!strcmp(host, this->dhost))
1693                 return true;
1694
1695         if (IS_LOCAL(this))
1696         {
1697                 int MOD_RESULT = 0;
1698                 FOREACH_RESULT(I_OnChangeLocalUserHost,OnChangeLocalUserHost(this,host));
1699                 if (MOD_RESULT)
1700                         return false;
1701                 FOREACH_MOD(I_OnChangeHost,OnChangeHost(this,host));
1702         }
1703         if (this->ServerInstance->Config->CycleHosts)
1704                 this->WriteCommonExcept("QUIT :Changing hosts");
1705
1706         /* Fix by Om: userrec::dhost is 65 long, this was truncating some long hosts */
1707         strlcpy(this->dhost,host,64);
1708
1709         this->InvalidateCache();
1710
1711         if (this->ServerInstance->Config->CycleHosts)
1712         {
1713                 for (UCListIter i = this->chans.begin(); i != this->chans.end(); i++)
1714                 {
1715                         i->first->WriteAllExceptSender(this, false, 0, "JOIN %s", i->first->name);
1716                         std::string n = this->ServerInstance->Modes->ModeString(this, i->first);
1717                         if (n.length() > 0)
1718                                 i->first->WriteAllExceptSender(this, true, 0, "MODE %s +%s", i->first->name, n.c_str());
1719                 }
1720         }
1721
1722         if (IS_LOCAL(this))
1723                 this->WriteServ("396 %s %s :is now your displayed host",this->nick,this->dhost);
1724
1725         return true;
1726 }
1727
1728 bool userrec::ChangeIdent(const char* newident)
1729 {
1730         if (!strcmp(newident, this->ident))
1731                 return true;
1732
1733         if (this->ServerInstance->Config->CycleHosts)
1734                 this->WriteCommonExcept("%s","QUIT :Changing ident");
1735
1736         strlcpy(this->ident, newident, IDENTMAX+2);
1737
1738         this->InvalidateCache();
1739
1740         if (this->ServerInstance->Config->CycleHosts)
1741         {
1742                 for (UCListIter i = this->chans.begin(); i != this->chans.end(); i++)
1743                 {
1744                         i->first->WriteAllExceptSender(this, false, 0, "JOIN %s", i->first->name);
1745                         std::string n = this->ServerInstance->Modes->ModeString(this, i->first);
1746                         if (n.length() > 0)
1747                                 i->first->WriteAllExceptSender(this, true, 0, "MODE %s +%s", i->first->name, n.c_str());
1748                 }
1749         }
1750
1751         return true;
1752 }
1753
1754 void userrec::SendAll(const char* command, char* text, ...)
1755 {
1756         char textbuffer[MAXBUF];
1757         char formatbuffer[MAXBUF];
1758         va_list argsPtr;
1759
1760         va_start(argsPtr, text);
1761         vsnprintf(textbuffer, MAXBUF, text, argsPtr);
1762         va_end(argsPtr);
1763
1764         snprintf(formatbuffer,MAXBUF,":%s %s $* :%s", this->GetFullHost(), command, textbuffer);
1765         std::string fmt = formatbuffer;
1766
1767         for (std::vector<userrec*>::const_iterator i = ServerInstance->local_users.begin(); i != ServerInstance->local_users.end(); i++)
1768         {
1769                 (*i)->Write(fmt);
1770         }
1771 }
1772
1773
1774 std::string userrec::ChannelList(userrec* source)
1775 {
1776         try
1777         {
1778                 std::string list;
1779                 for (UCListIter i = this->chans.begin(); i != this->chans.end(); i++)
1780                 {
1781                         /* If the target is the same as the sender, let them see all their channels.
1782                          * If the channel is NOT private/secret OR the user shares a common channel
1783                          * If the user is an oper, and the <options:operspywhois> option is set.
1784                          */
1785                         if ((source == this) || (IS_OPER(source) && ServerInstance->Config->OperSpyWhois) || (((!i->first->modes[CM_PRIVATE]) && (!i->first->modes[CM_SECRET])) || (i->first->HasUser(source))))
1786                         {
1787                                 list.append(i->first->GetPrefixChar(this)).append(i->first->name).append(" ");
1788                         }
1789                 }
1790                 return list;
1791         }
1792         catch (...)
1793         {
1794                 ServerInstance->Log(DEBUG,"Exception in userrec::ChannelList()");
1795                 return "";
1796         }
1797 }
1798
1799 void userrec::SplitChanList(userrec* dest, const std::string &cl)
1800 {
1801         std::string line;
1802         std::ostringstream prefix;
1803         std::string::size_type start, pos, length;
1804
1805         try
1806         {
1807                 prefix << this->nick << " " << dest->nick << " :";
1808                 line = prefix.str();
1809                 int namelen = strlen(ServerInstance->Config->ServerName) + 6;
1810
1811                 for (start = 0; (pos = cl.find(' ', start)) != std::string::npos; start = pos+1)
1812                 {
1813                         length = (pos == std::string::npos) ? cl.length() : pos;
1814
1815                         if (line.length() + namelen + length - start > 510)
1816                         {
1817                                 ServerInstance->SendWhoisLine(this, dest, 319, "%s", line.c_str());
1818                                 line = prefix.str();
1819                         }
1820
1821                         if(pos == std::string::npos)
1822                         {
1823                                 line.append(cl.substr(start, length - start));
1824                                 break;
1825                         }
1826                         else
1827                         {
1828                                 line.append(cl.substr(start, length - start + 1));
1829                         }
1830                 }
1831
1832                 if (line.length())
1833                 {
1834                         ServerInstance->SendWhoisLine(this, dest, 319, "%s", line.c_str());
1835                 }
1836         }
1837
1838         catch (...)
1839         {
1840                 ServerInstance->Log(DEBUG,"Exception in userrec::SplitChanList()");
1841         }
1842 }
1843
1844
1845 /* looks up a users password for their connection class (<ALLOW>/<DENY> tags)
1846  * NOTE: If the <ALLOW> or <DENY> tag specifies an ip, and this user resolves,
1847  * then their ip will be taken as 'priority' anyway, so for example,
1848  * <connect allow="127.0.0.1"> will match joe!bloggs@localhost
1849  */
1850 ConnectClass* userrec::GetClass()
1851 {
1852         for (ClassVector::iterator i = ServerInstance->Config->Classes.begin(); i != ServerInstance->Config->Classes.end(); i++)
1853         {
1854                 if (((match(this->GetIPString(),i->GetHost().c_str(),true)) || (match(this->host,i->GetHost().c_str()))))
1855                 {
1856                         if (i->GetPort())
1857                         {
1858                                 if (this->GetPort() == i->GetPort())
1859                                         return &(*i);
1860                                 else
1861                                         continue;
1862                         }
1863                         else
1864                                 return &(*i);
1865                 }
1866         }
1867         return NULL;
1868 }
1869
1870 void userrec::PurgeEmptyChannels()
1871 {
1872         std::vector<chanrec*> to_delete;
1873
1874         // firstly decrement the count on each channel
1875         for (UCListIter f = this->chans.begin(); f != this->chans.end(); f++)
1876         {
1877                 f->first->RemoveAllPrefixes(this);
1878                 if (f->first->DelUser(this) == 0)
1879                 {
1880                         /* No users left in here, mark it for deletion */
1881                         try
1882                         {
1883                                 to_delete.push_back(f->first);
1884                         }
1885                         catch (...)
1886                         {
1887                                 ServerInstance->Log(DEBUG,"Exception in userrec::PurgeEmptyChannels to_delete.push_back()");
1888                         }
1889                 }
1890         }
1891
1892         for (std::vector<chanrec*>::iterator n = to_delete.begin(); n != to_delete.end(); n++)
1893         {
1894                 chanrec* thischan = *n;
1895                 chan_hash::iterator i2 = ServerInstance->chanlist->find(thischan->name);
1896                 if (i2 != ServerInstance->chanlist->end())
1897                 {
1898                         FOREACH_MOD(I_OnChannelDelete,OnChannelDelete(i2->second));
1899                         DELETE(i2->second);
1900                         ServerInstance->chanlist->erase(i2);
1901                         this->chans.erase(*n);
1902                 }
1903         }
1904
1905         this->UnOper();
1906 }
1907
1908 void userrec::ShowMOTD()
1909 {
1910         if (!ServerInstance->Config->MOTD.size())
1911         {
1912                 this->WriteServ("422 %s :Message of the day file is missing.",this->nick);
1913                 return;
1914         }
1915         this->WriteServ("375 %s :%s message of the day", this->nick, ServerInstance->Config->ServerName);
1916
1917         for (file_cache::iterator i = ServerInstance->Config->MOTD.begin(); i != ServerInstance->Config->MOTD.end(); i++)
1918                 this->WriteServ("372 %s :- %s",this->nick,i->c_str());
1919
1920         this->WriteServ("376 %s :End of message of the day.", this->nick);
1921 }
1922
1923 void userrec::ShowRULES()
1924 {
1925         if (!ServerInstance->Config->RULES.size())
1926         {
1927                 this->WriteServ("NOTICE %s :Rules file is missing.",this->nick);
1928                 return;
1929         }
1930         this->WriteServ("NOTICE %s :%s rules",this->nick,ServerInstance->Config->ServerName);
1931
1932         for (file_cache::iterator i = ServerInstance->Config->RULES.begin(); i != ServerInstance->Config->RULES.end(); i++)
1933                 this->WriteServ("NOTICE %s :%s",this->nick,i->c_str());
1934
1935         this->WriteServ("NOTICE %s :End of %s rules.",this->nick,ServerInstance->Config->ServerName);
1936 }
1937
1938 void userrec::HandleEvent(EventType et, int errornum)
1939 {
1940         /* WARNING: May delete this user! */
1941         int thisfd = this->GetFd();
1942
1943         try
1944         {
1945                 switch (et)
1946                 {
1947                         case EVENT_READ:
1948                                 ServerInstance->ProcessUser(this);
1949                         break;
1950                         case EVENT_WRITE:
1951                                 this->FlushWriteBuf();
1952                         break;
1953                         case EVENT_ERROR:
1954                                 /** This should be safe, but dont DARE do anything after it -- Brain */
1955                                 this->SetWriteError(errornum ? strerror(errornum) : "EOF from client");
1956                         break;
1957                 }
1958         }
1959         catch (...)
1960         {
1961                 ServerInstance->Log(DEBUG,"Exception in userrec::HandleEvent intercepted");
1962         }
1963
1964         /* If the user has raised an error whilst being processed, quit them now we're safe to */
1965         if ((ServerInstance->SE->GetRef(thisfd) == this))
1966         {
1967                 if (!WriteError.empty())
1968                 {
1969                         userrec::QuitUser(ServerInstance, this, GetWriteError());
1970                 }
1971         }
1972 }
1973
1974 void userrec::SetOperQuit(const std::string &oquit)
1975 {
1976         if (operquit)
1977                 return;
1978
1979         operquit = strdup(oquit.c_str());
1980 }
1981
1982 const char* userrec::GetOperQuit()
1983 {
1984         return operquit ? operquit : "";
1985 }
1986
1987 VisData::VisData()
1988 {
1989 }
1990
1991 VisData::~VisData()
1992 {
1993 }
1994
1995 bool VisData::VisibleTo(userrec* user)
1996 {
1997         return true;
1998 }
1999