#include "config.h"
#include "copyright.h"

#include <stdio.h>
#include <stdlib.h>
#include <ctype.h>

#include "Wlib.h"
#include "defs.h"
#include "struct.h"
#include "data.h"
#include "packets.h"
#include "playerlist.h"
#include "map.h"

#include "option.h"
#include "rotate.h"
#include "docwin.h"
#include "udpopt.h"
#include "netstatopt.h"
#include "pingstats.h"
#include "spopt.h"
#include "defwin.h"
#include "socket.h"

int     notdone;				 /* not done flag */

#ifdef ROTATERACE
static int old_rotate, old_rotate_deg;
#endif

static char newkeys[14];

#if (defined( DEBUG) || defined (BITMAP_DEBUG)) && defined(DYNAMIC_BITMAPS)
extern int OwnBitmapNum;
#endif

char   *localmes[] =
{"Show nothing on local planets",
 "Show owner on local planets",
 "Show resources on local planets",
 "Show MOO resources on local map",
 "Show rabbit ears on local map",
 ""};

char   *galacticmes[] =
{"Show nothing on galactic map",
 "Show owner on galactic map",
 "Show resources on galactic map",
 "Show MOO resources on galactic map",
 "Show rabbit ears on galactic map",
 ""};

#ifdef ROTATERACE
char   *rotatemess[] =
{"Don't rotate galaxy",
 "Rotate galaxy 90 degrees",
 "Rotate galaxy 180 degrees",
 "Rotate galaxy 270 degrees",
 ""
};

#endif

static char *lockoptions[] =
{"Don't show lock icon",
 "Show lock icon on galactic map only",
 "Show lock icon on tactical map only",
 "Show lock icon on both map windows", ""};

static char *plistoptions[] =
{"Custom player list",
 "Old Player List",
 "COW Player List",
 "Kill Watch Player List",
 "BRMH Player List",
 ""};


static char *dashboardoptions[] =
{"Text dashboard",
 "COW style dashboard",
 "KRP style dashboard",
 "LABs new dashboard",
 ""};

/* useful for options that are an int with a range */
struct int_range
  {
    int     min_value;				 /* value is >= this */
    int     max_value;				 /* value is <= this */
    int     increment;				 /* a click raises/lowers * * 
						  * this amount */
  };

static char *phaserdispmess[] =
{"Don't log phaser hits",
 "Log phasers on all window",
 "Log phasers on team window",
 "Log phasers on indiv window",
 "Log phasers on kill window",
 "Log phasers on review window", ""};

#ifdef PHASER_STATS
static char *phaserstatmess[] =
{"Don't show phaser statistics",
 "Show phaser statistics", ""};

#endif


/* Only one of op_option, op_targetwin, and op_string should be defined. If
 * op_string is defined, op_size should be too and op_text is used without a
 * "Don't" prefix. if op_range is defined, there should be a %d in op_text
 * for it, op_size will be non-useful, and the 'Don't ' prefix won't appear */
struct option
  {
    int     op_num;
    char   *op_text;				 /* text to display when on */
    int    *op_option;				 /* variable to test/modify * 
						  * 
						  * * (optional) */
    W_Window *op_targetwin;			 /* target window to * *
						  * map/unmap (optional) */
    char   *op_string;				 /* string to modify * *
						  * (optional) */
    int     op_size;				 /* size of *op_string * *
						  * (optional) */
    char  **op_array;				 /* array of strings to * *
						  * switch between */
    struct int_range *op_range;			 /* struct definint an * *
						  * integer range option */
  };

/* for the paged options menus */
struct option_menu
  {
    int     page_num;				 /* page number of this menu */
    struct option_menu *Next;
    struct option *menu;			 /* pointers to arrary of * * 
						  * options */
    int     numopt;				 /* number of options in this
						  * * * menu page */
    int     updated;				 /* 1 if options can be * *
						  * changed externally */
  };

/* pointer to first entry in the options menu list */
struct option_menu *FirstMenu = NULL;
struct option_menu *CurrentMenu = NULL;		 /* menu currently looked at */
int     MenuPage = 0;				 /* current menu page */
int     MaxOptions = 0;				 /* maximum number of options

						  * 
						  * * * in all menu pages */
struct int_range MenuPages =
{0, 1, 1};


/* updates: use of the int range thing... */
struct int_range client_ups_range =
{1, 50, 1};
struct int_range redraw_updates_range =
{0, 5, 1};

