150 lines
3.5 KiB
C++
150 lines
3.5 KiB
C++
#ifndef LIBCUBESCRIPT_ALIAS_HH
|
|
#define LIBCUBESCRIPT_ALIAS_HH
|
|
|
|
#include <cubescript/cubescript.hh>
|
|
|
|
#include <bitset>
|
|
|
|
namespace cubescript {
|
|
|
|
static constexpr std::size_t MAX_ARGUMENTS = 32;
|
|
using argset = std::bitset<MAX_ARGUMENTS>;
|
|
|
|
enum {
|
|
ID_UNKNOWN = -1, ID_IVAR, ID_FVAR, ID_SVAR, ID_COMMAND, ID_ALIAS,
|
|
ID_LOCAL, ID_DO, ID_DOARGS, ID_IF, ID_BREAK, ID_CONTINUE, ID_RESULT,
|
|
ID_NOT, ID_AND, ID_OR
|
|
};
|
|
|
|
enum {
|
|
IDENT_FLAG_UNKNOWN = 1 << 0,
|
|
IDENT_FLAG_ARG = 1 << 1,
|
|
IDENT_FLAG_READONLY = 1 << 2,
|
|
IDENT_FLAG_OVERRIDE = 1 << 3,
|
|
IDENT_FLAG_OVERRIDDEN = 1 << 4,
|
|
IDENT_FLAG_PERSIST = 1 << 5
|
|
};
|
|
|
|
struct ident_stack {
|
|
any_value val_s;
|
|
bcode_ref code;
|
|
ident_stack *next;
|
|
ident_stack(): val_s{}, code{}, next{nullptr} {}
|
|
};
|
|
|
|
struct alias_stack {
|
|
ident_stack *node = nullptr;
|
|
int flags = 0;
|
|
|
|
void push(ident_stack &st);
|
|
void pop();
|
|
|
|
void set_arg(alias *a, thread_state &ts, any_value &v);
|
|
void set_alias(alias *a, thread_state &ts, any_value &v);
|
|
};
|
|
|
|
struct ident_link {
|
|
ident *id;
|
|
ident_link *next;
|
|
std::bitset<MAX_ARGUMENTS> usedargs;
|
|
};
|
|
|
|
struct ident_impl {
|
|
ident_impl() = delete;
|
|
ident_impl(ident_impl const &) = delete;
|
|
ident_impl(ident_impl &&) = delete;
|
|
|
|
/* trigger destructors for all inherited members properly */
|
|
virtual ~ident_impl() {};
|
|
|
|
ident_impl &operator=(ident_impl const &) = delete;
|
|
ident_impl &operator=(ident_impl &&) = delete;
|
|
|
|
ident_impl(ident_type tp, string_ref name, int flags = 0);
|
|
|
|
string_ref p_name;
|
|
/* represents the ident_type above, but internally it has a wider
|
|
* variety of values, so it's an int here (maps to an internal enum)
|
|
*/
|
|
int p_type, p_flags;
|
|
|
|
int p_index = -1;
|
|
};
|
|
|
|
bool ident_is_callable(ident const *id);
|
|
|
|
struct var_impl: ident_impl {
|
|
var_impl(ident_type tp, string_ref name, int flags);
|
|
|
|
virtual void save_val() = 0;
|
|
|
|
void changed(thread_state &ts);
|
|
};
|
|
|
|
void var_changed(thread_state &ts, ident *id);
|
|
|
|
struct ivar_impl: var_impl, integer_var {
|
|
ivar_impl(string_ref n, integer_type v, int flags);
|
|
|
|
void save_val();
|
|
|
|
integer_type p_storage;
|
|
integer_type p_override;
|
|
};
|
|
|
|
struct fvar_impl: var_impl, float_var {
|
|
fvar_impl(string_ref n, float_type v, int flags);
|
|
|
|
void save_val();
|
|
|
|
float_type p_storage;
|
|
float_type p_override;
|
|
};
|
|
|
|
struct svar_impl: var_impl, string_var {
|
|
svar_impl(string_ref n, string_ref v, int flags);
|
|
|
|
void save_val();
|
|
|
|
string_ref p_storage;
|
|
string_ref p_override;
|
|
};
|
|
|
|
struct alias_impl: ident_impl, alias {
|
|
alias_impl(state &cs, string_ref n, string_ref a, int flags);
|
|
alias_impl(state &cs, string_ref n, std::string_view a, int flags);
|
|
alias_impl(state &cs, string_ref n, integer_type a, int flags);
|
|
alias_impl(state &cs, string_ref n, float_type a, int flags);
|
|
alias_impl(state &cs, string_ref n, int flags);
|
|
alias_impl(state &cs, string_ref n, any_value v, int flags);
|
|
|
|
ident_stack p_initial;
|
|
};
|
|
|
|
struct command_impl: ident_impl, command {
|
|
command_impl(
|
|
string_ref name, string_ref args, int numargs, command_func func
|
|
);
|
|
|
|
void call(thread_state &ts, std::span<any_value> args, any_value &ret);
|
|
|
|
string_ref p_cargs;
|
|
command_func p_cb_cftv;
|
|
int p_numargs;
|
|
};
|
|
|
|
bool ident_is_used_arg(ident *id, thread_state &ts);
|
|
|
|
struct ident_p {
|
|
ident_p(ident &id): ip{&id} {}
|
|
|
|
ident_impl &impl() { return *ip->p_impl; }
|
|
void impl(ident_impl *impl) { ip->p_impl = impl; }
|
|
|
|
ident *ip;
|
|
};
|
|
|
|
} /* namespace cubescript */
|
|
|
|
#endif
|