summaryrefslogtreecommitdiff
path: root/macros/luatex/generic/barracuda/doc/manual/barracuda-manual-tool.tex
diff options
context:
space:
mode:
Diffstat (limited to 'macros/luatex/generic/barracuda/doc/manual/barracuda-manual-tool.tex')
-rw-r--r--macros/luatex/generic/barracuda/doc/manual/barracuda-manual-tool.tex49
1 files changed, 49 insertions, 0 deletions
diff --git a/macros/luatex/generic/barracuda/doc/manual/barracuda-manual-tool.tex b/macros/luatex/generic/barracuda/doc/manual/barracuda-manual-tool.tex
new file mode 100644
index 0000000000..3b19fd5ab5
--- /dev/null
+++ b/macros/luatex/generic/barracuda/doc/manual/barracuda-manual-tool.tex
@@ -0,0 +1,49 @@
+% an auxiliary package for the manual
+\directlua{
+ barracuda = require "barracuda"
+ local v = barracuda._VERSION
+ local p = v:find(" ")
+ brcd_data = {
+ version = v:sub(p+1),
+ date = barracuda._DATE
+ }
+}
+
+\newcommand{\code}[1]{\texttt{#1}}
+\newcommand{\brcd}{\code{barracuda}}
+
+\newbox\barracudabox
+\newcommand\barracuda[3][_brcd_empty_=true]{\directlua{
+ local enc_name = [[#2]]
+ local data = [[#3]]
+ local opt = {#1};
+ if opt._brcd_empty_ == true then
+ barracuda:hbox(enc_name, data, "barracudabox")
+ else
+ barracuda:hbox(enc_name, data, "barracudabox", opt)
+ end
+}%
+\leavevmode\box\barracudabox
+}
+
+\newcommand{\brcdkey}[1]{\directlua{
+ local key = [===[#1]===]
+ if brcd_data[key] then
+ tex.sprint(brcd_data[key])
+ else
+ error("Key '"..key.."' not found")
+ end
+}}
+
+\newcommand{\brcdparametertab}[1]{\directlua{
+ local enc_id = [=[#1]=]
+ local t = {}
+ tex.print()
+
+ local barcode = barracuda:barcode()
+ local info = barcode:info()
+ local param = info.param
+
+}}
+
+\endinput