// %flair:license{
// This file is part of the Flair framework distributed under the
// CECILL-C License, Version 1.0.
// %flair:license}
//  created:    2012/05/07
//  filename:   Object.cpp
//
//  author:     Guillaume Sanahuja
//              Copyright Heudiasyc UMR UTC/CNRS 7253
//
//  version:    $Id: $
//
//  purpose:    Base class for all Framework's classes
//
//
/*********************************************************************/

#include <stdio.h>

#include "Object.h"
#include "Object_impl.h"
#include "FrameworkManager.h"

#ifdef __XENO__
#include <native/task.h>
#include <native/timer.h>
#include "rtdk.h"
#else
#include <sys/time.h>
#endif

using std::string;
using std::vector;

namespace flair
{
namespace core
{

Time GetTime(void)
{
#ifdef __XENO__
    return rt_timer_read();
#else
    struct timeval t;
    gettimeofday(&t, NULL);
    return (Time)((Time)(t.tv_sec)*1000000 + (Time)(t.tv_usec))*1000;

#endif
}

void Printf(const char *format, ...)
{
    va_list args;
    va_start(args, format);
#ifdef __XENO__
    if(rt_task_self()!=NULL)
    {
        rt_vfprintf(stderr,format, args);
    }
    else
#endif
    {
        vfprintf(stderr,format, args);
    }

    va_end (args);
}

Object::Object(const Object* parent,string name,string type)
{
    pimpl_=new Object_impl(this,parent,name,type);
    if(parent!=NULL) parent->pimpl_->AddChild(this);
}

Object::~Object()
{
    if(pimpl_->parent!=NULL) pimpl_->parent->pimpl_->RemoveChild(this);
    delete pimpl_;
}

string Object::ObjectName(void) const
{
    return pimpl_->name;
}

string Object::ObjectType(void) const
{
    return pimpl_->type;
}

const Object* Object::Parent(void) const
{
    return pimpl_->parent;
}

vector<const Object*>* Object::TypeChilds(void) const
{
    return &(pimpl_->type_childs);
}

vector<const Object*>* Object::Childs(void) const
{
    return &(pimpl_->childs);
}

void Object::ColorPrintf(color_t color, const char *function, int line, const char *format,va_list *args) const {
#ifdef __XENO__
    if(rt_task_self()!=NULL)
    {
        rt_fprintf(stderr,"\033[%dm", color);
        if (line) {
            rt_fprintf(stderr,"%s - line %d, %s: ", function, line, pimpl_->name.c_str());
        } else {
            rt_fprintf(stderr,"%s, %s: ", function, pimpl_->name.c_str());
        }
        rt_vfprintf(stderr,format, *args);
        rt_fprintf(stderr,"\033[%dm", color_t::Auto);
    }
    else
#endif
    {
        fprintf(stderr,"\033[%dm", color);
        if (line) {
            fprintf(stderr,"%s - line %d, %s: ", function, line, pimpl_->name.c_str());
        } else {
            fprintf(stderr,"%s, %s: ", function, pimpl_->name.c_str());
        }
        vfprintf(stderr,format, *args);
        fprintf(stderr,"\033[%dm", color_t::Auto);
    }
}

void Object::Information(const char *function, int line, const char *format, ...) const {
    va_list args;
    va_start(args, format);
    ColorPrintf(color_t::Green, function, line, format, &args);
    va_end (args);
}

void Object::Warning(const char *function, const char *format, ...) const {
    va_list args;
    va_start(args, format);
    ColorPrintf(color_t::Orange, function, 0, format, &args);
    va_end (args);
}

void Object::Error(const char *function, const char *format, ...) const {
    va_list args;
    va_start(args, format);
    ColorPrintf(color_t::Red, function, 0, format, &args);
    va_end (args);

    pimpl_->error_occured=true;
}

bool Object::ErrorOccured(bool recursive) const
{
    return pimpl_->ErrorOccured(recursive);
}

} // end namespace core
} // end namespace flair