apiai-clj
A Clojure library designed to handle api.ai POST requests.
Usage
Example in a compojure app.
Note that the JSON in the request is parsed to a clojure map. Keys are parsed to keywords. Same for the other way round.
dispatch-action:
(ns apiai.example-app
(:require [compojure.core :refer [defroutes GET POST]]
[compojure.route :as route]
[ring.middleware.defaults :refer [wrap-defaults site-defaults]]
[ring.middleware.json :refer [wrap-json-response wrap-json-body]]
[ring.util.response :refer [response]]
[apiai.core :as ai]
[apiai.example-actions]))
(defroutes app-routes
(GET "/" [] "Hello World")
(POST "/" request (response (ai/dispatch-action (:body request))))
(route/not-found "Not Found"))
(def app
(-> app-routes
(wrap-defaults site-defaults)
(wrap-json-response)
(wrap-json-body {:keywords? true :pretty? true})))
defaction:
Defines an action complementary to an action on api.ai
(ns apiai.example-actions
(:require [apiai.core :refer [defaction]
apiai.integrations.agent :as agent]))
;; For an apiai-action with name `hello-world`, without any parameter
(defaction hello-world [_] (agent/simple-speech-response "Hello World"))
;; For an apiai-action with name `echo-name` with parameter `given-name`
(defaction echo-name [request-body]
(let [given-name (get-in request-body [:result :parameters :given-name])]
(agent/simple-speech-response "Hello " given-name)))License
Copyright © 2017 Björn Ebbinghaus
Distributed under the Eclipse Public License either version 1.0 or (at your option) any later version.