● Home ● Random ● Nearby ● Log in ● Settings ● Donate ● About Wikipedia ● Disclaimers

View source for Module:Location map/multi

← Module:Location map/multi You do not have permission to edit this page, for the following reason:

This page is currently protected so that only template editors and administrators can edit it.

Why is the page protected?

Some templates and site interface pages are permanently protected due to visibility. Most templates can be edited by anyone.
The reason for protection can be found in the protection log. If there are no relevant entries in the protection log, the page may have been moved after being protected.

What can I do?

Discuss this page with others.
For move-protected pages, see requested moves.
Request that the page's protection level be reduced.
Find out more about how to get started editing Wikipedia.
If you have noticed an error or have a suggestion for a simple, non-controversial change, you can submit an edit request by clicking the button below and following the instructions. An administratorortemplate editor may then make the change on your behalf. Please check the talk page first in case the issue is already being discussed.
Submit an edit request
If you wrote any text, please save it temporarily to your device until you can edit this page.

You can view and copy the source of this page:

require('strict')

local p = {}

local getArgs = require('Module:Arguments').getArgs
local locmap = require('Module:Location map')

local function switcherSeparate(<span class="ltr">s</span>)
 if s == nil then return {} end
 local retval = {}
 for i in string.gmatch(s .. '#', '([^#]*)#') do
  i = mw.text.trim(<span class="ltr">i</span>)
  retval[#retval + 1] = (i ~= '' and i)
 end
 return retval
end

function p.container(frame, args, map)
 local caption_list = {}
 if not args then
  args = getArgs(frame, {wrappers = 'Template:Location map+', valueFunc = locmap.valueFunc})
 end
 if not map then
  if args[<span class="ltr">1</span>] then
   map = {}
   for mapname in string.gmatch(args[<span class="ltr">1</span>], '[^#]+') do
    map[#map + 1] = locmap.getMapParams(mapname, frame)
   end
   if args['caption'] then
    if args['caption'] == "" then
     while #caption_list < #map do
      caption_list[#caption_list + 1] = args['caption']
     end
    else
     for caption in mw.text.gsplit(args['caption'], '##', true) do
      caption_list[#caption_list + 1] = caption
     end
    end
   end
   if #map == 1 then map = map[<span class="ltr">1</span>] end
  else
   map = locmap.getMapParams('World', frame)
  end
 end
 if type(map) == 'table' then
  local placeslist = mw.text.gsplit(args.places, '#PlaceList#')
  local permaplaces = {}
  local numbermaps = #map
  local count = 0
  for i = 1,numbermaps do
   permaplaces[<span class="ltr">i</span>] = {}
  end
  for place in placeslist do
   table.insert(permaplaces[count%numbermaps + 1],place)
   count = count + 1
  end
  local altmaps = switcherSeparate(args.AlternativeMap)
  if #altmaps > #map then
   error(string.format('%d AlternativeMaps were provided, but only %d maps were provided', #altmaps, #map))
  end
  local overlays = switcherSeparate(args.overlay_image)
  if #overlays > #map then
   error(string.format('%d overlay_images were provided, but only %d maps were provided', #overlays, #map))
  end
  if #caption_list > #map then
   error(string.format('%d captions were provided, but only %d maps were provided', #caption_list, #map))
  end
  local outputs = {}
  args.autoSwitcherLabel = true
  for k,v in ipairs(map) do
   args.AlternativeMap = altmaps[<span class="ltr">k</span>]
   args.overlay_image = overlays[<span class="ltr">k</span>]
   args.caption = caption_list[<span class="ltr">k</span>]
   args.places = table.concat(permaplaces[<span class="ltr">k</span>])
   outputs[<span class="ltr">k</span>] = p.container(frame, args, v)
  end
  return '<div class="switcher-container">' .. table.concat(outputs) .. '</div>'
 else
  return locmap.top(frame, args, map) .. (args.places and args.places:gsub('%s*\n%s*', '') or '') .. locmap.bottom(frame, args, map)
 end
end

local function manyMakeArgs(fullArgs, n)
 if n == 1 then
  return {
   lat = fullArgs.lat1 or fullArgs.lat,
   long = fullArgs.long1 or fullArgs.long,
   coordinates = fullArgs.coordinates1 or fullArgs.coordinates,
   lat_deg = fullArgs.lat1_deg or fullArgs.lat_deg,
   lat_min = fullArgs.lat1_min or fullArgs.lat_min,
   lat_sec = fullArgs.lat1_sec or fullArgs.lat_sec,
   lat_dir = fullArgs.lat1_dir or fullArgs.lat_dir,
   lon_deg = fullArgs.lon1_deg or fullArgs.lon_deg,
   lon_min = fullArgs.lon1_min or fullArgs.lon_min,
   lon_sec = fullArgs.lon1_sec or fullArgs.lon_sec,
   lon_dir = fullArgs.lon1_dir or fullArgs.lon_dir,
   outside = fullArgs.outside1 or fullArgs.outside,
   mark = fullArgs.mark1 or fullArgs.mark,
   marksize = fullArgs.mark1size or fullArgs.marksize,
   link = fullArgs.link1 or fullArgs.link,
   label = fullArgs.label1 or fullArgs.label,
   label_size = fullArgs.label1_size or fullArgs.label_size,
   label_width = fullArgs.label1_width or fullArgs.label_width,
   position = fullArgs.position1 or fullArgs.pos1 or fullArgs.position or fullArgs.pos,
   background = fullArgs.background1 or fullArgs.bg1 or fullArgs.background or fullArgs.bg
  }
 else
  return {
   lat = fullArgs['lat' .. n],
   long = fullArgs['long' .. n],
   coordinates = fullArgs['coordinates' .. n],
   lat_deg = fullArgs['lat' .. n .. '_deg'],
   lat_min = fullArgs['lat' .. n .. '_min'],
   lat_sec = fullArgs['lat' .. n .. '_sec'],
   lat_dir = fullArgs['lat' .. n .. '_dir'],
   lon_deg = fullArgs['lon' .. n .. '_deg'],
   lon_min = fullArgs['lon' .. n .. '_min'],
   lon_sec = fullArgs['lon' .. n .. '_sec'],
   lon_dir = fullArgs['lon' .. n .. '_dir'],
   outside = fullArgs['outside' .. n],
   mark = fullArgs['mark' .. n],
   marksize = fullArgs['mark' .. n .. 'size'],
   link = fullArgs['link' .. n],
   label = fullArgs['label' .. n],
   label_size = fullArgs['label' .. n .. '_size'],
   label_width = fullArgs['label' .. n .. '_width'],
   position = fullArgs['position' .. n] or fullArgs['pos' .. n],
   background = fullArgs['background' .. n] or fullArgs['bg' .. n]
  }
 end
end

function p.many(frame, args, map)
 if not args then
  args = getArgs(frame, {wrappers = 'Template:Location map many', valueFunc = locmap.valueFunc})
 end
 if not args[<span class="ltr">1</span>] then
  args[<span class="ltr">1</span>] = 'World'
 end
 if not map then
  map = {}
  for mapname in string.gmatch(args[<span class="ltr">1</span>], '[^#]+') do
   map[#map + 1] = locmap.getMapParams(mapname, frame)
  end
  if #map ~= 1 then
   local outputs = {}
   args.autoSwitcherLabel = true
   for k,v in ipairs(map) do
    outputs[<span class="ltr">k</span>] = p.many(frame, args, v)
   end
   return '<div class="switcher-container">' .. table.concat(outputs) .. '</div>'
  end
  map = map[<span class="ltr">1</span>]
 end
 local marks = {}
 local markhigh
 if args.markhigh then
  mw.log('Removed parameter markhigh used.')
  local parent = frame:getParent()
  if parent then
   mw.log('Parent is ' .. parent:getTitle())
  end
  mw.logObject(args, 'args')
  markhigh = true
 end
 for k, v in pairs(args) do -- @todo change to uargs once we have that
  if v then
   if string.sub(k, -4) == '_deg' then
    k = string.sub(k, 1, -5)
   end
   if string.sub(k, 1, 3) == 'lat' then
    k = tonumber(string.sub(k, 4))
    if k then
     table.insert(marks, k)
    end
   elseif string.sub(k, 1, 11) == 'coordinates' then
    k = tonumber(string.sub(k, 12))
    if k then
     table.insert(marks,k)
    end
   end
  end
 end
 table.sort(marks)
 if marks[<span class="ltr">1</span>] ~= 1 and (args.lat or args.lat_deg or args.coordinates) then
  table.insert(marks, 1, 1)
 end
 local body = ''
 for _, v in ipairs(marks) do
  -- don't try to consolidate this into the above loop. ordering of elements from pairs() is unspecified
  body = body .. tostring( locmap.mark(frame, manyMakeArgs(args, v), map) )
  if args['mark' .. v .. 'high'] then
   mw.log('Removed parameter mark' .. v .. 'high used.')
   local parent = frame:getParent()
   if parent then
    mw.log('Parent is ' .. parent:getTitle())
   end
   mw.logObject(args, 'args')
   markhigh = true
  end
 end
 args.label = nil -- there is no global label
 return locmap.top(frame, args, map) .. body .. locmap.bottom(frame, args, map) .. (markhigh and '[[Category:Location maps with possible errors|Page using removed parameter]]' or '')
end

function p.load(frame, args, map)
 if not args then
  args = getArgs(frame, {frameOnly = true})
 end
 local dataModule = mw.loadData(args[<span class="ltr">1</span>])
 local containerArgs = dataModule.containerArgs
 if not map then
  map = {}
  for mapname in string.gmatch(containerArgs[<span class="ltr">1</span>], '[^#]+') do
   map[#map + 1] = locmap.getMapParams(mapname, frame)
  end
  if #map ~= 1 then
   local outputs = {}
   args.autoSwitcherLabel = true
   for k,v in ipairs(map) do
    outputs[<span class="ltr">k</span>] = p.load(frame, args, v)
   end
   return '<div class="switcher-container">' .. table.concat(outputs) .. '</div>'
  end
  map = map[<span class="ltr">1</span>]
 end
 local marks = {}
 if dataModule.marks then
  for k,markArgs in ipairs(dataModule.marks) do
   marks[<span class="ltr">k</span>] = tostring(locmap.mark(frame, markArgs, map))
  end
 end
 if dataModule.secondaryModules then
  for _,modname in ipairs(dataModule.secondaryModules) do
   for _,markArgs in ipairs(mw.loadData(modname).marks) do
    marks[#marks + 1] = tostring(locmap.mark(frame, markArgs, map))
   end
  end
 end
 if args.autoSwitcherLabel then
  local TableTools = require('Module:TableTools')
  containerArgs = TableTools.shallowClone(containerArgs)
  containerArgs.autoSwitcherLabel = true
 end
 return locmap.top(frame, containerArgs, map) .. table.concat(marks) .. locmap.bottom(frame, containerArgs, map)
end

return p

Pages transcluded onto the current version of this page (help): ●Template:Category handler (view source) (protected) ●Template:Category link with count (view source) (template editor protected) ●Template:Clc (view source) (template editor protected) ●Template:Cleanup (view source) (template editor protected) ●Template:Cleanup section (view source) (semi-protected) ●Template:DMC (view source) (template editor protected) ●Template:DMCA (view source) (template editor protected) ●Template:Dated maintenance category (view source) (template editor protected) ●Template:Dated maintenance category (articles) (view source) (template editor protected) ●Template:FULLROOTPAGENAME (view source) (template editor protected) ●Template:High-use (view source) (template editor protected) ●Template:Main other (view source) (protected) ●Template:Mbox (view source) (protected) ●Template:Module other (view source) (extended confirmed protected) ●Template:Module rating (view source) (semi-protected) ●Template:Nowrap (view source) (protected) ●Template:Ns has subpages (view source) (protected) ●Template:Ombox (view source) (protected) ●Template:Template link (view source) (protected) ●Template:Terminate sentence (view source) (template editor protected) ●Template:Tl (view source) (protected) ●Module:Arguments (view source) (protected) ●Module:Category handler (view source) (protected) ●Module:Category handler/blacklist (view source) (protected) ●Module:Category handler/config (view source) (protected) ●Module:Category handler/data (view source) (protected) ●Module:Category handler/shared (view source) (protected) ●Module:Documentation (view source) (template editor protected) ●Module:Documentation/config (view source) (template editor protected) ●Module:Documentation/styles.css (view source) (template editor protected) ●Module:Effective protection expiry (view source) (protected) ●Module:Effective protection level (view source) (protected) ●Module:File link (view source) (template editor protected) ●Module:High-use (view source) (template editor protected) ●Module:Location map (view source) (template editor protected) ●Module:Location map/multi (view source) (template editor protected) ●Module:Location map/multi/doc (edit) ●Module:Message box (view source) (protected) ●Module:Message box/configuration (view source) (protected) ●Module:Message box/ombox.css (view source) (protected) ●Module:Namespace detect/config (view source) (protected) ●Module:Namespace detect/data (view source) (protected) ●Module:Ns has subpages (view source) (protected) ●Module:Protection banner (view source) (template editor protected) ●Module:Protection banner/config (view source) (template editor protected) ●Module:String (view source) (protected) ●Module:Text (view source) (template editor protected) ●Module:Transclusion count (view source) (template editor protected) ●Module:Transclusion count/data/L (view source) (extended confirmed protected) ●Module:Unsubst (view source) (protected) ●Module:Yesno (view source) (protected) Return to Module:Location map/multi. Retrieved from "https://en.wikipedia.org/wiki/Module:Location_map/multi"

Languages

This page is not available in other languages.

●Privacy policy ●About Wikipedia ●Disclaimers ●Contact Wikipedia ●Code of Conduct ●Developers ●Statistics ●Cookie statement ●Terms of Use ●Desktop