#ifdef HAVE_CONFIG_H
# include <config.h>
#endif

#include "Eo.h"
#include "Evas.h"

#include "Eo.hh"
#include "Eina.hh"
#include "Evas.hh"

#include "main.h"

#define EXPEDITE_CXX_TEST_IMPL
#include "proxy_text_fixed_capi.h"

/* standard var */
static int done = 0;

/* private data */
static evas::object *texts[OBNUM];

inline Evas_Text_Style_Type
operator++(Evas_Text_Style_Type const& x)
{
   int val = static_cast<int>(x);
   return static_cast<Evas_Text_Style_Type>(val++);
}

/* setup */
static void _setup(void)
{
   evas::canvas canvas(::eo_ref(G_evas));
   Evas_Text_Style_Type st, i;

   st = EVAS_TEXT_STYLE_SHADOW;
   for (; st <= EVAS_TEXT_STYLE_FAR_SOFT_SHADOW; ++i)
     {
        evas::text* o = new evas::text(efl::eo::parent = canvas);
        o->font_set("Vera-Bold", 20);
        o->text_set("This is a test string");
        o->style_set(st);
        o->evas::object::color_set(255, 255, 255, 255);
        o->shadow_color_set(0, 0, 0, 24);
        o->glow_color_set(100, 80, 40, 100);
        o->glow2_color_set(50, 10, 5, 50);
        o->outline_color_set(0, 0, 0, 255);
        o->visibility_set(true);
        texts[i] = o;
	++st;
     }
   st = i;

   for (  ; i < OBNUM ; ++i)
     {
	evas::text s(::eo_ref(texts[i % st]->_eo_ptr()));
        evas::image *o = new evas::image(efl::eo::parent = canvas);
        o->source_set(s);
        /* FIXME s == NULL*/
        int w,h;
        s.evas::object::size_get(&w, &h);
        o->evas::object::size_set(w, h);
        o->fill_set(0, 0, w, h);
        o->visibility_set(true);
        if (texts[i]) delete texts[i];
        texts[i] = o;
     }

   done = 0;
}

/* cleanup */
static void _cleanup(void)
{
   for (int i = 0; i < OBNUM; i++) // XXX
     {
        texts[i]->parent_set(efl::eo::base(nullptr));
        texts[i]->_reset(nullptr);
        delete texts[i];
     }
}

/* loop - do things */
static void _loop(double t, int f)
{
   Evas_Coord x, y, w, h;
   for (int i = 0; i < OBNUM; i++)
     {
        texts[i]->evas::object::size_get(&w, &h);
	x = (win_w / 2) - (w / 2);
	x += ::sin((double)(f + (i * 13)) / (36.7 * SLOW)) * (w / 2);
	y = (win_h / 2) - (h / 2);
	y += ::cos((double)(f + (i * 28)) / (43.8 * SLOW)) * (w / 2);
        texts[i]->evas::object::position_set(x, y);
     }
   FPS_STD(NAME);
}

/* prepend special key handlers if interactive (before STD) */
static void _key(char *key)
{
   KEY_STD;
}

extern "C" void FNAME(void)
{
   ui_func_set(_key, _loop);
   _setup();
}