mtx-colors.lua /size: 2229 b    last modification: 2020-07-01 14:35
1
if
not
modules
then
modules
=
{
}
end
modules
[
'
mtx-colors
'
]
=
{
2
version
=
1
.
001
,
3
comment
=
"
companion to mtxrun.lua
"
,
4
author
=
"
Hans Hagen, PRAGMA-ADE, Hasselt NL
"
,
5
copyright
=
"
PRAGMA ADE / ConTeXt Development Team
"
,
6
license
=
"
see context related readme files
"
7
}
8 9
-- todo: fc-cache -v en check dirs, or better is: fc-cat -v | grep Directory
10 11
local
helpinfo
=
[[
12<?xml version="1.0"?> 13<application> 14 <metadata> 15 <entry name="name">mtx-colors</entry> 16 <entry name="detail">ConTeXt Color Management</entry> 17 <entry name="version">0.10</entry> 18 </metadata> 19 <flags> 20 <category name="basic"> 21 <subcategory> 22 <flag name="table"><short>show icc table</short></flag> 23 </subcategory> 24 </category> 25 </flags> 26 <examples> 27 <category> 28 <title>Example</title> 29 <subcategory> 30 <example><command>mtxrun --script color --table somename</command></example> 31 </subcategory> 32 </category> 33 </examples> 34</application> 35
]]
36 37
local
application
=
logs
.
application
{
38
name
=
"
mtx-colors
"
,
39
banner
=
"
ConTeXt Color Management 0.10
"
,
40
helpinfo
=
helpinfo
,
41
}
42 43
local
report
=
application
.
report
44 45
if
not
fontloader
then
fontloader
=
fontforge
end
46 47
dofile
(
resolvers
.
findfile
(
"
colo-icc.lua
"
,
"
tex
"
)
)
48 49
scripts
=
scripts
or
{
}
50
scripts
.
colors
=
scripts
.
colors
or
{
}
51 52
function
scripts
.
colors
.
table
(
)
53
local
files
=
environment
.
files
54
if
#
files
>
0
then
55
for
i
=
1
,
#
files
do
56
local
profile
,
okay
,
message
=
colors
.
iccprofile
(
files
[
i
]
)
57
if
not
okay
then
58
report
(
message
)
59
else
60
report
(
table
.
serialize
(
profile
,
"
profile
"
)
)
61
end
62
end
63
else
64
local
files
=
resolvers
.
findfiles
(
"
*.icc
"
)
65
if
#
files
>
0
then
66
for
i
=
1
,
#
files
do
67
report
(
files
[
i
]
)
68
end
69
else
70
report
(
"
no file(s) given
"
)
71
end
72
end
73
end
74 75
--~ local track = environment.argument("track")
76
--~ if track then trackers.enable(track) end
77 78
if
environment
.
argument
(
"
table
"
)
then
79
scripts
.
colors
.
table
(
)
80
elseif
environment
.
argument
(
"
exporthelp
"
)
then
81
application
.
export
(
environment
.
argument
(
"
exporthelp
"
)
,
environment
.
files
[
1
]
)
82
else
83
application
.
help
(
)
84
end
85