examples/os_date.lua

   1 --[[
   2 Re-implementation of `os.date` from the standard lua library
   3 ]]
   4
   5 local gettime = require "luatz.gettime".gettime
   6 local new_from_timestamp = require "luatz.timetable".new_from_timestamp
   7 local get_tz = require "luatz.tzcache".get_tz
   8
   9 local function os_date ( format_string , timestamp )
  10         format_string = format_string or "%c"
  11         timestamp = timestamp or gettime ( )
  12         if format_string:sub ( 1 , 1 ) == "!" then -- UTC
  13                 format_string = format_string:sub ( 2 )
  14         else -- Localtime
  15                 timestamp = get_tz ( ):localise ( timestamp )
  16         end
  17         local tt = new_from_timestamp ( timestamp ):normalise ( )
  18         if format_string == "*t" then
  19                 return tt
  20         else
  21                 return tt:strftime ( format_string )
  22         end
  23 end
  24
  25 return os_date