1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82\input mtx context common . tex
83
84\noheaderandfooterlines \setupbodyfont [ tt ]
85
86\starttext
87
88\startluacode
89
90 if CONTEXTLMTXMODE > 0 then
91
92 local database = document . arguments . database
93
94 if database then
95 local metadata = false
96 if tex . systemmodes [ " first " ] then
97 metadata = resolvers . finders . helpers . createhashed {
98 database = database ,
99 pattern = document . arguments . pattern ,
100 compress = document . arguments . compress ,
101 patterns = document . arguments . patterns and table . load ( document . arguments . patterns ) ,
102 }
103 else
104 metadata = resolvers . finders . helpers . validhashed ( database )
105 if metadata then
106 metadata = metadata . metadata
107 end
108 end
109 if metadata then
110 local function show ( what )
111 context . NC ( ) context ( what )
112 context . EQ ( ) context ( metadata [ what ] )
113 context . NC ( ) context . NR ( )
114 end
115 context . starttitle { title = " database: " . . database }
116 context . starttabulate { " ||r| " }
117 show ( " nofnames " )
118 show ( " nofpaths " )
119 show ( " nofblobs " )
120 show ( " nofcompressed " )
121 context . stoptabulate ( )
122 context . stoptitle ( )
123 else
124 context ( " something went wrong, invalid database " )
125 end
126 else
127 context ( " something went wrong, no database specified " )
128 end
129 else
130 context ( " you need lmtx " )
131 end
132
133\stopluacode
134
135\stoptext
136
137 |