#include "jsi.h"#include "jsvalue.h"#include "jsbuiltin.h" #include <time.h> #if defined(__unix__) || defined(__APPLE__)#include <sys/time.h>#elif defined(_WIN32)#include <sys/timeb.h>#endif #define js_optnumber(J,I,V) (js_isdefined(J,I) ? js_tonumber(J,I) : V) static double Now(void){#if defined(__unix__) || defined(__APPLE__)	struct timeval tv;	gettimeofday(&tv, NULL);	return floor(tv.tv_sec * 1000.0 + tv.tv_usec / 1000.0);#elif defined(_WIN32)	struct _timeb tv;	_ftime(&tv);	return tv.time * 1000.0 + tv.millitm;#else	return time(NULL) * 1000.0;#endif} static double LocalTZA(void){	static int once = 1;	static double tza = 0;	if (once) {		time_t now = time(NULL);		time_t utc = mktime(gmtime(&now));		time_t loc = mktime(localtime(&now));		tza = (loc - utc) * 1000;		once = 0;	}	return tza;} static double DaylightSavingTA(double t){	return 0; /* TODO */} /* Helpers from the ECMA 262 specification */ #define HoursPerDay		24.0#define MinutesPerDay		(HoursPerDay * MinutesPerHour)#define MinutesPerHour		60.0#define SecondsPerDay		(MinutesPerDay * SecondsPerMinute)#define SecondsPerHour		(MinutesPerHour * SecondsPerMinute)#define SecondsPerMinute	60.0 #define msPerDay	(SecondsPerDay * msPerSecond)#define msPerHour	(SecondsPerHour * msPerSecond)#define msPerMinute	(SecondsPerMinute * msPerSecond)#define msPerSecond	1000.0 static double pmod(double x, double y){	x = fmod(x, y);	if (x < 0)		x += y;	return x;} static int Day(double t){	return floor(t / msPerDay);} static double TimeWithinDay(double t){	return pmod(t, msPerDay);} static int DaysInYear(int y){	return y % 4 == 0 && (y % 100 || (y % 400 == 0)) ? 366 : 365;} static int DayFromYear(int y){	return 365 * (y - 1970) +		floor((y - 1969) / 4.0) -		floor((y - 1901) / 100.0) +		floor((y - 1601) / 400.0);} static double TimeFromYear(int y){	return DayFromYear(y) * msPerDay;} static int YearFromTime(double t){	int y = floor(t / (msPerDay * 365.2425)) + 1970;	double t2 = TimeFromYear(y);	if (t2 > t)		--y;	else if (t2 + msPerDay * DaysInYear(y) <= t)		++y;	return y;} static int InLeapYear(double t){	return DaysInYear(YearFromTime(t)) == 366;} static int DayWithinYear(double t){	return Day(t) - DayFromYear(YearFromTime(t));} static int MonthFromTime(double t){	int day = DayWithinYear(t);	int leap = InLeapYear(t);	if (day < 31) return 0;	if (day < 59 + leap) return 1;	if (day < 90 + leap) return 2;	if (day < 120 + leap) return 3;	if (day < 151 + leap) return 4;	if (day < 181 + leap) return 5;	if (day < 212 + leap) return 6;	if (day < 243 + leap) return 7;	if (day < 273 + leap) return 8;	if (day < 304 + leap) return 9;	if (day < 334 + leap) return 10;	return 11;} static int DateFromTime(double t){	int day = DayWithinYear(t);	int leap = InLeapYear(t);	switch (MonthFromTime(t)) {	case 0: return day + 1;	case 1: return day - 30;	case 2: return day - 58 - leap;	case 3: return day - 89 - leap;	case 4: return day - 119 - leap;	case 5: return day - 150 - leap;	case 6: return day - 180 - leap;	case 7: return day - 211 - leap;	case 8: return day - 242 - leap;	case 9: return day - 272 - leap;	case 10: return day - 303 - leap;	default : return day - 333 - leap;	}} static int WeekDay(double t){	return pmod(Day(t) + 4, 7);} static double LocalTime(double utc){	return utc + LocalTZA() + DaylightSavingTA(utc);} static double UTC(double loc){	return loc - LocalTZA() - DaylightSavingTA(loc - LocalTZA());} static int HourFromTime(double t){	return pmod(floor(t / msPerHour), HoursPerDay);} static int MinFromTime(double t){	return pmod(floor(t / msPerMinute), MinutesPerHour);} static int SecFromTime(double t){	return pmod(floor(t / msPerSecond), SecondsPerMinute);} static int msFromTime(double t){	return pmod(t, msPerSecond);} static double MakeTime(double hour, double min, double sec, double ms){	return ((hour * MinutesPerHour + min) * SecondsPerMinute + sec) * msPerSecond + ms;} static double MakeDay(double y, double m, double date){	/*	 * The following array contains the day of year for the first day of	 * each month, where index 0 is January, and day 0 is January 1.	 */	static const double firstDayOfMonth[2][12] = {		{0, 31, 59, 90, 120, 151, 181, 212, 243, 273, 304, 334},		{0, 31, 60, 91, 121, 152, 182, 213, 244, 274, 305, 335}	}; 	double yd, md;	int im; 	y += floor(m / 12);	m = pmod(m, 12); 	im = (int)m;	if (im < 0 || im >= 12)		return NAN; 	yd = floor(TimeFromYear(y) / msPerDay);	md = firstDayOfMonth[DaysInYear(y) == 366][im]; 	return yd + md + date - 1;} static double MakeDate(double day, double time){	return day * msPerDay + time;} static double TimeClip(double t){	if (!isfinite(t))		return NAN;	if (fabs(t) > 8.64e15)		return NAN;	return t < 0 ? -floor(-t) : floor(t);} static int toint(const char **sp, int w, int *v){	const char *s = *sp;	*v = 0;	while (w--) {		if (*s < '0' || *s > '9')			return 0;		*v = *v * 10 + (*s++ - '0');	}	*sp = s;	return 1;} static double parseDateTime(const char *s){	int y = 1970, m = 1, d = 1, H = 0, M = 0, S = 0, ms = 0;	int tza = 0;	double t; 	/* Parse ISO 8601 formatted date and time: */	/* YYYY("-"MM("-"DD)?)?("T"HH":"mm(":"ss("."sss)?)?("Z"|[+-]HH(":"mm)?)?)? */ 	if (!toint(&s, 4, &y)) return NAN;	if (*s == '-') {		s += 1;		if (!toint(&s, 2, &m)) return NAN;		if (*s == '-') {			s += 1;			if (!toint(&s, 2, &d)) return NAN;		}	} 	if (*s == 'T') {		s += 1;		if (!toint(&s, 2, &H)) return NAN;		if (*s != ':') return NAN;		s += 1;		if (!toint(&s, 2, &M)) return NAN;		if (*s == ':') {			s += 1;			if (!toint(&s, 2, &S)) return NAN;			if (*s == '.') {				s += 1;				if (!toint(&s, 3, &ms)) return NAN;			}		}		if (*s == 'Z') {			s += 1;			tza = 0;		} else if (*s == '+' || *s == '-') {			int tzh = 0, tzm = 0;			int tzs = *s == '+' ? 1 : -1;			s += 1;			if (!toint(&s, 2, &tzh)) return NAN;			if (*s == ':') {				s += 1;				if (!toint(&s, 2, &tzm)) return NAN;			}			if (tzh > 23 || tzm > 59) return NAN;			tza = tzs * (tzh * msPerHour + tzm * msPerMinute);		} else {			tza = LocalTZA();		}	} 	if (*s) return NAN; 	if (m < 1 || m > 12) return NAN;	if (d < 1 || d > 31) return NAN;	if (H < 0 || H > 24) return NAN;	if (M < 0 || M > 59) return NAN;	if (S < 0 || S > 59) return NAN;	if (ms < 0 || ms > 999) return NAN;	if (H == 24 && (M != 0 || S != 0 || ms != 0)) return NAN; 	/* TODO: DaylightSavingTA on local times */	t = MakeDate(MakeDay(y, m-1, d), MakeTime(H, M, S, ms));	return t - tza;} /* date formatting */ static char *fmtdate(char *buf, double t){	int y = YearFromTime(t);	int m = MonthFromTime(t);	int d = DateFromTime(t);	if (!isfinite(t))		return "Invalid Date";	sprintf(buf, "%04d-%02d-%02d", y, m+1, d);	return buf;} static char *fmttime(char *buf, double t, double tza){	int H = HourFromTime(t);	int M = MinFromTime(t);	int S = SecFromTime(t);	int ms = msFromTime(t);	int tzh = HourFromTime(fabs(tza));	int tzm = MinFromTime(fabs(tza));	if (!isfinite(t))		return "Invalid Date";	if (tza == 0)		sprintf(buf, "%02d:%02d:%02d.%03dZ", H, M, S, ms);	else if (tza < 0)		sprintf(buf, "%02d:%02d:%02d.%03d-%02d:%02d", H, M, S, ms, tzh, tzm);	else		sprintf(buf, "%02d:%02d:%02d.%03d+%02d:%02d", H, M, S, ms, tzh, tzm);	return buf;} static char *fmtdatetime(char *buf, double t, double tza){	char dbuf[20], tbuf[20];	if (!isfinite(t))		return "Invalid Date";	fmtdate(dbuf, t);	fmttime(tbuf, t, tza);	sprintf(buf, "%sT%s", dbuf, tbuf);	return buf;} /* Date functions */ static double js_todate(js_State *J, int idx){	js_Object *self = js_toobject(J, idx);	if (self->type != JS_CDATE)		js_typeerror(J, "not a date");	return self->u.number;} static void js_setdate(js_State *J, int idx, double t){	js_Object *self = js_toobject(J, idx);	if (self->type != JS_CDATE)		js_typeerror(J, "not a date");	self->u.number = TimeClip(t);	js_pushnumber(J, self->u.number);} static void D_parse(js_State *J){	double t = parseDateTime(js_tostring(J, 1));	js_pushnumber(J, t);} static void D_UTC(js_State *J){	double y, m, d, H, M, S, ms, t;	y = js_tonumber(J, 1);	if (y < 100) y += 1900;	m = js_tonumber(J, 2);	d = js_optnumber(J, 3, 1);	H = js_optnumber(J, 4, 0);	M = js_optnumber(J, 5, 0);	S = js_optnumber(J, 6, 0);	ms = js_optnumber(J, 7, 0);	t = MakeDate(MakeDay(y, m, d), MakeTime(H, M, S, ms));	t = TimeClip(t);	js_pushnumber(J, t);} static void D_now(js_State *J){	js_pushnumber(J, Now());} static void jsB_Date(js_State *J){	char buf[64];	js_pushstring(J, fmtdatetime(buf, LocalTime(Now()), LocalTZA()));} static void jsB_new_Date(js_State *J){	int top = js_gettop(J);	js_Object *obj;	double t; 	if (top == 1)		t = Now();	else if (top == 2) {		js_toprimitive(J, 1, JS_HNONE);		if (js_isstring(J, 1))			t = parseDateTime(js_tostring(J, 1));		else			t = TimeClip(js_tonumber(J, 1));	} else {		double y, m, d, H, M, S, ms;		y = js_tonumber(J, 1);		if (y < 100) y += 1900;		m = js_tonumber(J, 2);		d = js_optnumber(J, 3, 1);		H = js_optnumber(J, 4, 0);		M = js_optnumber(J, 5, 0);		S = js_optnumber(J, 6, 0);		ms = js_optnumber(J, 7, 0);		t = MakeDate(MakeDay(y, m, d), MakeTime(H, M, S, ms));		t = TimeClip(UTC(t));	} 	obj = jsV_newobject(J, JS_CDATE, J->Date_prototype);	obj->u.number = t; 	js_pushobject(J, obj);} static void Dp_valueOf(js_State *J){	double t = js_todate(J, 0);	js_pushnumber(J, t);} static void Dp_toString(js_State *J){	char buf[64];	double t = js_todate(J, 0);	js_pushstring(J, fmtdatetime(buf, LocalTime(t), LocalTZA()));} static void Dp_toDateString(js_State *J){	char buf[64];	double t = js_todate(J, 0);	js_pushstring(J, fmtdate(buf, LocalTime(t)));} static void Dp_toTimeString(js_State *J){	char buf[64];	double t = js_todate(J, 0);	js_pushstring(J, fmttime(buf, LocalTime(t), LocalTZA()));} static void Dp_toUTCString(js_State *J){	char buf[64];	double t = js_todate(J, 0);	js_pushstring(J, fmtdatetime(buf, t, 0));} static void Dp_toISOString(js_State *J){	char buf[64];	double t = js_todate(J, 0);	if (!isfinite(t))		js_rangeerror(J, "invalid date");	js_pushstring(J, fmtdatetime(buf, t, 0));} static void Dp_getFullYear(js_State *J){	double t = js_todate(J, 0);	if (isnan(t))		js_pushnumber(J, NAN);	else		js_pushnumber(J, YearFromTime(LocalTime(t)));} static void Dp_getMonth(js_State *J)

Lines 1–500 of 863. Load more