/* Dependency graph analysis.
   Copyright (C) 2025 Free Software Foundation, Inc.

GCC 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 3, or (at your option)
any later version.

GCC 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 GCC; see the file COPYING3.  If not see
<http://www.gnu.org/licenses/>.  */

#include "elna/boot/dependency.h"

#include <fstream>
#include <sstream>
#include <string.h>

#include "elna/boot/driver.h"
#include "elna/boot/name_analysis.h"
#include "elna/boot/type_check.h"
#include "parser.hh"

namespace elna::boot
{
    dependency read_source(std::istream& entry_point)
    {
        driver parse_driver;
        lexer tokenizer(entry_point);
        yy::parser parser(tokenizer, parse_driver);

        dependency outcome;
        if (parser())
        {
            std::swap(outcome.errors(), parse_driver.errors());
            return outcome;
        }
        else
        {
            std::swap(outcome.tree, parse_driver.tree);
        }
        declaration_visitor declaration_visitor;
        outcome.tree->accept(&declaration_visitor);

        if (!declaration_visitor.errors().empty())
        {
            std::swap(outcome.errors(), declaration_visitor.errors());
        }
        outcome.unresolved = declaration_visitor.unresolved;

        return outcome;
    }

    error_list analyze_semantics(std::unique_ptr<unit>& tree, symbol_bag bag)
    {
        name_analysis_visitor name_analyser(bag);
        tree->accept(&name_analyser);

        if (name_analyser.has_errors())
        {
            return std::move(name_analyser.errors());
        }
        type_analysis_visitor type_analyzer(bag);
        tree->accept(&type_analyzer);

        if (type_analyzer.has_errors())
        {
            return std::move(type_analyzer.errors());
        }
        return error_list{};
    }

    std::filesystem::path build_path(const std::vector<std::string>& segments)
    {
        std::filesystem::path result;
        std::vector<std::string>::const_iterator segment_iterator = std::cbegin(segments);

        if (segment_iterator == std::cend(segments))
        {
            return result;
        }
        result = *segment_iterator;

        ++segment_iterator;
        for (; segment_iterator != std::cend(segments); ++segment_iterator)
        {
            result /= *segment_iterator;
        }
        result.replace_extension(".elna");

        return result;
    }
}