File tree Expand file tree Collapse file tree 1 file changed +3
-8
lines changed Expand file tree Collapse file tree 1 file changed +3
-8
lines changed Original file line number Diff line number Diff line change 3
3
(:require [clojure.java.io :as io])
4
4
(:import (java.io ByteArrayInputStream ByteArrayOutputStream InputStream)
5
5
(java.net URLEncoder URLDecoder)
6
+ (java.util Base64)
6
7
(java.util.zip InflaterInputStream DeflaterInputStream
7
8
GZIPInputStream GZIPOutputStream)))
8
9
30
31
[^String unencoded]
31
32
(URLEncoder/encode unencoded " UTF-8" ))
32
33
33
- (defmacro base64-encode
34
+ (defn base64-encode
34
35
" Encode an array of `unencoded` bytes into a base64 encoded string."
35
36
[unencoded]
36
- (if (try (import 'javax.xml.bind.DatatypeConverter)
37
- (catch Exception _))
38
- `(javax.xml.bind.DatatypeConverter/printBase64Binary ~unencoded)
39
- (do
40
- (import 'java.util.Base64)
41
- `(.encodeToString (java.util.Base64/getEncoder ) ~unencoded))))
37
+ (.encodeToString (Base64/getEncoder ) unencoded))
42
38
43
39
(defn to-byte-array
44
40
" Returns a byte array for InputStream `is`."
52
48
(recur (.read ^InputStream is buffer 0 chunk-size))))
53
49
(.toByteArray baos)))
54
50
55
-
56
51
(defn gunzip
57
52
" Returns a gunzip'd version of byte array `b`."
58
53
[b]
You can’t perform that action at this time.
0 commit comments