BSD 4_4 release

[unix-history] / usr / src / games / dm / dm.c

diff --git a/usr/src/games/dm/dm.c b/usr/src/games/dm/dm.c
index c3c7ee2..b268a5c 100644 (file)
--- a/usr/src/games/dm/dm.c
+++ b/usr/src/games/dm/dm.c
@@ -1,248 +1,255 @@
 /*
 /*

- * Copyright (c) 1987 Regents of the University of California.
- * All rights reserved.  The Berkeley software License Agreement
- * specifies the terms and conditions for redistribution.
+ * Copyright (c) 1987, 1993
+ *     The Regents of the University of California.  All rights reserved.
+ *
+ * Redistribution and use in source and binary forms, with or without
+ * modification, are permitted provided that the following conditions
+ * are met:
+ * 1. Redistributions of source code must retain the above copyright
+ *    notice, this list of conditions and the following disclaimer.
+ * 2. Redistributions in binary form must reproduce the above copyright
+ *    notice, this list of conditions and the following disclaimer in the
+ *    documentation and/or other materials provided with the distribution.
+ * 3. All advertising materials mentioning features or use of this software
+ *    must display the following acknowledgement:
+ *     This product includes software developed by the University of
+ *     California, Berkeley and its contributors.
+ * 4. Neither the name of the University nor the names of its contributors
+ *    may be used to endorse or promote products derived from this software
+ *    without specific prior written permission.
+ *
+ * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
+ * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
+ * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
+ * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
+ * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
+ * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
+ * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
+ * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
+ * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
+ * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
+ * SUCH DAMAGE.

  */
 
 #ifndef lint
  */
 
 #ifndef lint

-char copyright[] =
-"@(#) Copyright (c) 1987 Regents of the University of California.\n\
- All rights reserved.\n";
-#endif not lint
+static char copyright[] =
+"@(#) Copyright (c) 1987, 1993\n\
+       The Regents of the University of California.  All rights reserved.\n";
+#endif /* not lint */

 
 #ifndef lint
 
 #ifndef lint

-static char sccsid[] = "@(#)dm.c       5.3 (Berkeley) %G%";
-#endif not lint
+static char sccsid[] = "@(#)dm.c       8.1 (Berkeley) 5/31/93";
+#endif /* not lint */

 
 #include <sys/param.h>
 #include <sys/file.h>
 #include <sys/time.h>
 #include <sys/resource.h>
 
 #include <sys/param.h>
 #include <sys/file.h>
 #include <sys/time.h>
 #include <sys/resource.h>

-#include <pwd.h>
-#include <utmp.h>
+
+#include <ctype.h>

 #include <nlist.h>
 #include <nlist.h>

+#include <pwd.h>

 #include <stdio.h>
 #include <stdio.h>

-#include <ctype.h>
+#include <string.h>
+#include <time.h>
+#include <unistd.h>
+#include <utmp.h>

 
 

-#define        GAMEHIDE        "/usr/games/hide"
-#define        NOGAMING        "/usr/games/nogames"
-#define        CONTROL         "/usr/games/dm.config"
-#ifdef LOG
-#define        LOGFILE         "/usr/adm/dm.log"
-#endif
+#include "pathnames.h"

 
 

-static FILE    *cfp;
+extern int errno;

 static time_t  now;                    /* current time value */
 static int     priority = 0;           /* priority game runs at */
 static char    *game,                  /* requested game */
                *gametty;               /* from tty? */
 
 static time_t  now;                    /* current time value */
 static int     priority = 0;           /* priority game runs at */
 static char    *game,                  /* requested game */
                *gametty;               /* from tty? */
 

+int

 main(argc, argv)
 main(argc, argv)

-       int     argc;
-       char    **argv;
+       int argc;
+       char *argv[];

 {
 {

-       char    *C, *rindex();
-       double  load();
+       char *cp;

 
        nogamefile();
 
        nogamefile();

+       game = (cp = rindex(*argv, '/')) ? ++cp : *argv;

 
 

-       if (!strcmp(*argv, "dm"))
+       if (!strcmp(game, "dm"))

                exit(0);
 
                exit(0);
 

-       if (!(cfp = fopen(CONTROL, "r"))) {
-               fprintf(stderr, "dm: unable to read %s.\n", CONTROL);
-               exit(1);
-       }
-
-       read_days();
-       read_ttys();
-
-       game = (C = rindex(*argv, '/')) ? ++C : *argv;
-       read_games();
-
+       gametty = ttyname(0);
+       (void)time(&now);
+       read_config();

 #ifdef LOG
        logfile();
 #endif
        play(argv);
 #ifdef LOG
        logfile();
 #endif
        play(argv);

-/*NOTREACHED*/
+       /*NOTREACHED*/

 }
 
 /*
  * play --
  *     play the game
  */
 }
 
 /*
  * play --
  *     play the game
  */

