sile-typesetter / sile / 9304049654

local cli = pl.class()

   local cliargs = require("cliargs")

      print(flag == "V" and "SILE " .. SILE.version or SILE.full_version)

      os.exit(0)

   cliargs:set_colsz(0, 120)

   cliargs:set_name("sile")

   cliargs:set_description([[

    ]])

   cliargs:splat("INPUTS", "Input document filename(s), by default in SIL, XML, or Lua formats.", nil, 999)

   cliargs:option("-b, --backend=VALUE", "Specify the output backend")

   cliargs:option("-c, --class=VALUE", "Override the default or specified document class")

   cliargs:option("-d, --debug=VALUE", "Show debug information for tagged aspects of SILE’s operation", {})

   cliargs:option("-e, --evaluate=VALUE", "Evaluate Lua expression before processing input", {})

   cliargs:option("-E, --evaluate-after=VALUE", "Evaluate Lua expression after processing input", {})

   cliargs:option("-f, --fontmanager=VALUE", "Specify which font manager to use")

   cliargs:option("-I, --include=FILE", "Deprecated, see --use, --preamble, --postamble, or multiple input files", {})

   cliargs:option("-m, --makedeps=FILE", "Generate a Makefile format list of dependencies and white them to a file")

   cliargs:option("-o, --output=FILE", "Explicitly set output file name")

   cliargs:option("-O, --options=PARAMETER=VALUE[,PARAMETER=VALUE]", "Set or override document class options", {})

   cliargs:option(

   cliargs:option(

   cliargs:option(

   cliargs:flag("-q, --quiet", "Suppress warnings and informational messages during processing")

   cliargs:flag("-t, --traceback", "Display detailed location trace on errors and warnings")

   cliargs:flag("-h, --help", "Display this help, then exit")

   cliargs:flag("-V, --version", "Print version", print_version)

   local _arg = pl.tablex.imap(luautf8.gsub, _G.arg, "^-$", "STDIO")

   local opts, parse_err = cliargs:parse(_arg)

   if not opts and parse_err then

      print(parse_err)

      local code = parse_err:match("^Usage:") and 0 or 1

      os.exit(code)

   if opts.INPUTS and #opts.INPUTS > 0 then

      local has_input_filename = false

      pl.tablex.foreachi(opts.INPUTS, function (v, k)

         if v == "STDIO" then

            opts.INPUTS[k] = "-"

         elseif not has_input_filename then

            has_input_filename = true

      if not has_input_filename and not opts.output then

         SU.error(

               .. "  Please use --output to set one explicitly."

      SILE.input.filenames = opts.INPUTS

   if opts.backend then

      SILE.backend = opts.backend

   if opts.class then

      SILE.input.class = opts.class

   for _, flags in ipairs(opts.debug) do

      for _, flag in ipairs(pl.stringx.split(flags, ",")) do

         SILE.debugFlags[flag] = true

   for _, statement in ipairs(opts["evaluate"]) do

      table.insert(SILE.input.evaluates, statement)

   for _, statement in ipairs(opts["evaluate-after"]) do

      table.insert(SILE.input.evaluateAfters, statement)

   if opts.fontmanager then

      SILE.forceFontManager = opts.fontmanager

   if opts.makedeps then

      SILE.makeDeps = require("core.makedeps")

      SILE.makeDeps.filename = opts.makedeps

   if opts.output then

      if opts.output == "STDIO" then

         opts.output = "-"

      SILE.outputFilename = opts.output

   for _, option in ipairs(opts.options) do

      local options = SILE.parserBits.parameters:match(option)

      SILE.input.options = pl.tablex.merge(SILE.input.options, options, true)

   for _, use in ipairs(opts.use) do

      local spec = SILE.parserBits.cliuse:match(use)

      table.insert(SILE.input.uses, spec)

   for _, path in ipairs(opts.preamble) do

      table.insert(SILE.input.preambles, path)

   for _, path in ipairs(opts.postamble) do

      table.insert(SILE.input.postambles, path)

   if #opts.include > 0 then

      SU.deprecated("-I/--include", "-u/--use or -p/--preamble", "0.14.0", "0.15.0")

      local contentloc = SILE.traceStack:locationHead()

      local codeloc = pl.utils.unpack({ ... }, 1, select("#", ...))

      return ("Processing at: %s\n\tUsing code at: %s"):format(contentloc, codeloc)

      if not SILE.scratch.caughterror then

         io.stderr:write("\n! Unexpected Lua error\n")

      unexpected()

      io.stderr:write(debug.traceback("", 2) or "\t! debug.traceback() did not identify code location")

      io.stderr:write("\n")

      return summary(...)

      unexpected()

      return summary(...) .. "\n\nRun with --traceback for more detailed trace leading up to errors."

   SILE.errorHandler = opts.traceback and trace or identity

   SILE.quiet = opts.quiet

   SILE.traceback = opts.traceback

return cli