/*
 * Copyright (C) 2000, Michael Jennings
 *
 * Permission is hereby granted, free of charge, to any person obtaining a copy
 * of this software and associated documentation files (the "Software"), to
 * deal in the Software without restriction, including without limitation the
 * rights to use, copy, modify, merge, publish, distribute, sublicense, and/or
 * sell copies of the Software, and to permit persons to whom the Software is
 * furnished to do so, subject to the following conditions:
 *
 * The above copyright notice and this permission notice shall be included in
 * all copies of the Software, its documentation and marketing & publicity
 * materials, and acknowledgment shall be given in the documentation, materials
 * and software packages that this Software was used.
 *
 * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
 * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
 * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL
 * THE AUTHORS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER
 * IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN
 * CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.
 */
#include <errno.h>

#include "config.h"
#include "epplet.h"

#define ACT_EXIT      "<exit>"
#define ACT_CONFIG    "<config>"
#define ACT_SHADE     "<shade>"

#if 0
#define D(x) do {printf("%10s | %7d:  [debug] ", __FILE__, __LINE__); printf x; fflush(stdout);} while (0)
#else
#define D(x) ((void) 0)
#endif
#define BEGMATCH(a, b)  (!strncasecmp((a), (b), (sizeof(b) - 1)))
#define NONULL(x)       ((x) ? (x) : (""))

typedef struct {
   Epplet_gadget       gad;
   char               *label, *image;
   unsigned short      x, y, w, h;
   long                popup;
   char               *prog;
} toolbutton_t;

typedef struct {
   Epplet_gadget       cfg_tb_prog, cfg_tb_label,
      cfg_tb_image, cfg_tb_x, cfg_tb_y, cfg_tb_w, cfg_tb_h, cfg_tb_popup;
} tool_config_t;

static toolbutton_t *buttons;
static tool_config_t *cfg_gads = NULL;
static Epplet_gadget cfg_tb_width, cfg_tb_height;
static char        *prog_name = NULL;
static unsigned long button_cnt = 0;
static Window       config_win = None, shade_win = None, main_win = None;;
static unsigned short sw_x = -1, sw_y = -1;
static int          w = 6, h = 3;

static void         unshade_cb(void *data);
static void         save_config(void);
static void         button_cb(void *data);
static void         resize(int w, int h, int c);

static void
get_xy(Window win, unsigned short *px, unsigned short *py)
{
   Display            *d;
   int                 rx, ry;
   Window              child;

   d = Epplet_get_display();
   XTranslateCoordinates(d, win, DefaultRootWindow(d), 0, 0, &rx, &ry, &child);
   *px = rx;
   *py = ry;
}

static void
create_shade_window(void)
{
   shade_win =
      Epplet_create_window_borderless(16, 16, "E-Toolbox -- Shaded", 0);
   Epplet_gadget_show(Epplet_create_std_button
		      ("EJECT", 2, 2, unshade_cb, NULL));
   Epplet_window_pop_context();

   main_win = Epplet_get_main_window();
}

static void
create_gadget(int n)
{
   char               *std = NULL, *pbuff;

   if (*(buttons[n].image) == '<')
     {
	std = strdup(buttons[n].image + 1);
	for (pbuff = std; *pbuff; pbuff++)
	  {
	     if (*pbuff == '>')
	       {
		  *pbuff = 0;
	       }
	     else
	       {
		  *pbuff = toupper(*pbuff);
	       }
	  }
     }

   if (!strcasecmp(buttons[n].prog, "<popup>"))
     {
	buttons[n].gad = Epplet_create_popup();
	Epplet_gadget_show(Epplet_create_popupbutton
			   (buttons[n].label, buttons[n].image,
			    (buttons[n].x * 16) + 2, (buttons[n].y * 16) + 2,
			    (buttons[n].w - 1) * 16 + 12,
			    (buttons[n].h - 1) * 16 + 12, std, buttons[n].gad));
     }
   else if (buttons[n].popup != -1)
     {
	if ((unsigned long)buttons[n].popup < button_cnt)
	  {
	     Epplet_add_popup_entry(buttons[buttons[n].popup].gad,
				    buttons[n].label, buttons[n].image,
				    button_cb, &buttons[n]);
	  }
     }
   else
     {
	buttons[n].gad =
	   Epplet_create_button(buttons[n].label, buttons[n].image,
				(buttons[n].x * 16) + 2,
				(buttons[n].y * 16) + 2,
				(buttons[n].w - 1) * 16 + 12,
				(buttons[n].h - 1) * 16 + 12, std, None, NULL,
				button_cb, &buttons[n]);
	Epplet_gadget_show(buttons[n].gad);
     }
   if (std)
     {
	free(std);
     }
}

