Module:Matériau - Historique des versions

0x010D : speciallabel pour gros oeuvre

2015-08-27T16:46:44Z

speciallabel pour gros oeuvre

← Version précédente		Version du 27 août 2015 à 16:46
Ligne 7 :		Ligne 7 :
	Q22731 = '[[Pierre naturelle\|pierre]]',		Q22731 = '[[Pierre naturelle\|pierre]]',
	Q4259259 = '[[Toile (peinture)\|toile]]',		Q4259259 = '[[Toile (peinture)\|toile]]',
			Q2448108 = 'structure', --QID de "gros oeuvre" mais parait un peu bizarre dans des contexte comme "gros oeuvre en acier"
	}		}

Ligne 13 :		Ligne 14 :
	params.speciallabels = speciallabels		params.speciallabels = speciallabels


	local claims = wikidata.getClaims{entity = item, property = 'P186'}		local claims = wikidata.getClaims{entity = item, property = 'P186'}
	if not claims then		if not claims then
Ligne 21 :		Ligne 21 :
	-- crée trois tables : main pour celle sans P518, support pour celle avec qualif "s'applique à "support de peinture" et "parts" pour les autres		-- crée trois tables : main pour celle sans P518, support pour celle avec qualif "s'applique à "support de peinture" et "parts" pour les autres
	local main, support, parts = {}, {}, {}		local main, support, parts = {}, {}, {}



Ligne 55 :		Ligne 54 :
	local formattedparts = {}		local formattedparts = {}
	for part, materials in pairs(parts) do		for part, materials in pairs(parts) do
	local str = wikidata.formatEntity(part, {link = '-'}) .. ' en ' .. linguistic.conj(materials)		local str = wikidata.formatEntity(part, {link = '-', speciallabels = speciallabels}) .. ' en ' .. linguistic.conj(materials)
	table.insert(formattedparts, str)		table.insert(formattedparts, str)
	end		end

0x010D le 27 août 2015 à 14:18

2015-08-27T14:18:00Z

← Version précédente		Version du 27 août 2015 à 14:18
Ligne 44 :		Ligne 44 :
	assignClaim(j)		assignClaim(j)
	end		end

	~~local str -- la chaîne à retourner~~

	-- transforme en chaîne la table des valeurs sans qualificatif		-- transforme en chaîne la table des valeurs sans qualificatif
	~~local~~ mainstr = linguistic.conj(main)		mainstr = linguistic.conj(main)

	-- ajoute le support de peinture (sur toile)		-- ajoute le support de peinture (sur toile)
	local supportstr = linguistic.conj(support)		local supportstr = linguistic.conj(support)
	if (mainstr ~~and~~ supportstr~~) then~~		mainstr = linguistic.conj({mainstr, supportstr}, ' sur ')
	~~str = mainstr ..~~ ' sur ' ~~.. supportstr~~
	~~end~~

	-- chaîne des autres valeurs avec qualifs: [piédestal] = {marbre, bronze} => 'piédestal en marbre et bronze'		-- chaîne des autres valeurs avec qualifs: [piédestal] = {marbre, bronze} => 'piédestal en marbre et bronze'
Ligne 64 :		Ligne 60 :
	local partsStr = linguistic.conj(formattedparts, 'comma')		local partsStr = linguistic.conj(formattedparts, 'comma')

	~~str~~ = linguistic.conj({~~str~~, partsStr}, 'comma')		mainstr = linguistic.conj({mainstr, partsStr}, 'comma')
	~~if not str then~~
	~~return nil~~
	~~end~~
	if (params.linkback ~= '-') then		if (params.linkback ~= '-') then
	~~str~~ = wikidata.addLinkback(~~str~~, item, 'P186')		mainstr = wikidata.addLinkback(mainstr, item, 'P186')
	end		end
	return ~~str~~ .. wikidata.addtrackingcat('P186')		return mainstr .. wikidata.addtrackingcat('P186')
	end		end

	return p		return p

0x010D le 27 août 2015 à 14:14

2015-08-27T14:14:07Z

