#include <Elementary.h>
#include "sha1.h"

static Evas_Object *win = NULL, *subwin = NULL, *image = NULL;
static Evas_Object *vidimage = NULL;
static int iw, ih;
static unsigned char sum[20];
static Eet_File *ef;

EAPI_MAIN int
elm_main(int argc, char **argv)
{
   char buf_base[PATH_MAX];
   char buf_file[PATH_MAX];
   unsigned int pos, incr;

   if (argc < 3) exit(1);
   elm_need_efreet();

   elm_policy_set(ELM_POLICY_QUIT, ELM_POLICY_QUIT_LAST_WINDOW_CLOSED);
   elm_app_compile_bin_dir_set(PACKAGE_BIN_DIR);
   elm_app_compile_data_dir_set(PACKAGE_DATA_DIR);
   elm_app_info_set(elm_main, "rage", "themes/default.edj");

   elm_config_engine_set("buffer");
   win = elm_win_add(NULL, "Rage", ELM_WIN_BASIC);
   subwin = elm_win_add(win, "inlined", ELM_WIN_INLINED_IMAGE);
   image = elm_win_inlined_image_object_get(subwin);

   evas_object_show(subwin);
   evas_object_show(win);

   elm_win_norender_push(subwin);
   elm_win_norender_push(win);

   vidimage = evas_object_image_filled_add(evas_object_evas_get(subwin));
   evas_object_show(vidimage);

   evas_object_image_file_set(vidimage, argv[1], NULL);
   evas_object_image_size_get(vidimage, &iw, &ih);
   if (!sha1((unsigned char *)argv[1], strlen(argv[1]), sum)) exit(2);
   if (!efreet_cache_home_get()) exit(3);
   snprintf(buf_base, sizeof(buf_base), "%s/rage/thumb/%02x",
            efreet_cache_home_get(), sum[0]);
   snprintf(buf_file, sizeof(buf_base),
            "%s/%02x%02x%02x%02x%02x%02x%02x%02x%02x%02x%02x"
            "%02x%02x%02x%02x%02x%02x%02x%02x.eet",
            buf_base,
            sum[1], sum[2], sum[3],
            sum[4], sum[5], sum[6], sum[7],
            sum[8], sum[9], sum[10], sum[11],
            sum[12], sum[13], sum[14], sum[15],
            sum[16], sum[17], sum[18], sum[19]);
   if (!ecore_file_mkpath(buf_base)) exit(4);
   ef = eet_open(buf_file, EET_FILE_MODE_WRITE);
   if (!ef) exit(5);
   pos = 0;
   incr = atoi(argv[2]);
   for (pos = 0; ; pos += incr)
     {
        int w, h;
        int *pixels;
        char key[128];

        snprintf(key, sizeof(key), "%i", pos);
        evas_object_image_file_set(vidimage, argv[1], key);
        evas_object_image_size_get(vidimage, &iw, &ih);
        if ((iw <= 0) || (ih <= 0)) break;
        w = 160;
        h = (ih * 160) / iw;
        if (h < 1) h = 1;
        evas_object_resize(vidimage, w, h);
        evas_object_resize(subwin, w, h);
        elm_win_render(subwin);
        pixels = evas_object_image_data_get(image, EINA_FALSE);
        if (pixels)
          eet_data_image_write(ef, key, pixels, w, h,
                               0, 0, 70, EET_IMAGE_JPEG);
        else
          exit(6);
        evas_object_image_data_set(image, pixels);
     }
   eet_close(ef);
   elm_shutdown();
   return 0;
}
ELM_MAIN()