struct int_range phaserShrinkRng =
{0, 16, 1};

/* range of menus. Will be updated when menu list is assembled */
struct int_range Menus_Range =
{0, 1, 1};

#if (defined( DEBUG) || defined (BITMAP_DEBUG)) && defined(DYNAMIC_BITMAPS)
struct int_range bitmap_range =
{0, 50, 1};

#endif

struct int_range keepInfo_range =
{0, 100, 1};

struct int_range enPhasRng =
{0, 10, 1};


/* menus */

struct option Ship_Menu[] =
{
  {0, "Ship Menu", &MenuPage, 0, 0, 0, NULL, &Menus_Range},
  {1, "Page %d (click to change)", &MenuPage, 0, 0, 0, NULL, &Menus_Range},

  {1, "use ROMVLVS bitmap", &ROMVLVS, 0, 0, 0, NULL, NULL},

#ifdef TNG_FED_BITMAPS
  {1, "use fed TNG bitmaps", &use_tng_fed_bitmaps, 0, 0, 0, NULL, NULL},
#endif

#if (defined( DEBUG) || defined (BITMAP_DEBUG)) && defined(DYNAMIC_BITMAPS)
  {1, "Own bitmap number: %d", &OwnBitmapNum, 0, 0, 0, NULL, &bitmap_range},
#endif

#ifdef VSHIELD_BITMAPS
  {1, "vary shields bitmap", &VShieldBitmaps, 0, 0, 0, NULL, NULL},
#endif

  {1, "use warning shields", &warnShields, 0, 0, 0, NULL, NULL},

#ifdef VARY_HULL
  {1, "warn hull", &vary_hull, 0, 0, 0, NULL, NULL},
#endif

{1, "show tractor/pressor beams", &showTractorPressor, 0, 0, 0, NULL, NULL},
  {1, "show tractors after lock ", &continuetractor, 0, 0, 0, NULL, NULL},
  {1, "enemy phaser width: %d", &enemyPhasers, 0, 0, 0, NULL, &enPhasRng},
  {1, "shrink my phaser by %d/16", &phaserShrink, 0, 0, 0, NULL,
   &phaserShrinkRng},
  {1, "shrink their phasers by %d/16", &theirPhaserShrink, 0, 0, 0, NULL,
   &phaserShrinkRng},
  {1, "shrink phasers on a miss", &shrinkPhaserOnMiss, 0, 0, 0, NULL, NULL},
  {1, "done", &notdone, 0, 0, 0, NULL, NULL},
  {-1, NULL, 0, 0, 0, 0, NULL, NULL}
};


struct option Planet_Menu[] =
{
  {0, "Planet Menu", &MenuPage, 0, 0, 0, NULL, &Menus_Range},
  {1, "Page %d (click to change)", &MenuPage, 0, 0, 0, NULL, &Menus_Range},

  {1, "", &showlocal, 0, 0, 0, localmes, NULL},
  {1, "Show planet names on local", &namemode, 0, 0, 0, NULL, NULL},
  {1, "", &showgalactic, 0, 0, 0, galacticmes, NULL},
  {1, "Show owner on galactic", &showPlanetOwner, 0, 0, 0, NULL, NULL},

  {10, "show IND planets", &showIND, 0, 0, 0, NULL, NULL},
  {1, "", &showLock, 0, 0, 0, lockoptions, NULL},

#ifdef ROTATERACE
  {1, "", &rotate, 0, 0, 0, rotatemess, NULL},
#endif

  {1, "done", &notdone, 0, 0, 0, NULL, NULL},
  {-1, NULL, 0, 0, 0, 0, NULL, NULL}
};


struct option Control_Menu[] =
{
  {0, "Control Menu", &MenuPage, 0, 0, 0, NULL, &Menus_Range},
  {1, "Page %d (click to change)", &MenuPage, 0, 0, 0, NULL, &Menus_Range},

  {1, "stay peaceful when reborn", &keeppeace, 0, 0, 0, NULL, NULL},
  {1, "use new distress", &UseNewDistress, 0, 0, 0, NULL, NULL},
  {1, "new keymap entries: %s", 0, 0, newkeys, 13, NULL, NULL},
  {1, "ignore the capslock key", &ignoreCaps, 0, 0, 0, NULL, NULL},
  {1, "%d updates per second", &client_ups, 0, 0, 0, 0, &client_ups_range},
  {1, "%d 1/10 sec screen refresh delay", &redrawDelay, 0, 0, 0, 0,
   &redraw_updates_range},
  {1, "avoid message kludge", &niftyNewMessages, 0, 0, 0, NULL, NULL},

#ifdef TOOLS
  {1, "show shell tools window", 0, &toolsWin, 0, 0, NULL, NULL},
#endif

#ifdef SOUND
  {1, "show sound control window", 0, &soundWin, 0, 0, NULL, NULL},
#endif

