|
8 | 8 |
|
9 | 9 | (def err-exit-status 2)
|
10 | 10 |
|
11 |
| -;; FIXME: maybe change this to rely on java.lang.Runtime$Version for |
12 |
| -;; jdk > 8 (cf. pdb-jdk-ver in project.clj). |
13 |
| - |
14 | 11 | ;; Testing hook
|
15 | 12 | (defn java-version [] (System/getProperty "java.version"))
|
16 | 13 |
|
17 |
| -(def supported-java-version "17") |
18 |
| - |
19 | 14 | (defn jdk-support-status
|
20 |
| - "Returns :official, :tested, :deprecated, :unknown, or :no." |
| 15 | + "Returns :official, :tested, :deprecated, :unknown, or :unsupported." |
21 | 16 | [version]
|
22 | 17 | (cond
|
23 |
| - (re-matches #"1\.[1234567]($|(\..*))" version) :no |
| 18 | + (re-matches #"1\.[1234567]($|(\..*))" version) :unsupported |
24 | 19 | (re-matches #"1\.[89]($|(\..*))" version) :deprecated
|
25 | 20 | (re-matches #"10($|(\..*))" version) :deprecated
|
26 |
| - (re-matches (re-pattern (str supported-java-version "($|(\\..*))")) version) :official |
27 | 21 | (re-matches #"11($|(\..*))" version) :tested
|
| 22 | + (re-matches #"17($|(\..*))" version) :official |
| 23 | + (re-matches #"21($|(\..*))" version) :tested |
28 | 24 | :else :unknown))
|
29 | 25 |
|
30 | 26 | (defn jdk-unsupported-msg [version]
|
31 | 27 | (let [status (jdk-support-status version)]
|
32 | 28 | (case status
|
33 |
| - (:unknown) {:warn (trs "JDK {0} is neither tested nor supported. Please use JDK {1}" version supported-java-version)} |
34 |
| - (:deprecated) {:warn (trs "JDK {0} is deprecated, please upgrade to JDK {1}" version supported-java-version)} |
| 29 | + (:unknown) {:warn (trs "JDK {0} is neither tested nor supported. Please use JDK 11, 17 or 21" version)} |
| 30 | + (:deprecated) {:warn (trs "JDK {0} is deprecated, please upgrade to JDK 11, 17 or 21" version)} |
35 | 31 | (:official :tested) nil
|
36 | 32 | {:error (trs "PuppetDB doesn''t support JDK {0}" version)})))
|
37 | 33 |
|
|
0 commit comments