Module:Infobox/Fonctions/Géolocalisation : Différence entre versions

De Lagny-sur-Marne Wiki
Aller à : navigation, rechercher
m
(début de simplification)
Ligne 1 : Ligne 1 :
 
local coord = require "Module:Coordinates"
 
local coord = require "Module:Coordinates"
−
local wikidatamod = require "Module:Interface Wikidata".fromLua
+
local wd = require "Module:Interface Wikidata".fromLua
 
local countrymodule = require "Module:Country data"
 
local countrymodule = require "Module:Country data"
−
local tools = require "Module:Wikidata/Outils"
 
 
local p = {}
 
local p = {}
  
−
 
−
local p = {}
 
  
 
local function formatCountry(country)
 
local function formatCountry(country)
Ligne 18 : Ligne 15 :
 
end
 
end
  
−
local function wikidataCountry(options)
+
function p.country()
−
local query = { -- requête Wikidata à utiliser par défaut
+
local function formatCountry(country)
−
entity = item,
+
if not country then
−
property = 'P17',
+
return nil
−
conjtype = '<br />',
+
end
−
displayformat =
+
local val, success = countrymodule.standarddisplay(country) -- val = nil si country n'est pas reconnu
−
function(snak)
+
if success then
−
if tools.isValue(snak) then
+
return val
−
local id = tools.getId(snak)
+
end
−
return formatCountry(id) or wikidatamod.formatEntity(id)
 
−
end
 
−
end
 
−
}
 
−
 
−
for i, j in pairs(options or {}) do -- ajout des paramètres personnalisés
 
−
query[i] = j
 
 
end
 
end
−
return wikidatamod.formatAndCat(query)
 
−
end
 
  
−
function p.country(options)
 
 
return  {
 
return  {
 
type = 'mixed',
 
type = 'mixed',
 
label = 'Pays',
 
label = 'Pays',
 
value = function() return formatCountry(localdata['pays']) or localdata['pays'] end,
 
value = function() return formatCountry(localdata['pays']) or localdata['pays'] end,
−
wikidata = function() return wikidataCountry(options) end
+
wikidata = {property = 'P17', conjtype = 'new line', displayformat = function(snak) local id = wd.getid(snak) return formatCountry(id) or wd.formatSnak(snak) end}
 
}
 
}
 
end
 
end
Ligne 51 : Ligne 38 :
 
moduleparams = {}
 
moduleparams = {}
 
end
 
end
−
-- vérifie qu'il faut afcficher les coordonnées
+
-- vérifie qu'il faut afficher les coordonnées
 
if localdata["géolocalisation"] == 'pas pertinent' or localdata['géolocalisation'] == 'non' and not (localdata['coordonnées'] == 'oui') then
 
if localdata["géolocalisation"] == 'pas pertinent' or localdata['géolocalisation'] == 'non' and not (localdata['coordonnées'] == 'oui') then
 
return nil
 
return nil
Ligne 111 : Ligne 98 :
 
end
 
end
 
if val and not localdata['latitude'] then
 
if val and not localdata['latitude'] then
−
val = wikidatamod.addLinkback(val, item, wikidataquery.property)
+
val = wd.addLinkback(val, item, wikidataquery.property)
 
end
 
end
 
if displayinline == false then
 
if displayinline == false then
Ligne 128 : Ligne 115 :
 
if not moduleparams then
 
if not moduleparams then
 
moduleparams = {}
 
moduleparams = {}
 +
end
 +
local relevant = localdata['coordonnées'] or localdata['géolocalisation'] -- paramètre coordonnées a la priorité sur "géolocalisation" (=carte)
 +
if relevant == '-' or relevant == 'non' then
 +
return nil
 
end
 
end
 
-- initialise les paramètres avec les valeurs du module d'infobox (moduleparams)
 
-- initialise les paramètres avec les valeurs du module d'infobox (moduleparams)
Ligne 133 : Ligne 124 :
 
type = 'mixed',
 
type = 'mixed',
 
label = 'Coordonnées',
 
label = 'Coordonnées',
−
maintenancecat = function(localdata, item)
+
maintenancecat = moduleparams.maintenancecat or 'Page géolocalisable sans coordonnées paramétrées',
−
local relevant = localdata['coordonnées'] or localdata['géolocalisation']
 
−
--désactivation des catégories de maintenance
 
−
if (relevant == '-') or (relevant == 'non') or (relevant == 'non pertinent') or (relevant == 'pas pertinent') then -- un peu bordélique, "-" devrait suffire
 
−
return nil
 
−
end
 
−
return moduleparams.maintenancecat or 'Page géolocalisable sans coordonnées paramétrées'
 
−
end,
 
 
sortkey = sortkey,
 
sortkey = sortkey,
 
  value = function(localdata, item) return p.coordvalue(moduleparams) end
 
  value = function(localdata, item) return p.coordvalue(moduleparams) end
−
}
+
}
 
end
 
end
  
 
function p.geoloc(params)
 
function p.geoloc(params)
 +
 
if not params then
 
if not params then
 
params = {}
 
params = {}
 
end
 
end
 +
if localdata['géolocalisation'] == '-' or localdata['pas pertinent'] then
 +
return nil
 +
end
 +
 
return  {
 
return  {
 
type = 'map',
 
type = 'map',
Ligne 161 : Ligne 150 :
 
params = {guessmaps = guessmaps} -- = quelles cartes utiliser en l'absence de données fournies dans |gélocalisation
 
params = {guessmaps = guessmaps} -- = quelles cartes utiliser en l'absence de données fournies dans |gélocalisation
 
     }
 
     }
