#ifdef HAVE_CONFIG_H
	#include "config.h"
#endif
#if defined(__FreeBSD__)
#	include <osreldate.h>
#	if __FreeBSD_version < 500000
#		undef _XOPEN_SOURCE
#	endif
#endif

#include <Eris/Calendar.h>
#include <Eris/Avatar.h>
#include <Eris/Exceptions.h>
#include <Eris/View.h>
#include <Eris/Entity.h>
#include <Eris/Log.h>

using namespace Atlas::Message;

namespace Eris
{

Calendar::Calendar(Avatar* av) :
    m_avatar(av),
    m_daysPerMonth(0),
    m_monthsPerYear(0),
    m_hoursPerDay(0),
    m_minutesPerHour(0),
    m_secondsPerMinute(0)
{
    av->getView()->TopLevelEntityChanged.connect(
        sigc::mem_fun(this, &Calendar::topLevelEntityChanged));
    // hook up right now if currently valid
    if (av->getView()->getTopLevel()) topLevelEntityChanged();
}

void Calendar::topLevelEntityChanged()
{
    m_calendarObserver.disconnect();
    Entity* tl = m_avatar->getView()->getTopLevel();
    if (!tl || !tl->hasAttr("calendar")) return;
    
    m_calendarObserver = tl->observe("calendar", sigc::mem_fun(this, &Calendar::calendarAttrChanged));
    
    initFromCalendarAttr(tl->valueOfAttr("calendar").asMap());
}

void Calendar::calendarAttrChanged(const std::string&, const Element& value)
{
    if (!value.isMap()) throw InvalidAtlas("malformed calendar data", value);
    initFromCalendarAttr(value.asMap());
}

void Calendar::initFromCalendarAttr(const MapType& cal)
{
    MapType::const_iterator it = cal.find("days_per_month");
    if (it == cal.end()) throw InvalidAtlas("malformed calendar data", cal);
    m_daysPerMonth = it->second.asInt();
    
    it = cal.find("hours_per_day");
    if (it == cal.end()) throw InvalidAtlas("malformed calendar data", cal);
    m_hoursPerDay = it->second.asInt();
    
    it = cal.find("minutes_per_hour");
    if (it == cal.end()) throw InvalidAtlas("malformed calendar data", cal);
    m_minutesPerHour = it->second.asInt();
    
    it = cal.find("months_per_year");
    if (it == cal.end()) throw InvalidAtlas("malformed calendar data", cal);
    m_monthsPerYear = it->second.asInt();
    
    it = cal.find("seconds_per_minute");
    if (it == cal.end()) throw InvalidAtlas("malformed calendar data", cal);
    m_secondsPerMinute = it->second.asInt();
}

DateTime Calendar::now() const
{
    DateTime n;
    // we don't have valid calendar data yet
    if (m_daysPerMonth == 0) return n;
    
#if defined(__FreeBSD__) && __FreeBSD_version < 500000
    n.m_seconds = rintf(m_avatar->getWorldTime());
#else
    n.m_seconds = lrintf(m_avatar->getWorldTime());
#endif
    
    n.m_minutes = n.m_seconds / m_secondsPerMinute;
    n.m_seconds -= (n.m_minutes * m_secondsPerMinute);
    
    n.m_hours = n.m_minutes / m_minutesPerHour;
    n.m_minutes -= (n.m_hours * m_minutesPerHour);
    
    n.m_dayOfMonth = n.m_hours / m_hoursPerDay;
    n.m_hours -= (n.m_dayOfMonth * m_hoursPerDay);
    
    n.m_month = n.m_dayOfMonth / m_daysPerMonth;
    n.m_dayOfMonth -= (n.m_month * m_daysPerMonth);
    
    n.m_year = n.m_month / m_monthsPerYear;
    n.m_month -= (n.m_year * m_monthsPerYear);
    
    n.m_valid = true;
    return n;
}

} // of namespace Eris