path_utils.hpp

Go to the documentation of this file.

#ifndef _LOGIT_PATH_UTILS_HPP_INCLUDED
#define _LOGIT_PATH_UTILS_HPP_INCLUDED

 
#include <string>
#if __cplusplus >= 201703L
#include <filesystem>
#else
#include <vector>
#include <cctype>
#include <stdexcept>
#endif
 
#ifdef _WIN32
// For Windows systems
#include <direct.h>
#include <windows.h>
#include <locale>
#include <codecvt>
#elif defined(__APPLE__)
// For macOS systems
#include <mach-o/dyld.h>
#include <stdlib.h>
#include <unistd.h>
#include <limits.h>
#include <dirent.h>
#include <sys/stat.h>
#include <errno.h>
#else
// For other POSIX systems
#include <unistd.h>
#include <limits.h>
#include <dirent.h>
#include <sys/stat.h>
#include <errno.h>
#endif
 
namespace logit {
#   if __cplusplus >= 201703L
    namespace fs = std::filesystem;
#   endif
 
#if defined(__EMSCRIPTEN__)
 
    inline std::string get_exec_dir() { return "./"; }
 
    inline std::vector<std::string> get_list_files(const std::string&) {
        std::cerr << "get_list_files is not supported under Emscripten" << std::endl;
        return {};
    }
 
    inline std::string get_file_name(const std::string& file_path) {
        size_t pos = file_path.find_last_of("/\\");
        if (pos == std::string::npos) return file_path;
        return file_path.substr(pos + 1);
    }
 
    inline std::string make_relative(const std::string& file_path, const std::string&) {
        return file_path;
    }
 
    inline void create_directories(const std::string&) {
        std::cerr << "create_directories is not supported under Emscripten" << std::endl;
    }
 
    inline bool is_file(const std::string& path) {
        size_t dot_pos = path.find_last_of('.');
        size_t slash_pos = path.find_last_of("/\\");
        return (dot_pos != std::string::npos && (slash_pos == std::string::npos || dot_pos > slash_pos));
    }
 
#else

    std::string get_exec_dir() {
#       ifdef _WIN32
        std::vector<wchar_t> buffer(MAX_PATH);
        HMODULE hModule = GetModuleHandle(NULL);
 
        // Try to get the path
        std::size_t size = static_cast<std::size_t>(GetModuleFileNameW(hModule, buffer.data(), static_cast<DWORD>(buffer.size())));
 
        // If the path is too long, increase the buffer size
        while (size == buffer.size() && GetLastError() == ERROR_INSUFFICIENT_BUFFER) {
            buffer.resize(buffer.size() * 2);  // Double the buffer size
            size = static_cast<std::size_t>(GetModuleFileNameW(hModule, buffer.data(), static_cast<DWORD>(buffer.size())));
        }
 
        if (size == 0) {
            throw std::runtime_error("Failed to get executable path.");
        }
 
        std::wstring exe_path(buffer.begin(), buffer.begin() + size);
 
        // Trim the path to the directory (remove the file name, keep only the folder path)
        size_t pos = exe_path.find_last_of(L"\\/");
        if (pos != std::wstring::npos) {
            exe_path = exe_path.substr(0, pos);
        }
 
        // Convert from std::wstring (UTF-16) to std::string (UTF-8)
        std::wstring_convert<std::codecvt_utf8_utf16<wchar_t>> converter;
        return converter.to_bytes(exe_path);
#       elif defined(__APPLE__)
        uint32_t size = 0;
        _NSGetExecutablePath(nullptr, &size);
        std::vector<char> path(size);
        if (_NSGetExecutablePath(path.data(), &size) != 0) {
            throw std::runtime_error("Failed to get executable path.");
        }
        std::string exe_path(path.data());
        char resolved[PATH_MAX];
        if (realpath(exe_path.c_str(), resolved) == nullptr) {
            throw std::runtime_error("Failed to resolve executable path.");
        }
        exe_path = resolved;
        size_t pos = exe_path.find_last_of("\\/");
        if (pos != std::string::npos) {
            exe_path = exe_path.substr(0, pos);
        }
        return exe_path;
#       else
        char result[PATH_MAX];
        ssize_t count = readlink("/proc/self/exe", result, PATH_MAX);
 
        if (count == -1) {
            throw std::runtime_error("Failed to get executable path.");
        }
 
        std::string exe_path(result, count);
 
        // Trim the path to the directory (remove the file name, keep only the folder path)
        size_t pos = exe_path.find_last_of("\\/");
        if (pos != std::string::npos) {
            exe_path = exe_path.substr(0, pos);
        }
 
        return exe_path;
#       endif
    }

