/usr/share/texmf/scripts/pmx/pmx2pdf.lua is in pmx 2.7.0.ctan20131214-1.
This file is owned by root:root, with mode 0o755.
The actual contents of the file can be viewed below.
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 83 84 85 86 87 88 89 90 91 92 93 94 95 96 97 98 99 100 101 102 103 104 105 106 107 108 109 110 111 112 113 114 115 116 117 118 119 120 121 122 123 124 125 126 127 128 129 130 131 132 133 134 135 136 137 138 139 140 141 142 143 144 145 146 147 148 149 150 151 152 153 154 155 156 157 158 159 160 161 162 163 164 165 166 167 168 169 | #!/usr/bin/env texlua
VERSION = "0.3.1"
--[[
pmx2pdf: processes MusiXTeX files using pmxab as a pre-processor
(and deletes intermediate files)
(c) Copyright 2011-13 Bob Tennent rdt@cs.queensu.ca
This program is free software; you can redistribute it and/or modify it
under the terms of the GNU General Public License as published by the
Free Software Foundation; either version 2 of the License, or (at your
option) any later version.
This program is distributed in the hope that it will be useful,
but WITHOUT ANY WARRANTY; without even the implied warranty of
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU General
Public License for more details.
You should have received a copy of the GNU General Public License along
with this program; if not, write to the Free Software Foundation, Inc.,
51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA.
--]]
--[[
ChangeLog:
version 0.3.1 2013-12-11 RDT
added -F fmt option
version 0.3.0 2013-12-10 RDT
added -c option to preprocess using pmxchords
version 0.2.1 2012-05-15 RDT
renamed to avoid possible name clashes
version 0.2 2011-11-28 RDT
added -i (retain intermediate files) option
version 0.1 2011-07-12 RDT
--]]
function usage()
print("Usage: [texlua] pmx2pdf { option | basename[.pmx] } ... ")
print("options: -v version")
print(" -h help")
print(" -l latex (or pdflatex)")
print(" -p pdfetex (or pdflatex)")
print(" -d dvipdfm")
print(" -s stop at dvi")
print(" -t stop at tex/mid")
print(" -i retain intermediate files")
print(" -c preprocess using pmxchords")
print(" -F fmt use fmt as the TeX processor")
print(" -f restore default processing")
end
function whoami ()
print("This is pmx2pdf version ".. VERSION .. ".")
end
whoami()
if #arg == 0 then
usage()
os.exit(0)
end
-- defaults:
tex = "etex"
musixflx = "musixflx"
dvi = "dvips"
ps2pdf = "ps2pdf"
intermediate = 1
exit_code = 0
narg = 1
repeat
this_arg = arg[narg]
if this_arg == "-v" then
os.exit(0)
elseif this_arg == "-h" then
usage()
os.exit(0)
elseif this_arg == "-l" then
if tex == "pdfetex" then
tex = "pdflatex"
else
tex = "latex"
end
elseif this_arg == "-p" then
if tex == "latex" then
tex = "pdflatex"
else
tex = "pdfetex"
end
dvi = ""; ps2pdf = ""
elseif this_arg == "-d" then
dvi = "dvipdfm"; ps2pdf = ""
elseif this_arg == "-s" then
dvi = ""; ps2pdf = ""
elseif this_arg == "-f" then
tex = "etex"; dvi = "dvips"; ps2pdf = "ps2pdf"; intermediate = 1
elseif this_arg == "-t" then
tex = ""; dvi = ""; ps2pdf = ""
elseif this_arg == "-i" then
intermediate = 0
elseif this_arg == "-F" then
narg = narg+1
tex = arg[narg]
else
filename = this_arg
if filename ~= "" and string.sub(filename, -4, -1) == ".pmx" then
filename = string.sub(filename, 1, -5)
end
if not io.open(filename .. ".pmx", "r") then
print("Non-existent file: ", filename .. ".pmx")
else
print("Processing ".. filename .. ".pmx.")
os.remove( filename .. ".mx2" )
os.execute("pmxab" .. " " .. filename )
pmxaerr = io.open("pmxaerr.dat", "r")
if (not pmxaerr) then
print("No log file.")
os.exit(1)
end
linebuf = pmxaerr:read()
err = tonumber(linebuf)
pmxaerr:close()
if ( err == 0 ) and
(tex == "" or os.execute(tex .. " " .. filename) == 0) and
(tex == "" or os.execute(musixflx .. " " .. filename) == 0) and
(tex == "" or os.execute(tex .. " " .. filename) == 0) and
((tex ~= "latex" and tex ~= "pdflatex")
or (os.execute(tex .. " " .. filename) == 0)) and
(dvi == "" or (os.execute(dvi .. " " .. filename) == 0)) and
(ps2pdf == "" or (os.execute(ps2pdf .. " " .. filename .. ".ps") == 0) )
then
if ps2pdf ~= "" then
print(filename .. ".pdf generated by " .. ps2pdf .. ".")
end
if intermediate == 1 then -- clean-up:
os.remove( "pmxaerr.dat" )
os.remove( filename .. ".mx1" )
os.remove( filename .. ".mx2" )
if dvi ~= "" then
os.remove( filename .. ".dvi" )
end
if ps2pdf ~= "" then
os.remove( filename .. ".ps" )
end
end
else
print("PMX/MusiXTeX processing of " .. filename .. ".pmx fails.\n")
exit_code = 2
--[[ uncomment for debugging
print("tex = ", tex)
print("dvi = ", dvi)
print("ps2pdf = ", ps2pdf)
--]]
end
end --if not io.open ...
end --if this_arg == ...
narg = narg+1
until narg > #arg
os.exit( exit_code )
|