]> git.netwichtig.de Git - user/henk/code/inspircd.git/blob - src/modules.cpp
Improve SSL module debug logging.
[user/henk/code/inspircd.git] / src / modules.cpp
1 /*
2  * InspIRCd -- Internet Relay Chat Daemon
3  *
4  *   Copyright (C) 2020 Matt Schatz <genius3000@g3k.solutions>
5  *   Copyright (C) 2019 nia <nia@netbsd.org>
6  *   Copyright (C) 2019 iwalkalone <iwalkalone69@gmail.com>
7  *   Copyright (C) 2013, 2017-2020 Sadie Powell <sadie@witchery.services>
8  *   Copyright (C) 2013 Daniel Vassdal <shutter@canternet.org>
9  *   Copyright (C) 2013 Adam <Adam@anope.org>
10  *   Copyright (C) 2012-2016, 2018 Attila Molnar <attilamolnar@hush.com>
11  *   Copyright (C) 2012 Robby <robby@chatbelgie.be>
12  *   Copyright (C) 2009-2010 Daniel De Graaf <danieldg@inspircd.org>
13  *   Copyright (C) 2009 Uli Schlachter <psychon@inspircd.org>
14  *   Copyright (C) 2008 Thomas Stagner <aquanight@inspircd.org>
15  *   Copyright (C) 2007-2008 Robin Burchell <robin+git@viroteck.net>
16  *   Copyright (C) 2007 Oliver Lupton <om@inspircd.org>
17  *   Copyright (C) 2007 Dennis Friis <peavey@inspircd.org>
18  *   Copyright (C) 2006-2010 Craig Edwards <brain@inspircd.org>
19  *
20  * This file is part of InspIRCd.  InspIRCd is free software: you can
21  * redistribute it and/or modify it under the terms of the GNU General Public
22  * License as published by the Free Software Foundation, version 2.
23  *
24  * This program is distributed in the hope that it will be useful, but WITHOUT
25  * ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS
26  * FOR A PARTICULAR PURPOSE.  See the GNU General Public License for more
27  * details.
28  *
29  * You should have received a copy of the GNU General Public License
30  * along with this program.  If not, see <http://www.gnu.org/licenses/>.
31  */
32
33
34 #include "inspircd.h"
35 #include "exitcodes.h"
36 #include <iostream>
37
38 static insp::intrusive_list<dynamic_reference_base>* dynrefs = NULL;
39
40 void dynamic_reference_base::reset_all()
41 {
42         if (!dynrefs)
43                 return;
44         for (insp::intrusive_list<dynamic_reference_base>::iterator i = dynrefs->begin(); i != dynrefs->end(); ++i)
45                 (*i)->resolve();
46 }
47
48 // Version is a simple class for holding a modules version number
49 Version::Version(const std::string &desc, int flags) : description(desc), Flags(flags)
50 {
51 }
52
53 Version::Version(const std::string &desc, int flags, const std::string& linkdata)
54 : description(desc), Flags(flags), link_data(linkdata)
55 {
56 }
57
58 // These declarations define the behavours of the base class Module (which does nothing at all)
59
60 Module::Module()
61         : ModuleDLLManager(NULL)
62         , dying(false)
63 {
64 }
65
66 CullResult Module::cull()
67 {
68         if (ModuleDLLManager)
69                 ServerInstance->GlobalCulls.AddItem(ModuleDLLManager);
70         return classbase::cull();
71 }
72
73 Module::~Module()
74 {
75 }
76
77 void Module::DetachEvent(Implementation i)
78 {
79         ServerInstance->Modules->Detach(i, this);
80 }
81
82 void            Module::ReadConfig(ConfigStatus& status) { }
83 ModResult       Module::OnSendSnotice(char &snomask, std::string &type, const std::string &message) { DetachEvent(I_OnSendSnotice); return MOD_RES_PASSTHRU; }
84 void            Module::OnUserConnect(LocalUser*) { DetachEvent(I_OnUserConnect); }
85 ModResult       Module::OnUserPreQuit(LocalUser*, std::string&, std::string&) { DetachEvent(I_OnUserPreQuit); return MOD_RES_PASSTHRU; }
86 void            Module::OnUserQuit(User*, const std::string&, const std::string&) { DetachEvent(I_OnUserQuit); }
87 void            Module::OnUserDisconnect(LocalUser*) { DetachEvent(I_OnUserDisconnect); }
88 void            Module::OnUserJoin(Membership*, bool, bool, CUList&) { DetachEvent(I_OnUserJoin); }
89 void            Module::OnPostJoin(Membership*) { DetachEvent(I_OnPostJoin); }
90 void            Module::OnUserPart(Membership*, std::string&, CUList&) { DetachEvent(I_OnUserPart); }
91 void            Module::OnPreRehash(User*, const std::string&) { DetachEvent(I_OnPreRehash); }
92 void            Module::OnModuleRehash(User*, const std::string&) { DetachEvent(I_OnModuleRehash); }
93 ModResult       Module::OnUserPreJoin(LocalUser*, Channel*, const std::string&, std::string&, const std::string&) { DetachEvent(I_OnUserPreJoin); return MOD_RES_PASSTHRU; }
94 void            Module::OnMode(User*, User*, Channel*, const Modes::ChangeList&, ModeParser::ModeProcessFlag) { DetachEvent(I_OnMode); }
95 void            Module::OnOper(User*, const std::string&) { DetachEvent(I_OnOper); }
96 void            Module::OnPostOper(User*, const std::string&, const std::string &) { DetachEvent(I_OnPostOper); }
97 void            Module::OnPostDeoper(User*) { DetachEvent(I_OnPostDeoper); }
98 ModResult       Module::OnUserPreInvite(User*, User*, Channel*, time_t) { DetachEvent(I_OnUserPreInvite); return MOD_RES_PASSTHRU; }
99 ModResult       Module::OnUserPreMessage(User*, const MessageTarget&, MessageDetails&) { DetachEvent(I_OnUserPreMessage); return MOD_RES_PASSTHRU; }
100 ModResult       Module::OnUserPreNick(LocalUser*, const std::string&) { DetachEvent(I_OnUserPreNick); return MOD_RES_PASSTHRU; }
101 void            Module::OnUserPostNick(User*, const std::string&) { DetachEvent(I_OnUserPostNick); }
102 ModResult       Module::OnPreMode(User*, User*, Channel*, Modes::ChangeList&) { DetachEvent(I_OnPreMode); return MOD_RES_PASSTHRU; }
103 void            Module::On005Numeric(std::map<std::string, std::string>&) { DetachEvent(I_On005Numeric); }
104 ModResult       Module::OnKill(User*, User*, const std::string&) { DetachEvent(I_OnKill); return MOD_RES_PASSTHRU; }
105 void            Module::OnLoadModule(Module*) { DetachEvent(I_OnLoadModule); }
106 void            Module::OnUnloadModule(Module*) { DetachEvent(I_OnUnloadModule); }
107 void            Module::OnBackgroundTimer(time_t) { DetachEvent(I_OnBackgroundTimer); }
108 ModResult       Module::OnPreCommand(std::string&, CommandBase::Params&, LocalUser*, bool) { DetachEvent(I_OnPreCommand); return MOD_RES_PASSTHRU; }
109 void            Module::OnPostCommand(Command*, const CommandBase::Params&, LocalUser*, CmdResult, bool) { DetachEvent(I_OnPostCommand); }
110 void            Module::OnCommandBlocked(const std::string&, const CommandBase::Params&, LocalUser*) { DetachEvent(I_OnCommandBlocked); }
111 void            Module::OnUserInit(LocalUser*) { DetachEvent(I_OnUserInit); }
112 void            Module::OnUserPostInit(LocalUser*) { DetachEvent(I_OnUserPostInit); }
113 ModResult       Module::OnCheckReady(LocalUser*) { DetachEvent(I_OnCheckReady); return MOD_RES_PASSTHRU; }
114 ModResult       Module::OnUserRegister(LocalUser*) { DetachEvent(I_OnUserRegister); return MOD_RES_PASSTHRU; }
115 ModResult       Module::OnUserPreKick(User*, Membership*, const std::string&) { DetachEvent(I_OnUserPreKick); return MOD_RES_PASSTHRU; }
116 void            Module::OnUserKick(User*, Membership*, const std::string&, CUList&) { DetachEvent(I_OnUserKick); }
117 ModResult       Module::OnRawMode(User*, Channel*, ModeHandler*, const std::string&, bool) { DetachEvent(I_OnRawMode); return MOD_RES_PASSTHRU; }
118 ModResult       Module::OnCheckInvite(User*, Channel*) { DetachEvent(I_OnCheckInvite); return MOD_RES_PASSTHRU; }
119 ModResult       Module::OnCheckKey(User*, Channel*, const std::string&) { DetachEvent(I_OnCheckKey); return MOD_RES_PASSTHRU; }
120 ModResult       Module::OnCheckLimit(User*, Channel*) { DetachEvent(I_OnCheckLimit); return MOD_RES_PASSTHRU; }
121 ModResult       Module::OnCheckChannelBan(User*, Channel*) { DetachEvent(I_OnCheckChannelBan); return MOD_RES_PASSTHRU; }
122 ModResult       Module::OnCheckBan(User*, Channel*, const std::string&) { DetachEvent(I_OnCheckBan); return MOD_RES_PASSTHRU; }
123 ModResult       Module::OnExtBanCheck(User*, Channel*, char) { DetachEvent(I_OnExtBanCheck); return MOD_RES_PASSTHRU; }
124 ModResult       Module::OnPreChangeHost(LocalUser*, const std::string&) { DetachEvent(I_OnPreChangeHost); return MOD_RES_PASSTHRU; }
125 ModResult       Module::OnPreChangeRealName(LocalUser*, const std::string&) { DetachEvent(I_OnPreChangeRealName); return MOD_RES_PASSTHRU; }
126 ModResult       Module::OnPreTopicChange(User*, Channel*, const std::string&) { DetachEvent(I_OnPreTopicChange); return MOD_RES_PASSTHRU; }
127 ModResult       Module::OnPassCompare(Extensible* ex, const std::string &password, const std::string &input, const std::string& hashtype) { DetachEvent(I_OnPassCompare); return MOD_RES_PASSTHRU; }
128 void            Module::OnPostConnect(User*) { DetachEvent(I_OnPostConnect); }
129 void            Module::OnUserPostMessage(User*, const MessageTarget&, const MessageDetails&) { DetachEvent(I_OnUserPostMessage); }
130 void            Module::OnUserMessageBlocked(User*, const MessageTarget&, const MessageDetails&) { DetachEvent(I_OnUserMessageBlocked); }
131 void            Module::OnUserInvite(User*, User*, Channel*, time_t, unsigned int, CUList&) { DetachEvent(I_OnUserInvite); }
132 void            Module::OnPostTopicChange(User*, Channel*, const std::string&) { DetachEvent(I_OnPostTopicChange); }
133 void            Module::OnDecodeMetaData(Extensible*, const std::string&, const std::string&) { DetachEvent(I_OnDecodeMetaData); }
134 void            Module::OnChangeHost(User*, const std::string&) { DetachEvent(I_OnChangeHost); }
135 void            Module::OnChangeRealName(User*, const std::string&) { DetachEvent(I_OnChangeRealName); }
136 void            Module::OnChangeIdent(User*, const std::string&) { DetachEvent(I_OnChangeIdent); }
137 void            Module::OnAddLine(User*, XLine*) { DetachEvent(I_OnAddLine); }
138 void            Module::OnDelLine(User*, XLine*) { DetachEvent(I_OnDelLine); }
139 void            Module::OnExpireLine(XLine*) { DetachEvent(I_OnExpireLine); }
140 void            Module::OnCleanup(ExtensionItem::ExtensibleType, Extensible*) { }
141 ModResult       Module::OnChannelPreDelete(Channel*) { DetachEvent(I_OnChannelPreDelete); return MOD_RES_PASSTHRU; }
142 void            Module::OnChannelDelete(Channel*) { DetachEvent(I_OnChannelDelete); }
143 void            Module::OnBuildNeighborList(User*, IncludeChanList&, std::map<User*,bool>&) { DetachEvent(I_OnBuildNeighborList); }
144 void            Module::OnGarbageCollect() { DetachEvent(I_OnGarbageCollect); }
145 ModResult       Module::OnSetConnectClass(LocalUser* user, ConnectClass* myclass) { DetachEvent(I_OnSetConnectClass); return MOD_RES_PASSTHRU; }
146 void            Module::OnUserMessage(User*, const MessageTarget&, const MessageDetails&) { DetachEvent(I_OnUserMessage); }
147 ModResult       Module::OnNumeric(User*, const Numeric::Numeric&) { DetachEvent(I_OnNumeric); return MOD_RES_PASSTHRU; }
148 ModResult   Module::OnAcceptConnection(int, ListenSocket*, irc::sockets::sockaddrs*, irc::sockets::sockaddrs*) { DetachEvent(I_OnAcceptConnection); return MOD_RES_PASSTHRU; }
149 void            Module::OnSetUserIP(LocalUser*) { DetachEvent(I_OnSetUserIP); }
150 void            Module::OnServiceAdd(ServiceProvider&) { DetachEvent(I_OnServiceAdd); }
151 void            Module::OnServiceDel(ServiceProvider&) { DetachEvent(I_OnServiceDel); }
152 ModResult       Module::OnUserWrite(LocalUser*, ClientProtocol::Message&) { DetachEvent(I_OnUserWrite); return MOD_RES_PASSTHRU; }
153 ModResult       Module::OnConnectionFail(LocalUser*, BufferedSocketError) { DetachEvent(I_OnConnectionFail); return MOD_RES_PASSTHRU; }
154 void            Module::OnShutdown(const std::string& reason) { DetachEvent(I_OnShutdown); }
155
156 ServiceProvider::ServiceProvider(Module* Creator, const std::string& Name, ServiceType Type)
157         : creator(Creator), name(Name), service(Type)
158 {
159         if ((ServerInstance) && (ServerInstance->Modules->NewServices))
160                 ServerInstance->Modules->NewServices->push_back(this);
161 }
162
163 void ServiceProvider::DisableAutoRegister()
164 {
165         if ((ServerInstance) && (ServerInstance->Modules->NewServices))
166                 stdalgo::erase(*ServerInstance->Modules->NewServices, this);
167 }
168
169 ModuleManager::ModuleManager()
170 {
171 }
172
173 ModuleManager::~ModuleManager()
174 {
175 }
176
177 bool ModuleManager::Attach(Implementation i, Module* mod)
178 {
179         if (stdalgo::isin(EventHandlers[i], mod))
180                 return false;
181
182         EventHandlers[i].push_back(mod);
183         return true;
184 }
185
186 bool ModuleManager::Detach(Implementation i, Module* mod)
187 {
188         return stdalgo::erase(EventHandlers[i], mod);
189 }
190
191 void ModuleManager::Attach(Implementation* i, Module* mod, size_t sz)
192 {
193         for (size_t n = 0; n < sz; ++n)
194                 Attach(i[n], mod);
195 }
196
197 void ModuleManager::AttachAll(Module* mod)
198 {
199         for (size_t i = 0; i != I_END; ++i)
200                 Attach((Implementation)i, mod);
201 }
202
203 void ModuleManager::DetachAll(Module* mod)
204 {
205         for (size_t n = 0; n != I_END; ++n)
206                 Detach((Implementation)n, mod);
207 }
208
209 void ModuleManager::SetPriority(Module* mod, Priority s)
210 {
211         for (size_t n = 0; n != I_END; ++n)
212                 SetPriority(mod, (Implementation)n, s);
213 }
214
215 bool ModuleManager::SetPriority(Module* mod, Implementation i, Priority s, Module* which)
216 {
217         /** To change the priority of a module, we first find its position in the vector,
218          * then we find the position of the other modules in the vector that this module
219          * wants to be before/after. We pick off either the first or last of these depending
220          * on which they want, and we make sure our module is *at least* before or after
221          * the first or last of this subset, depending again on the type of priority.
222          */
223         size_t my_pos = 0;
224
225         /* Locate our module. This is O(n) but it only occurs on module load so we're
226          * not too bothered about it
227          */
228         for (size_t x = 0; x != EventHandlers[i].size(); ++x)
229         {
230                 if (EventHandlers[i][x] == mod)
231                 {
232                         my_pos = x;
233                         goto found_src;
234                 }
235         }
236
237         /* Eh? this module doesnt exist, probably trying to set priority on an event
238          * they're not attached to.
239          */
240         return false;
241
242 found_src:
243         // The modules registered for a hook are called in reverse order (to allow for easier removal
244         // of list entries while looping), meaning that the Priority given to us has the exact opposite effect
245         // on the list, e.g.: PRIORITY_BEFORE will actually put 'mod' after 'which', etc.
246         size_t swap_pos = my_pos;
247         switch (s)
248         {
249                 case PRIORITY_LAST:
250                         if (prioritizationState != PRIO_STATE_FIRST)
251                                 return true;
252                         else
253                                 swap_pos = 0;
254                         break;
255                 case PRIORITY_FIRST:
256                         if (prioritizationState != PRIO_STATE_FIRST)
257                                 return true;
258                         else
259                                 swap_pos = EventHandlers[i].size() - 1;
260                         break;
261                 case PRIORITY_BEFORE:
262                 {
263                         /* Find the latest possible position, only searching AFTER our position */
264                         for (size_t x = EventHandlers[i].size() - 1; x > my_pos; --x)
265                         {
266                                 if (EventHandlers[i][x] == which)
267                                 {
268                                         swap_pos = x;
269                                         goto swap_now;
270                                 }
271                         }
272                         // didn't find it - either not loaded or we're already after
273                         return true;
274                 }
275                 /* Place this module before a set of other modules */
276                 case PRIORITY_AFTER:
277                 {
278                         for (size_t x = 0; x < my_pos; ++x)
279                         {
280                                 if (EventHandlers[i][x] == which)
281                                 {
282                                         swap_pos = x;
283                                         goto swap_now;
284                                 }
285                         }
286                         // didn't find it - either not loaded or we're already before
287                         return true;
288                 }
289         }
290
291 swap_now:
292         /* Do we need to swap? */
293         if (swap_pos != my_pos)
294         {
295                 // We are going to change positions; we'll need to run again to verify all requirements
296                 if (prioritizationState == PRIO_STATE_LAST)
297                         prioritizationState = PRIO_STATE_AGAIN;
298                 /* Suggestion from Phoenix, "shuffle" the modules to better retain call order */
299                 int incrmnt = 1;
300
301                 if (my_pos > swap_pos)
302                         incrmnt = -1;
303
304                 for (unsigned int j = my_pos; j != swap_pos; j += incrmnt)
305                 {
306                         if ((j + incrmnt > EventHandlers[i].size() - 1) || ((incrmnt == -1) && (j == 0)))
307                                 continue;
308
309                         std::swap(EventHandlers[i][j], EventHandlers[i][j+incrmnt]);
310                 }
311         }
312
313         return true;
314 }
315
316 bool ModuleManager::PrioritizeHooks()
317 {
318         /* We give every module a chance to re-prioritize when we introduce a new one,
319          * not just the one that's loading, as the new module could affect the preference
320          * of others
321          */
322         for (int tries = 0; tries < 20; tries++)
323         {
324                 prioritizationState = tries > 0 ? PRIO_STATE_LAST : PRIO_STATE_FIRST;
325                 for (std::map<std::string, Module*>::iterator n = Modules.begin(); n != Modules.end(); ++n)
326                         n->second->Prioritize();
327
328                 if (prioritizationState == PRIO_STATE_LAST)
329                         break;
330                 if (tries == 19)
331                 {
332                         ServerInstance->Logs->Log("MODULE", LOG_DEFAULT, "Hook priority dependency loop detected");
333                         return false;
334                 }
335         }
336         return true;
337 }
338
339 bool ModuleManager::CanUnload(Module* mod)
340 {
341         std::map<std::string, Module*>::iterator modfind = Modules.find(mod->ModuleSourceFile);
342
343         if ((modfind == Modules.end()) || (modfind->second != mod) || (mod->dying))
344         {
345                 LastModuleError = "Module " + mod->ModuleSourceFile + " is not loaded, cannot unload it!";
346                 ServerInstance->Logs->Log("MODULE", LOG_DEFAULT, LastModuleError);
347                 return false;
348         }
349
350         mod->dying = true;
351         return true;
352 }
353
354 void ModuleManager::UnregisterModes(Module* mod, ModeType modetype)
355 {
356         const ModeParser::ModeHandlerMap& modes = ServerInstance->Modes.GetModes(modetype);
357         for (ModeParser::ModeHandlerMap::const_iterator i = modes.begin(); i != modes.end(); )
358         {
359                 ModeHandler* const mh = i->second;
360                 ++i;
361                 if (mh->creator == mod)
362                         this->DelService(*mh);
363         }
364 }
365
366 void ModuleManager::DoSafeUnload(Module* mod)
367 {
368         // First, notify all modules that a module is about to be unloaded, so in case
369         // they pass execution to the soon to be unloaded module, it will happen now,
370         // i.e. before we unregister the services of the module being unloaded
371         FOREACH_MOD(OnUnloadModule, (mod));
372
373         std::map<std::string, Module*>::iterator modfind = Modules.find(mod->ModuleSourceFile);
374
375         // Unregister modes before extensions because modes may require their extension to show the mode being unset
376         UnregisterModes(mod, MODETYPE_USER);
377         UnregisterModes(mod, MODETYPE_CHANNEL);
378
379         std::vector<reference<ExtensionItem> > items;
380         ServerInstance->Extensions.BeginUnregister(modfind->second, items);
381         /* Give the module a chance to tidy out all its metadata */
382         const chan_hash& chans = ServerInstance->GetChans();
383         for (chan_hash::const_iterator c = chans.begin(); c != chans.end(); )
384         {
385                 Channel* chan = c->second;
386                 ++c;
387                 mod->OnCleanup(ExtensionItem::EXT_CHANNEL, chan);
388                 chan->doUnhookExtensions(items);
389                 const Channel::MemberMap& users = chan->GetUsers();
390                 for (Channel::MemberMap::const_iterator mi = users.begin(); mi != users.end(); ++mi)
391                 {
392                         mod->OnCleanup(ExtensionItem::EXT_MEMBERSHIP, mi->second);
393                         mi->second->doUnhookExtensions(items);
394                 }
395         }
396
397         const user_hash& users = ServerInstance->Users->GetUsers();
398         for (user_hash::const_iterator u = users.begin(); u != users.end(); )
399         {
400                 User* user = u->second;
401                 // The module may quit the user (e.g. TLS (SSL) mod unloading) and that will remove it from the container
402                 ++u;
403                 mod->OnCleanup(ExtensionItem::EXT_USER, user);
404                 user->doUnhookExtensions(items);
405         }
406
407         for(std::multimap<std::string, ServiceProvider*>::iterator i = DataProviders.begin(); i != DataProviders.end(); )
408         {
409                 std::multimap<std::string, ServiceProvider*>::iterator curr = i++;
410                 if (curr->second->creator == mod)
411                         DataProviders.erase(curr);
412         }
413
414         dynamic_reference_base::reset_all();
415
416         DetachAll(mod);
417
418         Modules.erase(modfind);
419         ServerInstance->GlobalCulls.AddItem(mod);
420
421         ServerInstance->Logs->Log("MODULE", LOG_DEFAULT, "Module %s unloaded",mod->ModuleSourceFile.c_str());
422         ServerInstance->ISupport.Build();
423 }
424
425 void ModuleManager::UnloadAll()
426 {
427         /* We do this more than once, so that any service providers get a
428          * chance to be unhooked by the modules using them, but then get
429          * a chance to be removed themsleves.
430          *
431          * Note: this deliberately does NOT delete the DLLManager objects
432          */
433         for (int tries = 0; tries < 4; tries++)
434         {
435                 std::map<std::string, Module*>::iterator i = Modules.begin();
436                 while (i != Modules.end())
437                 {
438                         std::map<std::string, Module*>::iterator me = i++;
439                         if (CanUnload(me->second))
440                         {
441                                 DoSafeUnload(me->second);
442                         }
443                 }
444                 ServerInstance->GlobalCulls.Apply();
445         }
446 }
447
448 namespace
449 {
450         struct UnloadAction : public ActionBase
451         {
452                 Module* const mod;
453                 UnloadAction(Module* m) : mod(m) {}
454                 void Call() CXX11_OVERRIDE
455                 {
456                         ServerInstance->Modules->DoSafeUnload(mod);
457                         ServerInstance->GlobalCulls.Apply();
458                         ServerInstance->GlobalCulls.AddItem(this);
459                 }
460         };
461 }
462
463 bool ModuleManager::Unload(Module* mod)
464 {
465         if (!CanUnload(mod))
466                 return false;
467         ServerInstance->AtomicActions.AddAction(new UnloadAction(mod));
468         return true;
469 }
470
471 void ModuleManager::LoadAll()
472 {
473         std::map<std::string, ServiceList> servicemap;
474         LoadCoreModules(servicemap);
475
476         // Step 1: load all of the modules.
477         ConfigTagList tags = ServerInstance->Config->ConfTags("module");
478         for (ConfigIter i = tags.first; i != tags.second; ++i)
479         {
480                 ConfigTag* tag = i->second;
481                 std::string name = ExpandModName(tag->getString("name"));
482                 this->NewServices = &servicemap[name];
483
484                 // Skip modules which are already loaded.
485                 if (Modules.find(name) != Modules.end())
486                         continue;
487
488                 std::cout << "[" << con_green << "*" << con_reset << "] Loading module:\t" << con_green << name << con_reset << std::endl;
489                 if (!this->Load(name, true))
490                 {
491                         ServerInstance->Logs->Log("MODULE", LOG_DEFAULT, this->LastError());
492                         std::cout << std::endl << "[" << con_red << "*" << con_reset << "] " << this->LastError() << std::endl << std::endl;
493                         ServerInstance->Exit(EXIT_STATUS_MODULE);
494                 }
495         }
496
497         // Step 2: initialize the modules and register their services.
498         for (ModuleMap::const_iterator i = Modules.begin(); i != Modules.end(); ++i)
499         {
500                 Module* mod = i->second;
501                 try
502                 {
503                         ServerInstance->Logs->Log("MODULE", LOG_DEBUG, "Initializing %s", i->first.c_str());
504                         AttachAll(mod);
505                         AddServices(servicemap[i->first]);
506                         mod->init();
507                 }
508                 catch (CoreException& modexcept)
509                 {
510                         LastModuleError = "Unable to initialize " + mod->ModuleSourceFile + ": " + modexcept.GetReason();
511                         ServerInstance->Logs->Log("MODULE", LOG_DEFAULT, LastModuleError);
512                         std::cout << std::endl << "[" << con_red << "*" << con_reset << "] " << LastModuleError << std::endl << std::endl;
513                         ServerInstance->Exit(EXIT_STATUS_MODULE);
514                 }
515         }
516
517         this->NewServices = NULL;
518         ConfigStatus confstatus(NULL, true);
519
520         // Step 3: Read the configuration for the modules. This must be done as part of
521         // its own step so that services provided by modules can be registered before
522         // the configuration is read.
523         for (ModuleMap::const_iterator i = Modules.begin(); i != Modules.end(); ++i)
524         {
525                 Module* mod = i->second;
526                 try
527                 {
528                         ServerInstance->Logs->Log("MODULE", LOG_DEBUG, "Reading configuration for %s", i->first.c_str());
529                         mod->ReadConfig(confstatus);
530                 }
531                 catch (CoreException& modexcept)
532                 {
533                         LastModuleError = "Unable to read the configuration for " + mod->ModuleSourceFile + ": " + modexcept.GetReason();
534                         ServerInstance->Logs->Log("MODULE", LOG_DEFAULT, LastModuleError);
535                         std::cout << std::endl << "[" << con_red << "*" << con_reset << "] " << LastModuleError << std::endl << std::endl;
536                         ServerInstance->Exit(EXIT_STATUS_CONFIG);
537                 }
538         }
539
540         if (!PrioritizeHooks())
541                 ServerInstance->Exit(EXIT_STATUS_MODULE);
542 }
543
544 std::string& ModuleManager::LastError()
545 {
546         return LastModuleError;
547 }
548
549 void ModuleManager::AddServices(const ServiceList& list)
550 {
551         for (ServiceList::const_iterator i = list.begin(); i != list.end(); ++i)
552         {
553                 ServiceProvider& s = **i;
554                 AddService(s);
555         }
556 }
557
558 void ModuleManager::AddService(ServiceProvider& item)
559 {
560         switch (item.service)
561         {
562                 case SERVICE_DATA:
563                 case SERVICE_IOHOOK:
564                 {
565                         if ((!item.name.compare(0, 5, "mode/", 5)) || (!item.name.compare(0, 6, "umode/", 6)))
566                                 throw ModuleException("The \"mode/\" and the \"umode\" service name prefixes are reserved.");
567
568                         DataProviders.insert(std::make_pair(item.name, &item));
569                         std::string::size_type slash = item.name.find('/');
570                         if (slash != std::string::npos)
571                         {
572                                 DataProviders.insert(std::make_pair(item.name.substr(0, slash), &item));
573                                 DataProviders.insert(std::make_pair(item.name.substr(slash + 1), &item));
574                         }
575                         dynamic_reference_base::reset_all();
576                         break;
577                 }
578                 default:
579                         item.RegisterService();
580         }
581
582         FOREACH_MOD(OnServiceAdd, (item));
583 }
584
585 void ModuleManager::DelService(ServiceProvider& item)
586 {
587         switch (item.service)
588         {
589                 case SERVICE_MODE:
590                         if (!ServerInstance->Modes->DelMode(static_cast<ModeHandler*>(&item)))
591                                 throw ModuleException("Mode "+std::string(item.name)+" does not exist.");
592                         // Fall through
593                 case SERVICE_DATA:
594                 case SERVICE_IOHOOK:
595                 {
596                         DelReferent(&item);
597                         return;
598                 }
599                 default:
600                         throw ModuleException("Cannot delete unknown service type");
601         }
602
603         FOREACH_MOD(OnServiceDel, (item));
604 }
605
606 ServiceProvider* ModuleManager::FindService(ServiceType type, const std::string& name)
607 {
608         switch (type)
609         {
610                 case SERVICE_DATA:
611                 case SERVICE_IOHOOK:
612                 {
613                         std::multimap<std::string, ServiceProvider*>::iterator i = DataProviders.find(name);
614                         if (i != DataProviders.end() && i->second->service == type)
615                                 return i->second;
616                         return NULL;
617                 }
618                 // TODO implement finding of the other types
619                 default:
620                         throw ModuleException("Cannot find unknown service type");
621         }
622 }
623
624 std::string ModuleManager::ExpandModName(const std::string& modname)
625 {
626         std::string fullname;
627         if (modname.compare(0, 5, "core_") != 0 && modname.compare(0, 2, "m_") != 0)
628                 fullname.append("m_");
629         fullname.append(modname);
630         if (modname.length() < 3 || modname.compare(modname.size() - 3, 3, ".so") != 0)
631                 fullname.append(".so");
632         return fullname;
633 }
634
635 dynamic_reference_base::dynamic_reference_base(Module* Creator, const std::string& Name)
636         : name(Name), hook(NULL), value(NULL), creator(Creator)
637 {
638         if (!dynrefs)
639                 dynrefs = new insp::intrusive_list<dynamic_reference_base>;
640         dynrefs->push_front(this);
641
642         // Resolve unless there is no ModuleManager (part of class InspIRCd)
643         if (ServerInstance)
644                 resolve();
645 }
646
647 dynamic_reference_base::~dynamic_reference_base()
648 {
649         dynrefs->erase(this);
650         if (dynrefs->empty())
651         {
652                 delete dynrefs;
653                 dynrefs = NULL;
654         }
655 }
656
657 void dynamic_reference_base::SetProvider(const std::string& newname)
658 {
659         name = newname;
660         resolve();
661 }
662
663 void dynamic_reference_base::resolve()
664 {
665         // Because find() may return any element with a matching key in case count(key) > 1 use lower_bound()
666         // to ensure a dynref with the same name as another one resolves to the same object
667         std::multimap<std::string, ServiceProvider*>::iterator i = ServerInstance->Modules.DataProviders.lower_bound(name);
668         if ((i != ServerInstance->Modules.DataProviders.end()) && (i->first == this->name))
669         {
670                 ServiceProvider* newvalue = i->second;
671                 if (value != newvalue)
672                 {
673                         value = newvalue;
674                         if (hook)
675                                 hook->OnCapture();
676                 }
677         }
678         else
679                 value = NULL;
680 }
681
682 Module* ModuleManager::Find(const std::string &name)
683 {
684         std::map<std::string, Module*>::const_iterator modfind = Modules.find(ExpandModName(name));
685
686         if (modfind == Modules.end())
687                 return NULL;
688         else
689                 return modfind->second;
690 }
691
692 void ModuleManager::AddReferent(const std::string& name, ServiceProvider* service)
693 {
694         DataProviders.insert(std::make_pair(name, service));
695         dynamic_reference_base::reset_all();
696 }
697
698 void ModuleManager::DelReferent(ServiceProvider* service)
699 {
700         for (std::multimap<std::string, ServiceProvider*>::iterator i = DataProviders.begin(); i != DataProviders.end(); )
701         {
702                 ServiceProvider* curr = i->second;
703                 if (curr == service)
704                         DataProviders.erase(i++);
705                 else
706                         ++i;
707         }
708         dynamic_reference_base::reset_all();
709 }