--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/src/timecheck.c	Sat Dec 06 04:37:05 1997 +0000
@@ -0,0 +1,177 @@
+/*--------------------------------------------------------------------------
+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"
+
+#include <stdio.h>
+#include <string.h>
+#include <time.h>
+
+#include "path.h"
+#include "config.h"
+
+
+
+/*--------------------------------DESCRIPTION-------------------------------
+  This module contains the code to see if players are allowed to play
+depending on the time of day.  This is done with a matrix that contains
+an element for each hour in each day of the week.  If the element is zero,
+access is not allow.  If it is not, then access is allowed.  The time_access
+function is called to check the time and look up the time in the access
+matrix.
+  Before the time_access function is called, the load_time_access function
+needs to be called.  This function loads the access matrix from a file.
+The format of the file is:
+udfgaergfhggdfhg		--These are three garbage lines
+sdjkhgfsadhghsdghdgh		--They are ignored
+fjishgfsdhgdfhjghdahgdtu
+SUN 0 0 0 0 1 1 1 ...		--name of day followed by 24 0's or 1's
+MON 0 1 1 1 1 ...		-- 0 = closed  1 = open
+  The time_access function checks the time access matrix to see if access
+should be allowed.  The function makes a provision for overriding the
+access matrix.  If the file OVERRIDE exists, then access is automaticly
+allowed.  If the file DENY exists then access is disallowed.  If they both
+exists then access is allowed.
+---------------------------------------------------------------------------*/
+
+
+
+
+
+
+
+/*-------------------------------NUMBER DEFINES----------------------------*/
+#define HOURS	 "etc/conf.hours"
+#define OVERRIDE "etc/ALLOW"
+#define DENY     "etc/DENY"
+/*------------------------------------------------------------------------*/
+
+
+
+
+
+
+
+/*-------------------------------MODULE VARIABLES--------------------------*/
+
+/*
+ * The access matrix that is looked up to see if the server is open. 0 =
+ * closed  1 = open
+ */
+int timematrix[7][24];
+
+/*-------------------------------------------------------------------------*/
+
+
+
+
+
+
+/*------------------------------VISIBLE FUNCTIONS--------------------------*/
+
+/*---------------------------------LOAD_TIME_ACCESS------------------------*/
+/*
+ * This function loads the time access matrix from the time access file. If
+ * the file cannot be opened, a warning is printed out and the access matrix
+ * is filled with 1's, allowing access at all times.
+ */
+
+
+extern int fclose();
+#ifndef IRIX
+extern int fscanf();
+extern int fprintf();
+#endif
+extern time_t time();
+
+void
+load_time_access()
+{
+  FILE *f;			/* to open time access file with */
+  char *filename;		/* to hold full path plus filename */
+  int i, j;			/* looping vars */
+
+  filename = build_path(HOURS);
+
+  if ((f = fopen(filename, "r")) != NULL)
+  {				/* file opened correctly? */
+    fgets(filename, 256, f);	/* get rid of first three lines */
+    fgets(filename, 256, f);
+    fgets(filename, 256, f);
+    for (i = 0; i < 7; i++)
+    {				/* go through each day */
+      fscanf(f, "%s", filename);/* get day name */
+      for (j = 0; j < 24; j++)	/* go through each hour */
+	fscanf(f, "%d", &(timematrix[i][j]));	/* get access for that hour */
+    }
+    fclose(f);			/* clsoe time access file */
+  }
+  else
+  {				/* else no timecheck file */
+    fprintf(stderr, "Warning, no .hours file found.");
+    fprintf(stderr, "  Allowing access at all hours, all days.\n");
+    for (i = 0; i < 7; i++)	/* go through all days */
+      for (j = 0; j < 24; j++)	/* go through all hours */
+	timematrix[i][j] = 1;	/* set access okay at this day,hour */
+  }
+}
+
+
+
+
+/*---------------------------------TIME_ACCESS-----------------------------*/
+/*
+ * This function checks to see if the server is open.  It returns a 1 if the
+ * server is open at the current time of day and day of the week.  It returns
+ * a 0 otherwise.
+ */
+
+int
+time_access()
+{
+  struct tm *tm;		/* points to structure containing local time */
+  time_t secs;			/* to get number of seconds */
+  FILE *fd;			/* to open override file with */
+  char *filename;		/* to hold full path and filename */
+
+  filename = build_path(OVERRIDE);
+  if ((fd = fopen(filename, "r")) != NULL)
+  {				/* if override open file */
+    fclose(fd);			/* exists then */
+    return 1;			/* return server is open */
+  }
+  filename = build_path(DENY);
+  if ((fd = fopen(filename, "r")) != NULL)
+  {				/* if override close file */
+    fclose(fd);			/* exists then */
+    return 0;			/* return server is closed */
+  }
+  time(&secs);			/* get calendar time */
+  tm = localtime(&secs);	/* convert it to local time */
+  return (timematrix[tm->tm_wday][tm->tm_hour]);	/* check time access
+							 * matrix */
+}
+
+/*------------------------------------------------------------------------*/
+
+
+
+
+
+/*--------END OF FILE----------*/