fsh-oop/include/cmd/arg.hpp

#pragma once

#include <string>
#include <sstream>
#include <fstream>
#include <vector>
#include <unordered_map>
#include <iostream>

#include "ast/ast_component.hpp"
#include "util/input.hpp"

namespace fsh{

class _Argument {

public:
    virtual void svalue(std::shared_ptr<CommandArgumentNode> can) {
        svalue(can->gvalue(), can->gtoken_type());
    }
    virtual void svalue(const std::string& can, const Lexer::TokenType& type = Lexer::TokenType::FLAG) {}

    template<typename T>
    static std::shared_ptr<_Argument> create() {return std::make_shared<T>();}
protected:
    _Argument(){} 
};

template<typename T>
class Argument : public _Argument {
    public:
    Argument() {} 


    virtual void svalue(const std::string& val, const Lexer::TokenType& type) override{
        if constexpr (std::is_same_v<T, std::string>) {
            value = val;
        } else {
            std::stringstream ss_val(val);
            if(!(ss_val >> value)) {
                throw std::invalid_argument("Incorrect type");
            }
        }
        is_string_literal = type == Lexer::TokenType::STRING_LITERAL; 
    }

    virtual T& gvalue() {return value;}
    static T& get(std::shared_ptr<_Argument> a) {
        return std::dynamic_pointer_cast<Argument<T> >(a)->gvalue();
    }
    private:
    bool is_string_literal;
    T value;
};

class ArgInput : public _Argument {
    public:
    ArgInput() {} 

    virtual void svalue(const std::string& val, const Lexer::TokenType& type) override{
        const std::string& txt = val;
        if(type == Lexer::TokenType::STRING_LITERAL) {
            str = std::stringstream(txt);
        } else {
            file = std::ifstream(txt, std::ios::in);
            if(!*file) {
                throw std::runtime_error("Failed to open file");
            }
        }
    }

    virtual std::istream& gvalue(){
        if(str)
            return *str;
        return *file;
    }

    static std::istream& get(std::shared_ptr<_Argument> a) {
        return std::dynamic_pointer_cast<ArgInput>(a)->gvalue();
    }

    private:
    std::optional<std::stringstream> str;
    std::optional<std::ifstream> file;
    
};

class ArgManager {
    friend class ArgFactory;

    using PosArgs = std::vector<std::shared_ptr<_Argument> >;
    using FlagOpts = std::unordered_map< std::string ,std::shared_ptr<_Argument> >;
    public:
    ArgManager() {}


    template<typename T>
    std::optional<T> get(const unsigned int id) {
        if((unsigned int) id < pos_argument.size()) return Argument<T>::get(pos_argument[id]);
        return std::make_optional<T>();
    }

    std::istream& get_input(const unsigned int id) {
        if(id < pos_argument.size()) return ArgInput::get(pos_argument[id]);
        return util::cin;
    }

    template<typename T>
    std::optional<T> get(const std::string& id) {
        if(flags.find(id) != flags.end()) return Argument<T>::get(flags[id]);
        return std::make_optional<T>();
    }

    bool get(const std::string& id) {
        return flags.find(id) != flags.end();
    }

    void push_arg(std::shared_ptr<_Argument> arg) {
        pos_argument.push_back(arg);
    }

    void push_flag(const std::string &id,std::shared_ptr<_Argument> arg = nullptr) {
        flags[id] = arg;
    }
    
    private:
    PosArgs pos_argument;
    FlagOpts flags;
};


class ArgFactory {
    
    using FlagNode = std::optional<std::string>&;
    using ArgNodes = std::vector<std::shared_ptr<CommandArgumentNode > >;


    struct ArgRule 
    {
        std::shared_ptr<_Argument> (*build) (void);
        bool mandatory;
        bool extends;
    };

    struct FlagRule
    {
        std::shared_ptr<_Argument> (*build) (void);
        bool specialinput; //Not implemented
        bool capturing;
        bool extends; //Not implemented
    };
    

    public:
    template<typename T>
    void add_rule(bool mandatory, bool extends = false) {
        pos_arg_rules.push_back({&_Argument::create<Argument<T> >, mandatory, extends});
    }

    void add_input_rule() {
        has_input = true;
        pos_arg_rules.push_back({&_Argument::create<ArgInput>, false, false});
    }

    template<typename T = bool >
    void add_rule(const std::string name, bool capturing = false) {
        flag_rules[name] = {_Argument::create<Argument<T> >, false, capturing, false};
    }

    void parse(ArgManager& manager, ArgNodes& vec, FlagNode flag) {
        if(flag) {
            parse_flag(manager, flag);
        }
        unsigned int i = 0;
        for(const auto& arg : vec) {
            std::shared_ptr<_Argument> a;
            if(i >= pos_arg_rules.size()) throw std::invalid_argument("More arguments then excpected");
            manager.push_arg(build_arg(pos_arg_rules[i].build, arg));
            if(!pos_arg_rules[i].extends) i++;
        }
    }

    bool ghas_input() {return has_input;}

    private:
    std::vector<ArgRule> pos_arg_rules;
    std::unordered_map<std::string, FlagRule> flag_rules;
    bool has_input = false;

    void parse_flag(ArgManager& manager, FlagNode flag) {
        const std::string f = *flag;
        int f_sz = f.size();
        for(const auto& [key, rule] : flag_rules) {
            const std::string_view k(key);
            if(k == f) {
                manager.push_flag(f);
                return;
            }

            if(rule.capturing && f == k.substr(0, f_sz)) {
                auto arg = build_arg(rule.build, (std::string) k.substr(f_sz));
                manager.push_flag(f, arg);
                return;
            }
        }
        throw std::invalid_argument("Invalid flag");
    }

    std::shared_ptr<_Argument> build_arg(std::shared_ptr<_Argument> (*build_func) (void),const std::string& str) {
        auto arg = build_func();
        arg->svalue(str);
        return arg;
    }

    std::shared_ptr<_Argument> build_arg(std::shared_ptr<_Argument> (*build_func) (void),
        std::shared_ptr<CommandArgumentNode> cmd_arg) {
        auto arg = build_func();
        arg->svalue(cmd_arg);
        return arg;
    }

};

}