|
25 | 25 | (is (> (.size ks) 0)))) |
26 | 26 |
|
27 | 27 | (deftest keystore-scheme-factory |
28 | | - (let [sr (conn-mgr/get-keystore-scheme-registry {:keystore client-ks |
29 | | - :keystore-pass client-ks-pass |
30 | | - :trust-store client-ks |
31 | | - :trust-store-pass client-ks-pass}) |
| 28 | + (let [sr (conn-mgr/get-keystore-scheme-registry |
| 29 | + {:keystore client-ks :keystore-pass client-ks-pass |
| 30 | + :trust-store client-ks :trust-store-pass client-ks-pass}) |
32 | 31 | socket-factory (.getSchemeSocketFactory (.get sr "https"))] |
33 | 32 | (is (instance? SSLSocketFactory socket-factory)))) |
34 | 33 |
|
35 | 34 | (deftest ^{:integration true} ssl-client-cert-get |
36 | 35 | (let [t (doto (Thread. #(ring/run-jetty secure-handler |
37 | | - {:port 18083 :ssl-port 18084 :ssl? true |
| 36 | + {:port 18083 :ssl-port 18084 |
| 37 | + :ssl? true |
38 | 38 | :keystore "test-resources/keystore" |
39 | 39 | :key-password "keykey" |
40 | 40 | :client-auth :want})) .start)] |
41 | | - (try |
42 | | - (let [resp (core/request {:request-method :get :uri "/get" :server-port 18084 |
43 | | - :scheme :https :insecure? true :server-name "localhost"})] |
44 | | - (is (= 403 (:status resp)))) |
45 | | - (let [resp (core/request secure-request)] |
46 | | - (is (= 200 (:status resp)))) |
47 | | - (finally |
48 | | - (.stop t))))) |
| 41 | + ;; wait for jetty to start up completely |
| 42 | + (Thread/sleep 3000) |
| 43 | + (let [resp (core/request {:request-method :get :uri "/get" |
| 44 | + :server-port 18084 :scheme :https |
| 45 | + :insecure? true :server-name "localhost"})] |
| 46 | + (is (= 403 (:status resp)))) |
| 47 | + (let [resp (core/request secure-request)] |
| 48 | + (is (= 200 (:status resp)))))) |
0 commit comments