Upgrade to Pro
— share decks privately, control downloads, hide ads and more …
Speaker Deck
Speaker Deck
PRO
Sign in
Sign up for free
Meta Template Engine
ayato
October 02, 2017
Programming
2
650
Meta Template Engine
ayato
October 02, 2017
Tweet
Share
More Decks by ayato
See All by ayato
Clojureという言語が私逹にもたらしたもの
ayato0211
5
2.6k
3年間考え続けてきたWebアプリケーションにおけるテストの話
ayato0211
3
170
Re:REPL-Driven Development
ayato0211
3
990
超変換! Hiccup data structure!!
ayato0211
2
430
About Integrant
ayato0211
0
360
Muscle Assert
ayato0211
0
150
Clojureを用いたWebアプリケーション開発
ayato0211
2
2.5k
翻訳にまつわるエトセトラ
ayato0211
6
950
Ring Middleware の基礎
ayato0211
2
200
Other Decks in Programming
See All in Programming
Remote SSHで行うVS Codeリモートホスト開発とトラブルシューティング
smt7174
1
390
低レイヤーから始める GUI
fadis
18
9.2k
Functional Data Engineering - A Blueprint for adopting functional principles in data pipeline
vananth22
0
160
LIFFで動く割り勘アプリTATEKAをリリースしてみた話
inoue2002
0
200
PHPアプリケーションにおけるアーキテクチャメトリクスについて / Architecture Metrics in PHP Applications
isanasan
1
210
PHPDocにおける配列の型定義を少し知る
shimabox
1
120
新卒でサービス立ち上げから Hasuraを使って3年経った振り返り
yutorin
0
200
OSSから学んだPR Descriptionの書き方
fugakkbn
4
120
NGK2023S - OCaml最高! スマホ開発にも使えちゃう?!
haochenxie
0
110
SHOWROOMの分析目的を意識した伝え方・コミュニケーション
hatapu
0
230
[2023년 1월 세미나] 데이터 분석가 되면 어떤 일을 하나요?
datarian
0
540
Amebaブログの会員画面システム刷新の道程
ryotasugawara
1
210
Featured
See All Featured
Ruby is Unlike a Banana
tanoku
93
9.5k
The Language of Interfaces
destraynor
149
21k
Cheating the UX When There Is Nothing More to Optimize - PixelPioneers
stephaniewalter
270
12k
Web development in the modern age
philhawksworth
197
9.6k
Code Review Best Practice
trishagee
50
11k
In The Pink: A Labor of Love
frogandcode
132
21k
Unsuck your backbone
ammeep
659
56k
Become a Pro
speakerdeck
PRO
6
3.2k
The Illustrated Children's Guide to Kubernetes
chrisshort
22
42k
Why Our Code Smells
bkeepers
PRO
326
55k
A better future with KSS
kneath
230
16k
Clear Off the Table
cherdarchuk
79
290k
Transcript
メタテンプレートエンジンの話 市ヶ谷Geek★Night#14 市ヶ谷java 〜JVM言語の玉手箱〜
メタテンプレートエンジンの話 市ヶ谷Geek★Night#14 市ヶ谷clojure 〜JVM言語の玉手箱〜
あやぴー •
[email protected]
•Cybozu Startups, Inc. •Clojure書いてる •Webアプリ書いてる
TL;DR
というわけで…
Clojureの話をします
事の発端
HTMLフォーム面倒 <div class="form-group"> <label for="input-email">Email Address</label> <input id="input-email" class="form-control" type="email"
name="email" th:classappend= "${errors.containsKey('email')} ? 'is-invalid'" th:value="${values.email}" placeholder="Enter email" /> <div class="invalid-feedback" th:text="${errors.email}"> </div> <small class="form-text text-muted"> We'll never share your email with anyone else. </small> </div>
HTMLフォーム面倒 [:div.form-group [:label {:for "input-email"} "Email address"] [:input#input-email.form-control {:type :email
:name :email :class (when (contains? errors :email) "is-invalid") :value (:email values) :placeholder "Enter email"}] [:div.invalid-feedback (:email errors)] [:small.form-text.text-muted "We'll never share your email with anyone else."]]
面倒なこと •_methodみたいなやつ •formのmethod属性に直接putとかdelete書きたい •__csrf_tokenみたいなやつ •いちいち書くのは面倒 •エラー表示のために書く条件分岐 •前回表示していた値を表示するための式 •たいていの場合name属性に依存している
HTMLフォーム面倒 [:div.form-group [:label {:for "input-email"} "Email address"] [:input#input-email.form-control {:type :email
:name :email :class (when (contains? errors :email) "is-invalid") :value (:email values) :placeholder "Enter email"}] [:div.invalid-feedback (:email errors)] [:small.form-text.text-muted "We'll never share your email with anyone else."]] ここが決まれば…
HTMLフォーム面倒 [:div.form-group [:label {:for "input-email"} "Email address"] [:input#input-email.form-control {:type :email
:name :email :class (when (contains? errors :email) "is-invalid") :value (:email values) :placeholder "Enter email"}] [:div.invalid-feedback (:email errors)] [:small.form-text.text-muted "We'll never share your email with anyone else."]] ここが決まるはず
考えた
テンプレートエンジンが HTMLに変換する前に 求める形に変換できれば いいんじゃない
つまり… メタテンプレートエンジン…
Kuuga https://github.com/ayato-p/kuuga
“こんなやつらのために、 これ以上誰かの涙は⾒たくない! 皆に笑顔でいて欲しいんです! だから⾒ててください!俺の…変⾝!! ”
“HTML Formのために、 これ以上誰かの涙は⾒たくない! Hiccupユーザーに笑顔でいて欲しいんです! だから⾒ててください!俺の…変換!! ”
変換ルール( (defmethod growing/transform-by-tag :input [_ options tag-vector] (let [[tagkw tagopts
contents] (tool/parse-tag-vector tag-vector)] `[~tagkw (update-input-opts ~options ~tagopts)
[email protected]
]))
変換ルール) (defmethod growing/transform-by-class :form-group [_ options tag-vector] (let [[tagkw tagopts
contents] (tool/parse-tag-vector tag-vector) contents (reduce (fn [contents' tagvec'] (let [[tk to _] (tool/parse-tag-vector tagvec') [_ t] (tool/parse-tag-keyword tk)] (cond-> (conj contents' tagvec') (= t "input") (conj `(invalid-fb ~options ~to))))) [] contents))] `[~tagkw ~tagopts
[email protected]
]))
そうすると
これを… (ultimate/transform opts [:div.form-group [:label {:for "input-email"} "Email address"] [:input#input-email.form-control
{:type :email :name :email :placeholder "Enter email"}] [:small.form-text.text-muted "We'll never share your email with anyone else."]])
こんな感じで展開できる [:div.form-group [:label {:for "input-email"} "Email address"] [:input#input-email.form-control {:type :email
:name :email :class (when (contains? errors :email) "is-invalid") :value (:email values) :placeholder "Enter email"}] [:div.invalid-feedback (:email errors)] [:small.form-text.text-muted "We'll never share your email with anyone else."]] ※イメージです
[:div.form-group [:label {:for "input-email"} "Email address"] [:input#input-email.form-control {:type :email :name
:email :class (when (contains? errors :email) "is-invalid") :value (:email values) :placeholder "Enter email"}] [:div.invalid-feedback (:email errors)] [:small.form-text.text-muted "We'll never share your email with anyone else."]] ここが消えた! こんな感じで展開できる
まとめ •Kuugaは超便利 •Clojureはいいぞ •9/25(月) Lisp Meetup •10/4(水) 教養としてのClojure
Enjoy Clojure