-
Notifications
You must be signed in to change notification settings - Fork 31
/
params.go
142 lines (136 loc) · 3.19 KB
/
params.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
package core
import (
"errors"
"fmt"
"reflect"
"github.com/MagicalTux/goro/core/phpobj"
"github.com/MagicalTux/goro/core/phpv"
)
var ErrNotEnoughArguments = errors.New("Too few arguments")
func zvalStore(ctx phpv.Context, z *phpv.ZVal, out interface{}) error {
switch tgt := out.(type) {
case *bool:
s, err := z.As(ctx, phpv.ZtBool)
if err != nil {
return err
}
*tgt = bool(s.Value().(phpv.ZBool))
return nil
case *phpv.ZBool:
s, err := z.As(ctx, phpv.ZtBool)
if err != nil {
return err
}
*tgt = s.Value().(phpv.ZBool)
return nil
case *phpv.ZInt:
s, err := z.As(ctx, phpv.ZtInt)
if err != nil {
return err
}
*tgt = s.Value().(phpv.ZInt)
return nil
case *phpv.ZFloat:
s, err := z.As(ctx, phpv.ZtFloat)
if err != nil {
return err
}
*tgt = s.Value().(phpv.ZFloat)
return nil
case *string:
s, err := z.As(ctx, phpv.ZtString)
if err != nil {
return err
}
*tgt = string(s.Value().(phpv.ZString))
return nil
case *phpv.ZString:
s, err := z.As(ctx, phpv.ZtString)
if err != nil {
return err
}
*tgt = s.Value().(phpv.ZString)
return nil
case *phpv.Callable:
s, err := SpawnCallable(ctx, z)
if err != nil {
return err
}
*tgt = s
return nil
case **phpobj.ZObject:
s, err := z.As(ctx, phpv.ZtObject)
if err != nil {
return err
}
obj, ok := s.Value().(*phpobj.ZObject)
if !ok {
return fmt.Errorf("expected parameter to be object, %s given", z.GetType())
}
if *tgt != nil {
if (*tgt).Class != nil {
// check implements
if (*tgt).Class != obj.Class {
// TODO fix parameter #
return fmt.Errorf("expects parameter %d to be %s, %s given", 1, (*tgt).Class.GetName(), z.GetType())
}
}
}
*tgt = obj
return nil
case **phpv.ZArray:
s, err := z.As(ctx, phpv.ZtArray)
if err != nil {
return err
}
ar, ok := s.Value().(*phpv.ZArray)
if !ok {
return fmt.Errorf("expected parameter to be array, %s given", z.GetType())
}
*tgt = ar
return nil
case **phpv.ZVal:
// as is
*tgt = z
return nil
default:
return fmt.Errorf("unsupported target type %T", out)
}
}
func Expand(ctx phpv.Context, args []*phpv.ZVal, out ...interface{}) (int, error) {
for i, v := range out {
rv := reflect.ValueOf(v)
if rv.Kind() != reflect.Ptr {
panic("expand requires arguments to be pointers")
}
if rv.Type().Elem().Kind() == reflect.Ptr {
switch rv.Type().Elem() {
// these are expected to be pointers
case reflect.TypeOf(&phpv.ZVal{}):
case reflect.TypeOf(&phpobj.ZObject{}):
case reflect.TypeOf(&phpv.ZArray{}):
default:
// pointer of pointer → optional argument
if len(args) <= i {
// end of argments
continue
}
// we have an argument → instanciate and update v to point to the subvalue
newv := reflect.New(rv.Type().Elem().Elem())
rv.Elem().Set(newv)
v = newv.Interface()
}
}
if len(args) <= i {
// not enough arguments, such errors in PHP can be returned as either:
// Uncaught ArgumentCountError: Too few arguments to function toto(), 0 passed
// x() expects at least 2 parameters, 0 given
return i, ErrNotEnoughArguments
}
err := zvalStore(ctx, args[i], v)
if err != nil {
return i, err
}
}
return len(out), nil
}