/*
 *  The Mana Server
 *  Copyright (C) 2013  The Mana World Development Team
 *
 *  This file is part of The Mana Server.
 *
 *  The Mana Server 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; either version 2 of the License, or
 *  any later version.
 *
 *  The Mana Server 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 The Mana Server.  If not, see <http://www.gnu.org/licenses/>.
 */

#include "utils/path.h"
#include <vector>

namespace utils
{
    /**
     * Returns the path without the file name. The path separator is kept.
     */
    std::string_view path(std::string_view fullFilePath)
    {
        // We'll reverse-search for '/' or'\' and extract the substring
        // corresponding to path.
        const auto slashPos = fullFilePath.find_last_of("/\\");
        if (slashPos != std::string::npos)
            return fullFilePath.substr(0, slashPos + 1);
        else
            return std::string_view();
    }

    /**
     * Join two path elements into one.
     *
     * This function helps handling relative paths.
     *
     * Examples:
     *
     *     /foo + bar = /foo/bar
     *     /foo/ + bar = /foo/bar
     *     /foo + /bar = /bar
     *
     * This will work for PhysFS paths. Windows style paths (prefixed with drive letters) won't work.
     *
     * @return Joined paths or path2 if path2 was an absolute path.
     */
    std::string joinPaths(std::string_view path1, std::string_view path2)
    {
        std::string joined;

        if (path2.empty())
        {
            joined.append(path1);
        }
        else if (path1.empty())
        {
            joined.append(path2);
        }
        else if (path2[0] == '/' || path2[0] == '\\')
        {
            // return only path2 if it is an absolute path
            joined.append(path2);
        }
        else
        {
            joined.append(path1);
            if (joined.back() != '/' && joined.back() != '\\')
                joined.append("/");
            joined.append(path2);
        }

        return joined;
    }

    /**
     * Removes relative elements from the path.
     */
    std::string cleanPath(const std::string &path)
    {
        std::string part;
        std::string result;
        std::vector<std::string> pathStack;

        size_t prev = 0;
        while (true)
        {
            size_t cur = path.find_first_of("/\\", prev);
            if (cur == std::string::npos)
            {
                // FIXME add everything from prev to the end
                pathStack.push_back(path.substr(prev));
                break;
            }

            part = path.substr(prev, cur - prev);
            if (part == "..")
            {
                // go back one level
                if (!pathStack.empty())
                {
                    pathStack.pop_back();
                }
            }
            else if (part == ".")
            {
                // do nothing
            }
            else if (part.empty())
            {
                if (pathStack.empty() && cur == 0)
                {
                    // handle first empty match before the root slash
                    pathStack.emplace_back();
                }
                else
                {
                    // empty match in the middle of the path should be ignored
                }
            }
            else
            {
                // normal path element
                pathStack.push_back(part);
            }

            cur++;
            prev = cur;
        }

        // join the pathStack into a normal path
        unsigned int i = 0;
        for (i = 0; i < pathStack.size(); i++)
        {
            result += pathStack[i];
            if (i < pathStack.size() - 1) {
                result += "/";
            }
        }

        return result;
    }
}