Command line: Added --data option.

Author: ReFreezed

misc/runTest.cmd

@@ -3,5 +3,5 @@ CD /D "%~dp0.."
 
 IF NOT EXIST local  MD local
 
-lua preprocess-cl.lua --debug --saveinfo=local/info.lua misc/test.lua2p
-REM lua preprocess-cl.lua --debug --saveinfo=local/info.lua misc/test.lua2p --linenumbers
+lua preprocess-cl.lua --debug --saveinfo=local/info.lua --data="Hello, world!" misc/test.lua2p
+REM lua preprocess-cl.lua --debug --saveinfo=local/info.lua --data="Hello, world!" misc/test.lua2p --linenumbers

misc/test.lua2p

@@ -58,6 +58,7 @@ print(s:match(ident))    -- "hello5"
 print(s:match(num))      -- "2"
 print(s:match(funcCall)) -- "hello5( foo )"
 
+print(!("dataFromCommandLine: "..tostring(dataFromCommandLine)))
 print("The end.")
 
 !(

preprocess-cl.lua

@@ -18,6 +18,11 @@ exec lua "$0" "$@"
 		lua preprocess-cl.lua [options] [--] filepath1 [filepath2 ...]
 
 	Options:
+		--data="Any data."
+			A string with any data. If the option is present then the value
+			will be available through the global 'dataFromCommandLine' in the
+			processed files (and the message handler, if you have one).
+
 		--handler=pathToMessageHandler
 			Path to a Lua file that's expected to return a function or a
 			table of functions. If it returns a function then it will be
@@ -121,6 +126,7 @@ local outputExtension    = "lua"
 local processingInfoPath = ""
 local silent             = false
 local outputMeta         = false
+local customData         = nil
 
 --==============================================================
 --= Local Functions ============================================
@@ -216,6 +222,9 @@ for _, arg in ipairs(args) do
 		elseif arg:find"^%-%-outputextension=" then
 			outputExtension = arg:match"^%-%-outputextension=(.*)$"
 
+		elseif arg:find"^%-%-data=" then
+			customData = arg:match"^%-%-data=(.*)$"
+
 		elseif arg == "--meta" then
 			outputMeta = true
 
@@ -239,6 +248,11 @@ printfNoise(("="):rep(#header))
 
 
 
+-- Prepare metaEnvironment.
+pp.metaEnvironment.dataFromCommandLine = customData -- May be nil.
+
+
+
 -- Load message handler.
 local messageHandler = nil