DatesTest.pudu

Pudu54 lines4.0 KB

Copy pathGitHub ↗

1/** @Test.Domain.Dates.Suite — timestamp and duration formats */2module PuduLangLog.Domain.DatesTest34import Std.Io as Io5import Std.Test as Test6import PuduLangLog.Domain.Dates as Dates7import PuduLangLog as Log89/// 2026-09-28 14:05:09.123 UTC observed at two hours east.10const EAST: Log.Timestamp = Log.Timestamp{millis: 1790604309123, offset: 120}1112/// 2026-01-04 23:00:00 UTC observed at five and a half hours west.13const WEST: Log.Timestamp = Log.Timestamp{millis: 1767567600000, offset: -330}1415/// The east timestamp under a format.16fn east(format: Str) -> Str { Dates.formatMoment(&EAST, &Some(format)) }1718/// A duration under a format.19fn span(millis: Int, format: Str) -> Str { Dates.formatSpan(millis, &Some(format)) }2021/// Runs the suite.22fn main() -> Int {23  let checks = Test.suite("Domain.Dates", &[24      Test.equals("no format", &Dates.formatMoment(&EAST, &None), &"09/28/2026 16:05:09 +02:00"),25      Test.equals("round trip", &Dates.roundTrip(&EAST), &"2026-09-28T16:05:09.1230000+02:00"),26      Test.equals("round trip west of UTC", &Dates.roundTrip(&WEST), &"2026-01-04T17:30:00.0000000-05:30"),27      Test.equals("time of day", &(east("HH:mm:ss"), east("HH:mm:ss.fff"), east("h:mm tt"), east("hh t")), &("16:05:09", "16:05:09.123", "4:05 PM", "04 P")),28      Test.equals("date parts", &(east("yyyy-MM-dd"), east("yy/M/d"), east("yyyyy"), east("%y")), &("2026-09-28", "26/9/28", "02026", "26")),29      Test.equals("names", &(east("ddd, dd MMM"), east("dddd MMMM")), &("Mon, 28 Sep", "Monday September")),30      Test.equals("fractions", &(east("fffffff"), east("ff"), east("FFFFFFF"), east("%f")), &("1230000", "12", "123", "1")),31      Test.equals("zero fractions trim to nothing", &Dates.formatMoment(&WEST, &Some("ss.FFF")), &"00."),32      Test.equals("offsets", &(east("z"), east("zz"), east("zzz"), east("K")), &("+2", "+02", "+02:00", "+02:00")),33      Test.equals("negative offsets", &Dates.formatMoment(&WEST, &Some("z zz zzz")), &"-5 -05 -05:30"),34      Test.equals("quoted and escaped literals", &(east("'T'HH"), east("\"at\" HH"), east("\\h HH"), east("%d")), &("T16", "at 16", "h 16", "28")),35      Test.equals("an unclosed quote runs to the end", &east("HH 'rest"), &"16 rest"),36      Test.equals("other characters are literal", &east("HH:mm - era g"), &"16:05 - era A.D."),37      Test.equals("sortable and short standard formats", &(east("s"), east("t"), east("T"), east("d")), &("2026-09-28T16:05:09", "16:05", "16:05:09", "09/28/2026")),38      Test.equals("long standard formats", &(east("D"), east("f"), east("G"), east("M"), east("Y")), &("Monday, 28 September 2026", "Monday, 28 September 2026 16:05", "09/28/2026 16:05:09", "September 28", "2026 September")),39      Test.equals("universal standard formats render UTC", &(east("u"), east("R"), east("U")), &("2026-09-28 14:05:09Z", "Mon, 28 Sep 2026 14:05:09 GMT", "Monday, 28 September 2026 14:05:09")),40      Test.equals("noon is after midday", &Dates.formatMoment(&Log.Timestamp{millis: 43200000, offset: 0}, &Some("h tt")), &"12 PM"),41      Test.equals("midnight on a twelve-hour clock", &Dates.formatMoment(&Log.Timestamp{millis: 0, offset: 0}, &Some("h tt")), &"12 AM"),42      Test.equals("a local date can be the day before UTC", &Dates.formatMoment(&Log.Timestamp{millis: 0, offset: -60}, &Some("yyyy-MM-dd HH")), &"1969-12-31 23"),43      Test.equals("constant duration format", &(span(0, "c"), span(1500, "c"), span(90061001, "c"), span(-3600000, "c")), &("00:00:00", "00:00:01.5000000", "1.01:01:01.0010000", "-01:00:00")),44      Test.equals("no duration format is the constant format", &Dates.formatSpan(61000, &None), &"00:01:01"),45      Test.equals("general duration formats", &(span(1500, "g"), span(90061000, "g"), span(1500, "G")), &("0:00:01.5", "1:1:01:01", "0:00:00:01.5000000")),46      Test.equals("custom duration format", &(span(3723004, "hh\\:mm\\:ss"), span(3723004, "h'h 'm'm'"), span(3723004, "ss.fff"), span(3723000, "s.FFF"), span(90061000, "dd")), &("01:02:03", "1h 2m", "03.004", "3.", "01"))47    ])48  let ran = Test.run(&checks)49  for failure in Test.failuresOf(&ran) {50    let _reported = Io.writeErrorLine(failure)51  }52  Test.report(&ran)53}54