subscription.clj

(defn-spec eligible-to-create-subscription? boolean?
  "Is the subscription eligible for creating a new one?"
  [subscription (s/keys :req [::subscription-status])]
  (case (-> ::subscription-status subscription)
    (::expired ::canceled ::free-trial ::free-trial-expired) true
    false))

(s/exercise-fn `eligible-to-create-subscription?)
=>
([(#:io.cloudrepo.payments{:subscription-status :io.cloudrepo.payments/free-trial-expired}) true]
 [(#:io.cloudrepo.payments{:subscription-status :io.cloudrepo.payments/free-trial-expired}) true]
 [(#:io.cloudrepo.payments{:subscription-status :io.cloudrepo.payments/active}) false]
 [(#:io.cloudrepo.payments{:subscription-status :io.cloudrepo.payments/pending}) false]
 [(#:io.cloudrepo.payments{:subscription-status :io.cloudrepo.payments/expired}) true]
 [(#:io.cloudrepo.payments{:subscription-status :io.cloudrepo.payments/cancelled}) false]
 [(#:io.cloudrepo.payments{:subscription-status :io.cloudrepo.payments/free-trial}) true]
 [(#:io.cloudrepo.payments{:subscription-status :io.cloudrepo.payments/expired}) true]
 [(#:io.cloudrepo.payments{:subscription-status :io.cloudrepo.payments/past-due}) false]
 [(#:io.cloudrepo.payments{:subscription-status :io.cloudrepo.payments/pending}) false])