  {1, "show UDP control window", 0, &udpWin, 0, 0, NULL, NULL},
  {1, "show ping stats window", 0, &pStats, 0, 0, NULL},
  {1, "show network statistic window", 0, &netstatWin, 0, 0, NULL, NULL},
  {1, "show LagMeter ", 0, &lMeter, 0, 0, NULL, NULL},

#ifdef SHORT_PACKETS
  {1, "show Short Packets window", 0, &spWin, 0, 0, NULL, NULL},
#endif

  {1, "done", &notdone, 0, 0, 0, NULL, NULL},
  {-1, NULL, 0, 0, 0, 0, NULL, NULL}
};


struct option Window_Menu[] =
{
  {0, "Info Menu", &MenuPage, 0, 0, 0, NULL, &Menus_Range},
  {1, "Page %d (click to change)", &MenuPage, 0, 0, 0, NULL, &Menus_Range},
  {1, "show \"all\" message window", 0, &messwa, 0, 0, NULL, NULL},
  {1, "show \"team\" message window", 0, &messwt, 0, 0, NULL, NULL},
  {1, "show \"your\" message window", 0, &messwi, 0, 0, NULL, NULL},
  {1, "show \"kill\" message window", 0, &messwk, 0, 0, NULL, NULL},
  {1, "show \"total\" message window", 0, &reviewWin, 0, 0, NULL, NULL},
  {1, "show phaser log window", &phaserWindow, &phaserwin, 0, 0, NULL},
  {1, "show statistic window", 0, &statwin, 0, 0, NULL, NULL},

  {1, "show help window", 0, &helpWin, 0, 0, NULL, NULL},

#ifdef XTREKRC_HELP
  {1, "show xtrekrc defaults window", 0, &defWin, 0, 0, NULL, NULL},
#endif

#ifdef DOC_WIN
  {1, "show xtrekrc", 0, &xtrekrcwin, 0, 0, NULL, NULL},
  {1, "show documentation window", 0, &docwin, 0, 0, NULL, NULL},
#endif


  {1, "done", &notdone, 0, 0, 0, NULL, NULL},
  {-1, NULL, 0, 0, 0, 0, NULL, NULL}
};


struct option Visual_Menu[] =
{
  {0, "Visuals Menu", &MenuPage, 0, 0, 0, NULL, &Menus_Range},
  {1, "Page %d (click to change)", &MenuPage, 0, 0, 0, NULL, &Menus_Range},
  {1, "", &plistStyle, 0, 0, 0, plistoptions, NULL},
  {1, "sort the playerlist", &sortPlayers, 0, 0, 0, NULL, 0},
  {1, "put my team first in the list", &sortMyTeamFirst, 0, 0, 0, NULL, 0},
  {1, "partition the playerlist", &partitionPlist, 0, 0, 0, NULL, 0},
  {1, "", &newDashboard, 0, 0, 0, dashboardoptions, NULL},
  {1, "keep info %d upds (0=don't remove)", &keepInfo, 0, 0, 0, 0,
   &keepInfo_range},

#ifdef BEEPLITE
  {1, "use RCD highlighting", &UseLite, 0, 0, 0, NULL, NULL},
#endif

#ifdef HOCKEY_LINES
  {1, "show hockey lines", &hockey_s_lines, 0, 0, 0, NULL, NULL},
#endif

  {1, "alert on extra border(s)", &extraBorder, 0, 0, 0, NULL, NULL},
  {1, "", &showPhaser, 0, 0, 0, phaserdispmess, NULL},

#ifdef PHASER_STATS
  {1, "", &phaserShowStats, 0, 0, 0, phaserstatmess, NULL},
#endif

  {1, "done", &notdone, 0, 0, 0, NULL, NULL},
  {-1, NULL, 0, 0, 0, 0, NULL, NULL}
};

