--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/src/feature.c	Sat Dec 06 04:37:03 1997 +0000
@@ -0,0 +1,228 @@
+/*--------------------------------------------------------------------------
+NETREK II -- Paradise
+
+Permission to use, copy, modify, and distribute this software and its
+documentation, or any derivative works thereof, for any NON-COMMERCIAL
+purpose and without fee is hereby granted, provided that this copyright
+notice appear in all copies.  No representations are made about the
+suitability of this software for any purpose.  This software is provided
+"as is" without express or implied warranty.
+
+    Xtrek Copyright 1986                            Chris Guthrie
+    Netrek (Xtrek II) Copyright 1989                Kevin P. Smith
+                                                    Scott Silvey
+    Paradise II (Netrek II) Copyright 1993          Larry Denys
+                                                    Kurt Olsen
+                                                    Brandon Gillespie
+--------------------------------------------------------------------------*/
+
+#include "config.h"
+#ifdef FEATURE
+#ifdef HPUX
+#include <sys/types.h>
+#include <netinet/in.h>
+#endif
+#include "defs.h"
+#include "data.h"
+#include "struct.h"
+#include "packets.h"
+
+void sendClientPacket();
+
+#ifdef UNIXWARE			/* can you BELIEVE it doesn't have strcmpi?? */
+#if 0				/* just  use strcmp for now */
+int 
+strcmpi(char *a, char *b)
+{
+
+  char ta, tb;
+
+  while ((*a) && (*b))
+  {
+    ta = ((*a) >= 'a') && ((*b) <= 'z')) ? (*a) & 223 : (*a);
+    tb = ((*b) >= 'a') && ((*b) <= 'z')) ? (*b) & 223 : (*b);
+    if (ta < tb)
+      return (-1);
+    if (ta > tb)
+      return (1);
+    a++;
+    b++;
+  }
+  if (!(*a) && (*b))
+    return (1);
+  if (!(*b) && (*a))
+    return (-1);
+  return (0);
+}
+#endif
+#endif
+
+/*
+ * Feature.c
+ * 
+ * March, 1994.    Joe Rumsey, Tedd Hadley
+ * 
+ * most of the functions needed to handle SP_FEATURE/CP_FEATURE packets.  fill
+ * in the features list below for your client, and add a call to
+ * reportFeatures just before the RSA response is sent. handleFeature should
+ * just call checkFeature, which will search the list and set the appropriate
+ * variable.  features unknown to the server are set to the desired value for
+ * client features, and off for server/client features.
+ * 
+ * feature packets look like: struct feature_cpacket { char
+ * type; char                 feature_type; char                 arg1, arg2;
+ * int                  value; char                 name[80]; };
+ * 
+ * type is CP_FEATURE, which is 60.  feature_spacket is identical.
+ * 
+ * Code lifted July 1995 by Bob Glamm - enabled into server code.
+ * 
+ */
+
+void handleFeature(struct feature_cpacket *);
+void 
+sendFeature(char *name, int feature_type,
+	    int value, int arg1, int arg2);
+
+/* not the actual packets: this holds a list of features to report for */
+/* this client. */
+struct feature
+{
+  char *name;
+  int *var;			/* holds allowed/enabled status */
+  char feature_type;		/* 'S' or 'C' for server/client */
+  int value;			/* desired status */
+  char *arg1, *arg2;		/* where to copy args, if non-null */
+}   features[] =
+{
+  /*
+   * also sent seperately, put here for checking later. should be ok that
+   * it's sent twice.
+   */
+  {
+    "FEATURE_PACKETS", &F_feature_packets, 'S', 1, 0, 0
+  },
+
+  {
+    "VIEW_BOX", &F_allowViewBox, 'C', 1, 0, 0
+  },
+  {
+    "SHOW_ALL_TRACTORS", &F_allowShowAllTractorPressor, 'S', 1, 0, 0
+  },
+#ifdef CONTINUOUS_MOUSE
+  {
+    "CONTINUOUS_MOUSE", &F_allowContinuousMouse, 'C', 1, 0, 0
+  },
+#endif
+  {
+    "NEWMACRO", &F_UseNewMacro, 'C', 1, 0, 0
+  },
+  /* {"SMARTMACRO",&F_UseSmartMacro, 'C', 1, 0, 0}, */
+  {
+    "MULTIMACROS", &F_multiline_enabled, 'S', 1, 0, 0
+  },
+  {
+    "WHY_DEAD", &F_why_dead, 'S', 1, 0, 0
+  },
+  {
+    "CLOAK_MAXWARP", &F_cloakerMaxWarp, 'S', 1, 0, 0
+  },
+  /* {"DEAD_WARP", &F_dead_warp, 'S', 1, 0, 0}, */
+#ifdef RC_DISTRESS
+  {
+    "RC_DISTRESS", &F_gen_distress, 'S', 1, 0, 0
+  },
+#ifdef BEEPLITE
+  {
+    "BEEPLITE", &F_allow_beeplite, 'C', 1, (char *) &F_beeplite_flags, 0
+  },
+#endif
+#endif
+  /* terrain features */
+  {
+    "TERRAIN", &F_terrain, 'S', 1, (char *) &F_terrain_major, (char *) &F_terrain_minor
+  },
+  /* Gzipped MOTD */
+  {
+    "GZ_MOTD", &F_gz_motd, 'S', 1, (char *) &F_gz_motd_major, (char *) &F_gz_motd_minor
+  },
+  {
+    0, 0, 0, 0, 0, 0
+  }
+};
+
+void 
+handleFeature(packet)
+  struct feature_cpacket *packet;
+{
+  int feature = 0;
+  int value = ntohl(packet->value);
+
+#ifdef FEATURE_DIAG
+  pmessage("Whoohoo!  Getting a feature packet.", 0, MALL, MSERVA);
+#endif
+  while (features[feature].name)
+  {
+    if (!strcmp(features[feature].name, packet->name))
+    {
+#ifdef FEATURE_DIAG
+      {
+	char buf[80];
+	sprintf(buf, "BEANS!  Matched feature %s", packet->name);
+	pmessage(buf, 0, MALL, MSERVA);
+      }
+#endif
+      /* A match was found. */
+      if (features[feature].var)
+	*features[feature].var = packet->value;
+      if (features[feature].arg1)
+	*features[feature].arg1 = packet->arg1;
+      if (features[feature].arg2)
+	*features[feature].arg2 = packet->arg2;
+
+      /*
+       * tell the client that the server handles all of the above server
+       * features.
+       */
+      if (features[feature].feature_type == 'S')
+      {
+#ifdef FEATURE_DIAG
+	pmessage("Sending FEATURE_PACKETS right back at ya!", 0, MALL, MSERVA);
+#endif
+	sendFeature(features[feature].name,
+		    features[feature].feature_type,
+		    features[feature].value,
+		    (features[feature].arg1 ? *features[feature].arg1 : 0),
+		    (features[feature].arg2 ? *features[feature].arg2 : 0));
+      }
+    }
+    feature++;
+  }
+}
+
+void
+sendFeature(name, feature_type, value, arg1, arg2)
+  char *name;
+  int feature_type;
+  int value;
+  int arg1, arg2;
+{
+  struct feature_cpacket packet;
+#ifdef FEATURE_DIAG
+  char buf[80];
+
+  sprintf(buf, "Sending packet %d, name %s", SP_FEATURE, name);
+  pmessage(buf, 0, MALL, MSERVA);
+#endif
+
+  strncpy(packet.name, name, sizeof(packet.name));
+  packet.type = SP_FEATURE;
+  packet.name[sizeof(packet.name) - 1] = 0;
+  packet.feature_type = feature_type;
+  packet.value = htonl(value);
+  packet.arg1 = arg1;
+  packet.arg2 = arg2;
+  sendClientPacket((struct player_spacket *) & packet);
+}
+
+#endif				/* FEATURE */