Merged in MHR-18 (pull request #9)

MHR-18

1 files changed, 46 insertions, 6 deletions

diff --git a/Private/Source/AppMain.cxx b/Private/Source/AppMain.cxx
index 8fa74459..6a23e20d 100644
--- a/Private/Source/AppMain.cxx
+++ b/Private/Source/AppMain.cxx
@@ -10,10 +10,12 @@
 #include <KernelKit/FileManager.hpp>
 #include <KernelKit/Framebuffer.hpp>
 #include <KernelKit/KernelHeap.hpp>
+#include <KernelKit/PEF.hpp>
 #include <KernelKit/PEFCodeManager.hxx>
 #include <KernelKit/ProcessScheduler.hpp>
 #include <KernelKit/UserHeap.hpp>
 #include <NewKit/Json.hpp>
+#include <NewKit/Utils.hpp>
 
 /// @file Main microkernel entrypoint.
 
@@ -24,14 +26,52 @@ EXTERN_C NewOS::Void AppMain(NewOS::Void) {
   NewOS::FilesystemManagerInterface::Mount(newFS);
 
   if (newFS->GetImpl()) {
-      auto catalog = newFS->GetImpl()->GetCatalog("/Boot");
-      if (catalog) {
-          NewOS::kcout << "Catalog-Path-Name: " << catalog->Name << NewOS::endl;
-          delete catalog;
-      }
+    NewCatalog* mountCatalog = newFS->GetImpl()->GetCatalog("/Boot/");
+
+    if (mountCatalog) {
+      delete newFS->GetImpl()->CreateCatalog("/Boot/System/", 0,
+                                             kNewFSCatalogKindDir);
+      NewCatalog* newKernelCatalog =
+          newFS->GetImpl()->CreateCatalog("/Boot/System/ExampleTextFile");
+
+      if (newKernelCatalog)
+        NewOS::kcout << "Catalog-Path-Name: " << newKernelCatalog->Name
+                     << NewOS::endl;
+
+      NewOS::kcout << "Catalog-Path-Name: " << mountCatalog->Name
+                   << NewOS::endl;
+
+      constexpr auto cDataSz = 512;
+      NewOS::Char theData[cDataSz] = {
+          "THIS FORK\rCONTAINS DATA\rAS\rYOU\rCAN\rSEE...THIS FORK\rCONTAINS "
+          "DATA\rAS\rYOU\rCAN\rSEE..THIS FORK\rCONTAINS "
+          "DATA\rAS\rYOU\rCAN\rSEE..THIS FORK\rCONTAINS "
+          "DATA\rAS\rYOU\rCAN\rSEE..THIS FORK\rCONTAINS "
+          "DATA\rAS\rYOU\rCAN\rSEE..THIS FORK\rCONTAINS "
+          "DATA\rAS\rYOU\rCAN\rSEE..THIS FORK\rCONTAINS "
+          "DATA\rAS\rYOU\rCAN\rSEE..THIS FORK\rCONTAINS "
+          "DATA\rAS\rYOU\rCAN\rSEE.."};
+
+      NewFork theFork{0};
+      NewOS::rt_copy_memory((NewOS::VoidPtr) "EditableText",
+                            (NewOS::VoidPtr)theFork.Name,
+                            NewOS::rt_string_len("EditableText"));
+
+      theFork.Kind = NewOS::kNewFSDataForkKind;
+      theFork.DataSize = cDataSz;
+
+      newFS->GetImpl()->CreateFork(newKernelCatalog, theFork);
+      newFS->GetImpl()->WriteCatalog(newKernelCatalog, theData, cDataSz);
+
+      delete newKernelCatalog;
+      delete mountCatalog;
+    } else {
+      delete newFS->GetImpl()->CreateCatalog("/Boot/", 0, kNewFSCatalogKindDir);
+    }
   }
 
-  while (NewOS::ProcessScheduler::Shared().Leak().Run() > 0);
+  while (NewOS::ProcessScheduler::Shared().Leak().Run() > 0)
+    ;
 
   delete newFS;
 }