static void
delete_gadget(int n)
{
   if (n >= (int)button_cnt)
     {
	return;
     }
   if (buttons[n].prog)
     {
	free(buttons[n].prog);
     }
   if (buttons[n].label)
     {
	free(buttons[n].label);
     }
   if (buttons[n].image)
     {
	free(buttons[n].image);
     }
   if (buttons[n].gad && buttons[n].popup == -1)
     {
	Epplet_gadget_destroy(buttons[n].gad);
     }
   memset(&(buttons[n]), 0, sizeof(toolbutton_t));
   buttons[n].popup = -1;
}

static void
close_cb(void *data __UNUSED__)
{
   Epplet_unremember();
   Esync();
   exit(0);
}

static void
shade_cb(void *data __UNUSED__)
{
   Epplet_window_hide(main_win);
   Epplet_window_show(shade_win);
   if (sw_x == (unsigned short)-1 && sw_y == (unsigned short)-1)
     {
	get_xy(main_win, &sw_x, &sw_y);
	sw_x += (16 * (w - 1));
	sw_y += (16 * (h - 1));
     }
   D(("Shade win moving to %hd, %hd\n", sw_x, sw_y));
   XMoveWindow(Epplet_get_display(), shade_win, sw_x, sw_y);
}

static void
unshade_cb(void *data __UNUSED__)
{
   get_xy(shade_win, &sw_x, &sw_y);
   D(("Shade win is at %hd, %hd\n", sw_x, sw_y));
   Epplet_window_hide(shade_win);
   Epplet_window_show(main_win);
}

static int
delete_cb(void *data, Window win)
{
   if (win == config_win)
     {
	config_win = None;
     }
   else if (win == shade_win)
     {
	close_cb(data);
     }
   return 1;
}

static void
apply_config(int ok)
{
   const char         *s;
   unsigned long       i, j, n;
   int                 new_w = w, new_h = h;

   s = Epplet_textbox_contents(cfg_tb_width);
   if (*s)
     {
	n = strtoul(s, (char **)NULL, 10);
	new_w = n;
     }
   s = Epplet_textbox_contents(cfg_tb_height);
   if (*s)
     {
	n = strtoul(s, (char **)NULL, 10);
	new_h = n;
     }

   for (i = 0, j = 0; i < (button_cnt + 3); i++)
     {
	delete_gadget(i);
	s = Epplet_textbox_contents(cfg_gads[i].cfg_tb_prog);
	if (!(*s))
	  {
	     continue;
	  }
	buttons[i].prog = strdup(s);

	s = Epplet_textbox_contents(cfg_gads[i].cfg_tb_label);
	buttons[i].label = strdup(s ? s : "");
	s = Epplet_textbox_contents(cfg_gads[i].cfg_tb_image);
	buttons[i].image = strdup(s ? s : "");

	s = Epplet_textbox_contents(cfg_gads[i].cfg_tb_x);
	if (*s)
	  {
	     n = strtoul(s, (char **)NULL, 10);
	     buttons[i].x = n;
	  }
	s = Epplet_textbox_contents(cfg_gads[i].cfg_tb_y);
	if (*s)
	  {
	     n = strtoul(s, (char **)NULL, 10);
	     buttons[i].y = n;
	  }
	s = Epplet_textbox_contents(cfg_gads[i].cfg_tb_w);
	if (*s)
	  {
	     n = strtoul(s, (char **)NULL, 10);
	     buttons[i].w = n;
	  }
	s = Epplet_textbox_contents(cfg_gads[i].cfg_tb_h);
	if (*s)
	  {
	     n = strtoul(s, (char **)NULL, 10);
	     buttons[i].h = n;
	  }

	s = Epplet_textbox_contents(cfg_gads[i].cfg_tb_popup);
	if (*s)
	  {
	     n = strtoul(s, (char **)NULL, 10);
	     buttons[i].popup = n;
	  }

	if (j != i)
	  {
	     buttons[j] = buttons[i];
	  }
	j++;
     }
   button_cnt = j;

   if (new_w != w || new_h != h)
     {
	resize(new_w, new_h, !ok);
     }
   for (i = 0; i < button_cnt; i++)
     {
	create_gadget(i);
     }
}

