/* E-ScreenSave.c
 *
 * Copyright (C) 1999 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 <stdlib.h>
#include <sys/resource.h>


#include "epplet.h"
#include "utils.h"
#include "cloak.h"
#include "E-ScreenSave.h"

Window confwin = 0;

static void
choose_random_cloak (void *data)
{
  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");
  return;
  data = NULL;
}

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)
{
  save_config ();
  Esync ();
  Epplet_unremember ();
  exit (0);
  data = NULL;
}

static void
cb_help (void *data)
{
  Epplet_show_about ("E-ScreenSave");
  return;
  data = NULL;
}

static void
cloak_draw (void *data)
{
  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 (buf, win, 0, 0);
  Epplet_timer (cloak_draw, NULL, opt.draw_interval, "DRAW_TIMER");
  return;
  data = NULL;
}

static void
cloak_epplet (void *data)
{
  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;
    }
  return;
  data = NULL;
}

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");
  return;
  data = NULL;
}

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");
  return;
  data = NULL;
}

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

static void
cb_dont_cloak (void *data)
{
  opt.do_cloak = 0;
  Epplet_remove_timer ("CLOAK_TIMER");
  return;
  data = NULL;
}

static void
cb_in (void *data, 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");
    }
  return;
  data = NULL;
  w = (Window) 0;
}

static void
cb_out (void *data, 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");
    }
  return;
  data = NULL;
  w = (Window) 0;
}

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

  /* Yes, please destroy the window for me... */
  return 1;
  win = (Window) 0;
  data = NULL;
}

static void
ok_cb (void *data)
{
  printf ("Ok pressed\n");
  Epplet_window_destroy (confwin);
  confwin = 0;

  return;
  data = NULL;
}

static void
apply_cb (void *data)
{
  printf ("Apply pressed\n");

  return;
  data = NULL;
}

static void
cancel_cb (void *data)
{
  printf ("Cancel pressed\n");
  Epplet_window_destroy (confwin);
  confwin = 0;

  return;
  data = NULL;
}

/* Amongst all the fluff, this is the bit that does the actual work. */
static void
cb_shoot (void *data)
{

  static int temp = 20;
  static int temp2 = 50;
  static int temp3 = 80;
  Epplet_gadget sld, sld2, sld3, lbl, lbl2;

  if (confwin)
    return;

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

  Epplet_gadget_show (lbl =
		      Epplet_create_label (20, 10,
					   "This window was created using Epplet_create_window_config.",
					   2));
  Epplet_gadget_show (lbl2 =
		      Epplet_create_label (20, 25,
					   "I added this text and the sliders myself.",
					   2));

  Epplet_gadget_show (sld =
		      Epplet_create_hslider (20, 50, 100, 0, 100, 1, 5, &temp,
					     NULL, NULL));
  Epplet_gadget_show (sld2 =
		      Epplet_create_hslider (20, 100, 200, 0, 100, 1, 5,
					     &temp2, NULL, NULL));
  Epplet_gadget_show (sld3 =
		      Epplet_create_hslider (20, 150, 300, 0, 100, 1, 5,
					     &temp3, NULL, NULL));

  Epplet_window_show (confwin);

  Epplet_window_pop_context ();

#if 0
  if (opt.lock_cmd)
    system (opt.lock_cmd);
#endif

  return;
  data = NULL;
}

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_popupbutton (NULL,
						 NULL, 34,
						 2, 12, 12, "CONFIGURE", p));
  Epplet_gadget_show (btn_col =
		      Epplet_create_popupbutton (NULL,
						 EROOT
						 "/epplet_data/E-ScreenShoot/E-ScreenShoot_col.png",
						 2, 17, 13, 13, NULL, col_p));
  Epplet_gadget_show (btn_ctimer =
		      Epplet_create_popupbutton (NULL,
						 EROOT
						 "/epplet_data/E-ScreenShoot/E-ScreenShoot_minitime.png",
						 17, 17,
						 13, 13, NULL, ctimer_p));
  Epplet_gadget_show (btn_stimer =
		      Epplet_create_popupbutton (NULL,
						 EROOT
						 "/epplet_data/E-ScreenShoot/E-ScreenShoot_minitime2.png",
						 33, 17,
						 13, 13, NULL, stimer_p));
  da = Epplet_create_drawingarea (2, 2, 44, 44);
  win = Epplet_get_drawingarea_window (da);
  buf = 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 *) win);
  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)
{
  int prio;
  prio = getpriority (PRIO_PROCESS, getpid ());
  setpriority (PRIO_PROCESS, getpid (), prio + 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;
}