1 | /*
|
---|
2 | ** mruby/variable.h - mruby variables
|
---|
3 | **
|
---|
4 | ** See Copyright Notice in mruby.h
|
---|
5 | */
|
---|
6 |
|
---|
7 | #ifndef MRUBY_VARIABLE_H
|
---|
8 | #define MRUBY_VARIABLE_H
|
---|
9 |
|
---|
10 | #include "common.h"
|
---|
11 |
|
---|
12 | /**
|
---|
13 | * Functions to access mruby variables.
|
---|
14 | */
|
---|
15 | MRB_BEGIN_DECL
|
---|
16 |
|
---|
17 | typedef struct global_variable {
|
---|
18 | int counter;
|
---|
19 | mrb_value *data;
|
---|
20 | mrb_value (*getter)(void);
|
---|
21 | void (*setter)(void);
|
---|
22 | /* void (*marker)(); */
|
---|
23 | /* int block_trace; */
|
---|
24 | /* struct trace_var *trace; */
|
---|
25 | } global_variable;
|
---|
26 |
|
---|
27 | struct global_entry {
|
---|
28 | global_variable *var;
|
---|
29 | mrb_sym id;
|
---|
30 | };
|
---|
31 |
|
---|
32 | mrb_value mrb_vm_special_get(mrb_state*, mrb_sym);
|
---|
33 | void mrb_vm_special_set(mrb_state*, mrb_sym, mrb_value);
|
---|
34 | mrb_value mrb_vm_iv_get(mrb_state*, mrb_sym);
|
---|
35 | void mrb_vm_iv_set(mrb_state*, mrb_sym, mrb_value);
|
---|
36 | mrb_value mrb_vm_cv_get(mrb_state*, mrb_sym);
|
---|
37 | void mrb_vm_cv_set(mrb_state*, mrb_sym, mrb_value);
|
---|
38 | mrb_value mrb_vm_const_get(mrb_state*, mrb_sym);
|
---|
39 | void mrb_vm_const_set(mrb_state*, mrb_sym, mrb_value);
|
---|
40 | MRB_API mrb_value mrb_const_get(mrb_state*, mrb_value, mrb_sym);
|
---|
41 | MRB_API void mrb_const_set(mrb_state*, mrb_value, mrb_sym, mrb_value);
|
---|
42 | MRB_API mrb_bool mrb_const_defined(mrb_state*, mrb_value, mrb_sym);
|
---|
43 | MRB_API void mrb_const_remove(mrb_state*, mrb_value, mrb_sym);
|
---|
44 |
|
---|
45 | MRB_API mrb_bool mrb_iv_p(mrb_state *mrb, mrb_sym sym);
|
---|
46 | MRB_API void mrb_iv_check(mrb_state *mrb, mrb_sym sym);
|
---|
47 | MRB_API mrb_value mrb_obj_iv_get(mrb_state *mrb, struct RObject *obj, mrb_sym sym);
|
---|
48 | MRB_API void mrb_obj_iv_set(mrb_state *mrb, struct RObject *obj, mrb_sym sym, mrb_value v);
|
---|
49 | MRB_API mrb_bool mrb_obj_iv_defined(mrb_state *mrb, struct RObject *obj, mrb_sym sym);
|
---|
50 | MRB_API void mrb_obj_iv_ifnone(mrb_state *mrb, struct RObject *obj, mrb_sym sym, mrb_value v);
|
---|
51 | MRB_API mrb_value mrb_iv_get(mrb_state *mrb, mrb_value obj, mrb_sym sym);
|
---|
52 | MRB_API void mrb_iv_set(mrb_state *mrb, mrb_value obj, mrb_sym sym, mrb_value v);
|
---|
53 | MRB_API mrb_bool mrb_iv_defined(mrb_state*, mrb_value, mrb_sym);
|
---|
54 | MRB_API mrb_value mrb_iv_remove(mrb_state *mrb, mrb_value obj, mrb_sym sym);
|
---|
55 | MRB_API void mrb_iv_copy(mrb_state *mrb, mrb_value dst, mrb_value src);
|
---|
56 | MRB_API mrb_bool mrb_const_defined_at(mrb_state *mrb, mrb_value mod, mrb_sym id);
|
---|
57 |
|
---|
58 | /**
|
---|
59 | * Get a global variable. Will return nil if the var does not exist
|
---|
60 | *
|
---|
61 | * Example:
|
---|
62 | *
|
---|
63 | * !!!ruby
|
---|
64 | * # Ruby style
|
---|
65 | * var = $value
|
---|
66 | *
|
---|
67 | * !!!c
|
---|
68 | * // C style
|
---|
69 | * mrb_sym sym = mrb_intern_lit(mrb, "$value");
|
---|
70 | * mrb_value var = mrb_gv_get(mrb, sym);
|
---|
71 | *
|
---|
72 | * @param mrb The mruby state reference
|
---|
73 | * @param sym The name of the global variable
|
---|
74 | * @return The value of that global variable. May be nil
|
---|
75 | */
|
---|
76 | MRB_API mrb_value mrb_gv_get(mrb_state *mrb, mrb_sym sym);
|
---|
77 |
|
---|
78 | /**
|
---|
79 | * Set a global variable
|
---|
80 | *
|
---|
81 | * Example:
|
---|
82 | *
|
---|
83 | * !!!ruby
|
---|
84 | * # Ruby style
|
---|
85 | * $value = "foo"
|
---|
86 | *
|
---|
87 | * !!!c
|
---|
88 | * // C style
|
---|
89 | * mrb_sym sym = mrb_intern_lit(mrb, "$value");
|
---|
90 | * mrb_gv_set(mrb, sym, mrb_str_new_lit("foo"));
|
---|
91 | *
|
---|
92 | * @param mrb The mruby state reference
|
---|
93 | * @param sym The name of the global variable
|
---|
94 | * @param val The value of the global variable
|
---|
95 | */
|
---|
96 | MRB_API void mrb_gv_set(mrb_state *mrb, mrb_sym sym, mrb_value val);
|
---|
97 |
|
---|
98 | /**
|
---|
99 | * Remove a global variable.
|
---|
100 | *
|
---|
101 | * Example:
|
---|
102 | *
|
---|
103 | * !!!ruby
|
---|
104 | * # Ruby style
|
---|
105 | * $value = nil
|
---|
106 | *
|
---|
107 | * !!!c
|
---|
108 | * // C style
|
---|
109 | * mrb_sym sym = mrb_intern_lit(mrb, "$value");
|
---|
110 | * mrb_gv_remove(mrb, sym);
|
---|
111 | *
|
---|
112 | * @param mrb The mruby state reference
|
---|
113 | * @param sym The name of the global variable
|
---|
114 | * @param val The value of the global variable
|
---|
115 | */
|
---|
116 | MRB_API void mrb_gv_remove(mrb_state *mrb, mrb_sym sym);
|
---|
117 |
|
---|
118 | MRB_API mrb_value mrb_cv_get(mrb_state *mrb, mrb_value mod, mrb_sym sym);
|
---|
119 | MRB_API void mrb_mod_cv_set(mrb_state *mrb, struct RClass * c, mrb_sym sym, mrb_value v);
|
---|
120 | MRB_API void mrb_cv_set(mrb_state *mrb, mrb_value mod, mrb_sym sym, mrb_value v);
|
---|
121 | MRB_API mrb_bool mrb_cv_defined(mrb_state *mrb, mrb_value mod, mrb_sym sym);
|
---|
122 | mrb_value mrb_obj_iv_inspect(mrb_state*, struct RObject*);
|
---|
123 | mrb_value mrb_mod_constants(mrb_state *mrb, mrb_value mod);
|
---|
124 | mrb_value mrb_f_global_variables(mrb_state *mrb, mrb_value self);
|
---|
125 | mrb_value mrb_obj_instance_variables(mrb_state*, mrb_value);
|
---|
126 | mrb_value mrb_mod_class_variables(mrb_state*, mrb_value);
|
---|
127 | mrb_value mrb_mod_cv_get(mrb_state *mrb, struct RClass * c, mrb_sym sym);
|
---|
128 | mrb_bool mrb_mod_cv_defined(mrb_state *mrb, struct RClass * c, mrb_sym sym);
|
---|
129 | mrb_sym mrb_class_sym(mrb_state *mrb, struct RClass *c, struct RClass *outer);
|
---|
130 |
|
---|
131 | /* GC functions */
|
---|
132 | void mrb_gc_mark_gv(mrb_state*);
|
---|
133 | void mrb_gc_free_gv(mrb_state*);
|
---|
134 | void mrb_gc_mark_iv(mrb_state*, struct RObject*);
|
---|
135 | size_t mrb_gc_mark_iv_size(mrb_state*, struct RObject*);
|
---|
136 | void mrb_gc_free_iv(mrb_state*, struct RObject*);
|
---|
137 |
|
---|
138 | MRB_END_DECL
|
---|
139 |
|
---|
140 | #endif /* MRUBY_VARIABLE_H */
|
---|