3pp-mirror/penpot
1
0
Fork 0
mirror of https://github.com/penpot/penpot.git synced 2025-05-21 20:16:14 +02:00
Code Issues Projects Releases Packages Wiki Activity

♻️ Add missing svgparse http handler.

Browse source
This commit is contained in:
Andrey Antukh 2021-01-05 13:49:39 +01:00 • committed by Alonso Torres
parent 33c8743215
commit f83c8d4523
3 changed files with 40 additions and 4 deletions
Download patch file Download diff file Expand all files Collapse all files

34
backend/src/app/svgparse.clj
View file

@ -10,9 +10,13 @@
(ns app.svgparse
(:require
[app.common.exceptions :as ex]
[clojure.xml :as xml]
[app.common.spec :as us]
[app.metrics :as mtx]
[clojure.java.io :as io]
[clojure.java.shell :as shell]
[clojure.java.io :as io])
[clojure.spec.alpha :as s]
[clojure.xml :as xml]
[integrant.core :as ig])
(:import
java.io.InputStream
org.apache.commons.io.IOUtils))
@ -35,3 +39,29 @@
(with-open [istream (io/input-stream input)]
(-> (clean-svg istream)
(xml/parse))))
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;; Handler
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
(declare handler)
(defmethod ig/pre-init-spec ::handler [_]
(s/keys :req-un [::mtx/metrics]))
(defmethod ig/init-key ::handler
[_ {:keys [metrics] :as cfg}]
(->> {:registry (:registry metrics)
:type :summary
:name "http_handler_svgparse_timing"
:help "svg parse timings"}
(mtx/instrument handler)))
(defn- handler
[{:keys [headers body] :as request}]
(when (not= "image/svg+xml" (get headers "content-type"))
(ex/raise :type :validation
:code :unsupported-mime-type
:mime (get headers "content-type")))
{:status 200
:body (parse body)})