Mô đun:Professional wrestling profiles

local getArgs = require('Mô đun:Arguments').getArgs

function getpropertyvalue(ent, prop)
local id = nil;
if (ent and prop) then value = ent:getBestStatements(prop)[1] else return nil end
if value then return value["mainsnak"]["datavalue"]["value"] end;
end

function getpropertyvaluewithdefaultvalues(ent, prop, value1, value2)
return value1 or value2 or getpropertyvalue(ent, prop);
end

function getname(frame, name1, name2)
return name1 or name2 or frame:expandTemplate{title = 'PAGENAMEBASE'};
end

function getexternallink(frame, linkformat, urlformat, prop, cat)
local args = getArgs(frame);
local id = args[1] or args["id"];
if (not id and prop) then id = getpropertyvalue(mw.wikibase.getEntityObject(), prop); end;
if not id then return cat end
local name = getname(frame, args[2], args["name"]);
local url = string.format(urlformat, id);
local code = string.format(linkformat, url, name);
return code;
end

local p = {}
function p.getpropertyvalue(frame)
local ent = mw.wikibase.getEntityObject();
local prop = frame.args[1];
return getpropertyvalue(ent, prop);
end

function p.cagematch(frame)
return getexternallink(frame, "[%s %s] Tiểu sử tại Cagematch.net", "https://www.cagematch.net/?id=2&nr=%s", 'P2728', "");
end

function p.wrestlingtitlespersonalities(frame)
return getexternallink(frame, "[%s %s] Tiểu sử tại Wrestling-Titles.com", "http://www.wrestling-titles.com/personalities/%s/", nil, "");
end

function p.rohroster(frame)
return getexternallink(frame, "[%s %s] Tiểu sử của Ring of Honor", "http://www.rohwrestling.com/wrestlers/%s", nil, "");
end

function p.njpw(frame)
local args = getArgs(frame);
if args["newlink"] then return getexternallink(frame, "[%s %s] Tiểu sử của New Japan Pro-Wrestling", "http://www.njpw1972.com/profile/%s", nil, "");
else return getexternallink(frame, "[%s %s] Tiểu sử của New Japan Pro-Wrestling", "http://www.njpw.co.jp/english/data/detail_profile.php?f=%s", nil, "");
end
end

function p.gfw(frame)
return getexternallink(frame, "[%s %s] Tiểu sử của Global Force Wrestling", "http://globalforcewrestling.com/roster/%s/", nil, "");
end

function p.dragongateusa(frame)
return getexternallink(frame, "[%s %s] tại trang web Dragon Gate USA chính thức", "http://dgusa.tv/bio/%s", nil, "");
end

function p.chikara(frame)
return getexternallink(frame, "[%s %s] tại trang web Chikara chính thức", "http://chikarapro.com/chikara-roster/%s", nil, "");
end

function p.profiles(frame)
local args = getArgs(frame);
local ent = mw.wikibase.getEntityObject();
local cagematchid = getpropertyvaluewithdefaultvalues(ent, 'P2728', args["cagematch"], nil);
local wrestlingdataid = getpropertyvaluewithdefaultvalues(ent, 'P2764', args["wrestlingdata"], nil);
local iwdid = getpropertyvaluewithdefaultvalues(ent, 'P2829', args["iwd"], nil);
if (not cagematchid) and (not wrestlingdataid) and (not iwdid) then return "" end
local name = getname(frame, args["name"], nil);
local text = "Tiểu sử " .. name .. " tại ";
if cagematchid then text = text .. ".. cagematchid .. " Cagematch.net, " end
if wrestlingdataid then text = text .. ".. wrestlingdataid .. " Wrestlingdata.com, " end
if iwdid then text = text .. ".. iwdid .. ".html Cơ sở dữ liệu đấu vật trên Internet, " end
return string.sub(text, 1, -3);
end

return p