-- This module is a sandbox. It is also used for testing XFDcloser
local getArgs = require('Module:Arguments').getArgs
local parser = require("Module:WikitextParser")
local mapframe = require("Module:Mapframe")

local p = {}

p.server = function(frame)
	return mw.site.server
end

p.main = function(frame) 
	local childFrame = frame:newChild{ title = "Sandbox", args = {} }
	local FULLPAGENAME = childFrame:preprocess( "{{FULLPAGENAME}}" )
	return FULLPAGENAME
end

p.getCoords = function(frame)
	local args = getArgs(frame, {parentFirst = true})
	local title = args.article and mw.title.new(args.article) or mw.title.getCurrentTitle()
	local content = frame:preprocess(
		args.section and parser.getSection(content, args.section) or title:getContent()
	)
	local coords = {}
	for geo in mw.ustring.gmatch(content, "<span class=\"geo%-default\">(.-)%)</span></span></span>%]</span>") do
		local coord = mw.ustring.match(geo, "<span class=\"geo%-dec\".->(.-)</span>")
		mw.logObject({
			geo = geo,
			coord = coord
		})
		if coord then
			local coord = mw.ustring.gsub(coord, "[° ]", "_")
			local name = mw.ustring.match(geo, "<span class=\"fn org\">(.-)</span>")
			coords[coord] = name
		end
	end
	local mapframeArgs = {
		display = "inline",
		frame = "yes"
	}
	local count = 1
	for coord, name in pairs(coords) do
		mapframeArgs["type"..count] = "point"
		mapframeArgs["coord"..count] = coord
		mapframeArgs["title"..count] = name
		count = count + 1
	end
	local map = mapframe._main(mapframeArgs)
	return frame:preprocess(map)
end

return p