Return to calendar.c CVS log

Up to [RetroPC.NET] / xmil

fix...

#include	"compiler.h"
#include	"parts.h"
#include	"timemng.h"
#include	"calendar.h"


	_CALENDAR	cal;


static const UINT8 days[12] = {	31, 28, 31, 30, 31, 30,
								31, 31, 30, 31, 30, 31};


static void secinc(_SYSTIME *dt) {

	UINT	month;
	UINT16	daylimit;

	dt->second++;
	if (dt->second < 60) {
		goto secinc_exit;
	}
	dt->second = 0;
	dt->minute++;
	if (dt->minute < 60) {
		goto secinc_exit;
	}
	dt->minute = 0;
	dt->hour++;
	if (dt->hour < 24) {
		goto secinc_exit;
	}
	dt->hour = 0;

	month = dt->month - 1;
	if (month < 12) {
		daylimit = days[month];
		if ((daylimit == 28) && (!(dt->year & 3))) {
			daylimit++;						// = 29;
		}
	}
	else {
		daylimit = 30;
	}
	dt->week = (UINT16)((dt->week + 1) % 7);
	dt->day++;
	if (dt->day < daylimit) {
		goto secinc_exit;
	}
	dt->day = 1;
	dt->month++;
	if (dt->month <= 12) {
		goto secinc_exit;
	}
	dt->month = 1;
	dt->year++;

secinc_exit:
	return;
}


// ----

void calendar_initialize(void) {

	timemng_gettime(&cal.dt);
}

void calendar_inc(void) {

	cal.steps++;
	if (cal.steps >= 60) {
		cal.steps = 0;
		secinc(&cal.dt);
	}
}

void calendar_getdate(UINT8 *bcd) {

	bcd[0] = AdjustAfterMultiply((UINT8)(cal.dt.year % 100));
	bcd[1] = ((cal.dt.month << 4) + cal.dt.week);
	bcd[2] = AdjustAfterMultiply((UINT8)cal.dt.day);
}

void calendar_setdate(const UINT8 *bcd) {

	UINT	year;

	year = AdjustBeforeDivision(bcd[0]);
	if (year < 80) {
		year += 100;
	}
	cal.dt.year = (UINT16)(year + 1900);
	cal.dt.week = (UINT8)(bcd[1] & 0x0f);
	cal.dt.month = (UINT8)(bcd[1] >> 4);
	cal.dt.day = AdjustBeforeDivision(bcd[2]);
}

void calendar_gettime(UINT8 *bcd) {

	bcd[0] = AdjustAfterMultiply((UINT8)cal.dt.hour);
	bcd[1] = AdjustAfterMultiply((UINT8)cal.dt.minute);
	bcd[2] = AdjustAfterMultiply((UINT8)cal.dt.second);
}

void calendar_settime(const UINT8 *bcd) {

	cal.dt.hour = AdjustBeforeDivision(bcd[0]);
	cal.dt.minute = AdjustBeforeDivision(bcd[1]);
	cal.dt.second = AdjustBeforeDivision(bcd[2]);
}