-
Notifications
You must be signed in to change notification settings - Fork 2
Michał Gawron edited this page Sep 16, 2021
·
1 revision
(def svg-attrs {:style "background-color:white"})
(defattrs :bg-header {:fill "#a0ffa0"})
(defattrs :bg-yellow {:fill "#ffffa0"})
(draw-column-headers)
(draw-box "" [{:span 16} :bg-header])
(draw-box "zlib compressed header" [{:span 16} :bg-header])
(draw-box "" :bg-header)
(draw-gap "zlib compressed files data" {:min-label-columns 16})
(draw-gap "zlib compressed archive descriptors")
(draw-bottom)
(draw-box "descriptors length" [{:span 4} :bg-yellow])
-
33-byte compressed archive header
(def svg-attrs {:style "background-color:white"})
(def boxes-per-row 16)
(def box-width 40)
(defattrs :bg-green {:fill "#a0ffa0"})
(defattrs :bg-yellow {:fill "#ffffa0"})
(defattrs :bg-orange {:fill "#ffcfa0"})
(draw-column-headers)
(draw-box 0xff :bg-green)
(draw-box 0xa1 :bg-green)
(draw-box 0xd0 :bg-green)
(draw-box 0x31 :bg-green)
(draw-box "W" :bg-green)
(draw-box "D" :bg-green)
(draw-box 0x00 :bg-green)
(draw-box 0x02 :bg-green)
(draw-box "GUID" [:bg-orange {:span 8}])
(draw-box "GUID" [:bg-orange {:span 8}])
-
static 8-byte header
-
file GUID
(def svg-attrs {:style "background-color:white"})
(def boxes-per-row 8)
(def box-width 80)
(defattrs :bg-green {:fill "#a0ffa0"})
(defattrs :bg-yellow {:fill "#ffffa0"})
(defattrs :bg-orange {:fill "#ffcfa0"})
(draw-column-headers)
(draw-box "last modified file date" [{:span 8} :bg-orange])
(draw-box "file count" [{:span 2} :bg-orange])
(draw-box "length" :bg-yellow)
(draw-box "name" [:bg-yellow {:span 3 :borders #{:left :top :bottom}}])
(draw-gap-inline)
(draw-box "flags" :bg-yellow)
(draw-box "file offset" [{:span 4} :bg-yellow])
(draw-box "file size" [{:span 4} :bg-yellow])
(draw-box "uncompressed size" [{:span 4} :bg-yellow])
(draw-box (text "length" :math) :bg-yellow)
(draw-box (text "translation key" :math) [:bg-yellow {:span 2 :borders #{:left :top :bottom}}])
(draw-gap-inline)
(draw-box (text "type" :math) [:bg-yellow {:span 4}])
(draw-box (text "GUID" :math) [:bg-yellow {:span 4}])
(draw-box (text "GUID" :math) [:bg-yellow {:span 8}])
(draw-box (text "GUID" :math) [:bg-yellow {:span 4}])
(draw-gap "loop file descriptors for file count")
(draw-bottom)