struct option Pixmap_Menu[] =
{
  {0, "Pixmap Menu", &MenuPage, 0, 0, 0, NULL, &Menus_Range},
  {1, "Page %d (click to change)", &MenuPage, 0, 0, 0, NULL, &Menus_Range},
  {1, "Use IND pixmaps", &pixFlags, 0, 0, NO_IND_PIX, NULL, NULL},
  {1, "Use FED pixmaps", &pixFlags, 0, 0, NO_FED_PIX, NULL, NULL},
  {1, "Use ROM pixmaps", &pixFlags, 0, 0, NO_ROM_PIX, NULL, NULL},
  {1, "Use KLI pixmaps", &pixFlags, 0, 0, NO_KLI_PIX, NULL, NULL},
  {1, "Use ORI pixmaps", &pixFlags, 0, 0, NO_ORI_PIX, NULL, NULL},
  {1, "Use weapon pixmaps", &pixFlags, 0, 0, NO_WEP_PIX, NULL, NULL},
  {1, "Use explosion pixmaps", &pixFlags, 0, 0, NO_EXP_PIX, NULL, NULL},
  {1, "Use cloaking pixmaps", &pixFlags, 0, 0, NO_CLK_PIX, NULL, NULL},
  {1, "Use planet pixmaps on map", &pixFlags, 0, 0, NO_MAP_PIX, NULL, NULL},
  {1, "Use background images", &pixFlags, 0, 0, NO_BG_PIX, NULL, NULL},
  {1, "Halo by owner on galactic", &pixFlags, 0, 0, NO_HALOS, NULL, NULL},
  {1, "done", &notdone, 0, 0, 0, NULL, NULL},
  {-1, NULL, 0, 0, 0, 0, NULL, NULL}
};

#define NUMOPTIONS(menu) ((sizeof((menu))/sizeof((menu)[0]))-1)

/* option menu sizes and such */
#define OPTIONBORDER    2
#define OPTIONLEN       35

static void RefreshOptions(void);
static void OptionClear(int i);
static void optionrefresh(register struct option *op);
static int InitOptionMenus(void);
static void AddOptMenu(struct option *NewMenu, int updated);
static int NumOptions(struct option *OpMenu);

/* Set up the option menus and window. */
void optionwindow(void)
{
  /* Init not done flag */
  notdone = 1;

  *newkeys = '\0';
  if (FirstMenu == NULL)
    {
      MaxOptions = InitOptionMenus();
      if (MaxOptions < 0)
	{
	  fprintf(stderr, "InitOptionMenus() error %d!\n", MaxOptions);
	  notdone = 0;
	  return;
	}
    }

  /* Create window big enough to hold option windows */
  if (optionWin == NULL)
    {

      optionWin = W_MakeMenu("option", TWINSIDE + 10, -BORDER + 10, OPTIONLEN,
			     MaxOptions, baseWin, OPTIONBORDER);
      W_SetWindowKeyDownHandler(optionWin, optionaction);
      W_SetWindowButtonHandler(optionWin, optionaction);
      W_DefineArrowCursor(optionWin);
      CurrentMenu = FirstMenu;

      RefreshOptions();
    }

  /* Map window */
  W_MapWindow(optionWin);
}

/* refresh all current options */
static void RefreshOptions(void)
{
  int     i;
  struct option_menu *option;

  if (notdone == 0 || (option = CurrentMenu) == NULL)
    return;

  for (i = 0; i < option->numopt; i++)
    {
      optionrefresh(&(option->menu[i]));
    }
  if (option->numopt < MaxOptions)
    for (i = option->numopt; i < MaxOptions; i++)
      {
	OptionClear(i);
      }
}

/* blank out option line 'i' */
static void OptionClear(int i)
{
  char   *blanktext = "                                               ";

  if (optionWin && notdone)
    W_WriteText(optionWin, 0, i, textColor, blanktext, OPTIONLEN, 0);
}

/* Redraw the specified option entry */
void optionredrawtarget(W_Window win)
{
  register struct option *op;

  if (notdone == 0)
    return;

  for (op = CurrentMenu->menu; op->op_text; op++)
    {
      if (op->op_targetwin && win == *op->op_targetwin)
	{
	  optionrefresh(op);
	  break;
	}
    }
}

/* Redraw the specified option option */
void optionredrawoption(int *ip)
{
  register struct option *op;

  if (notdone == 0)
    return;

  for (op = CurrentMenu->menu; op->op_num >= 0; op++)
    {
      if (ip == op->op_option)
	{
	  optionrefresh(op);
	  break;
	}
    }
}

