sqids-clojure/build.clj at main · sqids/sqids-clojure · GitHub

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
(ns build
  (:refer-clojure :exclude [test])
  (:require
    [clojure.string :as str]
    [clojure.tools.build.api :as b]
    [deps-deploy.deps-deploy :as dd]))

(def lib 'org.sqids/sqids-clojure)

(def versions
  (let [major   1
        minor   0
        commits {:release  (b/git-count-revs nil)
                 :snapshot "9999-SNAPSHOT"}]
    (update-vals commits #(str/join "." [major minor %]))))

(def class-dir "target/classes")

(defn- pom-template
  [version]
  [[:description "Official Clojure port of Sqids. Generate short YouTube-looking IDs from numbers."]
   [:url "https://github.com/sqids/sqids-clojure"]
   [:licenses
    [:license
     [:name "MIT License"]
     [:url "https://spdx.org/licenses/MIT.html"]]]
   [:developers
    [:developer
     [:name "Rob Hanlon"]]]
   [:scm
    [:url "https://github.com/sqids/sqids-clojure"]
    [:connection "scm:git:https://github.com/sqids/sqids-clojure.git"]
    [:developerConnection "scm:git:ssh:git@github.com:sqids/sqids-clojure.git"]
    [:tag (str "v" version)]]])

(defn jar-opts
  [opts]
  (let [version (versions (if (:snapshot opts) :snapshot :release))]
    (assoc opts
           :lib       lib
           :version   version
           :jar-file  (format "target/%s-%s.jar" lib version)
           :basis     (b/create-basis {:aliases [:clj]})
           :class-dir class-dir
           :target    "target"
           :src-dirs  ["src"]
           :pom-data  (pom-template version))))

(defn jar
  "Run the CI pipeline of tests (and build the JAR)."
  [opts]
  (b/delete {:path "target"})
  (let [opts (jar-opts opts)]
    (println "\nWriting pom.xml...")
    (b/write-pom opts)
    (println "\nCopying source...")
    (b/copy-dir {:src-dirs ["src"] :target-dir class-dir})
    (println "\nBuilding JAR..." (:jar-file opts))
    (b/jar opts))
  opts)

(defn install
  "Install the JAR locally."
  [opts]
  (let [opts (jar-opts opts)]
    (b/install opts))
  opts)

(defn deploy
  "Deploy the JAR to Clojars."
  [opts]
  (let [{:keys [jar-file] :as opts} (jar-opts opts)]
    (dd/deploy {:installer :remote
                :artifact  (b/resolve-path jar-file)
                :pom-file  (b/pom-path (select-keys opts [:lib :class-dir]))}))
  opts)