−
 
 
end
 
end
 +
 
return p
 
return p

Version du 8 mars 2016 à 17:09

La documentation pour ce module peut être créée à Module:Infobox/Fonctions/Géolocalisation/doc 

local coord = require "Module:Coordinates"
local wd = require "Module:Interface Wikidata".fromLua
local countrymodule = require "Module:Country data"
local p = {}


local function formatCountry(country)
	if not country then
		return nil
	end
	local val, success = countrymodule.standarddisplay(country) -- val = nil si country n'est pas reconnu
	if success then
		return val
	end
end

function p.country()
	local function formatCountry(country)
		if not country then
			return nil
		end
		local val, success = countrymodule.standarddisplay(country) -- val = nil si country n'est pas reconnu
		if success then
			return val
		end
	end

	return  {
		type = 'mixed',
		label = 'Pays',
		value = function() return formatCountry(localdata['pays']) or localdata['pays'] end,
		wikidata = {property = 'P17', conjtype = 'new line', displayformat = function(snak) local id = wd.getid(snak) return formatCountry(id) or wd.formatSnak(snak) end}
	}
end

function p.coordvalue(moduleparams) -- valeurs des coordonnées, sans mise en infoboîte
	if not moduleparams then
		moduleparams = {}
	end
	-- vérifie qu'il faut afficher les coordonnées
	if localdata["géolocalisation"] == 'pas pertinent' or localdata['géolocalisation'] == 'non' and not (localdata['coordonnées'] == 'oui') then
		return nil
	end
	local function getfirstval(vals) -- permet de donner un ordre de priorité aux paramètres à utiliser
		for i, j in pairs(vals) do
			if type(j) ~= 'nil' then return j end
		end
	end
	
	local function toboolean(val) -- transforme les textes en true / false
		if val == '-' or val == 'non' then
			return false
		end
		return val
	end
	-- récupération des paramètres d'affichage
	local globe = getfirstval{localdata['globe'], moduleparams['globe']}
	local displayinline = toboolean(getfirstval{localdata['coords en ligne'], moduleparams.displayinline, true})
	local displaytitle = toboolean(getfirstval{localdata['coords en titre'], moduleparams.displaytitle, localdata['infoboxrank'] == 'main'})
	local wikidata = toboolean(getfirstval{localdata['wikidata'], true})
	local displayformat = getfirstval{localdata['format coordonnées'], moduleparams.displayformat}
	local wikidataquery = moduleparams.wikidataquery or {property = 'P625'}
	if not wikidataquery.entity then
		wikidataquery.entity = item
	end
	local maxdistance = moduleparams.maxdistance

	-- displayplace format utilisé par Module:Coordinates, devrait être simplifié
	local displayplace = ''
	if displayinline then
		displayplace = displayplace .. 'inline'
	end
	if displaytitle then
		displayplace = displayplace .. 'title,'
	end
	if wikidata == true then wikidata = 'true' end
	--
	local latitude = localdata['latitude']
	local longitude = localdata['longitude']
	local parameterlist = {
		latitude = latitude,
		longitude = longitude,
		displayformat = displayformat,
		display= displayplace,
		globe = globe,
		wikidata = wikidata,
		wikidataquery = wikidataquery,
		maxdistance = maxdistance,
	}
	local val = coord._coord(parameterlist)
	if (not val) and moduleparams.fallbackquery then -- si pas de valeur, essayer la query de sustitution
		parameterlist.wikidataquery = moduleparams.fallbackquery
		parameterlist.wikidataquery.entity = item
		val = coord._coord(parameterlist)
	end
	if val and latitude and longitude and localdata['référence géolocalisation'] then
		val = val .. ' ' .. localdata['référence géolocalisation']
	end
	if val and not localdata['latitude'] then
		val = wd.addLinkback(val, item, wikidataquery.property)
	end
	if displayinline == false then
		return -- type: external text pour ne pas avoir de ligne vide en infobox
		{
		type = 'external text',
		sortkey = sortkey,
 		value = val
 		}
 	else 
 		return val
 	end
end

function p.coordinates(moduleparams)
	if not moduleparams then
		moduleparams = {}
	end
	local relevant = localdata['coordonnées'] or localdata['géolocalisation'] -- paramètre coordonnées a la priorité sur "géolocalisation" (=carte)
	if relevant == '-' or relevant == 'non' then
		return nil
	end
	-- initialise les paramètres avec les valeurs du module d'infobox (moduleparams)
	return {
		type = 'mixed',
		label = 'Coordonnées',
		maintenancecat = moduleparams.maintenancecat or 'Page géolocalisable sans coordonnées paramétrées',
		sortkey = sortkey,
 		value = function(localdata, item) return p.coordvalue(moduleparams) end
 	}	
end

function p.geoloc(params)

	if not params then
		params = {}
	end
	if localdata['géolocalisation'] == '-' or localdata['pas pertinent'] then
		return nil
	end
	
	return   {
		type = 'map',
		latitude = 'latitude',
		longitude = 'longitude',
		wikidata = {property = 'P625'},
		entity = item,
		maps = 'géolocalisation', -- paramètre pour la liste des cartes à utiliser
		pointtype = params.pointtype,
		maptype = params.maptype,
		params = {guessmaps = guessmaps} -- = quelles cartes utiliser en l'absence de données fournies dans |gélocalisation
     }
end

return p
Récupérée de « https://lagny-sur-marne.wiki/index.php?title=Module:Infobox/Fonctions/Géolocalisation&oldid=16182 »