Module:Infobox/Fonctions/Géolocalisation : Différence entre versions
< Module:Infobox | Fonctions
(début de simplification) |
(deuxième fournée) |
||
| Ligne 3 : | Ligne 3 : | ||
local countrymodule = require "Module:Country data" | local countrymodule = require "Module:Country data" | ||
local p = {} | local p = {} | ||
| − | |||
| − | |||
| − | |||
| − | |||
| − | |||
| − | |||
| − | |||
| − | |||
| − | |||
| − | |||
| − | |||
function p.country() | function p.country() | ||
| Ligne 38 : | Ligne 27 : | ||
moduleparams = {} | moduleparams = {} | ||
end | end | ||
| − | + | ||
| − | + | local function toboolean(val) -- transforme un "-" en false au moment voulu | |
| − | |||
| − | |||
| − | |||
| − | |||
| − | |||
| − | |||
| − | |||
| − | |||
| − | local function toboolean(val) -- transforme | ||
if val == '-' or val == 'non' then | if val == '-' or val == 'non' then | ||
return false | return false | ||
end | end | ||
| − | return | + | return true |
end | end | ||
| − | -- | + | |
| − | local | + | -- paramètres Wikidata |
| − | + | local wikidata = tostring(toboolean(localdata['wikidata'] or true)) -- doit être string dans Module:Coordinates | |
| − | + | local maxdistance = moduleparams.maxdistance | |
| − | |||
| − | local | ||
local wikidataquery = moduleparams.wikidataquery or {property = 'P625'} | local wikidataquery = moduleparams.wikidataquery or {property = 'P625'} | ||
if not wikidataquery.entity then | if not wikidataquery.entity then | ||
wikidataquery.entity = item | wikidataquery.entity = item | ||
end | end | ||
| − | |||
| − | -- | + | -- paramètres d'affichage |
| + | local displayformat = localdata['format coordonnées'], moduleparams.displayformat | ||
| + | |||
local displayplace = '' | local displayplace = '' | ||
| + | local displayinline = toboolean(localdata['coords en ligne'] or moduleparams.displayinline or true) | ||
| + | local displaytitle = toboolean(localdata['coords en titre'] or moduleparams.displaytitle or localdata['infoboxrank'] == 'main') -- par défautt : on met dans les coordonnées de l'infobox principale en titre | ||
if displayinline then | if displayinline then | ||
displayplace = displayplace .. 'inline' | displayplace = displayplace .. 'inline' | ||
| Ligne 74 : | Ligne 55 : | ||
displayplace = displayplace .. 'title,' | displayplace = displayplace .. 'title,' | ||
end | end | ||
| − | + | ||
| − | -- | + | -- données sur géograhiques |
| + | local globe = localdata['globe'] or moduleparams['globe'] or 'earth' | ||
local latitude = localdata['latitude'] | local latitude = localdata['latitude'] | ||
local longitude = localdata['longitude'] | local longitude = localdata['longitude'] | ||
| + | |||
local parameterlist = { | local parameterlist = { | ||
latitude = latitude, | latitude = latitude, | ||
| Ligne 88 : | Ligne 71 : | ||
maxdistance = maxdistance, | maxdistance = maxdistance, | ||
} | } | ||
| + | |||
local val = coord._coord(parameterlist) | local val = coord._coord(parameterlist) | ||
if (not val) and moduleparams.fallbackquery then -- si pas de valeur, essayer la query de sustitution | if (not val) and moduleparams.fallbackquery then -- si pas de valeur, essayer la query de sustitution | ||
| Ligne 135 : | Ligne 119 : | ||
params = {} | params = {} | ||
end | end | ||
| − | if localdata['géolocalisation'] == '-' or localdata['pas pertinent' | + | if (localdata['géolocalisation'] == '-') or (localdata['géolocalisation'] == 'pas pertinent') then |
return nil | return nil | ||
end | end | ||
Version du 8 mars 2016 à 17:55
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 = {}
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
local function toboolean(val) -- transforme un "-" en false au moment voulu
if val == '-' or val == 'non' then
return false
end
return true
end
-- paramètres Wikidata
local wikidata = tostring(toboolean(localdata['wikidata'] or true)) -- doit être string dans Module:Coordinates
local maxdistance = moduleparams.maxdistance
local wikidataquery = moduleparams.wikidataquery or {property = 'P625'}
if not wikidataquery.entity then
wikidataquery.entity = item
end
-- paramètres d'affichage
local displayformat = localdata['format coordonnées'], moduleparams.displayformat
local displayplace = ''
local displayinline = toboolean(localdata['coords en ligne'] or moduleparams.displayinline or true)
local displaytitle = toboolean(localdata['coords en titre'] or moduleparams.displaytitle or localdata['infoboxrank'] == 'main') -- par défautt : on met dans les coordonnées de l'infobox principale en titre
if displayinline then
displayplace = displayplace .. 'inline'
end
if displaytitle then
displayplace = displayplace .. 'title,'
end
-- données sur géograhiques
local globe = localdata['globe'] or moduleparams['globe'] or 'earth'
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['géolocalisation'] == '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
