Leaked source code of windows server 2003
You can not select more than 25 topics Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
 
 
 
 
 
 

139 lines
2.3 KiB

/*
* Gutils -
*
* - date conversion functions
*
* Geraint, 22 May, 28 Oct 91.
*/
#include <precomp.h>
BOOL gdi_isleap(LONG year);
/*---static data--------------------------------------------*/
int monthdays[] = {
31,
28,
31,
30,
31,
30,
31,
31,
30,
31,
30,
31
};
/*--public functions--------------------------------------*/
void APIENTRY
gdate_daytodmy(LONG days, int FAR* yrp, int FAR* monthp, int FAR* dayp)
{
int years;
int nleaps;
int month;
int mdays;
/* get number of completed years and calc leap days */
years = (int) (days / 365);
days = days % 365;
nleaps = (years / 4) - (years / 100) + (years / 400);
while (nleaps > days) {
days += 365;
years--;
nleaps = (years / 4) - (years / 100) + (years / 400);
}
days -= nleaps;
/* add one year for current (non-complete) year */
years++;
/* current month */
for (month = 0; month < 12; month++) {
mdays = monthdays[month];
if (gdi_isleap(years) && (month == 1)) {
mdays++;
}
if (days == mdays) {
days = 0;
month++;
break;
} else if (days < mdays) {
break;
} else {
days -= mdays;
}
}
/* conv month from 0-11 to 1-12 */
if (monthp != NULL) {
*monthp = month+1;
}
if (dayp != NULL) {
*dayp = (int) days + 1;
}
if (yrp != NULL) {
*yrp = years;
}
}
LONG APIENTRY
gdate_dmytoday(int yr, int month, int day)
{
int nleaps;
int i;
long ndays;
/* exclude the current year */
yr--;
nleaps = (yr / 4) - (yr / 100) + (yr / 400);
/* in any given year, day 0 is jan1 */
month--;
day--;
ndays = 0;
for (i = 0; i < month ; i++) {
ndays += monthdays[i];
if (gdi_isleap(yr+1) && (i == 1)) {
ndays++;
}
}
ndays = ndays + day + nleaps + (yr * 365L);
return(ndays);
}
int APIENTRY
gdate_monthdays(int month, int year)
{
int ndays;
ndays = monthdays[month - 1];
if (gdi_isleap(year) && (month == 2)) {
ndays++;
}
return(ndays);
}
int APIENTRY
gdate_weekday(long daynr)
{
return((int) ((daynr + 1) % 7));
}
/* internal functions-----------------------------------------*/
BOOL
gdi_isleap(LONG year)
{
if ( ((year % 4) == 0) &&
(((year % 100) != 0) ||
((year % 400) == 0))) {
return TRUE;
} else {
return FALSE;
}
}