#include <time.h>
#include <internals/time.h>

/*
	mktime()
	Converts broken-down time to calendar time. Computes structure fields
	tm_wday and tm_yday using the other fields. Member structures outside
	their range are normalized (e.g. 40 October becomes 9 November) and
	tm_isdst is set.
*/
time_t mktime(struct tm *time)
{
	int leaps, yr;
	int days, i;

	// Normalizing time.
	time->tm_min	+= (time->tm_sec / 60);
	time->tm_hour	+= (time->tm_min / 60);
	time->tm_mday	+= (time->tm_hour / 24);
	time->tm_sec	%= 60;
	time->tm_min	%= 60;
	time->tm_hour	%= 24;

	// Normalizing date.
	days = daysInMonth(time->tm_mon, time->tm_year + 1900);
	while(time->tm_mday >= days)
	{
		time->tm_mday -= days;
		if(++time->tm_mon == 12)
		{
			time->tm_mon = 0;
			time->tm_year++;
		}
		days = daysInMonth(time->tm_mon, time->tm_year + 1900);
	}

	// Setting the year day.
	days = 0;
	for(i = 0; i < time->tm_mon; i++)
		days += daysInMonth(i, time->tm_year + 1900);
	time->tm_yday = days + time->tm_mday;

	// Setting the week day. The calendar is periodic over 400 years and
	// 1601-01-01 was a Monday.

	// Years completely elapsed since last 400n + 1 year (1601-2001-etc).
	yr		= (time->tm_year + 1900 - 1) % 400;
	// Leap years in these yr years.
	leaps		= (yr / 4) - (yr >= 100) - (yr >= 200) - (yr >= 300);
	// Days completely elapsed since last 400n + 1 year, 01-01.
	days		= 365 * yr + leaps + time->tm_yday;
	// Current day of week (1 means Monday 1601-01-01).
	time->tm_wday	= (1 + days) % 7;

	// This RTC does not seem to have any DST feature.
	time->tm_isdst = 0;

	if(time->tm_year + 1900 < 1970) return (time_t)-1;

	// 134774 is the number of days between 1601-01-01 and 1970-01-01. Thus
	// days become the number of days elapsed since 1970-01-01.
	days -= 134774;
	// days may become negative, so add the calendar period.
	if(days < 0) days += 146097;

	return (time_t)((24 * 3600) * days + 3600 * time->tm_hour +
		60 * time->tm_min + time->tm_sec);
}