    std::vector<std::string> get_list_files(const std::string& path) {
        std::vector<std::string> list_files;
#       ifdef _WIN32
        // Use wide versions of functions to correctly handle non-ASCII characters.
        std::wstring_convert<std::codecvt_utf8_utf16<wchar_t>> converter;
        std::wstring wsearch_path;
 
        // If the path is empty, use the current directory.
        if (path.empty()) {
            wchar_t buffer[MAX_PATH];
            GetCurrentDirectoryW(MAX_PATH, buffer);
            wsearch_path = buffer;
        } else {
            wsearch_path = converter.from_bytes(path);
        }
 
        // Ensure there is a trailing separator.
        if (!wsearch_path.empty()) {
            wchar_t last_char = wsearch_path.back();
            if (last_char != L'\\' && last_char != L'/') {
                wsearch_path.push_back(L'\\');
            }
        }
 
        // Create the search pattern.
        std::wstring pattern = wsearch_path + L"*";
        WIN32_FIND_DATAW fd;
        HANDLE hFind = FindFirstFileW(pattern.c_str(), &fd);
        if (hFind != INVALID_HANDLE_VALUE) {
            do {
                if (wcscmp(fd.cFileName, L".") == 0 || wcscmp(fd.cFileName, L"..") == 0)
                    continue;
 
                std::wstring wfull_path = wsearch_path + fd.cFileName;
 
                if (fd.dwFileAttributes & FILE_ATTRIBUTE_DIRECTORY) {
                    // Recursively process subdirectories.
                    std::vector<std::string> sub_files = get_list_files(converter.to_bytes(wfull_path));
                    list_files.insert(list_files.end(), sub_files.begin(), sub_files.end());
                } else {
                    // Add the found file.
                    list_files.push_back(converter.to_bytes(wfull_path));
                }
            } while (FindNextFileW(hFind, &fd));
            FindClose(hFind);
        }
#       else
        // Implementation for POSIX systems.
        std::string search_path = path;
        if (search_path.empty()) {
            char buffer[PATH_MAX];
            if (getcwd(buffer, PATH_MAX)) {
                search_path = buffer;
            }
        }
        // Ensure there is a trailing separator.
        if (search_path.back() != '/' && search_path.back() != '\\') {
            search_path.push_back('/');
        }
        DIR* dir = opendir(search_path.c_str());
        if (dir) {
            struct dirent* entry;
            while ((entry = readdir(dir)) != nullptr) {
                std::string file_name = entry->d_name;
                if (file_name == "." || file_name == "..")
                    continue;
                std::string full_path = search_path + file_name;
                struct stat statbuf;
                if (stat(full_path.c_str(), &statbuf) == 0) {
                    if (S_ISDIR(statbuf.st_mode)) {
                        std::vector<std::string> sub_files = get_list_files(full_path);
                        list_files.insert(list_files.end(), sub_files.begin(), sub_files.end());
                    } else if (S_ISREG(statbuf.st_mode)) {
                        list_files.push_back(full_path);
                    }
                }
            }
            closedir(dir);
        }
#       endif
        return list_files;
    }

    std::string get_file_name(const std::string& file_path) {
#       if __cplusplus >= 201703L
        return fs::u8path(file_path).filename().u8string();
#       else
        size_t pos = file_path.find_last_of("/\\");
        if (pos == std::string::npos) return file_path;
        return file_path.substr(pos + 1);
#       endif
    }
 
#if __cplusplus >= 201703L

    inline std::string make_relative(const std::string& file_path, const std::string& base_path) {
        if (base_path.empty()) return file_path;
        std::filesystem::path fileP = std::filesystem::u8path(file_path);
        std::filesystem::path baseP = std::filesystem::u8path(base_path);
        std::error_code ec; // For exception-safe operation
        std::filesystem::path relativeP = std::filesystem::relative(fileP, baseP, ec);
        if (ec) {
            // If there is an error, return the original file_path
            return file_path;
        } else {
            return relativeP.u8string();
        }
    }

