aFunlang/include/core/core-activation.h

#ifndef AFUN_CORE_ACTIVATION_H
#define AFUN_CORE_ACTIVATION_H
#include "aFuntool.h"
#include "aFunCoreExport.h"
#include "msg.h"
#include "code.h"
#include "object-value.h"
#include "varlist.h"

namespace aFuncore {
    class Inter;

    class AFUN_CORE_EXPORT Activation {
    public:
        typedef enum ActivationStatus {
            as_run = 0,
            as_end = 1,
            as_end_run = 2,
        } ActivationStatus;

        Inter &inter;

        explicit Activation(Inter &inter_);
        virtual ~Activation();
        Activation &operator=(const Activation &)=delete;

        virtual ActivationStatus getCode(const Code::ByteCode *&code) = 0;
        virtual void runCode(const Code::ByteCode *code);
        virtual void endRun();

        [[nodiscard]] inline VarList *getVarlist() const;
        [[nodiscard]] inline UpMessage &getUpStream();
        [[nodiscard]] inline DownMessage &getDownStream();

        [[nodiscard]] inline aFuntool::FileLine getFileLine() const;
        [[nodiscard]] inline  const aFuntool::FilePath &getFilePath() const;

    protected:
        VarList *varlist;

        UpMessage up;
        DownMessage down;

        aFuntool::FilePath path;
        aFuntool::FileLine line;

        virtual void runCodeElement(const Code::ByteCode *code);
        virtual void runCodeBlockP(const Code::ByteCode *code);
        virtual void runCodeBlockC(const Code::ByteCode *code);
        virtual void runCodeBlockB(const Code::ByteCode *code);
    };

    class AFUN_CORE_EXPORT ExeActivation : public Activation {
    public:
        inline ExeActivation(const Code &code, Inter &inter_);
        inline ExeActivation(const Code::ByteCode *code, Inter &inter_);
        ActivationStatus getCode(const Code::ByteCode *&code) override;
        [[nodiscard]] inline const Code::ByteCode *getStart() const;

    private:
        const Code::ByteCode *start;
        const Code::ByteCode *next;
        bool first=true;
    };

    class AFUN_CORE_EXPORT TopActivation : public ExeActivation {
    public:
        explicit TopActivation(const Code &code, Inter &inter_);
        ~TopActivation() override = default;
        [[nodiscard]] inline const Code &getBase() const;

    private:
        const Code &base;
    };

    class AFUN_CORE_EXPORT FuncActivation : public Activation {
    public:
        explicit inline FuncActivation(const Code::ByteCode *code, Inter &inter_);
        explicit FuncActivation(Function *func, Inter &inter_);
        ~FuncActivation() override;
        ActivationStatus getCode(const Code::ByteCode *&code) override;
        void endRun() override;

    private:
        enum {
            func_first = 0,  // 获取函数体前准备
            func_get_func = 1,  // 获取函数体后，开始获取参数前
            func_get_arg = 2,  // 获取参数过程
        } status = func_first;

        bool on_tail = false;
        const Code::ByteCode *call;

        Function *func = nullptr;
        Function::CallFunction *call_func = nullptr;

        std::list<Function::CallFunction::ArgCodeList> *acl = nullptr;
        std::list<Function::CallFunction::ArgCodeList>::iterator acl_begin;
        std::list<Function::CallFunction::ArgCodeList>::iterator acl_end;
    };
}

#include "core-activation.inline.h"

#endif //AFUN_CORE_ACTIVATION_H