mirror of
https://github.com/penpot/penpot.git
synced 2026-09-30 15:56:17 +00:00
fa81a3f648
* ♻️ Share structural batch upload through common helper - Merge svg-filters and svg-fills to app.common.render-wasm.svg-derived - Add serialize-shapes-batch! in common, shared by the sync and chunked workspace paths - Add a routing test for the helper and wires the svg-filters test. AI-assisted-by: muse-spark, GLM 5.3 * 🐛 Derive SVG effects inside single-shape serializer - Single and batch paths: one svg effect derivation step owned by shared serializers. - set-object forwards the derived shape to its host attrs, and the exporter reads the derived fills, so SVG-attr fills, blur and shadow render as in the frontend. - Adds regression test to the exporter. AI-assisted-by: muse-spark, GLM 5.3, deepseek-flash
73 lines
2.6 KiB
Clojure
73 lines
2.6 KiB
Clojure
;; This Source Code Form is subject to the terms of the Mozilla Public
|
|
;; License, v. 2.0. If a copy of the MPL was not distributed with this
|
|
;; file, You can obtain one at http://mozilla.org/MPL/2.0/.
|
|
;;
|
|
;; Copyright (c) KALEIDOS SUBSIDIARY SL
|
|
|
|
(ns exporter-tests.renderer-svg-test
|
|
(:require
|
|
[app.renderer.svg-gradient :as svg-gradient]
|
|
[app.wasm :as wasm-io]
|
|
[app.wasm.serialize :as serialize]
|
|
[cljs.test :refer [deftest is testing async]]
|
|
[clojure.string :as str]
|
|
[promesa.core :as p]))
|
|
|
|
(def gradient-stops
|
|
[{"color" "#000000" "offset" 0 "opacity" 1}
|
|
{"color" "#ffffff" "offset" 1 "opacity" 1}])
|
|
|
|
(deftest creates-the-correct-gradient-element
|
|
(doseq [[gradient-type element-name]
|
|
[["linear" "linearGradient"]
|
|
["radial" "radialGradient"]]]
|
|
(testing gradient-type
|
|
(let [gradient-data {"type" "gradient"
|
|
"gradient" {"type" gradient-type
|
|
"stops" gradient-stops}}
|
|
result (svg-gradient/data->gradient-def "text-id" ["#000001" gradient-data])]
|
|
(is (= element-name (get result "name")))))))
|
|
|
|
|
|
(def ^:private svg-red-id (random-uuid))
|
|
(def ^:private blue-id (random-uuid))
|
|
|
|
(defn- scene []
|
|
{svg-red-id {:id svg-red-id
|
|
:type :rect
|
|
:name "svg-red"
|
|
:x 10 :y 10 :width 100 :height 100
|
|
:rotation 0
|
|
:selrect {:x 10 :y 10 :x1 10 :y1 10 :x2 110 :y2 110
|
|
:width 100 :height 100}
|
|
:strokes []
|
|
:svg-attrs {:fill "#ff0000"}}
|
|
blue-id {:id blue-id
|
|
:type :rect
|
|
:name "user-blue"
|
|
:x 130 :y 10 :width 100 :height 100
|
|
:rotation 0
|
|
:selrect {:x 130 :y 10 :x1 130 :y1 10 :x2 230 :y2 110
|
|
:width 100 :height 100}
|
|
:strokes []
|
|
:fills [{:fill-color "#0000ff" :fill-opacity 1}]}})
|
|
|
|
(defn- render-svg-string
|
|
[shape-id]
|
|
(.toString (js/Buffer.from (wasm-io/render-shape-svg shape-id 1))))
|
|
|
|
(deftest exporter-honours-svg-attr-fills
|
|
(async done
|
|
(->> (wasm-io/init!)
|
|
(p/mcat
|
|
(fn [_]
|
|
(serialize/serialize-scene! (scene))
|
|
(let [red (render-svg-string svg-red-id)
|
|
blue (render-svg-string blue-id)]
|
|
(is (str/includes? blue "blue")
|
|
"control: user fills render, so the harness works")
|
|
(is (str/includes? red "fill=\"red\"")
|
|
"svg-attr fill survives headless serialization")
|
|
(p/resolved nil))))
|
|
(p/mcat (fn [_] (done))))))
|