/* Refresh the option window given by the option struct */
static void optionrefresh(register struct option *op)
{
  register int on;
  char    buf[BUFSIZ];

  if (op == NULL || notdone == 0)
    return;

  if (op->op_string)
    {
      (void) sprintf(buf, op->op_text, op->op_string);
    }
  else if (op->op_array)
    {						 /* Array of strings */
      strcpy(buf, op->op_array[*op->op_option]);
    }
  else if (op->op_range)
    {
      (void) sprintf(buf, op->op_text, *(op->op_option));
    }
  else
    {
      /* Either a boolean or a window */
      if (op->op_option)

	if (op->op_size)			 /* Pixmap Bit Value */
	  on = !(*op->op_option & op->op_size);
	else
	  on = *op->op_option;			 /* use int for status */
      else if (op->op_targetwin)
	on = W_IsMapped(*op->op_targetwin);	 /* use window for status */
      else
	on = 1;					 /* shouldn't happen */

      if (!on)
	strcpy(buf, "Don't ");
      else
	buf[0] = '\0';
      strcat(buf, op->op_text);
    }

  if (islower(buf[0]))
    buf[0] = toupper(buf[0]);

  W_WriteText(optionWin, 0, op->op_num, textColor, buf, strlen(buf), 0);
}

/* deal with events sent to the option window */
void    optionaction(W_Event * data)
{
  register struct option *op;
  int     i;
  register char *cp;

  if (data->y >= CurrentMenu->numopt)
    {
      W_Beep();
      return;
    }
  if (notdone == 0)
    return;

  op = &(CurrentMenu->menu[data->y]);

  /* Update string; don't claim keystrokes for non-string options */
  /* deal with options with string input first */
  if (op->op_string == 0)
    {
      if (data->type == W_EV_KEY)
	return;
    }
  else
    {
      if (data->type == W_EV_BUTTON)
	return;
      switch (data->key)
	{

	case '\b':				 /* delete character */
	case '\177':
	  cp = op->op_string;
	  i = strlen(cp);
	  if (i > 0)
	    {
	      cp += i - 1;
	      *cp = '\0';
	    }
	  break;

	case '\027':				 /* word erase */
	  cp = op->op_string;
	  i = strlen(cp);
	  /* back up over blanks */
	  while (--i >= 0 && isspace(cp[i]))
	    ;
	  i++;
	  /* back up over non-blanks */
	  while (--i >= 0 && !isspace(cp[i]))
	    ;
	  i++;
	  cp[i] = '\0';
	  break;

	case '\025':				 /* kill line */
	case '\030':
	  op->op_string[0] = '\0';
	  break;

	default:				 /* add character to the list 
						  * 
						  */
	  if (data->key < 32 || data->key > 127)
	    break;
	  cp = op->op_string;
	  i = strlen(cp);
	  if (i < (op->op_size - 1) && !iscntrl(data->key))
	    {
	      cp += i;
	      cp[1] = '\0';
	      cp[0] = data->key;
	    }
	  else
	    W_Beep();
	  break;
	}
    }

  /* Toggle int, if it exists */
  if (op->op_array)
    {
      if (data->key == W_RBUTTON)
	{
	  (*op->op_option)++;
	  if (*(op->op_array)[*op->op_option] == '\0')
	    {
	      *op->op_option = 0;
	    }
	}
      else if (data->key == W_MBUTTON)
	{
	  /* set option number to zero on the middle key to ease shutoff */
	  *op->op_option = 0;
	}
      else if (data->key == W_LBUTTON)
	{
	  /* if left button, decrease option  */
	  (*op->op_option)--;
	  /* if decreased too far, set to top option */
	  if (*(op->op_option) < 0)
	    {
	      *op->op_option = 0;
	      while (*(op->op_array)[*op->op_option] != '\0')
		{
		  (*op->op_option)++;
		}
	      (*op->op_option)--;
	    }
	}


      /* Actions to be taken when certain options are selected. (Yes, this is
       * * * a hack). */

      if (op->op_option == &plistStyle)
	{
	  if (plistCustomLayout == 0 && plistStyle == 0)
	    plistStyle = (data->key == W_LBUTTON) ? PLISTLASTSTYLE : 1;

	  RedrawPlayerList();
	}
      else if (op->op_option == &showgalactic)
	{
	  redrawall = 1;
	}

#ifdef ROTATERACE
      else if (rotate != old_rotate)
	{
	  int i;
	  struct planet *l;
	  struct player *j;

	  redrawall = 1;
	  reinitPlanets = 1;

	  for (i = 0, l = planets; i < MAXPLANETS; i++, l++)
	    {
	      if (rotate)
		{
		  rotate_deg = -old_rotate_deg + rotate * 64;
		  rotate_coord(&l->pl_x, &l->pl_y, rotate_deg, GWIDTH / 2, GWIDTH / 2);
		  rotate_deg = rotate * 64;
		}
	      else
		{
		  rotate_deg = -old_rotate_deg;
		  rotate_coord(&l->pl_x, &l->pl_y, rotate_deg, GWIDTH / 2, GWIDTH / 2);
		  rotate_deg = 0;
		}
	    }

	  /* we could wait for the server to do this but looks better if we * 
	   * 
	   * * do it now. */
	  for (i = 0, j = players; i < MAXPLAYER; i++, j++)
	    {
	      if (j->p_status != PALIVE)
		continue;
	      if (rotate)
		{
		  rotate_deg = -old_rotate_deg + rotate * 64;
		  rotate_coord(&j->p_x, &j->p_y, rotate_deg,
			       GWIDTH / 2, GWIDTH / 2);
		  rotate_dir(&j->p_dir, rotate_deg);

		  rotate_deg = rotate * 64;
		}
	      else
		{
		  rotate_deg = -old_rotate_deg;
		  rotate_coord(&j->p_x, &j->p_y, rotate_deg,
			       GWIDTH / 2, GWIDTH / 2);
		  rotate_dir(&j->p_dir, rotate_deg);
		  rotate_deg = 0;
		}
	    }
	  /* phasers/torps/etc .. wait for server */

	  old_rotate = rotate;
	  old_rotate_deg = rotate_deg;
	}
#endif

    }


  /* Does the button have a range of values? */

  else if (op->op_range)
    {
      if (data->key == W_RBUTTON)
	{
	  (*op->op_option) += op->op_range->increment;
	}
      else if (data->key == W_MBUTTON)
	{
	  (*op->op_option) = op->op_range->min_value;
	}
      else if (data->key == W_LBUTTON)
	{
	  (*op->op_option) -= op->op_range->increment;
	}
      /* wrap value around within option range */
      if (*(op->op_option) > op->op_range->max_value)
	*(op->op_option) = op->op_range->min_value;
      if (*(op->op_option) < op->op_range->min_value)
	*(op->op_option) = op->op_range->max_value;
      if (op->op_option == &client_ups)
	{
	  switch (data->key) {
	  case W_LBUTTON:
	    switch (*op->op_option) {
	    case 9: *op->op_option = 5; break;
	    case 24: *op->op_option = 10; break;
	    case 49: *op->op_option = 25; break;
	    }
	    break;
	  case W_MBUTTON:
	    *op->op_option = 5;
	    break;
	  case W_RBUTTON:
	    switch (*op->op_option) {
	    case 6: *op->op_option = 10; break;
	    case 11: *op->op_option = 25; break;
	    case 26: *op->op_option = 50; break;
	    }
	    break;
	  }
	  if (client_ups != server_ups) {
	    sendUpdatePacket(1000000 / client_ups);
	  }
	}
    }


  /* Is the option a toggle? */

  /* Bitwise Toggle  */

  else if ((op->op_option) && (op->op_size))
    {
      if (!(pixMissing & op->op_size))
	{
	  *op->op_option ^= op->op_size;

	  if (op->op_size & (NO_MAP_PIX | NO_BG_PIX | NO_HALOS))
	    redrawall = 1;
	}
    }
  else if (op->op_option)
    {
      *op->op_option = !*op->op_option;

      /* Actions to be taken when certain options are selected. * (Yes, this
       * * is a hack). */

      if (op->op_option == &showPlanetOwner)
	redrawall = 1;
      else if (op->op_option == &partitionPlist)
	RedrawPlayerList();
      else if (op->op_option == &sortPlayers)
	RedrawPlayerList();
      else if (op->op_option == &sortMyTeamFirst)
	RedrawPlayerList();
    }

  /* Map/unmap window, if it exists */

  if (op->op_targetwin)
    {
      if (W_IsMapped(*op->op_targetwin))
	W_UnmapWindow(*op->op_targetwin);
      else
	{
	  W_MapWindow(*op->op_targetwin);

	  if (*op->op_targetwin == udpWin)
	    udpwindow();
	  if (*op->op_targetwin == pStats)
	    redrawPStats();
	  if (*op->op_targetwin == netstatWin)
	    nswindow();
	  if (*op->op_targetwin == spWin)
	    spwindow();

#ifdef XTREKRC_HELP
	  if (defWin && *op->op_targetwin == defWin)
	    showdef();
#endif

#ifdef SOUND
	  if (*op->op_targetwin == soundWin)
	    soundwindow();
#endif

#ifdef DOC_WIN
	  if (docwin && *op->op_targetwin == docwin)
	    showdocs(0);

	  if (xtrekrcwin && *op->op_targetwin == xtrekrcwin)
	    showxtrekrc(0);
#endif
	}
    }

  /* deal with possible menu change */
  if (MenuPage != CurrentMenu->page_num)
    {
      SetMenuPage(MenuPage);
      RefreshOptions();
    }
  else if (notdone)
    optionrefresh(op);
  else
    {
      optionrefresh(op);
      optiondone();
    }

  return;
}