← Version précédente		Version du 27 août 2015 à 14:14
Ligne 65 :		Ligne 65 :

	str = linguistic.conj({str, partsStr}, 'comma')		str = linguistic.conj({str, partsStr}, 'comma')
			if not str then
			return nil
			end
	if (params.linkback ~= '-') then		if (params.linkback ~= '-') then
	str = wikidata.addLinkback(str, item, 'P186')		str = wikidata.addLinkback(str, item, 'P186')

0x010D : un peu plus simple

2015-08-27T12:11:05Z

un peu plus simple

← Version précédente		Version du 27 août 2015 à 12:11
Ligne 9 :		Ligne 9 :
	}		}

	function p.formatFromItem(item, ~~args~~)		function p.formatFromItem(item, params) -- affiche le matériau en fonction de Property:P186, et de son qualificatif P518 ('s'applique à')
	~~args = args or {}~~		params = params or {}
	-- affiche le matériau en fonction de Property:P186, et de son qualificatif P518 ('s'applique à')		params.speciallabels = speciallabels
	local ~~materials~~ = wikidata.getClaims{entity = item, property = 'P186'}
	if not ~~materials~~ then
			local claims = wikidata.getClaims{entity = item, property = 'P186'}
			if not claims then
	return nil		return nil
	end		end

	-- ~~créé une table~~ de ~~chaînes avec~~ les ~~différents matériaux~~		-- crée trois tables : main pour celle sans P518, support pour celle avec qualif "s'applique à "support de peinture" et "parts" pour les autres
	local ~~withP518~~, ~~withoutP518~~ = {}, {}		local main, support, parts = {}, {}, {}


	~~local function addStatement(statement) -- ajout d'un chaîne à la table des valeurs~~
	~~-- valeur de base~~
	~~if (not statement.qualifiers) or (not statement.qualifiers.P518) then~~
	~~table.insert(withoutP518, statement)~~
	~~return~~
	~~end~~

	~~for _, qualif in pairs(statement.qualifiers.P518) do~~
	~~local key = wikidata.getid(qualif)~~
	~~withP518[key] = withP518[key] or {}~~
	~~table.insert(withP518[key], statement)~~
	~~end~~
	~~end~~
	~~for i, j in pairs(materials) do~~
	~~addStatement(j)~~
	~~end~~

	~~-- concaténation des différentes tables de valeur~~		local function assignClaim(claim) -- met une claims dans la bonne table
	local function ~~formatVals~~(~~statements~~)		local str = wikidata.formatStatement(claim, params)
	local t = {}		if (not claim.qualifiers) or (not claim.qualifiers.P518) then
	~~local args = {speciallabels = speciallabels}~~		table.insert(main, str)
	for i, ~~statement~~ in pairs(~~statements~~) do		else
	table.insert(t, ~~wikidata~~.~~formatStatement~~(~~statement~~, ~~args)~~)		for _, val in pairs(claim.qualifiers.P518) do
			local key = wikidata.getid(val)
			if key == 'Q861259' then
			table.insert(support, str)
			else
			parts[key] = parts[key] or {}
			table.insert(parts[key], str)
			end
			end
	end		end
	~~return linguistic.conj(t)~~
	end		end

	~~--- valeurs sans qualificatifs~~		for i, j in pairs(claims) do
	~~local mainstr = formatVals~~(~~withoutP518~~)		assignClaim(j)

	~~--- valeurs avec P518 utilisant la préposition "sur"~~
	~~local supportstr~~
	~~if withP518['Q861259'] then~~
	~~supportstr = ' sur ' .. formatVals~~(~~withP518['Q861259']~~)
	~~withP518['Q861259'] = nil~~
	end		end

	if mainstr or supportstr then		local str -- la chaîne à retourner
	~~mainstr~~ = (mainstr or '').. (supportstr ~~or '')~~
			-- transforme en chaîne la table des valeurs sans qualificatif
			local mainstr = linguistic.conj(main)

			-- ajoute le support de peinture (sur toile)
			local supportstr = linguistic.conj(support)
			if (mainstr and supportstr) then
			str = mainstr .. ' sur ' .. supportstr
	end		end

	--- autres ~~qualificatifs~~ : ~~préposition "~~en"		-- chaîne des autres valeurs avec qualifs: [piédestal] = {marbre, bronze} => 'piédestal en marbre et bronze'
	local ~~withpartstr~~		local formattedparts = {}
	~~local strtable~~ = {}		for part, materials in pairs(parts) do
	for part, materials in pairs(~~withP518~~) do		local str = wikidata.formatEntity(part, {link = '-'}) .. ' en ' .. linguistic.conj(materials)
	local str = wikidata.formatEntity(part, {link = '-'})		table.insert(formattedparts, str)
	~~str = str~~ .. ' en ' .. ~~formatVals~~(materials)
	table.insert(~~strtable~~, str)
	end		end
	~~withpartstr~~ = linguistic.conj(~~strtable~~, 'comma')		local partsStr = linguistic.conj(formattedparts, 'comma')

	~~-- concaténation finale~~		str = linguistic.conj({str, partsStr}, 'comma')
	~~mainstr~~ = linguistic.conj({~~mainstr~~, ~~withpartstr~~}, 'comma')
	if (~~args~~.linkback ~= '-') then		if (params.linkback ~= '-') then
	~~mainstr~~ = wikidata.addLinkback(~~mainstr~~, item, 'P186')		str = wikidata.addLinkback(str, item, 'P186')
	end		end
	return ~~mainstr~~ .. wikidata.addtrackingcat('P186')		return str .. wikidata.addtrackingcat('P186')
	end		end

	return p		return p

0x010D le 27 août 2015 à 08:55

2015-08-27T08:55:45Z

← Version précédente		Version du 27 août 2015 à 08:55
Ligne 22 :		Ligne 22 :
	local function addStatement(statement) -- ajout d'un chaîne à la table des valeurs		local function addStatement(statement) -- ajout d'un chaîne à la table des valeurs
	-- valeur de base		-- valeur de base
	~~local mainid = wikidata.getmainid(statement)~~
	~~local str = wikidata.formatEntity(mainid, {speciallabels = speciallabels})~~

	if (not statement.qualifiers) or (not statement.qualifiers.P518) then		if (not statement.qualifiers) or (not statement.qualifiers.P518) then
	table.insert(withoutP518, ~~str~~)		table.insert(withoutP518, statement)
	return		return
	end		end
Ligne 33 :		Ligne 30 :
	local key = wikidata.getid(qualif)		local key = wikidata.getid(qualif)
	withP518[key] = withP518[key] or {}		withP518[key] = withP518[key] or {}
	table.insert(withP518[key], ~~mainid~~)		table.insert(withP518[key], statement)
	end		end
	end		end
Ligne 41 :		Ligne 38 :

	-- concaténation des différentes tables de valeur		-- concaténation des différentes tables de valeur
	local function formatVals(~~ids, args~~)		local function formatVals(statements)
	local t = {}		local t = {}
	for i, id in pairs(~~ids~~) do		local args = {speciallabels = speciallabels}
	table.insert(t, wikidata.~~formatEntity~~(id, args))		for i, statement in pairs(statements) do
			table.insert(t, wikidata.formatStatement(statement, args))
	end		end
	return linguistic.conj(t)		return linguistic.conj(t)
Ligne 50 :		Ligne 48 :

	--- valeurs sans qualificatifs		--- valeurs sans qualificatifs
	local mainstr = ~~linguistic.conj~~(withoutP518)		local mainstr = formatVals(withoutP518)

	--- valeurs avec P518 utilisant la préposition "sur"		--- valeurs avec P518 utilisant la préposition "sur"
Ligne 75 :		Ligne 73 :
	-- concaténation finale		-- concaténation finale
	mainstr = linguistic.conj({mainstr, withpartstr}, 'comma')		mainstr = linguistic.conj({mainstr, withpartstr}, 'comma')
			if (args.linkback ~= '-') then
	return mainstr		mainstr = wikidata.addLinkback(mainstr, item, 'P186')
			end
			return mainstr .. wikidata.addtrackingcat('P186')
	end		end
	return p		return p

0x010D le 27 août 2015 à 07:25

2015-08-27T07:25:17Z

← Version précédente		Version du 27 août 2015 à 07:25
Ligne 41 :		Ligne 41 :

	-- concaténation des différentes tables de valeur		-- concaténation des différentes tables de valeur
			local function formatVals(ids, args)
			local t = {}
			for i, id in pairs(ids) do
			table.insert(t, wikidata.formatEntity(id, args))
			end
			return linguistic.conj(t)
			end

	--- valeurs sans qualificatifs		--- valeurs sans qualificatifs
Ligne 48 :		Ligne 55 :
	local supportstr		local supportstr
	if withP518['Q861259'] then		if withP518['Q861259'] then
	~~local v = withP518['Q861259']~~		supportstr = ' sur ' .. formatVals(withP518['Q861259'])
	supportstr = ' sur ' .. ~~linguistic.conj~~(v)
	withP518['Q861259'] = nil		withP518['Q861259'] = nil
	end		end

	if mainstr or supportstr then		if mainstr or supportstr then
	mainstr = (mainstr or '').. (supportstr or '')		mainstr = (mainstr or '').. (supportstr or '')
Ligne 61 :		Ligne 68 :
	for part, materials in pairs(withP518) do		for part, materials in pairs(withP518) do
	local str = wikidata.formatEntity(part, {link = '-'})		local str = wikidata.formatEntity(part, {link = '-'})
	~~local v = {}~~		str = str .. ' en ' .. formatVals(materials)
	~~for i, j in pairs(materials) do~~
	~~table.insert(v, wikidata.formatEntity(j))~~
	~~end~~
	str = str .. ' en ' .. ~~linguistic.conj~~(v)
	table.insert(strtable, str)		table.insert(strtable, str)
	end		end

0x010D le 27 août 2015 à 07:20

2015-08-27T07:20:37Z

← Version précédente		Version du 27 août 2015 à 07:20
Ligne 60 :		Ligne 60 :
	local strtable = {}		local strtable = {}
	for part, materials in pairs(withP518) do		for part, materials in pairs(withP518) do
	local ~~partstr~~ = wikidata.~~getLabel~~(part)		local str = wikidata.formatEntity(part, {link = '-'})
	local v = {}		local v = {}
	for i, j in pairs(materials) do		for i, j in pairs(materials) do
	table.insert(v, wikidata.formatEntity(j))		table.insert(v, wikidata.formatEntity(j))
	end		end
	~~local~~ str = ~~partstr~~ .. ' en ' .. linguistic.conj(v)		str = str .. ' en ' .. linguistic.conj(v)
	table.insert(strtable, str)		table.insert(strtable, str)
	end		end

0x010D le 27 août 2015 à 06:33

2015-08-27T06:33:06Z

← Version précédente		Version du 27 août 2015 à 06:33
Ligne 50 :		Ligne 50 :
	local v = withP518['Q861259']		local v = withP518['Q861259']
	supportstr = ' sur ' .. linguistic.conj(v)		supportstr = ' sur ' .. linguistic.conj(v)
	~~vals~~['Q861259'] = nil		withP518['Q861259'] = nil
	end		end
	if mainstr or supportstr then		if mainstr or supportstr then

0x010D : correction bug, commentaires

2015-08-27T06:03:39Z

correction bug, commentaires

← Version précédente		Version du 27 août 2015 à 06:03
Ligne 1 :		Ligne 1 :
	local p = {}		local p = {}
	local wikidata = require('Module:Wikidata')		local wikidata = require 'Module:Interface Wikidata'.fromLua
	local linguistic = require('Module:Linguistique')		local linguistic = require 'Module:Linguistique'

	local speciallabels = { -- libellés définis localement, qui priment sur ceux de Wikidata		local speciallabels = { -- libellés définis localement, qui priment sur ceux de Wikidata
Ligne 16 :		Ligne 16 :
	return nil		return nil
	end		end
	local ~~vals~~ = {} -- table des valeurs ~~formatées~~
	~~vals~~.~~main~~ = {} ~~-- valeurs sans qualficatif~~ P518		-- créé une table de chaînes avec les différents matériaux
			local withP518, withoutP518 = {}, {}

			local function addStatement(statement) -- ajout d'un chaîne à la table des valeurs
			-- valeur de base
			local mainid = wikidata.getmainid(statement)
			local str = wikidata.formatEntity(mainid, {speciallabels = speciallabels})

			if (not statement.qualifiers) or (not statement.qualifiers.P518) then
			table.insert(withoutP518, str)
			return
			end

			for _, qualif in pairs(statement.qualifiers.P518) do
			local key = wikidata.getid(qualif)
			withP518[key] = withP518[key] or {}
			table.insert(withP518[key], mainid)
			end
			end
	for i, j in pairs(materials) do		for i, j in pairs(materials) do
	~~local val = wikidata.formatSnak~~(j~~.mainsnak, {speciallabels = speciallabels}~~)		addStatement(j)
	~~if not j.qualifiers or not j.qualifiers.P518 then~~
	~~table.insert(vals.main, val)~~
	~~else for k, qualif in pairs(j.qualifiers.P518) do~~
	~~local key = wikidata.getid(qualif)~~
	~~if not vals[key] then~~
	~~vals[key] = {}~~
	~~end~~
	~~table.insert(vals[key], val)~~
	~~end end~~
	end		end

	~~local mainstr, supportstr, withpartstr~~ -- ~~supportstr pour le support~~ de ~~peintrue, withpartstr, pour celle avec un autre qualificateur P518~~		-- concaténation des différentes tables de valeur

	mainstr = linguistic.conj(~~vals.main~~)		--- valeurs sans qualificatifs
	~~vals.main = nil~~		local mainstr = linguistic.conj(withoutP518)
	if ~~vals~~['Q861259'] then
	supportstr = ' sur ' .. linguistic.conj(~~vals['Q861259']~~)		--- valeurs avec P518 utilisant la préposition "sur"
			local supportstr
			if withP518['Q861259'] then
			local v = withP518['Q861259']
			supportstr = ' sur ' .. linguistic.conj(v)
	vals['Q861259'] = nil		vals['Q861259'] = nil
	end		end

	~~local withpart = {} -- table des données contenant un qualificatif P518, sauf "support de peinture"~~
	~~for part, materials in pairs(vals) do~~
	~~table.insert(withpart, wikidata._getLabel(part) .. ' en ' .. linguistic.conj(materials))~~
	~~end~~
	~~withpartstr = linguistic.conj(withpart, 'comma')~~
	if mainstr or supportstr then		if mainstr or supportstr then
	mainstr = (mainstr or '').. (supportstr or '')		mainstr = (mainstr or '').. (supportstr or '')
	end		end

			--- autres qualificatifs : préposition "en"
			local withpartstr
			local strtable = {}
			for part, materials in pairs(withP518) do
			local partstr = wikidata.getLabel(part)
			local v = {}
			for i, j in pairs(materials) do
			table.insert(v, wikidata.formatEntity(j))
			end
			local str = partstr .. ' en ' .. linguistic.conj(v)
			table.insert(strtable, str)
			end
			withpartstr = linguistic.conj(strtable, 'comma')

			-- concaténation finale
	mainstr = linguistic.conj({mainstr, withpartstr}, 'comma')		mainstr = linguistic.conj({mainstr, withpartstr}, 'comma')
	~~if (args.linkback ~= '-') then~~
	~~mainstr = wikidata.addLinkback(mainstr, item, 'P186')~~		return mainstr
	~~end~~
	return mainstr ~~.. wikidata.addtrackingcat('P186')~~
	end		end
	return p		return p

0x010D le 19 août 2015 à 07:38

2015-08-19T07:38:34Z

← Version précédente		Version du 19 août 2015 à 07:38
Ligne 9 :		Ligne 9 :
	}		}

	function p.formatFromItem(item)		function p.formatFromItem(item, args)
			args = args or {}
	-- affiche le matériau en fonction de Property:P186, et de son qualificatif P518 ('s'applique à')		-- affiche le matériau en fonction de Property:P186, et de son qualificatif P518 ('s'applique à')
	local materials = wikidata.getClaims{~~item~~ = item, property = 'P186'}		local materials = wikidata.getClaims{entity = item, property = 'P186'}
	if not materials then		if not materials then
	return nil		return nil
Ligne 48 :		Ligne 49 :
	end		end
	mainstr = linguistic.conj({mainstr, withpartstr}, 'comma')		mainstr = linguistic.conj({mainstr, withpartstr}, 'comma')
	~~return~~ wikidata.addLinkback(mainstr, item, 'P186') .. wikidata.addtrackingcat('P186')		if (args.linkback ~= '-') then
			mainstr = wikidata.addLinkback(mainstr, item, 'P186')
			end
			return mainstr .. wikidata.addtrackingcat('P186')
	end		end
	return p		return p