add bot to translate toki pona to english

1 files changed, 44 insertions, 0 deletions

diff --git a/web/tokipana/tokipana.go b/web/tokipana/tokipana.go
new file mode 100644
index 0000000..2daa54b
--- /dev/null
+++ b/web/tokipana/tokipana.go
@@ -0,0 +1,44 @@
+// Package tokipana wraps http://inamidst.com/services/tokipana.
+package tokipana
+
+import (
+	"errors"
+	"net/http"
+	"net/url"
+)
+
+// The API URL.
+const APIURL = `http://inamidst.com/services/tokipana`
+
+// Errors
+var (
+	ErrInvalidRequest = errors.New("tokipana: invalid request")
+)
+
+// Validate checks if a response from the API is valid or not.
+func Validate(resp *http.Response) error {
+	if resp.StatusCode == http.StatusOK {
+		return nil
+	}
+
+	if resp.StatusCode%100 != 2 {
+		return ErrInvalidRequest
+	}
+
+	return nil
+}
+
+// Translate returns a request to translate the given toki pona text into english.
+func Translate(text string) *http.Request {
+	u, _ := url.Parse(APIURL)
+	q := u.Query()
+	q.Set("text", text)
+	u.RawQuery = q.Encode()
+
+	req, err := http.NewRequest(http.MethodGet, u.String(), nil)
+	if err != nil {
+		panic(err)
+	}
+
+	return req
+}