/* find the menu in the menus linked list that matches the one in the *
 * argument */
void SetMenuPage(int pagenum)
{
  int     i = 1;

  if (FirstMenu != NULL)
    for (CurrentMenu = FirstMenu; CurrentMenu->Next != NULL &&
    CurrentMenu->page_num != pagenum; i++, CurrentMenu = CurrentMenu->Next);
}

void optiondone(void)
{
  char   *str;

  /* Unmap window */
  W_UnmapWindow(optionWin);

  /* update keymap */
  for (str = newkeys; *str != '\0'; str += 2)
    {
      if ((*str >= 32 && *str < 127) || *str == 'O')
	{
	  if (*(str + 1) == '\0')
	    break;
	  mystats->st_keymap[*str - 32] = *(str + 1);
	}
      if (*(str + 1) == '\0')
	break;
    }
  *newkeys = '\0';

  sendOptionsPacket(); /* update server as to the client's options */
}

/* set up menus linked list */
static int InitOptionMenus(void)
{
  int     i = 1;
  int     maxopts = 0;


  /* AddOptMenu( &OptionsMenu, 0); */
  AddOptMenu(Control_Menu, 0);
  AddOptMenu(Ship_Menu, 0);
  AddOptMenu(Planet_Menu, 0);
  AddOptMenu(Visual_Menu, 0);
  AddOptMenu(Window_Menu, 0);
  AddOptMenu(Pixmap_Menu, 0);

  for (i = 0, CurrentMenu = FirstMenu; CurrentMenu != NULL;
       i++, CurrentMenu = CurrentMenu->Next)
    {
      CurrentMenu->page_num = i;		 /* repage the menus.. */
      if (CurrentMenu->numopt > maxopts)
	maxopts = CurrentMenu->numopt;
    }
  CurrentMenu = FirstMenu;
  Menus_Range.max_value = i - 1;
  return maxopts;
}

