runtexshebang (10sep23)

git-svn-id: svn://tug.org/texlive/trunk/Build/source@68232 c570f23f-e606-0410-a88d-b1316a301751

texk/texlive/linked_scripts/Makefile.am

@@ -211,6 +211,7 @@ texmf_other_scripts = \
 	pythontex/depythontex.py \
 	pythontex/pythontex.py \
 	rubik/rubikrotation.pl \
+	runtexshebang/runtexshebang.lua \
 	spix/spix.py \
 	splitindex/splitindex.pl \
 	srcredact/srcredact.pl \

texk/texlive/linked_scripts/Makefile.in

@@ -427,6 +427,7 @@ texmf_other_scripts = \
 	pythontex/depythontex.py \
 	pythontex/pythontex.py \
 	rubik/rubikrotation.pl \
+	runtexshebang/runtexshebang.lua \
 	spix/spix.py \
 	splitindex/splitindex.pl \
 	srcredact/srcredact.pl \

texk/texlive/linked_scripts/runtexshebang/runtexshebang.lua

@@ -0,0 +1,61 @@
+#!/usr/bin/env texlua
+
+-- This program is licensed under the terms of the MIT License.
+--
+-- Copyright (c) 2021-2023 Munehiro Yamamoto <munepixyz@gmail.com>
+--
+-- Permission is hereby granted, free of charge, to any person obtaining a copy
+-- of this software and associated documentation files (the "Software"), to deal
+-- in the Software without restriction, including without limitation the rights
+-- to use, copy, modify, merge, publish, distribute, sublicense, and/or sell
+-- copies of the Software, and to permit persons to whom the Software is
+-- furnished to do so, subject to the following conditions:
+--
+-- The above copyright notice and this permission notice shall be included in
+-- all copies or substantial portions of the Software.
+--
+-- THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
+-- IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
+-- FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE
+-- AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
+-- LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
+-- OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN
+-- THE SOFTWARE.
+
+if not ( #arg == 1 ) then
+   print("runtexshebang 20230909 v0.3")
+   print("")
+   print("Usage:	runtexshebang  [input.tex]")
+   os.exit(0)
+end
+
+local line_ctr = 0
+for line in io.lines(arg[1]) do
+   line_ctr = line_ctr + 1
+   if line_ctr > 20 then break end
+
+   if string.match(line, "^%%#!") then
+      tex_cmd, err=string.gsub(line, "%%#!", "")
+      tex_return = os.execute(tex_cmd)
+
+      -- if os.execute(texcmd) returns -1 on Windows, then
+      -- cmd.exe is not included in PATH, or some invalid string found before cmd.exe
+      if os.type == 'windows' and tex_return == -1 then
+         print("Invalid PATH setting found. Please ensure that cmd.exe can be found.\n")
+         os.exit(1)
+      end
+
+      -- if not tex_return == 0 then
+      --    print("TeX-style shebang processing of the below failed.\n" .. tex_cmd .. "\n")
+      --    os.exit(1)
+      -- end
+
+      os.exit(0)
+
+   -- else
+   --    print("TeX-style shebang not matched.\n")
+   end
+end
+
+print("TeX-style shebang not found.\n")
+os.exit(2)

texk/texlive/linked_scripts/scripts.lst

@@ -153,6 +153,7 @@ pygmentex/pygmentex.py
 pythontex/depythontex.py
 pythontex/pythontex.py
 rubik/rubikrotation.pl
+runtexshebang/runtexshebang.lua
 spix/spix.py
 splitindex/splitindex.pl
 srcredact/srcredact.pl