Mercurial Hosting > luan
view src/luan/modules/Time.luan @ 1084:aa967fd73b80
improve error message
author | Franklin Schmidt <fschmidt@gmail.com> |
---|---|
date | Sat, 26 Nov 2016 20:51:14 -0700 |
parents | 53e77f60b789 |
children | bae2d0c2576c |
line wrap: on
line source
-- incomplete, will add as needed java() local Luan = require "luan:Luan.luan" local error = Luan.error local assert_long = Luan.assert_long or error() local ipairs = Luan.ipairs or error() local Math = require "luan:Math.luan" local floor = Math.floor or error() local Table = require "luan:Table.luan" local System = require "java:java.lang.System" local Calendar = require "java:java.util.Calendar" local Date = require "java:java.util.Date" local TimeZone = require "java:java.util.TimeZone" local SimpleDateFormat = require "java:java.text.SimpleDateFormat" local M = {} function M.now() return System.currentTimeMillis() end -- add more as needed local fields = { year = Calendar.YEAR; month = Calendar.MONTH; day_of_month = Calendar.DAY_OF_MONTH; } function M.get( time, ... ) local cal = Calendar.getInstance() cal.setTimeInMillis(time) local rtn = {} for i, v in ipairs{...} do local fld = fields[v] fld or error("invalid field: "..v) local n = cal.get(fld) if fld == "month" then n = n + 1 end rtn[i] = n end return Table.unpack(rtn) end function M.format(time,pattern) time = assert_long(time) pattern = pattern or "yyyy-MM-dd HH:mm:ss" return SimpleDateFormat.new(pattern).format(Date.new(time)) end function M.on( year, month, day, hour, minute, second, millis ) month = month - 1 local cal = Calendar.getInstance() cal.setLenient(false) cal.set( year, month, day, hour or 0, minute or 0, second or 0 ) cal.set( Calendar.MILLISECOND, millis or 0 ) return cal.getTimeInMillis() end function M.period( t ) local cal = Calendar.getInstance() cal.setTimeZone(TimeZone.getTimeZone("GMT")) local days = t.days or 0 days = days + 1 cal.set( 1970, 0, days, t.hours or 0, t.minutes or 0, t.seconds or 0 ) cal.set( Calendar.MILLISECOND, t.millis or 0 ) return cal.getTimeInMillis() end function M.parse( pattern, source ) return SimpleDateFormat.new(pattern).parse(source).getTime() end local count_times = { days = M.period{days=1} hours = M.period{hours=1} minutes = M.period{minutes=1} seconds = M.period{seconds=1} } function M.count( time, ... ) local cal = Calendar.getInstance() cal.setTimeInMillis(time) local rtn = {} for i, v in ipairs{...} do local t = count_times[v] t or error("invalid field: "..v) rtn[#rtn+1] = floor(time/t) time = time%t end rtn[#rtn+1] = time return Table.unpack(rtn) end return M