X-Git-Url: https://git.artsoft.org/?a=blobdiff_plain;f=src%2Fmisc.c;h=e2c8d7e0bafbf52a8c11ebd91d38c67678fb5b72;hb=8cef2a63b6c56ba086183693d3f73f02862cbd8f;hp=c4c0352db9007474e321a03a14b7d68cb8ce1709;hpb=29014045f4de045f8452fdf7ab32622c94b37eef;p=rocksndiamonds.git

diff --git a/src/misc.c b/src/misc.c
index c4c0352d..e2c8d7e0 100644
--- a/src/misc.c
+++ b/src/misc.c
@@ -84,7 +84,8 @@ void Delay(unsigned long delay)	/* Sleep specified number of milliseconds */
   sleep_milliseconds(delay);
 }
 
-BOOL FrameReached(unsigned long *frame_counter_var, unsigned long frame_delay)
+boolean FrameReached(unsigned long *frame_counter_var,
+		     unsigned long frame_delay)
 {
   unsigned long actual_frame_counter = FrameCounter;
 
@@ -96,7 +97,8 @@ BOOL FrameReached(unsigned long *frame_counter_var, unsigned long frame_delay)
   return(TRUE);
 }
 
-BOOL DelayReached(unsigned long *counter_var, unsigned long delay)
+boolean DelayReached(unsigned long *counter_var,
+		     unsigned long delay)
 {
   unsigned long actual_counter = Counter();
 
@@ -189,58 +191,284 @@ void MarkTileDirty(int x, int y)
   }
 }
 