-static

 play(args)
 play(args)

-       char    **args;
+       char **args;

 {
 {

-       if (chdir(GAMEHIDE)) {
-               perror("dm: chdir");
-               exit(1);
-       }
-       if (priority > 0 && setpriority(PRIO_PROCESS, 0, priority) < 0)
-               fputs("dm: unable to set priority!\n", stderr);
+       char pbuf[MAXPATHLEN];
+
+       (void)strcpy(pbuf, _PATH_HIDE);
+       (void)strcpy(pbuf + sizeof(_PATH_HIDE) - 1, game);
+       if (priority > 0)       /* < 0 requires root */
+               (void)setpriority(PRIO_PROCESS, 0, priority);

        setgid(getgid());       /* we run setgid kmem; lose it */
        setgid(getgid());       /* we run setgid kmem; lose it */

-       execv(game, args);
-       perror("dm");
+       execv(pbuf, args);
+       (void)fprintf(stderr, "dm: %s: %s\n", pbuf, strerror(errno));

        exit(1);
 }
 
        exit(1);
 }
 

-#define        lcontrol(buf)   (buf[0] == '%' && buf[1] == '%')
-#define        lignore(buf)    (buf[0] == '\n' || buf[0] == '#')

 /*
 /*

- * read_days --
- *     read through days listed in the control file, decide
- *     if current time is an okay play time.
+ * read_config --
+ *     read through config file, looking for key words.
+ */
+read_config()
+{
+       FILE *cfp;
+       char lbuf[BUFSIZ], f1[40], f2[40], f3[40], f4[40], f5[40];
+
+       if (!(cfp = fopen(_PATH_CONFIG, "r")))
+               return;
+       while (fgets(lbuf, sizeof(lbuf), cfp))
+               switch(*lbuf) {
+               case 'b':               /* badtty */
+                       if (sscanf(lbuf, "%s%s", f1, f2) != 2 ||
+                           strcasecmp(f1, "badtty"))
+                               break;
+                       c_tty(f2);
+                       break;
+               case 'g':               /* game */
+                       if (sscanf(lbuf, "%s%s%s%s%s",
+                           f1, f2, f3, f4, f5) != 5 || strcasecmp(f1, "game"))
+                               break;
+                       c_game(f2, f3, f4, f5);
+                       break;
+               case 't':               /* time */
+                       if (sscanf(lbuf, "%s%s%s%s", f1, f2, f3, f4) != 4 ||
+                           strcasecmp(f1, "time"))
+                               break;
+                       c_day(f2, f3, f4);
+               }
+       (void)fclose(cfp);
+}
+
+/*
+ * c_day --
+ *     if day is today, see if okay to play

  */
  */