static void
ok_cb(void *data __UNUSED__)
{
   apply_config(1);
   save_config();
   Epplet_window_destroy(config_win);
   config_win = None;
   if (cfg_gads)
     {
	free(cfg_gads);
	cfg_gads = NULL;
     }
}

static void
apply_cb(void *data __UNUSED__)
{
   apply_config(0);
}

static void
cancel_cb(void *data __UNUSED__)
{
   Epplet_window_destroy(config_win);
   config_win = None;
   if (cfg_gads)
     {
	free(cfg_gads);
	cfg_gads = NULL;
     }
}

static void
config_cb(void *data __UNUSED__)
{
   char                buff[128];
   unsigned long       ch, y, i;
   int                 x = 4;
   int                 row_w, col_w, height_w, width_w;
   Epplet_gadget       tmp_gad;

   if (config_win)
      return;

   cfg_gads =
      (tool_config_t *) malloc(sizeof(tool_config_t) * (button_cnt + 3));
   memset(cfg_gads, 0, sizeof(tool_config_t) * (button_cnt + 3));

   ch = 40 + ((button_cnt + 3) * 30);
   config_win =
      Epplet_create_window_config(535, ch, "E-Toolbox Configuration", ok_cb,
				  NULL, apply_cb, NULL, cancel_cb, NULL);

   tmp_gad = Epplet_create_label(x, 4, "Button:", 2);
   Epplet_gadget_show(tmp_gad);
   x += 100;

   tmp_gad = Epplet_create_label(x, 4, "Label:", 2);
   Epplet_gadget_show(tmp_gad);
   x += 100;

   tmp_gad = Epplet_create_label(x, 4, "Image:", 2);
   Epplet_gadget_show(tmp_gad);
   x += 100;

   tmp_gad = Epplet_create_label(x, 4, "Row:", 2);
   Epplet_gadget_show(tmp_gad);
   row_w = Epplet_gadget_get_width(tmp_gad);
   x += row_w + 10;

   tmp_gad = Epplet_create_label(x, 4, "Column:", 2);
   Epplet_gadget_show(tmp_gad);
   col_w = Epplet_gadget_get_width(tmp_gad);
   x += col_w + 10;

   tmp_gad = Epplet_create_label(x, 4, "Width:", 2);
   Epplet_gadget_show(tmp_gad);
   width_w = Epplet_gadget_get_width(tmp_gad);
   x += width_w + 10;

   tmp_gad = Epplet_create_label(x, 4, "Height:", 2);
   Epplet_gadget_show(tmp_gad);
   height_w = Epplet_gadget_get_width(tmp_gad);
   x += height_w + 10;

   tmp_gad = Epplet_create_label(x, 4, "Popup:", 2);
   Epplet_gadget_show(tmp_gad);

   for (i = 0, y = 20, x = 4; i < button_cnt; i++, y += 30, x = 4)
     {
	cfg_gads[i].cfg_tb_prog =
	   Epplet_create_textbox(NULL, buttons[i].prog, x, y, 90, 20, 2, NULL,
				 NULL);
	Epplet_gadget_show(cfg_gads[i].cfg_tb_prog);
	x += 100;

	cfg_gads[i].cfg_tb_label =
	   Epplet_create_textbox(NULL, buttons[i].label, x, y, 90, 20, 2, NULL,
				 NULL);
	Epplet_gadget_show(cfg_gads[i].cfg_tb_label);
	x += 100;

	cfg_gads[i].cfg_tb_image =
	   Epplet_create_textbox(NULL, buttons[i].image, x, y, 90, 20, 2, NULL,
				 NULL);
	Epplet_gadget_show(cfg_gads[i].cfg_tb_image);
	x += 100;

	Esnprintf(buff, sizeof(buff), "%u", (unsigned)buttons[i].y);
	cfg_gads[i].cfg_tb_y =
	   Epplet_create_textbox(NULL, buff, x, y, 24, 20, 2, NULL, NULL);
	Epplet_gadget_show(cfg_gads[i].cfg_tb_y);
	x += row_w + 14;

	Esnprintf(buff, sizeof(buff), "%u", (unsigned)buttons[i].x);
	cfg_gads[i].cfg_tb_x =
	   Epplet_create_textbox(NULL, buff, x, y, 24, 20, 2, NULL, NULL);
	Epplet_gadget_show(cfg_gads[i].cfg_tb_x);
	x += col_w + 10;

	Esnprintf(buff, sizeof(buff), "%u", (unsigned)buttons[i].w);
	cfg_gads[i].cfg_tb_w =
	   Epplet_create_textbox(NULL, buff, x, y, 24, 20, 2, NULL, NULL);
	Epplet_gadget_show(cfg_gads[i].cfg_tb_w);
	x += width_w + 10;

	Esnprintf(buff, sizeof(buff), "%u", (unsigned)buttons[i].h);
	cfg_gads[i].cfg_tb_h =
	   Epplet_create_textbox(NULL, buff, x, y, 24, 20, 2, NULL, NULL);
	Epplet_gadget_show(cfg_gads[i].cfg_tb_h);
	x += height_w + 10;

	Esnprintf(buff, sizeof(buff), "%ld", buttons[i].popup);
	cfg_gads[i].cfg_tb_popup =
	   Epplet_create_textbox(NULL, ((buttons[i].popup != -1) ? buff : NULL),
				 x, y, 24, 20, 2, NULL, NULL);
	Epplet_gadget_show(cfg_gads[i].cfg_tb_popup);
     }
   for (x = 4; i < button_cnt + 3; i++, y += 30, x = 4)
     {
	cfg_gads[i].cfg_tb_prog =
	   Epplet_create_textbox(NULL, NULL, x, y, 90, 20, 2, NULL, NULL);
	Epplet_gadget_show(cfg_gads[i].cfg_tb_prog);
	x += 100;

	cfg_gads[i].cfg_tb_label =
	   Epplet_create_textbox(NULL, NULL, x, y, 90, 20, 2, NULL, NULL);
	Epplet_gadget_show(cfg_gads[i].cfg_tb_label);
	x += 100;

	cfg_gads[i].cfg_tb_image =
	   Epplet_create_textbox(NULL, NULL, x, y, 90, 20, 2, NULL, NULL);
	Epplet_gadget_show(cfg_gads[i].cfg_tb_image);
	x += 100;

	cfg_gads[i].cfg_tb_y =
	   Epplet_create_textbox(NULL, NULL, x, y, 24, 20, 2, NULL, NULL);
	Epplet_gadget_show(cfg_gads[i].cfg_tb_y);
	x += row_w + 14;

	cfg_gads[i].cfg_tb_x =
	   Epplet_create_textbox(NULL, NULL, x, y, 24, 20, 2, NULL, NULL);
	Epplet_gadget_show(cfg_gads[i].cfg_tb_x);
	x += col_w + 10;

	cfg_gads[i].cfg_tb_w =
	   Epplet_create_textbox(NULL, NULL, x, y, 24, 20, 2, NULL, NULL);
	Epplet_gadget_show(cfg_gads[i].cfg_tb_w);
	x += width_w + 10;

	cfg_gads[i].cfg_tb_h =
	   Epplet_create_textbox(NULL, NULL, x, y, 24, 20, 2, NULL, NULL);
	Epplet_gadget_show(cfg_gads[i].cfg_tb_h);
	x += height_w + 10;

	cfg_gads[i].cfg_tb_popup =
	   Epplet_create_textbox(NULL, NULL, x, y, 24, 20, 2, NULL, NULL);
	Epplet_gadget_show(cfg_gads[i].cfg_tb_popup);
     }

   x = 10;
   y = ch - 25;
   tmp_gad = Epplet_create_label(x, y + 4, "Total Epplet Width:", 2);
   Epplet_gadget_show(tmp_gad);
   x += Epplet_gadget_get_width(tmp_gad) + 8;

   Esnprintf(buff, sizeof(buff), "%u", (unsigned)w);
   cfg_tb_width =
      Epplet_create_textbox(NULL, buff, x, y, 32, 20, 2, NULL, NULL);
   Epplet_gadget_show(cfg_tb_width);
   x += 45;

   tmp_gad = Epplet_create_label(x, y + 4, "Total Epplet Height:", 2);
   Epplet_gadget_show(tmp_gad);
   x += Epplet_gadget_get_width(tmp_gad) + 8;

   Esnprintf(buff, sizeof(buff), "%u", (unsigned)h);
   cfg_tb_height =
      Epplet_create_textbox(NULL, buff, x, y, 32, 20, 2, NULL, NULL);
   Epplet_gadget_show(cfg_tb_height);

   Epplet_window_show(config_win);
   Epplet_window_pop_context();
}

