pedestal-api-helper

A Clojure library designed to extend usual pedestal api setup, providing:

• useful interceptors
• useful utils for dealing with validation and filtering, for example

Clojars link

Usage

• Add the dependency:

[org.clojars.majorcluster/pedestal-api-helper "0.3.0"]

Examples:

• Interceptors:

(:require [clj.pedestal-api-helper.interceptors :as api-h.i]
  [...])

(def common-interceptors
  [(p.body-params/body-params)
   api-h.i/json-out])

(def all-routes
  (route/expand-routes
    #{["/status" :get (conj common-interceptors `r.status/get-status) :route-name :get-all-status]}))

• Validating and Filtering Params:

(:require [clj.pedestal-api-helper.params-helper :as api-h.params]
  [...])

(defn post-status
  [request]
  (try
    (let [crude-body (:json-params request)
          mandatory-fields ["name"]
          allowed-fields ["name"]
          body (api-h.params/validate-and-mop!! crude-body mandatory-fields allowed-fields)]
      (...))
    (catch ExceptionInfo e
      {:status 400, :headers common-headers, :body {:message
                                                    (:validation-messages (.getData e))}})
    ))

(defn patch-status
  [request]
  (try
    (let [crude-body (:json-params request)
          mandatory-fields ["id","name"]
          allowed-fields ["id","name"]
          body (api-h.params/validate-and-mop!! crude-body mandatory-fields allowed-fields)]
      {:status 204})
    (catch ExceptionInfo e
      {:status 400, :headers common-headers, :body {:message
                                                    (:validation-messages (.getData e))}})
    ))

Publish

Requirements

• Leiningen (of course 😄)
• GPG (mac => brew install gpg)
• Clojars account
• Enter clojars/tokens page in your account -> generate one and use for password

export GPG_TTY=$(tty) && lein deploy clojars

Documentation

pedestal-api-helper/interceptors

Symbols	Description
json-out	Map having :leave as fn[context] and rewriting map response into json

pedestal-api-helper/params-helper

Symbols	Description
uuid-pattern	UUID string regex

Functions	Description
uuid	returns a new random UUID
uuid-as-string [uuid]	converts uuid into a string
is-uuid [id]	if id param is a string, checks if it matches uuid regex, otherwise returns false
validate-mandatory [body fields & message-untranslated = "Field %s is not present"]	checks if body map has mandatory keys, if not, throws an exception containing all missing fields in ExceptionInfo .getData :validation-messages
extract-field-value [field body]	gets value from the body using field ks, converting uuid's from string to UUID if needed
mop-fields [body fields]	Clean the body removing values not present in fields param
validate-and-mop!! [body mandatory accepted]	Validates and clean body by executing validate-mandatory and mop-fields

License

Copyright © 2022 FIXME

This program and the accompanying materials are made available under the terms of the Eclipse Public License 2.0 which is available at http://www.eclipse.org/legal/epl-2.0.

This Source Code may also be made available under the following Secondary Licenses when the conditions for such availability set forth in the Eclipse Public License, v. 2.0 are satisfied: GNU General Public License as published by the Free Software Foundation, either version 2 of the License, or (at your option) any later version, with the GNU Classpath Exception which is available at https://www.gnu.org/software/classpath/license.html.