-void Error(BOOL fatal_error, char *format_str, ...)
+void GetOptions(char *argv[])
 {
-  FILE *output_stream = stderr;
-  va_list ap;
-  char *format_ptr;
-  char *s_value;
-  int i_value;
-  double d_value;
-
-  va_start(ap, format_str);	/* ap points to first unnamed argument */
+  char **options_left = &argv[1];
 
-  fprintf(output_stream, "%s: ", program_name);
+  /* initialize global program options */
+  options.display_name = NULL;
+  options.server_host = NULL;
+  options.server_port = 0;
+  options.serveronly = FALSE;
+  options.network = FALSE;
+  options.verbose = FALSE;
 
-  for(format_ptr=format_str; *format_ptr; format_ptr++)
+  while (*options_left)
   {
-    if (*format_ptr != '%')
+    char option_str[MAX_OPTION_LEN];
+    char *option = options_left[0];
+    char *next_option = options_left[1];
+    char *option_arg = NULL;
+    int option_len = strlen(option);
+
+    strcpy(option_str, option);			/* copy argument into buffer */
+    option = option_str;
+
+    if (strcmp(option, "--") == 0)		/* stop scanning arguments */
+      break;
+
+    if (option_len >= MAX_OPTION_LEN)
+      Error(ERR_EXIT_HELP, "unrecognized option '%s'", option);
+
+    if (strncmp(option, "--", 2) == 0)		/* treat '--' like '-' */
+      option++;
+
+    option_arg = strchr(option, '=');
+    if (option_arg == NULL)			/* no '=' in option */
+      option_arg = next_option;
+    else
+    {
+      *option_arg++ = '\0';			/* cut argument from option */
+      if (*option_arg == '\0')			/* no argument after '=' */
+	Error(ERR_EXIT_HELP, "option '%s' has invalid argument", option_str);
+    }
+
+    option_len = strlen(option);
+
+    if (strcmp(option, "-") == 0)
+      Error(ERR_EXIT_HELP, "unrecognized option '%s'", option);
+    else if (strncmp(option, "-help", option_len) == 0)
+    {
+      printf("Usage: %s [options] [server.name [port]]\n"
+	     "Options:\n"
+	     "  -d, --display machine:0       X server display\n"
+	     "  -l, --levels directory        alternative level directory\n"
+	     "  -s, --serveronly              only start network server\n"
+	     "  -n, --network                 network multiplayer game\n"
+	     "  -v, --verbose                 verbose mode\n",
+	     program_name);
+      exit(0);
+    }
+    else if (strncmp(option, "-display", option_len) == 0)
+    {
+      if (option_arg == NULL)
+	Error(ERR_EXIT_HELP, "option '%s' requires an argument", option_str);
+
+      options.display_name = option_arg;
+      if (option_arg == next_option)
+	options_left++;
+
+      printf("--display == '%s'\n", options.display_name);
+    }
+    else if (strncmp(option, "-levels", option_len) == 0)
+    {
+      if (option_arg == NULL)
+	Error(ERR_EXIT_HELP, "option '%s' requires an argument", option_str);
+
+      level_directory = option_arg;
+      if (option_arg == next_option)
+	options_left++;
+
+      printf("--levels == '%s'\n", level_directory);
+    }
+    else if (strncmp(option, "-network", option_len) == 0)
+    {
+      printf("--network\n");
+
+      options.network = TRUE;
+    }
+    else if (strncmp(option, "-serveronly", option_len) == 0)
+    {
+      printf("--serveronly\n");
+
+      options.serveronly = TRUE;
+    }
+    else if (strncmp(option, "-verbose", option_len) == 0)
+    {
+      printf("--verbose\n");
+
+      options.verbose = TRUE;
+    }
+    else if (*option == '-')
+      Error(ERR_EXIT_HELP, "unrecognized option '%s'", option_str);
+    else if (options.server_host == NULL)
     {
-      fprintf(output_stream, "%c", *format_ptr);
-      continue;
+      options.server_host = *options_left;
+
+      printf("server.name == '%s'\n", options.server_host);
+    }
+    else if (options.server_port == 0)
+    {
+      options.server_port = atoi(*options_left);
+      if (options.server_port < 1024)
+	Error(ERR_EXIT_HELP, "bad port number '%d'", options.server_port);
+
+      printf("port == %d\n", options.server_port);
     }
+    else
+      Error(ERR_EXIT_HELP, "too many arguments");
+
+    options_left++;
+  }
+}
+
+void Error(int mode, char *format_str, ...)
+{
+  FILE *output_stream = stderr;
+  char *process_name = "";
+
+  if (mode == ERR_EXIT_SOUNDSERVER)
+    process_name = " sound server";
+
+  if (format_str)
+  {
+    va_list ap;
+    char *format_ptr;
+    char *s_value;
+    int i_value;
+    double d_value;
+
+    fprintf(output_stream, "%s%s: ", program_name, process_name);
 
-    switch(*++format_ptr)
+    va_start(ap, format_str);	/* ap points to first unnamed argument */
+  
+    for(format_ptr=format_str; *format_ptr; format_ptr++)
     {
-      case 'd':
-	i_value = va_arg(ap, int);
-	fprintf(output_stream, "%d", i_value);
-	break;
-
-      case 'f':
-	d_value = va_arg(ap, double);
-	fprintf(output_stream, "%f", d_value);
-	break;
-
-      case 's':
-	s_value = va_arg(ap, char *);
-	fprintf(output_stream, "%s", s_value);
-	break;
-
-      default:
-	fprintf(stderr, "\nfatal(): invalid format string: %s\n", format_str);
-	exit(-1);
+      if (*format_ptr != '%')
+      {
+  	fprintf(output_stream, "%c", *format_ptr);
+  	continue;
+      }
+  
+      switch(*++format_ptr)
+      {
+  	case 'd':
+  	  i_value = va_arg(ap, int);
+  	  fprintf(output_stream, "%d", i_value);
+  	  break;
+  
+  	case 'f':
+  	  d_value = va_arg(ap, double);
+  	  fprintf(output_stream, "%f", d_value);
+  	  break;
+  
+  	case 's':
+  	  s_value = va_arg(ap, char *);
+  	  fprintf(output_stream, "%s", s_value);
+  	  break;
+  
+  	default:
+  	  fprintf(stderr, "\n%s: Error(): invalid format string: %s\n",
+		  program_name, format_str);
+	  CloseAllAndExit(10);
+      }
     }
+
+    va_end(ap);
+  
+    fprintf(output_stream, "\n");
   }
+  
+  if (mode == ERR_EXIT_HELP)
+    fprintf(output_stream, "%s: Try option '--help' for more information.\n",
+	    program_name);
+
+  if (mode != ERR_RETURN)
+  {
+    fprintf(output_stream, "%s%s: aborting\n", program_name, process_name);
+    CloseAllAndExit(1);
+  }
+}
+
+void *checked_malloc(unsigned long size)
+{
+  void *ptr;
 
-  va_end(ap);
+  ptr = malloc(size);
 
-  fprintf(output_stream, "\n");
+  if (ptr == NULL)
+    Error(ERR_EXIT, "cannot allocate %d bytes -- out of memory", size);
 
-  if (fatal_error)
+  return ptr;
+}
+
+char *getKeySymName(KeySym key)
+{
+  static char key_name[20];
+  static struct
+  {
+    KeySym keysym;
+    char *name;
+  } translate[] =
+  {
+    { XK_Left,		"cursor left" },
+    { XK_Right,		"cursor right" },
+    { XK_Up,		"cursor up" },
+    { XK_Down,		"cursor down" },
+
+#ifdef XK_KP_Left
+    { XK_KP_Left,	"keypad left" },
+    { XK_KP_Right,	"keypad right" },
+    { XK_KP_Up,		"keypad up" },
+    { XK_KP_Down,	"keypad down" },
+#endif
+
+    { XK_BackSpace,	"backspace" },
+    { XK_Delete,	"delete" },
+    { XK_Insert,	"insert" },
+    { XK_Tab,		"tab" },
+    { XK_Home,		"home" },
+    { XK_End,		"end" },
+    { XK_Page_Up,	"page up" },
+    { XK_Page_Down,	"page down" },
+    { XK_space,		"space" },
+
+    { XK_Shift_L,	"left shift" },
+    { XK_Shift_R,	"right shift" },
+    { XK_Control_L,	"left ctrl" },
+    { XK_Control_R,	"right ctrl" },
+    { XK_Meta_L,	"left meta" },
+    { XK_Meta_R,	"right meta" },
+    { XK_Alt_L,		"left alt" },
+    { XK_Alt_R,		"right alt" },
+    { XK_Mode_switch,	"mode switch" },
+    { XK_Multi_key,	"multi key" },
+
+    { 0,                NULL }
+  };
+
+  if (key >= XK_A && key <= XK_Z)
+  {
+    sprintf(key_name, "%c", 'A' + (char)(key - XK_A));
+    return key_name;
+  }
+  else if (key >= XK_a && key <= XK_z)
+  {
+    sprintf(key_name, "%c", 'a' + (char)(key - XK_a));
+    return key_name;
+  }
+  else if (key >= XK_0 && key <= XK_9)
   {
-    fprintf(output_stream, "%s: aborting\n", program_name);
-    CloseAll();
-    exit(1);
+    sprintf(key_name, "%c", '0' + (char)(key - XK_0));
+    return key_name;
+  }
+  else if (key >= XK_KP_0 && key <= XK_KP_9)
+  {
+    sprintf(key_name, "keypad %c", '0' + (char)(key - XK_KP_0));
+    return key_name;
+  }
+  else
+  {
+    int i = 0;
+
+    do
+    {
+      if (key == translate[i].keysym)
+	return translate[i].name;
+    }
+    while (translate[++i].name);
+
+    sprintf(key_name, "(unknown)");
+    return key_name;
   }
 }