static void
parse_config(void)
{
   const char         *tmp;
   char                buff[1024];
   int                 new_w, new_h;

   if (!Epplet_query_config("button_0"))
     {
	Esnprintf(buff, sizeof(buff), "%s/default.cfg", Epplet_data_dir());
	Epplet_load_config_file(buff);
     }
   new_w = w;
   new_h = h;
   tmp = Epplet_query_config("width");
   if (tmp)
     {
	new_w = atoi(tmp);
     }
   tmp = Epplet_query_config("height");
   if (tmp)
     {
	new_h = atoi(tmp);
     }
   if (new_w != w || new_h != h)
     {
	resize(new_w, new_h, 0);
     }

   for (; 1; button_cnt++)
     {
	if (button_cnt)
	  {
	     buttons =
		(toolbutton_t *) realloc(buttons,
					 sizeof(toolbutton_t) * (button_cnt +
								 1));
	  }
	else
	  {
	     buttons =
		(toolbutton_t *) malloc(sizeof(toolbutton_t) *
					(button_cnt + 1));
	  }
	memset(&buttons[button_cnt], 0, sizeof(toolbutton_t));

	Esnprintf(buff, sizeof(buff), "button_%lu", button_cnt);
	tmp = Epplet_query_config(buff);
	if (!tmp)
	  {
	     break;
	  }
	buttons[button_cnt].prog = strdup(tmp);

	Esnprintf(buff, sizeof(buff), "button_%lu_image", button_cnt);
	buttons[button_cnt].image = strdup(Epplet_query_config_def(buff, ""));
	Esnprintf(buff, sizeof(buff), "button_%lu_label", button_cnt);
	buttons[button_cnt].label = strdup(Epplet_query_config_def(buff, ""));
	D(("label is %8p \"%s\", image is %8p \"%s\"\n",
	   buttons[button_cnt].label, buttons[button_cnt].label,
	   buttons[button_cnt].image, buttons[button_cnt].image));

	Esnprintf(buff, sizeof(buff), "button_%lu_popup", button_cnt);
	tmp = Epplet_query_config(buff);
	if (tmp)
	  {
	     buttons[button_cnt].popup = atoi(tmp);
	  }
	else
	  {
	     buttons[button_cnt].popup = -1;
	     Esnprintf(buff, sizeof(buff), "button_%lu_x", button_cnt);
	     buttons[button_cnt].x =
		(unsigned short)atoi(Epplet_query_config_def(buff, "0"));
	     Esnprintf(buff, sizeof(buff), "button_%lu_y", button_cnt);
	     buttons[button_cnt].y =
		(unsigned short)atoi(Epplet_query_config_def(buff, "0"));
	     Esnprintf(buff, sizeof(buff), "button_%lu_w", button_cnt);
	     buttons[button_cnt].w =
		(unsigned short)atoi(Epplet_query_config_def(buff, "1"));
	     Esnprintf(buff, sizeof(buff), "button_%lu_h", button_cnt);
	     buttons[button_cnt].h =
		(unsigned short)atoi(Epplet_query_config_def(buff, "1"));
	  }
     }
   save_config();
}

