/* E-ScreenSave.c
 *
 * Copyright (C) 1999-2000 Tom Gilbert
 *
 * This program is free software; you can redistribute it and/or
 * modify it under the terms of the GNU General Public License as
 * published by the Free Software Foundation; either version 2 of the
 * License, or (at your option) any later version.
 *
 * This program is distributed in the hope that it will be useful,
 * but WITHOUT ANY WARRANTY; without even the implied warranty of
 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
 * GNU General Public License for more details.
 *
 * You should have received a copy of the GNU General Public License
 * along with this program; if not, write to the Free Software
 * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307
 * USA
 */
#include <stdio.h>

#include "config.h"
#include "cloak.h"
#include "epplet.h"
#include "utils.h"

RGB_buf             rgbbuf;

static Epplet_gadget btn_conf, btn_close, btn_help, btn_ctimer, btn_save;
static Epplet_gadget btn_col, btn_stimer;
static Epplet_gadget p, col_p, ctimer_p, stimer_p;
static Window       eppwin;
static Epplet_gadget da;
static int          cloaked = 0;
extern int          load_val;
extern int          colors[];

static int          cloak_anims[] = {
   0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14, 15, 16, 17
};
static int          cloak_delays[] = {
   1, 2, 3, 4, 5, 10, 15, 20, 30, 60, 120
};
static int          save_delays[] = {
   0, 1, 2, 3, 4, 5, 10, 15, 20, 30, 60, 120, 300, 600
};

struct
{
   int                 quality;
   int                 win;
   int                 beep;
   int                 cloak_anim;
   int                 frame;
   int                 do_cloak;
   int                 rand_cloak;
   int                 run_script;
   double              delay;
   double              cloak_delay;
   double              rand_delay;
   double              draw_interval;
   char               *dir;
   char               *file_prefix;
   char               *file_stamp;
   char               *file_type;
   char               *script;
   char               *lock_cmd;
}
opt;

static Window       confwin = 0;
static Epplet_gadget txt;

static void         cb_in(void *data, Window w);

static void
choose_random_cloak(void *data __UNUSED__)
{
   static int          last_anim = 0;

   do
     {
	opt.cloak_anim = (int)(15 * ((float)rand()) / (RAND_MAX + 1.0)) + 1;
     }
   while (opt.cloak_anim == last_anim);	/* Don't pick the same one twice in a row. */
   last_anim = opt.cloak_anim;
   Epplet_timer(choose_random_cloak, NULL, opt.rand_delay, "RAND_TIMER");
}

static void
save_config(void)
{
   char                buf[10];

   Esnprintf(buf, sizeof(buf), "%.2f", opt.delay);
   Epplet_modify_config("SAVE_DELAY", buf);
   Esnprintf(buf, sizeof(buf), "%.2f", opt.cloak_delay);
   Epplet_modify_config("CLOAK_DELAY", buf);
   Esnprintf(buf, sizeof(buf), "%.2f", opt.draw_interval);
   Epplet_modify_config("DRAW_INTERVAL", buf);
   Esnprintf(buf, sizeof(buf), "%.2f", opt.rand_delay);
   Epplet_modify_config("RAND_DELAY", buf);
   Esnprintf(buf, sizeof(buf), "%d", opt.do_cloak);
   Epplet_modify_config("DO_CLOAK", buf);
   if (opt.rand_cloak)
     {
	strcpy(buf, "16");
     }
   else
     {
	Esnprintf(buf, sizeof(buf), "%d", opt.cloak_anim);
     }
   Epplet_modify_config("CLOAK_ANIM", buf);
   Epplet_modify_config("LOCK_COMMAND", opt.lock_cmd);
}

static void
load_config(void)
{
   opt.do_cloak = atoi(Epplet_query_config_def("DO_CLOAK", "1"));
   opt.cloak_anim = atoi(Epplet_query_config_def("CLOAK_ANIM", "8"));
   if (opt.cloak_anim == 16)
     {
	opt.rand_cloak = 1;
	choose_random_cloak(NULL);
     }
   else
     {
	opt.rand_cloak = 0;
     }
   opt.delay = atof(Epplet_query_config_def("SAVE_DELAY", "0"));
   opt.cloak_delay = atof(Epplet_query_config_def("CLOAK_DELAY", "4"));
   opt.rand_delay = atof(Epplet_query_config_def("RAND_DELAY", "60"));
   opt.draw_interval = atof(Epplet_query_config_def("DRAW_INTERVAL", "0.1"));
   if (opt.lock_cmd)
      free(opt.lock_cmd);
   opt.lock_cmd =
      _Strdup(Epplet_query_config_def
	      ("LOCK_COMMAND", "xscreensaver-command -lock &"));
}

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

