+/*
+ * InspIRCd -- Internet Relay Chat Daemon
+ *
+ * Copyright (C) 2009 Daniel De Graaf <danieldg@inspircd.org>
+ * Copyright (C) 2007 Dennis Friis <peavey@inspircd.org>
+ * Copyright (C) 2004-2006 Craig Edwards <craigedwards@brainbox.cc>
+ * Copyright (C) 2006 Oliver Lupton <oliverlupton@gmail.com>
+ *
+ * This file is part of InspIRCd. InspIRCd is free software: you can
+ * redistribute it and/or modify it under the terms of the GNU General Public
+ * License as published by the Free Software Foundation, version 2.
+ *
+ * This program is distributed in the hope that it will be useful, but WITHOUT
+ * ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS
+ * FOR A PARTICULAR PURPOSE. See the GNU General Public License for more
+ * details.
+ *
+ * You should have received a copy of the GNU General Public License
+ * along with this program. If not, see <http://www.gnu.org/licenses/>.
+ */
+
+
+#include "inspircd.h"
+#include "base.h"
+#include <time.h>
+#ifdef INSPIRCD_ENABLE_RTTI
+#include <typeinfo>
+#endif
+
+classbase::classbase()
+{
+ if (ServerInstance)
+ ServerInstance->Logs->Log("CULLLIST", LOG_DEBUG, "classbase::+ @%p", (void*)this);
+}
+
+CullResult classbase::cull()
+{
+ if (ServerInstance)
+#ifdef INSPIRCD_ENABLE_RTTI
+ ServerInstance->Logs->Log("CULLLIST", LOG_DEBUG, "classbase::-%s @%p",
+ typeid(*this).name(), (void*)this);
+#else
+ ServerInstance->Logs->Log("CULLLIST", LOG_DEBUG, "classbase::- @%p", (void*)this);
+#endif
+ return CullResult();
+}
+
+classbase::~classbase()
+{
+ if (ServerInstance)
+ ServerInstance->Logs->Log("CULLLIST", LOG_DEBUG, "classbase::~ @%p", (void*)this);
+}
+
+CullResult::CullResult()
+{
+}
+
+// This trick detects heap allocations of refcountbase objects
+static void* last_heap = NULL;
+
+void* refcountbase::operator new(size_t size)
+{
+ last_heap = ::operator new(size);
+ return last_heap;
+}
+
+void refcountbase::operator delete(void* obj)
+{
+ if (last_heap == obj)
+ last_heap = NULL;
+ ::operator delete(obj);
+}
+
+refcountbase::refcountbase() : refcount(0)
+{
+ if (this != last_heap)
+ throw CoreException("Reference allocate on the stack!");
+}
+
+refcountbase::~refcountbase()
+{
+ if (refcount && ServerInstance)
+ ServerInstance->Logs->Log("CULLLIST", LOG_DEBUG, "refcountbase::~ @%p with refcount %d",
+ (void*)this, refcount);
+}
+
+usecountbase::~usecountbase()
+{
+ if (usecount && ServerInstance)
+ ServerInstance->Logs->Log("CULLLIST", LOG_DEBUG, "usecountbase::~ @%p with refcount %d",
+ (void*)this, usecount);
+}
+
+ServiceProvider::~ServiceProvider()
+{
+}
+
+ExtensionItem::ExtensionItem(const std::string& Key, ExtensibleType exttype, Module* mod)
+ : ServiceProvider(mod, Key, SERVICE_METADATA)
+ , type(exttype)
+{
+}
+
+ExtensionItem::~ExtensionItem()
+{
+}
+
+void* ExtensionItem::get_raw(const Extensible* container) const
+{
+ Extensible::ExtensibleStore::const_iterator i =
+ container->extensions.find(const_cast<ExtensionItem*>(this));
+ if (i == container->extensions.end())
+ return NULL;
+ return i->second;
+}
+
+void* ExtensionItem::set_raw(Extensible* container, void* value)
+{
+ std::pair<Extensible::ExtensibleStore::iterator,bool> rv =
+ container->extensions.insert(std::make_pair(this, value));
+ if (rv.second)
+ {
+ return NULL;
+ }
+ else
+ {
+ void* old = rv.first->second;
+ rv.first->second = value;
+ return old;
+ }
+}
+
+void* ExtensionItem::unset_raw(Extensible* container)
+{
+ Extensible::ExtensibleStore::iterator i = container->extensions.find(this);
+ if (i == container->extensions.end())
+ return NULL;
+ void* rv = i->second;
+ container->extensions.erase(i);
+ return rv;
+}
+
+bool ExtensionManager::Register(ExtensionItem* item)
+{
+ return types.insert(std::make_pair(item->name, item)).second;
+}
+
+void ExtensionManager::BeginUnregister(Module* module, std::vector<reference<ExtensionItem> >& list)
+{
+ std::map<std::string, reference<ExtensionItem> >::iterator i = types.begin();
+ while (i != types.end())
+ {
+ std::map<std::string, reference<ExtensionItem> >::iterator me = i++;
+ ExtensionItem* item = me->second;
+ if (item->creator == module)
+ {
+ list.push_back(item);
+ types.erase(me);
+ }
+ }
+}
+
+ExtensionItem* ExtensionManager::GetItem(const std::string& name)
+{
+ std::map<std::string, reference<ExtensionItem> >::iterator i = types.find(name);
+ if (i == types.end())
+ return NULL;
+ return i->second;
+}
+
+void Extensible::doUnhookExtensions(const std::vector<reference<ExtensionItem> >& toRemove)
+{
+ for(std::vector<reference<ExtensionItem> >::const_iterator i = toRemove.begin(); i != toRemove.end(); ++i)
+ {
+ ExtensionItem* item = *i;
+ ExtensibleStore::iterator e = extensions.find(item);
+ if (e != extensions.end())
+ {
+ item->free(e->second);
+ extensions.erase(e);
+ }
+ }
+}
+
+Extensible::Extensible()
+ : culled(false)
+{
+}
+
+CullResult Extensible::cull()
+{
+ FreeAllExtItems();
+ culled = true;
+ return classbase::cull();
+}
+
+void Extensible::FreeAllExtItems()
+{
+ for(ExtensibleStore::iterator i = extensions.begin(); i != extensions.end(); ++i)
+ {
+ i->first->free(i->second);
+ }
+ extensions.clear();
+}
+
+Extensible::~Extensible()
+{
+ if ((!extensions.empty() || !culled) && ServerInstance)
+ ServerInstance->Logs->Log("CULLLIST", LOG_DEBUG, "Extensible destructor called without cull @%p", (void*)this);
+}
+
+LocalExtItem::LocalExtItem(const std::string& Key, ExtensibleType exttype, Module* mod)
+ : ExtensionItem(Key, exttype, mod)
+{
+}
+
+LocalExtItem::~LocalExtItem()
+{
+}
+
+std::string LocalExtItem::serialize(SerializeFormat format, const Extensible* container, void* item) const
+{
+ return "";
+}
+
+void LocalExtItem::unserialize(SerializeFormat format, Extensible* container, const std::string& value)
+{
+}
+
+LocalStringExt::LocalStringExt(const std::string& Key, ExtensibleType exttype, Module* Owner)
+ : SimpleExtItem<std::string>(Key, exttype, Owner)
+{
+}
+
+LocalStringExt::~LocalStringExt()
+{
+}
+
+std::string LocalStringExt::serialize(SerializeFormat format, const Extensible* container, void* item) const
+{
+ if (item && format == FORMAT_USER)
+ return *static_cast<std::string*>(item);
+ return "";
+}
+
+LocalIntExt::LocalIntExt(const std::string& Key, ExtensibleType exttype, Module* mod)
+ : LocalExtItem(Key, exttype, mod)
+{
+}
+
+LocalIntExt::~LocalIntExt()
+{
+}
+
+std::string LocalIntExt::serialize(SerializeFormat format, const Extensible* container, void* item) const
+{
+ if (format != FORMAT_USER)
+ return "";
+ return ConvToStr(reinterpret_cast<intptr_t>(item));
+}
+
+intptr_t LocalIntExt::get(const Extensible* container) const
+{
+ return reinterpret_cast<intptr_t>(get_raw(container));
+}
+
+intptr_t LocalIntExt::set(Extensible* container, intptr_t value)
+{
+ if (value)
+ return reinterpret_cast<intptr_t>(set_raw(container, reinterpret_cast<void*>(value)));
+ else
+ return reinterpret_cast<intptr_t>(unset_raw(container));
+}
+
+void LocalIntExt::free(void*)
+{
+}
+
+StringExtItem::StringExtItem(const std::string& Key, ExtensibleType exttype, Module* mod)
+ : ExtensionItem(Key, exttype, mod)
+{
+}
+
+StringExtItem::~StringExtItem()
+{
+}
+
+std::string* StringExtItem::get(const Extensible* container) const
+{
+ return static_cast<std::string*>(get_raw(container));
+}
+
+std::string StringExtItem::serialize(SerializeFormat format, const Extensible* container, void* item) const
+{
+ return item ? *static_cast<std::string*>(item) : "";
+}
+
+void StringExtItem::unserialize(SerializeFormat format, Extensible* container, const std::string& value)
+{
+ if (value.empty())
+ unset(container);
+ else
+ set(container, value);
+}
+
+void StringExtItem::set(Extensible* container, const std::string& value)
+{
+ void* old = set_raw(container, new std::string(value));
+ delete static_cast<std::string*>(old);
+}
+
+void StringExtItem::unset(Extensible* container)
+{
+ void* old = unset_raw(container);
+ delete static_cast<std::string*>(old);
+}
+
+void StringExtItem::free(void* item)
+{
+ delete static_cast<std::string*>(item);
+}
+
+ModuleException::ModuleException(const std::string &message, Module* who)
+ : CoreException(message, who ? who->ModuleSourceFile : "A Module")
+{
+}