Add params

src/api2smtp/urls.clj

@@ -1,13 +1,12 @@
 (ns api2smtp.urls
   (:require
-   [compojure.core :refer [defroutes GET]]
+   [compojure.core :refer [defroutes POST]]
    [compojure.route :as route]
    [api2smtp.views.public :as view-public]))
 
 (defroutes public
   ;; Urls public pages
-  (GET "/" [] view-public/index)
-  (GET "/api" [] view-public/api))
+  (POST "/api/v1/email/" [] view-public/index))
 
 
 (defroutes resources-routes

src/api2smtp/views/public.clj

@@ -1,20 +1,20 @@
 ;;;; Views public web
 (ns api2smtp.views.public
   (:require
-   [tadam.templates :refer [render-HTML render-JSON render-404]]
-   ))
+   [tadam.templates :refer [render-JSON]]
+   [tadam.responses :refer [response]]))
 
 (defn index
   ;; View HTML
   [req]
-    (render-HTML req "public/welcome.html" {}))
+  (let [name    (-> :params :name)
+        subject (-> :params :subject)
+        email   (-> :params :email)
+        message (-> :params :message)]
 
-(defn api
-  ;; View JSON
-  [req]
-    (render-JSON req {:result true}))
+    (render-JSON req {:status "ok"})))
 
 (defn page-404
   ;; View page 404
   [req]
-  (render-404 req "public/404.html" {}))
+  (response req "{\"status\": \"error\"}" 500 "text/json;charset=utf-8"))