static void
cb_help(void *data __UNUSED__)
{
   Epplet_show_about("E-ScreenSave");
}

static void
cloak_draw(void *data __UNUSED__)
{
   switch (opt.cloak_anim)
     {
     case 0:
	{
	   blank_buf();
	   break;
	}
     case 1:
	{
	   load_val = (opt.quality / 2);
	   draw_flame();
	   break;
	}
     case 2:
	{
	   draw_radar();
	   break;
	}
     case 3:
	{
	   draw_aa_radar();
	   break;
	}
     case 4:
	{
	   draw_aa_triangle();
	   break;
	}
     case 5:
	{
	   draw_aa_star();
	   break;
	}
     case 6:
	{
	   draw_starfield();
	   break;
	}
     case 7:
	{
	   draw_aa_starfield();
	   break;
	}
     case 8:
	{
	   draw_rotator();
	   break;
	}
     case 9:
	{
	   draw_scanner();
	   break;
	}
     case 10:
	{
	   draw_colorwarp();
	   break;
	}
     case 11:
	{
	   draw_ball();
	   break;
	}
     case 12:
	{
	   draw_atoms();
	   break;
	}
     case 13:
	{
	   draw_text();
	   break;
	}
     case 14:
	{
	   draw_sine();
	   break;
	}
     case 15:
	{
	   draw_funky_rotator();
	   break;
	}
     default:
	{
	   blank_buf();
	   break;
	}
     }
   Epplet_paste_buf(rgbbuf, eppwin, 0, 0);
   Epplet_timer(cloak_draw, NULL, opt.draw_interval, "DRAW_TIMER");
}

static void
cloak_epplet(void *data __UNUSED__)
{
   if (!cloaked)
     {
	Epplet_gadget_hide(btn_close);
	Epplet_gadget_hide(btn_conf);
	Epplet_gadget_hide(btn_help);
	Epplet_gadget_hide(btn_save);
	Epplet_gadget_hide(btn_ctimer);
	Epplet_gadget_hide(btn_stimer);
	Epplet_gadget_show(da);
	cloak_draw(NULL);
	cloaked = 1;
     }
}

static void
cb_cloak_anim(void *data)
{
   cb_in(NULL, 0);
   opt.do_cloak = 1;
   opt.cloak_anim = *((int *)data);
   if (opt.cloak_anim == 16)
     {
	opt.rand_cloak = 1;
	choose_random_cloak(NULL);
     }
   else
     {
	if (opt.rand_cloak)
	  {
	     Epplet_remove_timer("RAND_TIMER");
	  }
	opt.rand_cloak = 0;
     }
   Epplet_timer(cloak_epplet, NULL, opt.cloak_delay, "CLOAK_TIMER");
}

static void
cb_cloak_delay(void *data)
{
   Epplet_remove_timer("CLOAK_TIMER");
   opt.cloak_delay = *(int *)data;
   Epplet_timer(cloak_epplet, NULL, opt.cloak_delay, "CLOAK_TIMER");
}

static void
cb_save_delay(void *data)
{
   opt.delay = *(int *)data;
}

static void
cb_dont_cloak(void *data __UNUSED__)
{
   opt.do_cloak = 0;
   if (cloaked)
     {
	Epplet_gadget_hide(da);
	cloaked = 0;
	Epplet_gadget_show(btn_close);
	Epplet_gadget_show(btn_conf);
	Epplet_gadget_show(btn_help);
	Epplet_gadget_show(btn_save);
	Epplet_gadget_show(btn_ctimer);
	Epplet_gadget_show(btn_stimer);
     }
   Epplet_remove_timer("CLOAK_TIMER");
}

static void
cb_in(void *data __UNUSED__, Window w)
{
   if (w == Epplet_get_main_window())
     {
	if (cloaked)
	  {
	     Epplet_gadget_hide(da);
	     cloaked = 0;
	     Epplet_gadget_show(btn_close);
	     Epplet_gadget_show(btn_conf);
	     Epplet_gadget_show(btn_help);
	     Epplet_gadget_show(btn_save);
	     Epplet_gadget_show(btn_ctimer);
	     Epplet_gadget_show(btn_stimer);
	  }
	Epplet_remove_timer("CLOAK_TIMER");
	Epplet_remove_timer("DRAW_TIMER");
     }
}

