-
Notifications
You must be signed in to change notification settings - Fork 10
/
govalue.go
340 lines (330 loc) · 8.83 KB
/
govalue.go
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
206
207
208
209
210
211
212
213
214
215
216
217
218
219
220
221
222
223
224
225
226
227
228
229
230
231
232
233
234
235
236
237
238
239
240
241
242
243
244
245
246
247
248
249
250
251
252
253
254
255
256
257
258
259
260
261
262
263
264
265
266
267
268
269
270
271
272
273
274
275
276
277
278
279
280
281
282
283
284
285
286
287
288
289
290
291
292
293
294
295
296
297
298
299
300
301
302
303
304
305
306
307
308
309
310
311
312
313
314
315
316
317
318
319
320
321
322
323
324
325
326
327
328
329
330
331
332
333
334
335
336
337
338
339
340
package golib
import (
"errors"
"fmt"
"reflect"
rt "github.com/arnodel/golua/runtime"
)
// Index tries to find the value of the go value at "index" v. This could mean
// finding a method or a struct field or a map key or a slice index.
func goIndex(t *rt.Thread, u *rt.UserData, key rt.Value) (rt.Value, error) {
gv := reflect.ValueOf(u.Value())
meta := u.Metatable()
field, ok := key.ToString()
if ok {
// First try a method
m := gv.MethodByName(string(field))
if m != (reflect.Value{}) {
return reflectToValue(m, meta), nil
}
if gv.CanAddr() {
// Is that even possible?
m = gv.Addr().MethodByName(string(field))
if m != (reflect.Value{}) {
return reflectToValue(m, meta), nil
}
}
}
switch gv.Kind() {
case reflect.Ptr:
gv = gv.Elem()
if gv.Kind() != reflect.Struct {
return rt.NilValue, errors.New("can only index a pointer when to a struct")
}
fallthrough
case reflect.Struct:
if !ok {
return rt.NilValue, errors.New("can only index a struct with a string")
}
f := gv.FieldByName(string(field))
if f != (reflect.Value{}) {
return reflectToValue(f, meta), nil
}
return rt.NilValue, fmt.Errorf("no field or method with name %q", field)
case reflect.Map:
goV, err := valueToType(t, key, gv.Type().Key())
if err != nil {
return rt.NilValue, fmt.Errorf("map index or incorrect type: %s", err)
}
return reflectToValue(gv.MapIndex(goV), meta), nil
case reflect.Slice:
i, ok := rt.ToInt(key)
if !ok {
return rt.NilValue, errors.New("slice index must be an integer")
}
if i < 0 || int(i) >= gv.Len() {
return rt.NilValue, errors.New("index out of slice bounds")
}
return reflectToValue(gv.Index(int(i)), meta), nil
}
return rt.NilValue, errors.New("unable to index")
}
// SetIndex tries to set the value of the index given by key to val. This could
// mean setting a struct field value or a map value or a slice item.
func goSetIndex(t *rt.Thread, u *rt.UserData, key rt.Value, val rt.Value) error {
gv := reflect.ValueOf(u.Value())
switch gv.Kind() {
case reflect.Ptr:
gv = gv.Elem()
if gv.Kind() != reflect.Struct {
return errors.New("can only set pointer index when pointing to a struct")
}
fallthrough
case reflect.Struct:
field, ok := key.ToString()
if !ok {
return errors.New("can only set struct index for a string")
}
f := gv.FieldByName(string(field))
if f == (reflect.Value{}) {
return errors.New("struct does not have field: " + string(field))
}
if !f.CanSet() {
return errors.New("struct field cannot be set")
}
goVal, err := valueToType(t, val, f.Type())
if err != nil {
return fmt.Errorf("struct field of incompatible type: %s", err)
}
f.Set(goVal)
return nil
case reflect.Map:
goKey, err := valueToType(t, key, gv.Type().Key())
if err != nil {
return fmt.Errorf("map key of incompatible type: %s", err)
}
goVal, err := valueToType(t, val, gv.Type().Elem())
if err != nil {
return fmt.Errorf("map value set to incompatible type: %s", err)
}
gv.SetMapIndex(goKey, goVal)
return nil
case reflect.Slice:
i, ok := rt.ToInt(key)
if !ok {
return errors.New("slice index must be an integer")
}
if i < 0 || int(i) >= gv.Len() {
return errors.New("slice index out of bounds")
}
goVal, err := valueToType(t, val, gv.Type().Elem())
if err != nil {
return fmt.Errorf("slice item set to incompatible type: %s", err)
}
gv.Index(int(i)).Set(goVal)
return nil
}
return errors.New("unable to set index")
}
// Call tries to call the goValue if it is a function with the given arguments.
func goCall(t *rt.Thread, u *rt.UserData, args []rt.Value) (res []rt.Value, err error) {
gv := reflect.ValueOf(u.Value())
meta := u.Metatable()
if gv.Kind() != reflect.Func {
return nil, fmt.Errorf("%s is not a function", gv.Kind())
}
f := gv.Type()
numParams := f.NumIn()
goArgs := make([]reflect.Value, numParams)
isVariadic := f.IsVariadic()
if isVariadic {
numParams--
}
var goArg reflect.Value
for i := 0; i < numParams; i++ {
if i < len(args) {
goArg, err = valueToType(t, args[i], f.In(i))
if err != nil {
return
}
} else {
goArg = reflect.Zero(f.In(i))
}
goArgs[i] = goArg
}
var goRes []reflect.Value
defer func() {
if r := recover(); r != nil {
err = fmt.Errorf("panic in go call: %v", r)
}
}()
if isVariadic {
etcSliceType := f.In(numParams)
etcType := etcSliceType.Elem()
etcLen := len(args) - numParams
etc := reflect.MakeSlice(etcSliceType, etcLen, etcLen)
for i := 0; i < etcLen; i++ {
goArg, err = valueToType(t, args[i+numParams], etcType)
if err != nil {
return nil, err
}
etc.Index(i).Set(goArg)
}
goArgs[numParams] = etc
goRes = gv.CallSlice(goArgs)
} else {
goRes = gv.Call(goArgs)
}
res = make([]rt.Value, len(goRes))
for i, x := range goRes {
res[i] = reflectToValue(x, meta)
}
return
}
func fillStruct(t *rt.Thread, s reflect.Value, v rt.Value) error {
var ok bool
tbl, ok := v.TryTable()
if !ok {
return errors.New("fillStruct: can only fill from a table")
}
var fk, fv rt.Value
for {
fk, fv, ok = tbl.Next(fk)
if !ok || fk.IsNil() {
break
}
name, ok := fk.TryString()
if !ok {
return errors.New("fillStruct: table fields must be strings")
}
field := s.FieldByName(string(name))
if field == (reflect.Value{}) {
return fmt.Errorf("fillStruct: field %q does not exist in struct", name)
}
goFv, err := valueToType(t, fv, field.Type())
if err != nil {
return err
}
field.Set(goFv)
}
return nil
}
func valueToFunc(t *rt.Thread, v rt.Value, tp reflect.Type) (reflect.Value, error) {
meta := getMeta(t.Runtime)
fn := func(in []reflect.Value) []reflect.Value {
args := make([]rt.Value, len(in))
for i, x := range in {
args[i] = reflectToValue(x, meta)
}
res := make([]rt.Value, tp.NumOut())
out := make([]reflect.Value, len(res))
term := rt.NewTermination(t.CurrentCont(), res, nil)
if err := rt.Call(t, v, args, term); err != nil {
panic(err)
}
var err error
for i, y := range res {
out[i], err = valueToType(t, y, tp.Out(i))
if err != nil {
panic(err)
}
}
return out
}
return reflect.MakeFunc(tp, fn), nil
}
var runtimeValueType = reflect.TypeOf(rt.Value{})
func valueToType(t *rt.Thread, v rt.Value, tp reflect.Type) (reflect.Value, error) {
if tp == runtimeValueType {
return reflect.ValueOf(v), nil
}
// Fist we deal with UserData
if u, ok := v.TryUserData(); ok {
gv := reflect.ValueOf(u.Value())
if gv.Type().AssignableTo(tp) {
return gv, nil
}
if gv.Type().ConvertibleTo(tp) {
return gv.Convert(tp), nil
}
return reflect.Value{}, fmt.Errorf("%+v is not assignable or convertible to %s", u.Value(), tp.Name())
}
switch tp.Kind() {
case reflect.Ptr:
if tp.Elem().Kind() != reflect.Struct {
return reflect.Value{}, fmt.Errorf("lua value cannot be converted to %s", tp.Name())
}
p := reflect.New(tp.Elem())
if err := fillStruct(t, p.Elem(), v); err != nil {
return reflect.Value{}, err
}
return p, nil
case reflect.Struct:
s := reflect.Zero(tp)
if err := fillStruct(t, s, v); err != nil {
return reflect.Value{}, err
}
return s, nil
case reflect.Func:
return valueToFunc(t, v, tp)
case reflect.Int:
x, ok := rt.ToInt(v)
if ok {
return reflect.ValueOf(int(x)), nil
}
case reflect.Float64:
x, ok := rt.ToFloat(v)
if ok {
return reflect.ValueOf(float64(x)), nil
}
case reflect.String:
x, ok := v.ToString()
if ok {
return reflect.ValueOf(string(x)), nil
}
case reflect.Bool:
return reflect.ValueOf(rt.Truth(v)), nil
case reflect.Slice:
if tp.Elem().Kind() == reflect.Uint8 {
s, ok := v.TryString()
if ok {
return reflect.ValueOf([]byte(s)), nil
}
}
case reflect.Interface:
iface := v.Interface()
if reflect.TypeOf(iface).Implements(tp) {
return reflect.ValueOf(iface), nil
}
}
return reflect.Value{}, fmt.Errorf("%+v cannot be converted to %s", v, tp.Name())
}
func reflectToValue(v reflect.Value, meta *rt.Table) rt.Value {
if v == (reflect.Value{}) {
return rt.NilValue
}
switch v.Kind() {
case reflect.Int, reflect.Int8, reflect.Int16, reflect.Int32, reflect.Int64:
return rt.IntValue(v.Int())
case reflect.Uint, reflect.Uint8, reflect.Uint16, reflect.Uint32, reflect.Uint64:
return rt.IntValue(int64(v.Uint()))
case reflect.Float32, reflect.Float64:
return rt.FloatValue(v.Float())
case reflect.String:
return rt.StringValue(v.String())
case reflect.Bool:
return rt.BoolValue(v.Bool())
case reflect.Slice:
if v.IsNil() {
return rt.NilValue
}
if v.Type().Elem().Kind() == reflect.Uint8 {
return rt.StringValue(string(v.Interface().([]byte)))
}
case reflect.Ptr:
if v.IsNil() {
return rt.NilValue
}
switch x := v.Interface().(type) {
case *rt.Table:
return rt.TableValue(x)
case *rt.UserData:
return rt.UserDataValue(x)
}
case reflect.Interface:
if v.IsNil() {
return rt.NilValue
}
}
return rt.UserDataValue(rt.NewUserData(v.Interface(), meta))
}