/*      $NetBSD: caljulian.c,v 1.3 2024/08/18 20:47:26 christos Exp $   */

#include "config.h"

#include "ntp_calendar.h"
#include "ntp_stdlib.h"

#include "unity.h"
#include "test-libntp.h"

#include <string.h>


void setUp(void);
void tearDown(void);
void test_RegularTime(void);
void test_LeapYear(void);
void test_uLongBoundary(void);
void test_uLongWrapped(void);


static const char *
CalendarToString(const struct calendar cal)
{
       char * str;

       LIB_GETBUF(str);
       snprintf(str, LIB_BUFLENGTH,
                "%04hu-%02hhu-%02hhu (%hu) %02hhu:%02hhu:%02hhu",
                cal.year, cal.month, cal.monthday, cal.yearday,
                cal.hour, cal.minute, cal.second);
       return str;
}

static int // technically boolean
IsEqual(const struct calendar expected, const struct calendar actual)
{
       if (   expected.year == actual.year
           && (   expected.yearday == actual.yearday
               || (   expected.month == actual.month
                   && expected.monthday == actual.monthday))
           && expected.hour == actual.hour
           && expected.minute == actual.minute
           && expected.second == actual.second) {
               return TRUE;
       } else {
               const char * p_exp = CalendarToString(expected);
               const char * p_act = CalendarToString(actual);
               printf("expected: %s but was %s", p_exp, p_act);
               return FALSE;
       }
}


void setUp(void)
{
   ntpcal_set_timefunc(timefunc);
   settime(1970, 1, 1, 0, 0, 0);
   init_lib();
}

void tearDown(void)
{
   ntpcal_set_timefunc(NULL);
}


void test_RegularTime(void)
{
       u_long testDate = 3485080800UL; // 2010-06-09 14:00:00
       struct calendar expected = {2010,160,6,9,14,0,0};

       struct calendar actual;

       caljulian(testDate, &actual);

       TEST_ASSERT_TRUE(IsEqual(expected, actual));
}

void test_LeapYear(void)
{
       u_long input = 3549902400UL; // 2012-06-28 20:00:00Z
       struct calendar expected = {2012, 179, 6, 28, 20, 0, 0};

       struct calendar actual;

       caljulian(input, &actual);

       TEST_ASSERT_TRUE(IsEqual(expected, actual));
}

void test_uLongBoundary(void)
{
       u_long enc_time = 4294967295UL; // 2036-02-07 6:28:15
       struct calendar expected = {2036,0,2,7,6,28,15};

       struct calendar actual;

       caljulian(enc_time, &actual);

       TEST_ASSERT_TRUE(IsEqual(expected, actual));
}

void test_uLongWrapped(void)
{
       u_long enc_time = 0;
       struct calendar expected = {2036,0,2,7,6,28,16};

       struct calendar actual;

       caljulian(enc_time, &actual);

       TEST_ASSERT_TRUE(IsEqual(expected, actual));
}