static void
cb_out(void *data __UNUSED__, Window w)
{
   if (w == Epplet_get_main_window())
     {
	Epplet_remove_timer("CLOAK_TIMER");
	if ((!cloaked) && (opt.do_cloak))
	   Epplet_timer(cloak_epplet, NULL, opt.cloak_delay, "CLOAK_TIMER");
     }
}

static int
delete_cb(void *data __UNUSED__, Window win __UNUSED__)
{
   confwin = 0;

   /* Yes, please destroy the window for me... */
   return 1;
}

static void
apply_config(void)
{
   if (opt.lock_cmd)
      free(opt.lock_cmd);
   opt.lock_cmd = _Strdup(Epplet_textbox_contents(txt));
}

static void
ok_cb(void *data __UNUSED__)
{
   apply_config();
   save_config();
   Epplet_window_destroy(confwin);
   confwin = 0;
}

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

static void
cancel_cb(void *data __UNUSED__)
{
   Epplet_window_destroy(confwin);
   confwin = 0;
   load_config();
}

static void
cb_config(void *data __UNUSED__)
{
   Epplet_gadget       lbl1, lbl2, lbl3, lbl4, lbl5, btn_anim;

   if (confwin)
      return;

   /* Save any cahnges made though the main window, so we can revert using
    * the cancel button */
   save_config();

   confwin =
      Epplet_create_window_config(400, 300, "E-ScreenSave Config", ok_cb,
				  &confwin, apply_cb, &confwin, cancel_cb,
				  &confwin);

   Epplet_gadget_show(lbl1 =
		      Epplet_create_label(40, 20,
					  "Please choose a cloak animation",
					  2));
   Epplet_gadget_show(btn_anim =
		      Epplet_create_popupbutton(NULL,
						NULL, 20,
						20, 12, 12, "ARROW_DOWN", p));
   Epplet_gadget_show(lbl2 =
		      Epplet_create_label(20, 45,
					  "Screensaver lock command:", 2));
   Epplet_gadget_show(txt =
		      Epplet_create_textbox(NULL, opt.lock_cmd, 20, 65, 250,
					    20, 2, NULL, NULL));
   Epplet_gadget_show(lbl3 =
		      Epplet_create_label(20, 90,
					  "The defaul is to use xscreensaver-command -lock",
					  2));
   Epplet_gadget_show(lbl4 =
		      Epplet_create_label(20, 110,
					  "However, you may prefer something else, such as",
					  2));
   Epplet_gadget_show(lbl5 = Epplet_create_label(20, 130, "xlock.", 2));

   Epplet_window_show(confwin);

   Epplet_window_pop_context();
}

/* Amongst all the fluff, this is the bit that does the actual work. */
static void
cb_shoot(void *data __UNUSED__)
{
   if (opt.lock_cmd)
      system(opt.lock_cmd);
}

static void
cb_color(void *data)
{
   int                *d;

   d = (int *)data;
   flame_col(d[0], d[1], d[2], d[3], d[4], d[5], d[6], d[7], d[8]);
   Epplet_gadget_hide(col_p);
}