static void AddOptMenu(struct option * NewMenu, int updated)
{
  struct option_menu *menuptr;
  struct option_menu *newmenu;
  int     i = 0;


  menuptr = FirstMenu;

  newmenu = (struct option_menu *) malloc(sizeof(struct option_menu));

  if (newmenu == NULL)
    {
      perror("Malloc Error adding a menu");
      return;
    }

  /* add to list */
  if (FirstMenu == NULL)
    {
      FirstMenu = newmenu;
    }
  else
    {
      for (i = 0, menuptr = FirstMenu; menuptr->Next != NULL; menuptr = menuptr->Next)
	i++;
      menuptr->Next = newmenu;
    }
  newmenu->page_num = i;
  newmenu->Next = NULL;
  newmenu->numopt = NumOptions(NewMenu);
  newmenu->menu = NewMenu;
  newmenu->updated = updated;
}

static int NumOptions(struct option *OpMenu)
{
  int     i = 0;
  struct option *ptr;

  for (ptr = OpMenu, i = 0; ptr->op_num != -1; i++, ++ptr)
    {
      ptr->op_num = i;
    }


  return i;
}

/* a function that could be called regularly, to deal with menus that * might
 * be updated by external events. I.e. the udp menu! */
void UpdateOptions(void)
{
  if (notdone == 0)
    return;					 /* don't update if menu * *
						  * isn't in use */
  if (CurrentMenu->updated)
    RefreshOptions();
}