summaryrefslogtreecommitdiff
path: root/internal/caddyscript/lib
diff options
context:
space:
mode:
Diffstat (limited to 'internal/caddyscript/lib')
-rw-r--r--internal/caddyscript/lib/http.go72
-rw-r--r--internal/caddyscript/lib/lib.go11
-rw-r--r--internal/caddyscript/lib/regex.go50
-rw-r--r--internal/caddyscript/lib/time.go130
4 files changed, 263 insertions, 0 deletions
diff --git a/internal/caddyscript/lib/http.go b/internal/caddyscript/lib/http.go
new file mode 100644
index 0000000..233b43f
--- /dev/null
+++ b/internal/caddyscript/lib/http.go
@@ -0,0 +1,72 @@
+package caddyscript
+
+import (
+ "fmt"
+ "net/http"
+
+ "go.starlark.net/starlark"
+)
+
+// HTTPRequest represents an http request type in caddyscript.
+type HTTPRequest struct{ Req *http.Request }
+
+// AttrNames defines what properties and methods are available on the HTTPRequest type.
+func (r HTTPRequest) AttrNames() []string {
+ return []string{"header", "query", "url", "method", "host", "tls"}
+}
+
+func (r HTTPRequest) Freeze() {}
+func (r HTTPRequest) Hash() (uint32, error) { return 0, fmt.Errorf("unhashable: HTTPRequest") }
+func (r HTTPRequest) String() string { return fmt.Sprint(r.Req) }
+func (r HTTPRequest) Type() string { return "HTTPRequest" }
+func (r HTTPRequest) Truth() starlark.Bool { return true }
+
+// Header handles returning a header key.
+func (r HTTPRequest) Header(thread *starlark.Thread, fn *starlark.Builtin, args starlark.Tuple, kwargs []starlark.Tuple) (starlark.Value, error) {
+ var key string
+ err := starlark.UnpackPositionalArgs(fn.Name(), args, kwargs, 1, &key)
+ if err != nil {
+ return starlark.None, fmt.Errorf("get request header: %v", err.Error())
+ }
+
+ return starlark.String(r.Req.Header.Get(key)), nil
+}
+
+// Attr defines what happens when props or methods are called on the HTTPRequest type.
+func (r HTTPRequest) Attr(name string) (starlark.Value, error) {
+ switch name {
+ case "tls":
+ tls := new(starlark.Dict)
+ tls.SetKey(starlark.String("cipher_suite"), starlark.MakeUint(uint(r.Req.TLS.CipherSuite)))
+ tls.SetKey(starlark.String("did_resume"), starlark.Bool(r.Req.TLS.DidResume))
+ tls.SetKey(starlark.String("handshake_complete"), starlark.Bool(r.Req.TLS.HandshakeComplete))
+ tls.SetKey(starlark.String("negotiated_protocol"), starlark.String(r.Req.TLS.NegotiatedProtocol))
+ tls.SetKey(starlark.String("negotiated_protocol_is_mutual"), starlark.Bool(r.Req.TLS.NegotiatedProtocolIsMutual))
+ tls.SetKey(starlark.String("server_name"), starlark.String(r.Req.TLS.ServerName))
+ tls.SetKey(starlark.String("version"), starlark.String(r.Req.TLS.Version))
+
+ return tls, nil
+ case "header":
+ b := starlark.NewBuiltin("Header", r.Header)
+ b = b.BindReceiver(r)
+
+ return b, nil
+ case "query":
+ qVals := r.Req.URL.Query()
+ query := starlark.NewDict(len(qVals))
+
+ for k, v := range qVals {
+ query.SetKey(starlark.String(k), starlark.String(v[0]))
+ }
+
+ return query, nil
+ case "url":
+ return starlark.String(r.Req.URL.Path), nil
+ case "method":
+ return starlark.String(r.Req.Method), nil
+ case "host":
+ return starlark.String(r.Req.Host), nil
+ }
+
+ return nil, nil
+}
diff --git a/internal/caddyscript/lib/lib.go b/internal/caddyscript/lib/lib.go
new file mode 100644
index 0000000..7853e7a
--- /dev/null
+++ b/internal/caddyscript/lib/lib.go
@@ -0,0 +1,11 @@
+package caddyscript
+
+import (
+ "fmt"
+
+ "go.starlark.net/starlark"
+)
+
+func invalidReciever(v starlark.Value, want string) (starlark.Value, error) {
+ return starlark.None, fmt.Errorf("invalid receiver: receiver set to type %v, want %v", v.Type(), want)
+}
diff --git a/internal/caddyscript/lib/regex.go b/internal/caddyscript/lib/regex.go
new file mode 100644
index 0000000..a06a410
--- /dev/null
+++ b/internal/caddyscript/lib/regex.go
@@ -0,0 +1,50 @@
+package caddyscript
+
+import (
+ "fmt"
+ "regexp"
+
+ "go.starlark.net/starlark"
+)
+
+// Regexp represents a regexp type for caddyscript.
+type Regexp struct{}
+
+// AttrNames defines what properties and methods are available on the Time type.
+func (r Regexp) AttrNames() []string {
+ return []string{"match_string"}
+}
+
+// Attr defines what happens when props or methods are called on the Time type.
+func (r Regexp) Attr(name string) (starlark.Value, error) {
+ switch name {
+ case "match_string":
+ b := starlark.NewBuiltin("match_string", r.MatchString)
+ b = b.BindReceiver(r)
+ return b, nil
+ }
+
+ return nil, nil
+}
+
+// MatchString reports whether the string s contains any match of the regular expression pattern. More complicated queries need to use Compile and the full Regexp interface.
+func (r Regexp) MatchString(thread *starlark.Thread, fn *starlark.Builtin, args starlark.Tuple, kwargs []starlark.Tuple) (starlark.Value, error) {
+ var pattern, match string
+ err := starlark.UnpackPositionalArgs(fn.Name(), args, kwargs, 2, &pattern, &match)
+ if err != nil {
+ return starlark.None, fmt.Errorf("could not unpack args: %v", err.Error())
+ }
+
+ matched, err := regexp.MatchString(pattern, match)
+ if err != nil {
+ return starlark.False, fmt.Errorf("matchstring: %v", err.Error())
+ }
+
+ return starlark.Bool(matched), nil
+}
+
+func (r Regexp) Freeze() {}
+func (r Regexp) Hash() (uint32, error) { return 0, fmt.Errorf("unhashable: Regexp") }
+func (r Regexp) String() string { return fmt.Sprint(r) }
+func (r Regexp) Type() string { return "Regexp" }
+func (r Regexp) Truth() starlark.Bool { return true }
diff --git a/internal/caddyscript/lib/time.go b/internal/caddyscript/lib/time.go
new file mode 100644
index 0000000..2ab57cc
--- /dev/null
+++ b/internal/caddyscript/lib/time.go
@@ -0,0 +1,130 @@
+package caddyscript
+
+import (
+ "fmt"
+ ti "time"
+
+ "go.starlark.net/starlark"
+)
+
+// Time represents a time type for caddyscript.
+type Time struct {
+ value int64 // time since epoch in nanoseconds
+}
+
+// AttrNames defines what properties and methods are available on the Time type.
+func (r Time) AttrNames() []string {
+ return []string{"now", "parse", "add", "subtract", "minute", "hour", "day", "value"}
+}
+
+// Attr defines what happens when props or methods are called on the Time type.
+func (r Time) Attr(name string) (starlark.Value, error) {
+ switch name {
+ case "now":
+ b := starlark.NewBuiltin("now", r.Now)
+ b = b.BindReceiver(r)
+ return b, nil
+ case "parse_duration":
+ b := starlark.NewBuiltin("parse_duration", r.ParseDuration)
+ b = b.BindReceiver(r)
+ return b, nil
+ case "add":
+ b := starlark.NewBuiltin("add", r.Add)
+ b = b.BindReceiver(r)
+ return b, nil
+ case "subtract":
+ b := starlark.NewBuiltin("subtract", r.Subtract)
+ b = b.BindReceiver(r)
+ return b, nil
+ case "minute":
+ b := starlark.NewBuiltin("minute", r.Minute)
+ b = b.BindReceiver(r)
+ return b, nil
+ case "hour":
+ b := starlark.NewBuiltin("hour", r.Hour)
+ b = b.BindReceiver(r)
+ return b, nil
+ case "day":
+ b := starlark.NewBuiltin("day", r.Day)
+ b = b.BindReceiver(r)
+ return b, nil
+ case "value":
+ return starlark.MakeInt64(r.value), nil
+ }
+
+ return nil, nil
+}
+
+func (r Time) Freeze() {}
+func (r Time) Hash() (uint32, error) { return 0, fmt.Errorf("unhashable: Time") }
+func (r Time) String() string { return fmt.Sprint(r.value) }
+func (r Time) Type() string { return "Time" }
+func (r Time) Truth() starlark.Bool { return true }
+
+// Hour returns the current hour of a unix timestamp in range [0, 23].
+func (r Time) Hour(thread *starlark.Thread, fn *starlark.Builtin, args starlark.Tuple, kwargs []starlark.Tuple) (starlark.Value, error) {
+ t := ti.Unix(0, r.value)
+ return starlark.MakeInt(t.Hour()), nil
+}
+
+// Minute returns the current minute of the hour for a unix timestamp in range [0, 59].
+func (r Time) Minute(thread *starlark.Thread, fn *starlark.Builtin, args starlark.Tuple, kwargs []starlark.Tuple) (starlark.Value, error) {
+ t := ti.Unix(0, r.value)
+ return starlark.MakeInt(t.Minute()), nil
+}
+
+// Day returns the current day in a week of a unix timestamp... [Sunday = 0...]
+func (r Time) Day(thread *starlark.Thread, fn *starlark.Builtin, args starlark.Tuple, kwargs []starlark.Tuple) (starlark.Value, error) {
+ t := ti.Unix(0, r.value)
+ return starlark.MakeInt(int(t.Weekday())), nil
+}
+
+// Now returns the current time as a unix timestamp.
+func (r Time) Now(thread *starlark.Thread, fn *starlark.Builtin, args starlark.Tuple, kwargs []starlark.Tuple) (starlark.Value, error) {
+ val := ti.Now().UnixNano()
+ r.value = val
+ return r, nil
+}
+
+// ParseDuration parses a go duration string to a time type.
+func (r Time) ParseDuration(thread *starlark.Thread, fn *starlark.Builtin, args starlark.Tuple, kwargs []starlark.Tuple) (starlark.Value, error) {
+ var dur string
+ err := starlark.UnpackPositionalArgs(fn.Name(), args, kwargs, 1, &dur)
+ if err != nil {
+ return starlark.None, fmt.Errorf("could not unpack args: %v", err.Error())
+ }
+
+ if parsed, err := ti.ParseDuration(dur); err == nil {
+ val := parsed.Nanoseconds()
+ r.value = val
+ return r, nil
+ }
+
+ return starlark.None, fmt.Errorf("time.parse_duration: argument cannot be parsed as a valid go time duration")
+}
+
+// Add adds time to a time type.
+func (r Time) Add(thread *starlark.Thread, fn *starlark.Builtin, args starlark.Tuple, kwargs []starlark.Tuple) (starlark.Value, error) {
+ var t Time
+ err := starlark.UnpackPositionalArgs(fn.Name(), args, kwargs, 1, &t)
+ if err != nil {
+ return starlark.None, fmt.Errorf("could not unpack args: %v", err.Error())
+ }
+
+ val := r.value + t.value
+ r.value = val
+ return r, nil
+}
+
+// Subtract adds time to a time type.
+func (r Time) Subtract(thread *starlark.Thread, fn *starlark.Builtin, args starlark.Tuple, kwargs []starlark.Tuple) (starlark.Value, error) {
+ var t Time
+ err := starlark.UnpackPositionalArgs(fn.Name(), args, kwargs, 1, &t)
+ if err != nil {
+ return starlark.None, fmt.Errorf("could not unpack args: %v", err.Error())
+ }
+
+ val := r.value - t.value
+ r.value = val
+ return r, nil
+}