Перейти до вмісту

Модуль:PD-auto/CA

Матеріал з Вікіджерел

Документацію для цього модуля можна створити у Модуль:PD-auto/CA/документація

local this = {};
 
function this.pd(args)
    local result = {URAADate = '1 січня 1996', country = 'Канаді'};
    local currentYear = os.date('*t').year;
    
    local publication = args.publication;
    local author = args.author;
    local death = args.death;

    local effectiveDate;
    if not author then
        effectiveDate = publication;
    else
        effectiveDate = death;
    end
    
    if effectiveDate == nil then
        result.URAA = false;
        result.reason = 'Неможливо визначити ліцензійний статус твору в Канаді з наявної інформації.';
        return result;
    end
        
    result.URAA = effectiveDate < 1946;
    if effectiveDate < currentYear - 50 then
        result.year = 'PD';
        result.reason = 'Термін дії авторських прав на цей твір у Канаді закінчився до 1 січня '..(effectiveDate+51)..' року, оскільки авторське право у Канаді закінчується 50 років після смерті автора.';
    else    
        result.year = effectiveDate + 51;
        result.reason = 'Цей твір захищений авторським правом в Канаді до 1 січня '..result.year..' року, оскільки авторське право у Канаді закінчується 50 років після смерті автора.';
    end;
    
    return result;
end
 
return this;