-static
-read_days()
+c_day(s_day, s_start, s_stop)
+       char *s_day, *s_start, *s_stop;

 {
 {

-       static char     *days[] = {
+       static char *days[] = {

                "sunday", "monday", "tuesday", "wednesday",
                "thursday", "friday", "saturday",
        };
                "sunday", "monday", "tuesday", "wednesday",
                "thursday", "friday", "saturday",
        };

-       struct tm       *ct;
-       register char   *dp;
-       int     start, stop;
-       char    lbuf[BUFSIZ], f1[40], f2[40], f3[40];
-       time_t  time();
+       static struct tm *ct;
+       int start, stop;

 
 

-       (void)time(&now);
-       ct = localtime(&now);
-       dp = days[ct->tm_wday];
-
-       while (fgets(lbuf, sizeof(lbuf), cfp)) {
-               if (lignore(lbuf))
-                       continue;
-               if (lcontrol(lbuf))
-                       return;
-               if (sscanf(lbuf, "%s%s%s", f1, f2, f3) != 3)
-                       continue;
-               if (!strcasecmp(dp, f1)) {
-                       if (!isdigit(*f2) || !isdigit(*f3))
-                               continue;
-                       start = atoi(f2);
-                       stop = atoi(f3);
-                       if (ct->tm_hour >= start && ct->tm_hour <= stop) {
-                               fputs("dm: Sorry, games are not available from ", stderr);
-                               hour(start);
-                               fputs(" to ", stderr);
-                               hour(stop);
-                               fputs(" today.\n", stderr);
-                               exit(0);
-                       }
-                       continue;
-               }
+       if (!ct)
+               ct = localtime(&now);
+       if (strcasecmp(s_day, days[ct->tm_wday]))
+               return;
+       if (!isdigit(*s_start) || !isdigit(*s_stop))
+               return;
+       start = atoi(s_start);
+       stop = atoi(s_stop);
+       if (ct->tm_hour >= start && ct->tm_hour < stop) {
+               fputs("dm: Sorry, games are not available from ", stderr);
+               hour(start);
+               fputs(" to ", stderr);
+               hour(stop);
+               fputs(" today.\n", stderr);
+               exit(0);

        }
 }
 
 /*
        }
 }
 
 /*

- * read_ttys --
- *     read through ttys listed in the control file, decide if this
- *     tty can be used for games.
+ * c_tty --
+ *     decide if this tty can be used for games.

  */
  */

-static
-read_ttys()
+c_tty(tty)
+       char *tty;

 {
 {

-       register char   *p_tty;
-       char    lbuf[BUFSIZ], f1[40], f2[40],
-               *ttyname(), *rindex();
+       static int first = 1;
+       static char *p_tty;

 
 

-       gametty = ttyname(0);
-       if (p_tty = rindex(gametty, '/'))
-               ++p_tty;
-       while (fgets(lbuf, sizeof(lbuf), cfp)) {
-               if (lignore(lbuf))
-                       continue;
-               if (lcontrol(lbuf))
-                       return;
-               if (sscanf(lbuf, "%s%s", f1, f2) != 2)
-                       continue;
-               if (strcasecmp("badtty", f1))
-                       continue;
-               if (!strcmp(gametty, f2) || p_tty && !strcmp(p_tty, f2)) {
-                       fprintf(stderr, "dm: Sorry, you may not play games on %s.\n", gametty);
-                       exit(0);
-               }
+       if (first) {
+               p_tty = rindex(gametty, '/');
+               first = 0;
+       }
+
+       if (!strcmp(gametty, tty) || p_tty && !strcmp(p_tty, tty)) {
+               fprintf(stderr, "dm: Sorry, you may not play games on %s.\n", gametty);
+               exit(0);

        }
 }
 
 /*
        }
 }
 
 /*

- * read_games --
- *     read through games listed in the control file, decide if this
- *     game can be played now.
+ * c_game --
+ *     see if game can be played now.

  */
  */

-static
-read_games()
+c_game(s_game, s_load, s_users, s_priority)
+       char *s_game, *s_load, *s_users, *s_priority;

 {
 {

-       char    lbuf[BUFSIZ], f1[40], f2[40], f3[40], f4[40];
+       static int found;
+       double load();

 
 

-       while (fgets(lbuf, sizeof(lbuf), cfp)) {
-               if (lignore(lbuf))
-                       continue;
-               if (lcontrol(lbuf))
-                       return;
-               if (sscanf(lbuf, "%s%s%s%s", f1, f2, f3, f4) != 4)
-                       break;
-               if (!strcmp(game, f1) || !strcasecmp("default", f1)) {
-                       if (isdigit(*f2) && atoi(f2) < load()) {
-                               fputs("dm: Sorry, the load average is too high right now.\n", stderr);
-                               exit(0);
-                       }
-                       if (isdigit(*f3) && atoi(f3) <= users()) {
-                               fputs("dm: Sorry, there are too many users logged on right now.\n", stderr);
-                               exit(0);
-                       }
-                       if (isdigit(*f4))
-                               priority = atoi(f3);
-                       return;
-               }
+       if (found)
+               return;
+       if (strcmp(game, s_game) && strcasecmp("default", s_game))
+               return;
+       ++found;
+       if (isdigit(*s_load) && atoi(s_load) < load()) {
+               fputs("dm: Sorry, the load average is too high right now.\n", stderr);
+               exit(0);

        }
        }

+       if (isdigit(*s_users) && atoi(s_users) <= users()) {
+               fputs("dm: Sorry, there are too many users logged on right now.\n", stderr);
+               exit(0);
+       }
+       if (isdigit(*s_priority))
+               priority = atoi(s_priority);

 }
 
 }
 

-static struct  nlist nl[] = {
-       { "_avenrun" },
-#define        X_AVENRUN       0
-       { "" },
-};
-

 /*
  * load --
  *     return 15 minute load average
  */
 /*
  * load --
  *     return 15 minute load average
  */

-static double
+double

 load()
 {
 load()
 {

-       double  avenrun[3];
-       int     kmem;
-       long    lseek();
+       double avenrun[3];

 
 

-       if (nlist("/vmunix", nl)) {
-               fputs("dm: nlist of /vmunix failed.\n", stderr);
+       if (getloadavg(avenrun, sizeof(avenrun)/sizeof(avenrun[0])) < 0) {
+               fputs("dm: getloadavg() failed.\n", stderr);

                exit(1);
        }
                exit(1);
        }

-       if ((kmem = open("/dev/kmem", O_RDONLY, 0)) < 0) {
-               perror("dm: /dev/kmem");
-               exit(1);
-       }
-       (void)lseek(kmem, (long)nl[X_AVENRUN].n_value, L_SET);
-       (void)read(kmem, avenrun, sizeof(avenrun));

        return(avenrun[2]);
 }
 
 /*
  * users --
  *     return current number of users
        return(avenrun[2]);
 }
 
 /*
  * users --
  *     return current number of users

+ *     todo: check idle time; if idle more than X minutes, don't
+ *     count them.

  */
  */

-static

 users()
 {
 users()
 {

-       register int    nusers,
-                       utmp;
-       struct utmp     buf;
+       
+       register int nusers, utmp;
+       struct utmp buf;

 
 

-       if ((utmp = open("/etc/utmp", O_RDONLY, 0)) < 0) {
-               perror("dm: /etc/utmp");
+       if ((utmp = open(_PATH_UTMP, O_RDONLY, 0)) < 0) {
+               (void)fprintf(stderr, "dm: %s: %s\n",
+                   _PATH_UTMP, strerror(errno));

                exit(1);
        }
        for (nusers = 0; read(utmp, (char *)&buf, sizeof(struct utmp)) > 0;)
                exit(1);
        }
        for (nusers = 0; read(utmp, (char *)&buf, sizeof(struct utmp)) > 0;)


@@ -251,18 +258,12 @@ users()
        return(nusers);
 }
 
        return(nusers);
 }
 

-/*
- * nogamefile --
- *     if the file NOGAMING exists, no games allowed.
- *     file may also contain a message for the user.
- */
-static

 nogamefile()
 {
 nogamefile()
 {

-       register int    fd, n;
-       char    buf[BUFSIZ];
+       register int fd, n;
+       char buf[BUFSIZ];

 
 

-       if ((fd = open(NOGAMING, O_RDONLY, 0)) >= 0) {
+       if ((fd = open(_PATH_NOGAMES, O_RDONLY, 0)) >= 0) {

 #define        MESG    "Sorry, no games right now.\n\n"
                (void)write(2, MESG, sizeof(MESG) - 1);
                while ((n = read(fd, buf, sizeof(buf))) > 0)
 #define        MESG    "Sorry, no games right now.\n\n"
                (void)write(2, MESG, sizeof(MESG) - 1);
                while ((n = read(fd, buf, sizeof(buf))) > 0)


@@ -275,9 +276,8 @@ nogamefile()
  * hour --
  *     print out the hour in human form
  */
  * hour --
  *     print out the hour in human form
  */

-static

 hour(h)
 hour(h)

-       int     h;
+       int h;

 {
        switch(h) {
        case 0:
 {
        switch(h) {
        case 0:


@@ -295,16 +295,18 @@ hour(h)
 }
 
 #ifdef LOG
 }
 
 #ifdef LOG

-static
+/*
+ * logfile --
+ *     log play of game
+ */

 logfile()
 {
 logfile()
 {

-       struct passwd   *pw, *getpwuid();
-       FILE    *lp;
-       uid_t   uid;
-       int     lock_cnt;
-       char    *ctime();
+       struct passwd *pw;
+       FILE *lp;
+       uid_t uid;
+       int lock_cnt;

 
 

-       if (lp = fopen(LOGFILE, "a")) {
+       if (lp = fopen(_PATH_LOG, "a")) {

                for (lock_cnt = 0;; ++lock_cnt) {
                        if (!flock(fileno(lp), LOCK_EX))
                                break;
                for (lock_cnt = 0;; ++lock_cnt) {
                        if (!flock(fileno(lp), LOCK_EX))
                                break;


@@ -324,4 +326,4 @@ logfile()
                (void)flock(fileno(lp), LOCK_UN);
        }
 }
                (void)flock(fileno(lp), LOCK_UN);
        }
 }

-#endif
+#endif /* LOG */