static void
create_epplet_layout(void)
{
   Epplet_gadget_show(btn_close =
		      Epplet_create_button(NULL, NULL, 2,
					   2, 0, 0,
					   "CLOSE", 0, NULL, cb_close, NULL));
   Epplet_gadget_show(btn_help =
		      Epplet_create_button(NULL, NULL,
					   18, 2, 0, 0,
					   "HELP", 0, NULL, cb_help, NULL));
   Epplet_gadget_show(btn_save =
		      Epplet_create_button("Lock", NULL,
					   2, 31, 44, 13,
					   0, 0, NULL, cb_shoot, NULL));
   p = Epplet_create_popup();
   Epplet_add_popup_entry(p, "Don't Cloak", NULL, cb_dont_cloak, NULL);
   Epplet_add_popup_entry(p, "Blank Epplet", NULL,
			  cb_cloak_anim, (void *)(&(cloak_anims[0])));
   Epplet_add_popup_entry(p, "RasterFire", NULL,
			  cb_cloak_anim, (void *)(&(cloak_anims[1])));
   Epplet_add_popup_entry(p, "Radar", NULL, cb_cloak_anim,
			  (void *)(&(cloak_anims[2])));
   Epplet_add_popup_entry(p, "AA Radar", NULL,
			  cb_cloak_anim, (void *)(&(cloak_anims[3])));
   Epplet_add_popup_entry(p, "AA Triangle", NULL,
			  cb_cloak_anim, (void *)(&(cloak_anims[4])));
   Epplet_add_popup_entry(p, "AA Star", NULL,
			  cb_cloak_anim, (void *)(&(cloak_anims[5])));
   Epplet_add_popup_entry(p, "Starfield", NULL,
			  cb_cloak_anim, (void *)(&(cloak_anims[6])));
   Epplet_add_popup_entry(p, "AA Starfield", NULL,
			  cb_cloak_anim, (void *)(&(cloak_anims[7])));
   Epplet_add_popup_entry(p, "Mesh", NULL, cb_cloak_anim,
			  (void *)(&(cloak_anims[8])));
   Epplet_add_popup_entry(p, "Funky Mesh", NULL,
			  cb_cloak_anim, (void *)(&(cloak_anims[15])));
   Epplet_add_popup_entry(p, "Scanner", NULL,
			  cb_cloak_anim, (void *)(&(cloak_anims[9])));
   Epplet_add_popup_entry(p, "ColorShift", NULL,
			  cb_cloak_anim, (void *)(&(cloak_anims[10])));
   Epplet_add_popup_entry(p, "Bouncy Ball", NULL,
			  cb_cloak_anim, (void *)(&(cloak_anims[11])));
   Epplet_add_popup_entry(p, "Atoms", NULL, cb_cloak_anim,
			  (void *)(&(cloak_anims[12])));
   Epplet_add_popup_entry(p, "Banner", NULL,
			  cb_cloak_anim, (void *)(&(cloak_anims[13])));
   Epplet_add_popup_entry(p, "SineWave", NULL,
			  cb_cloak_anim, (void *)(&(cloak_anims[14])));
   Epplet_add_popup_entry(p, "Random", NULL,
			  cb_cloak_anim, (void *)(&(cloak_anims[16])));
   col_p = Epplet_create_popup();
   Epplet_add_popup_entry(col_p, "Flame Colors", NULL, NULL, NULL);
   Epplet_add_popup_entry(col_p, "Funky", NULL, cb_color,
			  (void *)(&(colors[0 * 9])));
   Epplet_add_popup_entry(col_p, "Turquoise", NULL,
			  cb_color, (void *)(&(colors[1 * 9])));
   Epplet_add_popup_entry(col_p, "Fire", NULL, cb_color,
			  (void *)(&(colors[2 * 9])));
   Epplet_add_popup_entry(col_p, "Copper", NULL, cb_color,
			  (void *)(&(colors[3 * 9])));
   Epplet_add_popup_entry(col_p, "Violet", NULL, cb_color,
			  (void *)(&(colors[4 * 9])));
   Epplet_add_popup_entry(col_p, "Night", NULL, cb_color,
			  (void *)(&(colors[5 * 9])));
   Epplet_add_popup_entry(col_p, "Sunrise", NULL,
			  cb_color, (void *)(&(colors[6 * 9])));
   Epplet_add_popup_entry(col_p, "Sunset", NULL, cb_color,
			  (void *)(&(colors[7 * 9])));
   ctimer_p = Epplet_create_popup();
   Epplet_add_popup_entry(ctimer_p, "Cloak Delay", NULL, NULL, NULL);
   Epplet_add_popup_entry(ctimer_p, "1 Sec", NULL,
			  cb_cloak_delay, (void *)(&(cloak_delays[0])));
   Epplet_add_popup_entry(ctimer_p, "2 Sec", NULL,
			  cb_cloak_delay, (void *)(&(cloak_delays[1])));
   Epplet_add_popup_entry(ctimer_p, "3 Sec", NULL,
			  cb_cloak_delay, (void *)(&(cloak_delays[2])));
   Epplet_add_popup_entry(ctimer_p, "4 Sec", NULL,
			  cb_cloak_delay, (void *)(&(cloak_delays[3])));
   Epplet_add_popup_entry(ctimer_p, "5 Sec", NULL,
			  cb_cloak_delay, (void *)(&(cloak_delays[4])));
   Epplet_add_popup_entry(ctimer_p, "10 Sec", NULL,
			  cb_cloak_delay, (void *)(&(cloak_delays[5])));
   Epplet_add_popup_entry(ctimer_p, "15 Sec", NULL,
			  cb_cloak_delay, (void *)(&(cloak_delays[6])));
   Epplet_add_popup_entry(ctimer_p, "20 Sec", NULL,
			  cb_cloak_delay, (void *)(&(cloak_delays[7])));
   Epplet_add_popup_entry(ctimer_p, "30 Sec", NULL,
			  cb_cloak_delay, (void *)(&(cloak_delays[8])));
   Epplet_add_popup_entry(ctimer_p, "1 min", NULL,
			  cb_cloak_delay, (void *)(&(cloak_delays[9])));
   Epplet_add_popup_entry(ctimer_p, "2 mins", NULL,
			  cb_cloak_delay, (void *)(&(cloak_delays[10])));
   stimer_p = Epplet_create_popup();
   Epplet_add_popup_entry(stimer_p, "Save Delay", NULL, NULL, NULL);
   Epplet_add_popup_entry(stimer_p, "No Delay", NULL,
			  cb_save_delay, (void *)(&(save_delays[0])));
   Epplet_add_popup_entry(stimer_p, "5 Sec", NULL,
			  cb_save_delay, (void *)(&(save_delays[5])));
   Epplet_add_popup_entry(stimer_p, "10 Sec", NULL,
			  cb_save_delay, (void *)(&(save_delays[6])));
   Epplet_add_popup_entry(stimer_p, "15 Sec", NULL,
			  cb_save_delay, (void *)(&(save_delays[7])));
   Epplet_add_popup_entry(stimer_p, "20 Sec", NULL,
			  cb_save_delay, (void *)(&(save_delays[8])));
   Epplet_add_popup_entry(stimer_p, "30 Sec", NULL,
			  cb_save_delay, (void *)(&(save_delays[9])));
   Epplet_add_popup_entry(stimer_p, "1 min", NULL,
			  cb_save_delay, (void *)(&(save_delays[10])));
   Epplet_add_popup_entry(stimer_p, "2 mins", NULL,
			  cb_save_delay, (void *)(&(save_delays[11])));
   Epplet_add_popup_entry(stimer_p, "5 mins", NULL,
			  cb_save_delay, (void *)(&(save_delays[12])));
   Epplet_add_popup_entry(stimer_p, "10 mins", NULL,
			  cb_save_delay, (void *)(&(save_delays[13])));
   Epplet_gadget_show(btn_conf =
		      Epplet_create_button(NULL,
					   NULL, 34,
					   2, 12, 12, "CONFIGURE", 0, NULL,
					   cb_config, NULL));
   Epplet_gadget_show(btn_col =
		      Epplet_create_popupbutton(NULL,
						"../E-ScreenShoot/E-ScreenShoot_col.png",
						2, 17, 13, 13, NULL, col_p));
   Epplet_gadget_show(btn_ctimer =
		      Epplet_create_popupbutton(NULL,
						"../E-ScreenShoot/E-ScreenShoot_minitime.png",
						17, 17, 13, 13, NULL,
						ctimer_p));
   Epplet_gadget_show(btn_stimer =
		      Epplet_create_popupbutton(NULL,
						"../E-ScreenShoot/E-ScreenShoot_minitime2.png",
						33, 17, 13, 13, NULL,
						stimer_p));
   da = Epplet_create_drawingarea(2, 2, 44, 44);
   eppwin = Epplet_get_drawingarea_window(da);
   rgbbuf = Epplet_make_rgb_buf(40, 40);
   cloaked = 0;
   set_flame_col(0);
   if (opt.do_cloak)
      Epplet_timer(cloak_epplet, NULL, opt.cloak_delay, "CLOAK_TIMER");
   Epplet_register_mouse_enter_handler(cb_in, (void *)eppwin);
   Epplet_register_mouse_leave_handler(cb_out, NULL);
   Epplet_register_delete_event_handler(delete_cb, NULL);
}

static void
clean_exit(void)
{
   save_config();
   Epplet_cleanup();
}

int
main(int argc, char **argv)
{
   Epplet_adjust_priority(10);

   atexit(clean_exit);
   /* Initialise random numbers */
   srand(time(0));
   Epplet_Init("E-ScreenSave", "0.7",
	       "Enlightenment Screen Savin' Epplet", 3, 3, argc, argv, 0);
   Epplet_load_config();
   load_config();
   create_epplet_layout();
   Epplet_show();
   Epplet_Loop();
   return 0;
}