/usr/share/texmf/scripts/musixtex/musixtex.lua is in musixtex 1:1.15.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 | #!/usr/bin/env texlua
VERSION = "0.7"
--[[
musixtex.lua: processes MusiXTeX files (and deletes intermediate files)
(c) Copyright 2012 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.7 2013-12-11 RDT
Add -F fmt option
version 0.6 2012-09-14 RDT
Add -1 (one-pass [pdf][la]tex processing) option.
version 0.5 2011-11-28 RDT
Add -i (retain intermediate files) option.
version 0.4 2011-04-30 RDT
Allow multiple filenames (and options).
Add -f (default) and -l (latex) options.
version 0.3 2011-04-25 RDT
Add -d (dvipdfm) and -s (stop at dvi) options.
version 0.2 2011-04-21 RDT
Allow basename.tex as filename.
Add -p option for pdfetex processing.
Add standard -v -h options.
--]]
function usage()
print("Usage: [texlua] musixtex.lua { option | basename[.tex] } ... ")
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(" -i retain intermediate files")
print(" -1 one-pass [pdf][la]tex processing")
print(" -F fmt use fmt as the TeX processor")
print(" -f restore default processing")
end
function whoami ()
print("This is musixtex.lua version ".. VERSION .. ".")
end
whoami()
if #arg == 0 then
usage()
os.exit(0)
end
-- defaults:
tex = "etex"
musixflx = "musixflx"
dvi = "dvips"
ps2pdf = "ps2pdf"
intermediate = 1
passes = 2
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 == "-i" then
intermediate = 0
elseif this_arg == "-1" then
passes = 1
elseif this_arg == "-f" then
tex = "etex"; dvi = "dvips"; ps2pdf = "ps2pdf"; intermediate = 1; passes = 2
elseif this_arg == "-F" then
narg = narg+1
tex = arg[narg]
else
filename = this_arg
if filename ~= "" and string.sub(filename, -4, -1) == ".tex" then
filename = string.sub(filename, 1, -5)
end
if not io.open(filename .. ".tex", "r") then
print("Non-existent file: ", filename .. ".tex")
else
print("Processing ".. filename .. ".tex.")
os.remove( filename .. ".mx2" )
if (passes == 1 or os.execute(tex .. " " .. filename) == 0) and
(passes == 1 or os.execute(musixflx .. " " .. filename) == 0) and
(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( 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("Musixtex processing of " .. filename .. ".tex 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 )
|