יחידה:עלטער
דער דאזיגער בלאט באדינט דעם מוסטער:עלטער
local dateParser = require( "Module:דאטום" )
local Arguments = require( "Module:Arguments" )
local Errors = {
['future-date'] = '[[קאטעגאריע:אומריכטיגע לעבן דאטומען]]'
}
function hebnum(s)
numberstable = {
["א"] = 1, ["ב"] = 2, ["ג"] = 3, ["ד"] = 4, ["ה"] = 5,
["ו"] = 6, ["ז"] = 7, ["ח"] = 8, ["ט"] = 9, ["י"] = 10,
["כ"] = 20, ["ך"] = 20, ["ל"] = 30, ["מ"] = 40, ["ם"] = 40,
["נ"] = 50, ["ן"] = 50, ["ס"] = 60, ["ע"] = 70, ["פ"] = 80,
["ף"] = 80, ["צ"] = 90, ["ץ"] = 90, ["ק"] = 100, ["ר"] = 200,
["ש"] = 300, ["ת"] = 400, ["'"] = 0, ["\""] = 0,}
local ans = 0
local str = s
while len1(str) > 0 do
ans = ans + numberstable[sub1(str, 1, 1)]
str = sub1(str, 2, len1(str))
end
return ans
end
function ToDate(frame, Date, ApproxDate)
local isValidDate, res = pcall(dateParser.newFromWikitext, Date)
local errors = ''
if isValidDate and dateParser.age(res).year<0 then
-- date is in the future
isValidDate = false
local title = mw.title.getCurrentTitle()
if title.namespace==0 then
errors = Errors['future-date']
else
errors = '<!--' .. Errors['future-date'] .. '-->'
end
elseif not isValidDate or res.precision < dateParser.PRECISION.YEAR then
-- date is either invalid or is imprecise
isValidDate = false -- mark as invalid anyway, even if "only" imprecise
errors = frame:expandTemplate{ title = 'עלטער/בעיה', args = {
['מקורב']=ApproxDate,
['נוסף']=Date,
['מחרוזת']=Date
} }
end
return isValidDate, res, errors
end
function consistentWithWikidata(localDate, wikidataClaim)
local possibleDate, possibleDateValue, isConsistent
if not wikidataClaim then
return true
end
isConsistent = true
for i,possibleDate in ipairs(wikidataClaim) do
if possibleDate.mainsnak and possibleDate.mainsnak.datavalue and possibleDate.mainsnak.datavalue.value then
possibleDateValue = possibleDate.mainsnak.datavalue.value
local iswikidataValid, wikidataDate = pcall(dateParser.newFromWikidataValue, possibleDateValue)
if iswikidataValid and localDate.calendar == wikidataDate.calendar then
if (localDate.year ~= wikidataDate.year and possibleDateValue.precision>=dateParser.PRECISION.YEAR) or
(localDate.month ~= wikidataDate.month and possibleDateValue.precision>=dateParser.PRECISION.MONTH) or
(localDate.day ~= wikidataDate.day and possibleDateValue.precision>=dateParser.PRECISION.DAY) then
isConsistent = false
else
isConsistent = true
break
end
end
end
end
return isConsistent
end
function ageCalcFromFrame(frame)
local args = Arguments.getArgs(frame, { ['trim'] = true, ['removeBlanks'] = true })
--local age_string = args['מציין']
local BirthDateStr = args['געבורט דאטום'] or args['תאריך לידה עברי']
if args['געבורט דאטום'] == nil and #mw.text.split( args['תאריך לידה עברי'], '%s' ) == 1 then --most probably just year
local BirthDateNum = hebnum(args['תאריך לידה עברי']) - 3760
BirthDateStr = tostring(BirthDateNum)
if BirthDateNum < 1 then
BirthDateStr = BirthDateStr .. " לפנה\"ס"
end
end
local DeathDateStr = args['פטירה דאטום'] or args['תאריך פטירה עברי']
if args['פטירה דאטום'] == nil and #mw.text.split( args['תאריך פטירה עברי'], '%s' ) == 1 then --most probably just year
local DeathDateNum = hebnum(args['תאריך פטירה עברי']) - 3760
DeathDateStr = tostring(DeathDateNum)
if DeathDateNum < 1 then
DeathDateStr = DeathDateStr .. " לפנה\"ס"
end
end
local DisplayForAlive = args['הצג אם בחיים']
local DisplayForDead = args['הצג אם נפטר']
local Brackets = args['סוגריים']
local ApproxDate = args['מקורב']
DisplayForAlive = (DisplayForAlive=='כן')
DisplayForDead = (DisplayForDead=='כן')
Brackets = (Brackets~='לא')
return ageCalc(BirthDateStr, DeathDateStr, DisplayForAlive, DisplayForDead, Brackets, ApproxDate)
end
function ageCalc(BirthDateStr, DeathDateStr, DisplayForAlive, DisplayForDead, Brackets, ApproxDate, gender)
local frame = mw.getCurrentFrame()
local warnings = {}
local dateRangeStr
local wikidataBirth, wikidataDeath
if BirthDateStr == '' then BirthDateStr = nil end
if DeathDateStr == '' then DeathDateStr = nil end
wikidataBirth = entityId and mw.wikibase.getBestStatements( entityId, 'P569' )
wikidataDeath = entityId and wikidataBirth and mw.wikibase.getBestStatements( entityId, 'P570' )
BirthDateStr = BirthDateStr or ((wikidataBirth and #wikidataBirth>0 and mw.wikibase.renderSnak( wikidataBirth[1].mainsnak ) or nil))
-- validate dates are valid
if not BirthDateStr then
return -- missing date, nothing to do
end
DeathDateStr = DeathDateStr or ((wikidataDeath and #wikidataDeath>0 and mw.wikibase.renderSnak( wikidataDeath[1].mainsnak ) or nil))
if DeathDateStr =='' then DeathDateStr = nil end
local IsDead = (DeathDateStr~=nil)
-- early termination
if (DisplayForDead~=IsDead) and (DisplayForAlive==IsDead) then
return ''
end
local isValidDate, BirthDate, errDate = ToDate(frame, BirthDateStr, ApproxDate)
if not isValidDate then
return errDate
end
if wikidataBirth and wikidataBirth[1] and wikidataBirth[1].mainsnak then
if not consistentWithWikidata(BirthDate, wikidataBirth) then
table.insert(warnings, '[[קאטעגאריע:דפים עם שנות חיים שלא תואמים את ויקינתונים]]')
end
end
-- skip age calculation if we dont have enough precision
if BirthDate.precision < dateParser.PRECISION.YEAR then return nil end
local DeathDate
if IsDead then
isValidDate, DeathDate, errDate = ToDate(frame, DeathDateStr, ApproxDate)
if not isValidDate then
return errDate-- invalid death date
end
if not consistentWithWikidata(DeathDate, wikidataDeath) then
table.insert(warnings, '[[קאטעגאריע:דפים עם שנות חיים שלא תואמים את ויקינתונים]]')
end
prefix = 'אלט: '
else
if gender == nil and entityId~=nil then
local PropertyLink = require('Module:PropertyLink')
gender = PropertyLink.getItem( 'P21', entityId )
if (gender == "Q6581097") then -- male
gender = 'זכר'
elseif (gender == "Q2449503") then -- transgender male
gender = 'זכר'
elseif (gender == "Q15145778") then -- cisgender male
gender = 'זכר'
elseif (gender == "Q6581072") then -- female
gender = 'נקבה'
elseif (gender == "Q1052281") then -- transgender female
gender = 'נקבה'
elseif (gender == "Q15145779") then -- cisgender female
gender = 'נקבה'
end
end
prefix = 'יארגאנג: '
if gender == 'נקבה' then
prefix = 'בת '
elseif gender == 'זכר' then
prefix = 'בן '
end
end
-- skip age calculation if we dont have enough precision
if DeathDate and DeathDate.precision and DeathDate.precision < dateParser.PRECISION.YEAR then return nil end
local success, Age = pcall(dateParser.age, BirthDate , DeathDate)
if success then
AgeYears = Age.year
if Age.year <= 0 then
if Age.month == 1 then
result = prefix..'חודש'
elseif Age.month == 2 then
result = prefix..'חודשיים'
else
result = prefix..tostring(Age.month)..' חודשים'
end
if Age.day > 0 then
if Age.day == 1 then
result = result..' ויום'
elseif Age.day == 2 then
result = result..' ויומיים'
else
result = result..' ו־'..tostring(Age.day)..' ימים'
end
end
elseif Age.year < 3 then
if Age.year == 1 then
result = prefix..'שנה'
elseif Age.year == 2 then
result = prefix..'שנתיים'
end
if Age.month == 0 then
if Age.day > 0 then
if Age.day == 1 then
result = result..' ויום'
elseif Age.day == 2 then
result = result..' ויומיים'
else
result = result..' ו־'..tostring(Age.day)..' ימים'
end
end
elseif Age.month == 1 then
result = result..' וחודש'
elseif Age.month == 2 then
result = result..' וחודשיים'
else
result = result..' ו־'..tostring(Age.month)..' חודשים'
end
else
result = prefix..tostring(Age.year)
end
if BirthDate.precision < dateParser.PRECISION.MONTH or (DeathDate and DeathDate.precision < dateParser.PRECISION.MONTH) then
result = result .. ' בערך'
end
-- ignore warning in specific template
local noAgeWarning = false
if mw.getCurrentFrame():getParent():getTitle() == 'מוסטער:תנ"ך פערזענליכקייט' or mw.getCurrentFrame():getParent():getTitle() == 'מוסטער:בעל חיים מפורסם' then
noAgeWarning = true
end
local title = mw.title.getCurrentTitle()
-- ignore warning in other namespace except the main NS
if title.namespace==0 and not noAgeWarning then
if AgeYears > 139 then
local instanceOf = entityId and mw.wikibase.getBestStatements( entityId, 'P31' )
local isHuman = instanceOf and instanceOf[1].mainsnak and instanceOf[1].mainsnak.datavalue.value.id=='Q5'
if isHuman then
table.insert(warnings, Errors['future-date'])
end
elseif AgeYears>109 then
table.insert(warnings, '[[קאטעגאריע:מענטשן וואס זענען אנגעקומען צו די 110]]')
elseif AgeYears>99 then
table.insert(warnings, '[[קאטעגאריע:מענטשן וואס זענען אנגעקומען צו די הונדערט]]')
end
end
else
result = '?' .. frame:expandTemplate{ title = 'עלטער/בעיה', args = {
['מקורב']=ApproxDate,
['נוסף']=DeathDate,
['מחרוזת']=dateRangeStr
} }
end
warnings = table.concat( warnings, '')
if #warnings > 0 then
warnings = string.format('%s ', warnings)
end
if Brackets then
result = string.format(' (%s)', result)
end
return string.format('%s<span style="white-space: nowrap;">%s</span>', warnings, result)
end
return {
['עלטער'] = ageCalcFromFrame,
ageCalc = ageCalc
}