static void
save_config(void)
{
   char                buff[25], buff2[8];
   unsigned long       i;

   Esnprintf(buff, sizeof(buff), "%d", w);
   Epplet_modify_config("width", buff);
   Esnprintf(buff, sizeof(buff), "%d", h);
   Epplet_modify_config("height", buff);

   for (i = 0; i < button_cnt; i++)
     {
	Esnprintf(buff, sizeof(buff), "button_%lu", i);
	Epplet_modify_config(buff, buttons[i].prog);

	Esnprintf(buff, sizeof(buff), "button_%lu_image", i);
	Epplet_modify_config(buff, buttons[i].image);

	Esnprintf(buff, sizeof(buff), "button_%lu_label", i);
	Epplet_modify_config(buff, buttons[i].label);

	if (buttons[i].popup != -1)
	  {
	     Esnprintf(buff, sizeof(buff), "button_%lu_popup", i);
	     Esnprintf(buff2, sizeof(buff2), "%d", (int)buttons[i].popup);
	     Epplet_modify_config(buff, buff2);
	  }
	else
	  {
	     D(("x == %hu, y == %hu, w == %hu, h == %hu\n", buttons[i].x,
		buttons[i].y, buttons[i].w, buttons[i].h));
	     Esnprintf(buff, sizeof(buff), "button_%lu_x", i);
	     Esnprintf(buff2, sizeof(buff2), "%d", (int)buttons[i].x);
	     Epplet_modify_config(buff, buff2);
	     Esnprintf(buff, sizeof(buff), "button_%lu_y", i);
	     Esnprintf(buff2, sizeof(buff2), "%d", (int)buttons[i].y);
	     Epplet_modify_config(buff, buff2);
	     Esnprintf(buff, sizeof(buff), "button_%lu_w", i);
	     Esnprintf(buff2, sizeof(buff2), "%d", (int)buttons[i].w);
	     Epplet_modify_config(buff, buff2);
	     Esnprintf(buff, sizeof(buff), "button_%lu_h", i);
	     Esnprintf(buff2, sizeof(buff2), "%d", (int)buttons[i].h);
	     Epplet_modify_config(buff, buff2);
	  }
     }
}

