#include "kernel/filesystem/vfs.hpp"

#include "kapi/system.hpp"

#include "kernel/devices/device.hpp"
#include "kernel/devices/storage/storage_management.hpp"
#include "kernel/filesystem/dentry.hpp"
#include "kernel/filesystem/device_inode.hpp"
#include "kernel/filesystem/ext2/ext2_filesystem.hpp"
#include "kernel/filesystem/filesystem.hpp"
#include "kernel/filesystem/mount.hpp"
#include "kernel/filesystem/open_file_description.hpp"

#include <kstd/memory>

#include <algorithm>
#include <optional>
#include <string_view>

namespace filesystem
{
  namespace
  {
    constinit auto static active_vfs = std::optional<vfs>{};
  }  // namespace

  auto vfs::init() -> void
  {
    if (active_vfs)
    {
      kapi::system::panic("[FILESYSTEM] vfs has already been initialized.");
    }

    active_vfs.emplace(vfs{});
    active_vfs->init_internal();
  }

  auto vfs::init_internal() -> void
  {
    auto storage_mgmt = devices::storage::storage_management::get();
    // TODO BA-FS26 fix mounting boot_device
    if (auto boot_device = storage_mgmt.determine_boot_device())
    {
      m_root_fs = kstd::make_shared<ext2::ext2_filesystem>();

      m_root_fs->mount(boot_device);

      m_root_dentry = kstd::make_shared<dentry>(nullptr, m_root_fs->root_inode());
      // if (do_mount("/", m_root_fs) != 0)
      // {
      //   kapi::system::panic("[FILESYSTEM] Failed to mount root filesystem.");
      // }

      // TODO BA-FS26 use do_mount when tempdevfs is implemented -> just call /dev/ with all devices in devtempfs
      std::ranges::for_each(storage_mgmt.all_controllers(), [&](auto controller) {
        std::ranges::for_each(controller->all_devices(), [&](auto device) { make_device_node(device); });
      });
    }
    else
    {
      // TODO BA-FS26 ?? what when no boot_device == no modules loaded??
    }
  }

  auto vfs::get() -> vfs &
  {
    if (!active_vfs)
    {
      kapi::system::panic("[FILESYSTEM] vfs has not been initialized.");
    }

    return *active_vfs;
  }

  auto vfs::open(std::string_view path) -> kstd::shared_ptr<open_file_description>
  {
    if (auto dentry = resolve_path(path))
    {
      return kstd::make_shared<open_file_description>(dentry->get_inode());
    }

    return nullptr;
  }

  auto vfs::do_mount(std::string_view path, kstd::shared_ptr<filesystem> const & filesystem) -> int
  {
    if (!filesystem)
    {
      return -1;  // TODO BA-FS26 panic or errorcode?
    }

    if (path.empty() || path.front() != '/')
    {
      return -1;  // TODO BA-FS26 panic or errorcode?
    }

    // TODO BA-FS26 better path validation
    if ((path.size() > 1 && path.back() == '/'))
    {
      return -1;  // TODO BA-FS26 panic or errorcode?
    }

    // if (path == "/")
    // {
    //   m_root_fs = filesystem;
    //   m_root_mount = mount{"/", filesystem};
    //   return 0;
    // }

    auto existing_mount =
        std::ranges::find_if(m_mount_table, [&](auto const & existing) { return existing.path() == path; });
    if (existing_mount != m_mount_table.end())
    {
      *existing_mount = mount{path, filesystem};
    }
    else
    {
      m_mount_table.push_back(mount{path, filesystem});
    }

    return 0;
  }

  auto vfs::make_device_node(kstd::shared_ptr<devices::device> const & device) -> void
  {
    if (!device)
    {
      kapi::system::panic("[FILESYSTEM] make_device_node called with null device.");
    }

    m_device_nodes.push_back(device_node_entry{device->name().view(), kstd::make_shared<device_inode>(device)});
  }

  auto vfs::resolve_path(std::string_view path) -> std::optional<dentry>
  {
    // TODO BA-FS26 implement real path resolution with mounts and directories etc.
    // For now, just support device nodes at /dev/<device_name>.
    // TODO BA-FS26 better path validation
    // TODO BA-FS26 implement a path parser (maybe in libs?) and use it here and in do_mount

    constexpr auto device_prefix = std::string_view{"/dev/"};
    if (path.starts_with(device_prefix))
    {
      auto const device_name = path.substr(device_prefix.size());
      auto entry = std::ranges::find_if(m_device_nodes, [&](auto const & device_entry) {
        return device_entry.has_value() && device_entry->name == device_name;
      });

      if (entry != m_device_nodes.end())
      {
        return dentry{nullptr, entry->value().node};
      }

      return std::nullopt;
    }

    return std::nullopt;
  }

}  // namespace filesystem