    void create_directories(const std::string& path) {
#       ifdef _WIN32
        // Convert UTF-8 string to wide string for Windows
        std::wstring_convert<std::codecvt_utf8_utf16<wchar_t>> converter;
        std::wstring wide_path = converter.from_bytes(path);
        std::filesystem::path dir(wide_path);
#       else
        std::filesystem::path dir = std::filesystem::u8path(path);
#       endif
        if (!std::filesystem::exists(dir)) {
            std::error_code ec;
            if (!std::filesystem::create_directories(dir, ec)) {
                throw std::runtime_error("Failed to create directories for path: " + dir.u8string());
            }
        }
    }
 
#else

    struct PathComponents {
        std::string root;                       
        std::vector<std::string> components;    
    };

    PathComponents split_path(const std::string& path) {
        PathComponents result;
        size_t i = 0;
        size_t n = path.size();
 
        // Handle root paths for Unix and Windows
        if (n >= 1 && (path[0] == '/' || path[0] == '\\')) {
            // Unix root "/"
            result.root = "/";
            ++i;
        } else if (n >= 2 && std::isalpha(path[0]) && path[1] == ':') {
            // Windows drive letter "C:"
            result.root = path.substr(0, 2);
            i = 2;
            if (n >= 3 && (path[2] == '/' || path[2] == '\\')) {
                // "C:/"
                ++i;
            }
        }
 
        // Split the path into components
        while (i < n) {
            // Skip path separators
            while (i < n && (path[i] == '/' || path[i] == '\\')) {
                ++i;
            }
            // Find the next separator
            size_t j = i;
            while (j < n && path[j] != '/' && path[j] != '\\') {
                ++j;
            }
            if (i < j) {
                result.components.push_back(path.substr(i, j - i));
                i = j;
            }
        }
 
        return result;
    }

    std::string make_relative(const std::string& file_path, const std::string& base_path) {
        if (base_path.empty()) return file_path;
        PathComponents file_pc = split_path(file_path);
        PathComponents base_pc = split_path(base_path);
 
        // If roots are different, return the original file_path
        if (file_pc.root != base_pc.root) {
            return file_path;
        }
 
        // Find the common prefix components
        size_t common_size = 0;
        while (common_size < file_pc.components.size() &&
               common_size < base_pc.components.size() &&
               file_pc.components[common_size] == base_pc.components[common_size]) {
            ++common_size;
        }
 
        // Build the relative path components
        std::vector<std::string> relative_components;
 
        // Add ".." for each remaining component in base path
        for (size_t i = common_size; i < base_pc.components.size(); ++i) {
            relative_components.push_back("..");
        }
 
        // Add the remaining components from the file path
        for (size_t i = common_size; i < file_pc.components.size(); ++i) {
            relative_components.push_back(file_pc.components[i]);
        }
 
        // Join the components into a relative path string
        std::string relative_path;
        if (relative_components.empty()) {
            relative_path = ".";
        } else {
            for (size_t i = 0; i < relative_components.size(); ++i) {
                if (i > 0) {
#                   ifdef _WIN32
                    relative_path += '\\';  // Windows
#                   else
                    relative_path += '/';
#                   endif
                }
                relative_path += relative_components[i];
            }
        }
 
        return relative_path;
    }

    inline bool is_file(const std::string& path) {
        size_t dot_pos = path.find_last_of('.');
        size_t slash_pos = path.find_last_of("/\\");
        return (dot_pos != std::string::npos && (slash_pos == std::string::npos || dot_pos > slash_pos));
    }

    void create_directories(const std::string& path) {
        if (path.empty()) return;
        PathComponents path_pc = split_path(path);
        auto &components = path_pc.components;
        size_t components_size = components.size();
 
        // Check if the last component is a file
        if (is_file(path)) {
            --components_size;
        }
 
        // Build the path incrementally and create directories
        std::string current_path = path_pc.root;
        for (size_t i = 0; i < components_size; ++i) {
            if (!current_path.empty() && current_path.back() != '/' && current_path.back() != '\\') {
                current_path += '/';
            }
            current_path += components[i];
 
            // Skip special components
            if (components[i] == ".." ||
                components[i] == "/" ||
                components[i] == "~/") continue;
#           ifdef _WIN32
            int ret = _mkdir(utf8_to_ansi(current_path).c_str());
#           else
            int ret = mkdir(current_path.c_str(), 0755);
#           endif
            int errnum = errno;
            if (ret != 0 && errnum != EEXIST) {
                throw std::runtime_error("Failed to create directory: " + current_path);
            }
        }
    }
 
#endif // __cplusplus >= 201703L
 
#endif // defined(__EMSCRIPTEN__)
 
}; // namespace logit
 
#endif // _LOGIT_PATH_UTILS_HPP_INCLUDED