static void
button_cb(void *data)
{
   toolbutton_t       *b = data;

   if (b && b->prog)
     {
	if (*(b->prog) == '<')
	  {
	     if (BEGMATCH(b->prog, ACT_EXIT))
	       {
		  close_cb(NULL);
		  return;
	       }
	     else if (BEGMATCH(b->prog, ACT_CONFIG))
	       {
		  config_cb(NULL);
		  return;
	       }
	     else if (BEGMATCH(b->prog, ACT_SHADE))
	       {
		  shade_cb(NULL);
		  return;
	       }
	  }
	Epplet_spawn_command(b->prog);
     }
}

static void
resize(int nw, int nh, int c)
{
   char                tmp_w[8], tmp_h[8];

   w = nw;
   h = nh;
   save_config();

   if (!c)
     {
	Epplet_unremember();
     }
   Epplet_cleanup();
   Esync();

   Esnprintf(tmp_w, sizeof(tmp_w), "%d", w);
   Esnprintf(tmp_h, sizeof(tmp_h), "%d", h);
   execlp(prog_name, prog_name, "-w", tmp_w, "-h", tmp_h, (c ? "-c" : NULL),
	  NULL);
   fprintf(stderr, "execlp() failed -- %s\n", strerror(errno));
}

int
main(int argc, char **argv)
{
   int                 j = 0, c = 0;

   prog_name = argv[0];
   atexit(Epplet_cleanup);

   for (j = 1; j < argc; j++)
     {
	if ((!strcmp("-w", argv[j])) && (argc - j > 1))
	  {
	     w = atoi(argv[++j]);
	  }
	else if ((!strcmp("-h", argv[j])) && (argc - j > 1))
	  {
	     h = atoi(argv[++j]);
	  }
	else if (!strcmp("-c", argv[j]))
	  {
	     c = 1;
	  }
     }

   Epplet_Init("E-Toolbox", "0.1", "Enlightenment Toolbox Epplet", w, h, argc,
	       argv, 0);
   Epplet_load_config();
   parse_config();

   for (j = 0; j < (int)button_cnt; j++)
     {
	create_gadget(j);
     }

   Epplet_register_delete_event_handler(delete_cb, NULL);
   create_shade_window();
   Epplet_show();

   if (c)
     {
	config_cb(NULL);
     }
   Epplet_Loop();

   return 0;
}