Алгоритм конвертации даты в Unix-time?

Question

[Влад Зайцев]

Какой алгоритм перевода человеко-читаемой даты в epoch?
Обратную конвертацию я нашел: Как вывести дату из unixtime (алгоритм?)
А как пересчитать в unix-time?

Answer 1

[Влад Зайцев]

Традиционно "сам спросил, сам ответил". Правда, луа, но читается легко.
UPD: if minute < 1 then return nil end это мощно. поправил.

function app_rtc_date2epoch(year,month,day,hour,minute,second)
    local leap = 0

    local t_month = {0,31,59,90,120,151,181,212,243,273,304,334}
    local t_leapyear = {72,76,80,84,88,92,96,00,04,08,12,16,20,24,28,32,36}
    local sum_year = 0

    function get_leapyear(year)
       for key,value in pairs(t_leapyear) do
          if (value + 1900) == year then return 1 end
       end   
       for key,value in pairs(t_leapyear) do
          if (value + 2000) == year then return 1 end
       end   
    return nil
    end
    if year < 1970 or year > 2038 then
       return nil
    elseif month < 1 or month > 12 then
       return nil
    elseif hour < 0 or hour > 23 then
       return nil
    elseif minute < 0 or minute > 59 then
       return nil
    elseif second < 0 or second > 59 then
       return nil
    end
    if day > 28 and get_leapyear(year) == nil then
       return nil
    end
    if day > 29 then return nil end
    for y = 1971,year do
       sum_year = sum_year + 31536000
    if    get_leapyear(y) ~= nil then sum_year = sum_year + 86400 end
    end
    sum_month = (t_month[month]*86400)
    tsp = sum_year + sum_month + ((day-1)*86400) + hour*3600 + minute*60 + second
    return tsp
end

Comments

[Дмитрий]

Полагаю, что

if day > 28 and get_leapyear(year) == nil then return nil end
if day > 29 then return nil end

должно проверяться только для Февраля?

P.S. А для Lua есть более простое решение:

function GetTimestamp(year, month, day, hour, minute, second)
    local offset=os.time()-os.time(os.date("!*t"))
    return os.time({day=day,month=month,year=year,hour=hour,min=minute,sec=second})+offset
end