Modul:LuaWiki - Versionsgeschichte

PerfektesChaos: update

2013-05-08T19:25:57Z

update

← Nächstältere Version		Version vom 8. Mai 2013, 21:25 Uhr
Zeile 1:		Zeile 1:
	--[=[ 2013-05-04		--[=[ 2013-05-07
	LuaWiki - Support Lua programming in Wiki environment		LuaWiki - Support Lua programming in Wiki environment
	* .getArg()		* .getArg()
Zeile 14:		Zeile 14:
	local wikiVariables		local wikiVariables
	local LuaWiki = {}		local LuaWiki = {}



			LuaWiki.error = function ( about )
			-- Enclose errorMsg with <span>
			-- Precondition:
			-- about -- string
			local r = about
			if type( about ) == "string" then
			if #about == 0 then
			r = "Error in Lua"
			end
			else
			r = tostring( about )
			end
			return "<span class='error'>" .. error( r, 3 ) .. "</span>"
			end -- LuaWiki.error()


Zeile 54:		Zeile 71:
	if g[ 1 ] == seek then		if g[ 1 ] == seek then
	r = g[ 2 ]		r = g[ 2 ]
	~~i = n~~		break;
	end		end
	end		end
Zeile 139:		Zeile 156:
	-- Uses:		-- Uses:
	-- mw.getCurrentFrame()		-- mw.getCurrentFrame()
			-- error()
	local r = { s, "1" }		local r = { s, "1" }
	local frame = mw.getCurrentFrame()		local frame = mw.getCurrentFrame()
Zeile 148:		Zeile 166:
	end		end
	else		else
	r = "~~<span class='error'>~~No transclude page '" .. s .. "'~~</span>~~"		r = error( "No transclude page '" .. s .. "'" )
	end		end
	return r		return r

PerfektesChaos: update

2013-05-06T08:38:07Z

update

← Nächstältere Version		Version vom 6. Mai 2013, 10:38 Uhr
Zeile 1:		Zeile 1:
	--[=[ 2013-05-02		--[=[ 2013-05-04
	LuaWiki - Support Lua programming in Wiki environment		LuaWiki - Support Lua programming in Wiki environment
	* .getArg()		* .getArg()
Zeile 33:		Zeile 33:
	end		end
	return r		return r
	end -- getArg()		end -- LuaWiki.getArg()


Zeile 71:		Zeile 71:
	end		end
	return r		return r
	end -- getVariable()		end -- LuaWiki.getVariable()


Zeile 113:		Zeile 113:
	table.insert( wikiVariables, i, { s, g } )		table.insert( wikiVariables, i, { s, g } )
	end -- for i		end -- for i
	end -- initVariables()		end -- LuaWiki.initVariables()


Zeile 128:		Zeile 128:
	"0" } )		"0" } )
	return ( g == "1" )		return ( g == "1" )
	end -- isExisting()		end -- LuaWiki.isExisting()


Zeile 151:		Zeile 151:
	end		end
	return r		return r
	end -- transclude()		end -- LuaWiki.transclude()










	LuaWiki.setFrame = function ()
	-- OBSOLETED
	end -- setFrame()

PerfektesChaos: update

2013-05-04T08:57:03Z

update

← Nächstältere Version		Version vom 4. Mai 2013, 10:57 Uhr
Zeile 1:		Zeile 1:
	--[=[ 2013-04-28		--[=[ 2013-05-02
	LuaWiki - Support Lua programming in Wiki environment		LuaWiki - Support Lua programming in Wiki environment
	* .getArg()		* .getArg()
Zeile 13:		Zeile 13:
	-- Module globals		-- Module globals
	local wikiVariables		local wikiVariables
	local templateFrame
	local LuaWiki = {}		local LuaWiki = {}

Zeile 24:		Zeile 23:
	-- assign -- any, optional; default value		-- assign -- any, optional; default value
	-- Uses:		-- Uses:
	-- ~~> templateFrame~~		-- mw.getCurrentFrame()
	local r = ~~templateFrame~~.args[ arg ]		local r = mw.getCurrentFrame().args[ arg ]
	if type( r ) ~= "string" then		if type( r ) ~= "string" then
	if type( assign ) == nil then		if type( assign ) == nil then
Zeile 44:		Zeile 43:
	-- numeric -- true: seek is numeric (else string)		-- numeric -- true: seek is numeric (else string)
	-- Uses:		-- Uses:
	-- > templateFrame
	-- >< wikiVariables		-- >< wikiVariables
			-- mw.getCurrentFrame()
	local g, i, n		local g, i, n
	local r = false		local r = false
Zeile 64:		Zeile 63:
	end		end
	if not r then		if not r then
	g = ~~templateFrame~~:preprocess( "{{" .. seek .. "}}" )		g = mw.getCurrentFrame():preprocess( "{{" .. seek .. "}}" )
	r = mw.ustring.match( g, "^(.*)$" )		r = mw.ustring.match( g, "^(.*)$" )
	if numeric then		if numeric then
Zeile 83:		Zeile 82:
	-- * table; name string and true, if numeric		-- * table; name string and true, if numeric
	-- Uses:		-- Uses:
	-- > templateFrame
	-- < wikiVariables		-- < wikiVariables
			-- mw.getCurrentFrame()
	local g, i, n, s		local g, i, n, s
	local src = "\|"		local src = "\|"
Zeile 95:		Zeile 94:
	src = src .. s .. "={{" .. s .. "}}\|"		src = src .. s .. "={{" .. s .. "}}\|"
	end -- for i		end -- for i
	src = ~~templateFrame~~:preprocess( src )		src = mw.getCurrentFrame():preprocess( src )
	for i = 1, #request do		for i = 1, #request do
	s = request[ i ]		s = request[ i ]
Zeile 123:		Zeile 122:
	-- seek -- string; full page name		-- seek -- string; full page name
	-- Uses:		-- Uses:
	-- ~~> templateFrame~~		-- mw.getCurrentFrame()
	local g = ~~templateFrame~~:callParserFunction( "#ifexist",		local g = mw.getCurrentFrame():callParserFunction( "#ifexist",
	{ ~~seek,~~ ~~"1",~~ ~~"0"~~ } )		{ seek,
			"1",
			"0" } )
	return ( g == "1" )		return ( g == "1" )
	end -- isExisting()		end -- isExisting()



⚫	LuaWiki.setFrame = function ( ~~frame~~ )
	-- Initialize frame for this utility
	-- Precondition:
	-- frame -- templateFrame
⚫	-- ~~Uses:~~
	-- < templateFrame
	templateFrame = frame
⚫	end -- setFrame()


Zeile 148:		Zeile 138:
	-- args -- table or nil; arguments		-- args -- table or nil; arguments
	-- Uses:		-- Uses:
	-- ~~> templateFrame~~		-- mw.getCurrentFrame()
	local r = { s, "1" }		local r = { s, "1" }
			local frame = mw.getCurrentFrame()
	if ~~templateFrame~~:callParserFunction( "#ifexist", r ) == "1" then		if frame:callParserFunction( "#ifexist", r ) == "1" then
	if args then		if args then
	r = ~~templateFrame~~:expandTemplate{ title = s, args = args }		r = frame:expandTemplate{ title = s, args = args }
	else		else
	r = ~~templateFrame~~:expandTemplate{ title = s }		r = frame:expandTemplate{ title = s }
	end		end
	else		else
Zeile 161:		Zeile 152:
	return r		return r
	end -- transclude()		end -- transclude()










		⚫	LuaWiki.setFrame = function ()
		⚫	-- OBSOLETED
		⚫	end -- setFrame()

PerfektesChaos: update

2013-04-29T08:11:31Z

update

← Nächstältere Version		Version vom 29. April 2013, 10:11 Uhr
Zeile 1:		Zeile 1:
	--[=[ ~~test~~ 2013-04-23		--[=[ 2013-04-28
	LuaWiki - Support Lua programming in Wiki environment		LuaWiki - Support Lua programming in Wiki environment
	* .getArg()		* .getArg()
Zeile 51:		Zeile 51:
	n = #wikiVariables		n = #wikiVariables
	for i = 1, n do		for i = 1, n do
	g = wikiVariables[ i ]		g = wikiVariables[ i ]
	if g then		if g then
	if g[ 1 ] == seek then		if g[ 1 ] == seek then
	r = g[ 2 ]		r = g[ 2 ]
	i = n		i = n
	end		end
	end		end
	end -- for i		end -- for i
	else		else
Zeile 99:		Zeile 99:
	s = request[ i ]		s = request[ i ]
	n = ( type( s ) == "table" )		n = ( type( s ) == "table" )
			if n then
			n = s[ 2 ]
			end
	if n then		if n then
	g = "-?%d+"		g = "-?%d+"

Leyo: Schützte „Modul:LuaWiki“: Häufig eingebundenes Modul ([Bearbeiten=Nur angemeldete, nicht neue Benutzer] (unbeschränkt) [Verschieben=Nur Administratoren] (unbeschränkt))

2013-04-27T09:26:32Z

Schützte „Modul:LuaWiki“: Häufig eingebundenes Modul ([Bearbeiten=Nur angemeldete, nicht neue Benutzer] (unbeschränkt) [Verschieben=Nur Administratoren] (unbeschränkt))

← Nächstältere Version	Version vom 27. April 2013, 11:26 Uhr
(kein Unterschied)

PerfektesChaos: Setup

2013-04-24T18:58:17Z

Setup

Neue Seite

--[=[ test 2013-04-23
LuaWiki - Support Lua programming in Wiki environment
* .getArg()
* .initVariables()
* .getVariable()
* .isExisting()
* .setFrame()
* .transclude()
]=]

-- Module globals
local wikiVariables
local templateFrame
local LuaWiki = {}

LuaWiki.getArg = function ( arg, assign )
-- Retrieve template argument
-- Precondition:
-- arg -- string or number; argument identifier
-- assign -- any, optional; default value
-- Uses:
-- > templateFrame
local r = templateFrame.args[ arg ]
if type( r ) ~= "string" then
if type( assign ) == nil then
r = "{{{<" .. arg .. ">}}}"
else
r = assign
end
end
return r
end -- getArg()

LuaWiki.getVariable = function ( seek, numeric )
-- Retrieve item from wikiVariables; populate if not yet present
-- Precondition:
-- seek -- string; name of variable
-- numeric -- true: seek is numeric (else string)
-- Uses:
-- > templateFrame
-- >< wikiVariables
local g, i, n
local r = false
if type( wikiVariables ) == "table" then
n = #wikiVariables
for i = 1, n do
g = wikiVariables[ i ]
if g then
if g[ 1 ] == seek then
r = g[ 2 ]
i = n
end
end
end -- for i
else
wikiVariables = { }
n = 0
end
if not r then
g = templateFrame:preprocess( "{{" .. seek .. "}}" )
r = mw.ustring.match( g, "^(.*)$" )
if numeric then
r = tonumber( g )
end
table.insert( wikiVariables, n + 1, { seek, r } )
end
return r
end -- getVariable()

LuaWiki.initVariables = function ( request )
-- Initialize wikiVariables
-- Precondition:
-- request -- table; every element either
-- * string; name of variable
-- * table; name string and true, if numeric
-- Uses:
-- > templateFrame
-- < wikiVariables
local g, i, n, s
local src = "|"
wikiVariables = { }
for i = 1, #request do
s = request[ i ]
if type( s ) == "table" then
s = s[ 1 ]
end
src = src .. s .. "={{" .. s .. "}}|"
end -- for i
src = templateFrame:preprocess( src )
for i = 1, #request do
s = request[ i ]
n = ( type( s ) == "table" )
if n then
g = "-?%d+"
s = s[ 1 ]
else
g = "[^|]*"
end
g = mw.ustring.match( src, "|" .. s .. "=(" .. g .. ")|" )
if n then
g = tonumber( g )
end
table.insert( wikiVariables, i, { s, g } )
end -- for i
end -- initVariables()

LuaWiki.isExisting = function ( seek )
-- Return true if page exists, else false
-- Precondition:
-- seek -- string; full page name
-- Uses:
-- > templateFrame
local g = templateFrame:callParserFunction( "#ifexist",
{ seek, "1", "0" } )
return ( g == "1" )
end -- isExisting()

LuaWiki.setFrame = function ( frame )
-- Initialize frame for this utility
-- Precondition:
-- frame -- templateFrame
-- Uses:
-- < templateFrame
templateFrame = frame
end -- setFrame()

LuaWiki.transclude = function ( s, args )
-- Save transclusion of a page, or error message
-- Precondition:
-- s -- string; page name
-- args -- table or nil; arguments
-- Uses:
-- > templateFrame
local r = { s, "1" }
if templateFrame:callParserFunction( "#ifexist", r ) == "1" then
if args then
r = templateFrame:expandTemplate{ title = s, args = args }
else
r = templateFrame:expandTemplate{ title = s }
end
else
r = "<span class='error'>No transclude page '" .. s .. "'</span>"
end
return r
end -- transclude()

return LuaWiki