git: port from mercurial repo.

Signed-off-by: Amlal El Mahrouss <amlal.elmahrouss@icloud.com>

1 files changed, 41 insertions, 0 deletions

diff --git a/Source/SharedObject.cxx b/Source/SharedObject.cxx
new file mode 100644
index 00000000..4b226e69
--- /dev/null
+++ b/Source/SharedObject.cxx
@@ -0,0 +1,41 @@
+/* 
+* ======================================================== 
+* 
+* hCore 
+* Copyright Mahrouss Logic, all rights reserved.
+* 
+*  ========================================================
+*/
+
+#include <KernelKit/DebugOutput.hpp>
+#include <KernelKit/ProcessManager.hpp>
+#include <KernelKit/ThreadLocalStorage.hxx>
+#include <KernelKit/SharedObjectCore.hxx>
+
+using namespace hCore;
+
+/***********************************************************************************/
+
+extern "C" SharedObject* __LibMain(VoidPtr image)
+{
+    /***********************************************************************************/
+    /* Allocate new library to be added to the lookup table. 						   */
+    /***********************************************************************************/
+
+    SharedObject* library = hcore_tls_new_class<SharedObject>();
+
+    if (!library)
+    {
+        kcout << "__LibMain: out of memory!\n";
+        ProcessManager::Shared().Leak().GetCurrent().Leak().Crash();
+        return nullptr;
+    }
+
+    library->Mount(hcore_tls_new_class<SharedObject::SharedObjectTraits>());
+
+    kcout << "__LibMain: Done allocate DSO.\n";
+
+    return library;
+}
+
+/***********************************************************************************/
\ No newline at end of file