#include "pitimer.h"


PITimer::PITimer(TimerEvent slot, void * data_) {
	ret_func = slot;
	data = data_;
#ifndef WINDOWS
	ti = -1;
	running = false;
	se.sigev_notify = SIGEV_THREAD;
	se.sigev_value.sival_ptr = this;
	se.sigev_notify_function = timer_event;
	se.sigev_notify_attributes = 0;
	lockRun = false;
#endif
	reset();
}


#ifndef WINDOWS
void PITimer::start(double msecs) {
	spec.it_interval.tv_nsec = ((int)(msecs * 1000) % 1000000) * 1000;
	spec.it_interval.tv_sec = (time_t)(msecs / 1000);
	spec.it_value = spec.it_interval;
	ti = timer_create(CLOCK_REALTIME, &se, &timer);
	timer_settime(timer, 0, &spec, 0);
	running = true;
}


void PITimer::timer_event(sigval e) {
	PITimer * ct = (PITimer * )e.sival_ptr;
	if (ct->ret_func != 0) {
		if (ct->lockRun) ct->lock();
		ct->ret_func(ct->data);
		if (ct->lockRun) ct->unlock();
	}
}
#endif


double PITimer::elapsed_n() {
#ifdef WINDOWS
	t_cur = GetCurrentTime();
	return (t_cur * 1000000. - t_st * 1000000.);
#else
	clock_gettime(0, &t_cur);
	return (t_cur.tv_sec * 1.e+9 + t_cur.tv_nsec) -
		   (t_st.tv_sec * 1.e+9 + t_st.tv_nsec);
#endif
}


double PITimer::elapsed_u() {
#ifdef WINDOWS
	t_cur = GetCurrentTime();
	return (t_cur * 1000. - t_st * 1000.);
#else
	clock_gettime(0, &t_cur);
	return (t_cur.tv_sec * 1.e+6 + (t_cur.tv_nsec / 1.e+3)) -
		   (t_st.tv_sec * 1.e+6 + (t_st.tv_nsec / 1.e+3));
#endif
}


double PITimer::elapsed_m() {
#ifdef WINDOWS
	t_cur = GetCurrentTime();
	return (double)(t_cur - t_st);
#else
	clock_gettime(0, &t_cur);
	return (t_cur.tv_sec * 1.e+3 + (t_cur.tv_nsec / 1.e+6)) -
		   (t_st.tv_sec * 1.e+3 + (t_st.tv_nsec / 1.e+6));
#endif
}


double PITimer::elapsed_s() {
#ifdef WINDOWS
	t_cur = GetCurrentTime();
	return (t_cur / 1000. - t_st / 1000.);
#else
	clock_gettime(0, &t_cur);
	return (t_cur.tv_sec + (t_cur.tv_nsec / 1.e+9)) -
		   (t_st.tv_sec + (t_st.tv_nsec / 1.e+9));
#endif
}


PITime currentTime() {
	time_t rt = time(0);
	tm * pt = localtime(&rt);
	PITime t;
	t.seconds = pt->tm_sec;
	t.minutes = pt->tm_min;
	t.hours = pt->tm_hour;
	return t;
}


PIDate currentDate() {
	time_t rt = time(0);
	tm * pt = localtime(&rt);
	PIDate d;
	d.day = pt->tm_mday;
	d.month = pt->tm_mon + 1;
	d.year = pt->tm_year + 1900;
	return d;
}


PIString time2string(const PITime & time, const PIString & format) {
	PIString ts = format;
	ts.replace("hh", PIString::fromNumber(time.hours).expandLeftTo(2, '0'));
	ts.replace("h", PIString::fromNumber(time.hours));
	ts.replace("mm", PIString::fromNumber(time.minutes).expandLeftTo(2, '0'));
	ts.replace("m", PIString::fromNumber(time.minutes));
	ts.replace("ss", PIString::fromNumber(time.seconds).expandLeftTo(2, '0'));
	ts.replace("s", PIString::fromNumber(time.seconds));
	return ts;
}


PIString date2string(const PIDate & date, const PIString & format) {
	PIString ts = format;
	ts.replace("yyyy", PIString::fromNumber(date.year).expandLeftTo(4, '0'));
	ts.replace("yy", PIString::fromNumber(date.year).expandLeftTo(2, '0'));
	ts.replace("y", PIString::fromNumber(date.year));
	ts.replace("mm", PIString::fromNumber(date.month).expandLeftTo(2, '0'));
	ts.replace("m", PIString::fromNumber(date.month));
	ts.replace("dd", PIString::fromNumber(date.day).expandLeftTo(2, '0'));
	ts.replace("d", PIString::fromNumber(date.day));
	return ts;
}