]> git.pond.sub.org Git - empserver/blobdiff - src/lib/player/empdis.c
Update copyright notice
[empserver] / src / lib / player / empdis.c
index 223eca948584dd1fd78223ccf8ea886a7359a7ed..e61796ebb6130f29598df8058e601699a8328d94 100644 (file)
@@ -1,11 +1,11 @@
 /*
  *  Empire - A multi-player, client/server Internet based war game.
- *  Copyright (C) 1986-2004, Dave Pare, Jeff Bailey, Thomas Ruschak,
- *                           Ken Stevens, Steve McClure
+ *  Copyright (C) 1986-2013, Dave Pare, Jeff Bailey, Thomas Ruschak,
+ *                Ken Stevens, Steve McClure, Markus Armbruster
  *
- *  This program is free software; you can redistribute it and/or modify
+ *  Empire is free software: you can redistribute it and/or modify
  *  it under the terms of the GNU General Public License as published by
- *  the Free Software Foundation; either version 2 of the License, or
+ *  the Free Software Foundation, either version 3 of the License, or
  *  (at your option) any later version.
  *
  *  This program is distributed in the hope that it will be useful,
  *  GNU General Public License for more details.
  *
  *  You should have received a copy of the GNU General Public License
- *  along with this program; if not, write to the Free Software
- *  Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
+ *  along with this program.  If not, see <http://www.gnu.org/licenses/>.
  *
  *  ---
  *
- *  See the "LEGAL", "LICENSE", "CREDITS" and "README" files for all the
- *  related information and legal notices. It is expected that any future
- *  projects/authors will amend these files as needed.
+ *  See files README, COPYING and CREDITS in the root of the source
+ *  tree for related information and legal notices.  It is expected
+ *  that future projects/authors will amend these files as needed.
  *
  *  ---
  *
  *  empdis.c: Empire dispatcher stuff
- * 
+ *
  *  Known contributors to this file:
  *     Dave Pare, 1994
  *     Steve McClure, 2000
+ *     Markus Armbruster, 2006-2010
+ *     Ron Koenderink, 2004-2009
  */
 
-#include "prototypes.h"
+#include <config.h>
+
 #include <stdio.h>
-#include "misc.h"
-#include "player.h"
-#include "nat.h"
-#include "tel.h"
-#include "proto.h"
+#include <time.h>
 #include "com.h"
 #include "file.h"
-#include "empio.h"
-#include "subs.h"
-#include "common.h"
+#include "game.h"
+#include "match.h"
+#include "misc.h"
+#include "nat.h"
 #include "optlist.h"
+#include "player.h"
+#include "prototypes.h"
 
-#include <fcntl.h>
-#include <time.h>
-#if !defined(_WIN32)
-#include <unistd.h>
-#endif
-#include <signal.h>
 
 #define KEEP_COMMANDS 50
-s_char player_commands[KEEP_COMMANDS][1024 + 8];
-int player_commands_index = 0;
 
+/* ring buffer of most recent command prompts and commands, user text */
+static char player_commands[KEEP_COMMANDS][1024 + 8];
+
+/* the slot holding the most recent command in player_commands[] */
+static int player_commands_index = 0;
+
+static void disable_coms(void);
+
+/*
+ * Get a command from the current player into COMBUFP[1024], in UTF-8.
+ * This may block for input, yielding the processor.  Flush buffered
+ * output when blocking, to make sure player sees the prompt.
+ * Return command's byte length on success, -1 on error.
+ */
 int
-getcommand(s_char *combufp)
+getcommand(char *combufp)
 {
-    struct natstr *natp;
-    s_char buf[1024];
+    char buf[1024];            /* user text */
+
+    if (recvclient(buf, sizeof(buf)) < 0)
+       return -1;
 
-/* Note this now assumes a 1024 byte buffer is being passed in */
-    natp = getnatp(player->cnum);
-    if (++player_commands_index >= KEEP_COMMANDS)
-       player_commands_index = 0;
-    sprintf(player_commands[player_commands_index], "%3d %3d [prompt]",
-           player_commands_index, player->cnum);
-    do {
-       prprompt(natp->nat_minused, natp->nat_btu);
-       buf[0] = 0;
-       if (recvclient(buf, 1024) < 0) {
-           return -1;
-       }
-    } while (buf[0] == 0);
     if (++player_commands_index >= KEEP_COMMANDS)
        player_commands_index = 0;
     sprintf(player_commands[player_commands_index], "%3d %3d %s",
            player_commands_index, player->cnum, buf);
-    strcpy(combufp, buf);
-    return (strlen(combufp));
+
+    if (player->flags & PF_UTF8)
+       return copy_utf8_no_funny(combufp, buf);
+    return copy_ascii_no_funny(combufp, buf);
 }
 
 void
@@ -91,6 +89,8 @@ init_player_commands(void)
 
     for (i = 0; i < KEEP_COMMANDS; ++i)
        *player_commands[i] = 0;
+
+    disable_coms();
 }
 
 void
@@ -110,102 +110,146 @@ log_last_commands(void)
 int
 explain(void)
 {
-    register s_char *format;
-    register int i;
-
-    pr("\t\tCurrent EMPIRE Command List\n");
-    pr("\t\t------- ------ ------- ----\n");
-    pr("Initial number is cost in B.T.U. units.\n");
-    pr("Next 2 chars (if present) are:\n");
-    pr("$ - must be non-broke\tc -- must have capital\n");
-    pr("Args in [brackets] are optional.\n");
-    if (player->nstat > 4) {
-       pr("All-caps args in <angle brackets>");
-       pr(" have the following meanings:\n");
-       pr("  <NUM> :: a number in unspecified units\n");
-       pr("  <COMM> :: a commodity such as `food', `guns', etc\n");
-       pr("  <VAR> :: a commodity such as `food', `guns', etc\n");
-       pr("  <TYPE> :: an item type such as `ship', `plane', etc\n");
-    }
-    for (i = 0; (format = player_coms[i].c_form) != 0; i++) {
-       if ((player_coms[i].c_permit & player->ncomstat) ==
-           player_coms[i].c_permit) {
-           pr("%2d ", player_coms[i].c_cost);
-           if ((player_coms[i].c_permit & MONEY) == MONEY)
+    struct cmndstr *com;
+
+    pr("\t\tCurrent EMPIRE Command List\n"
+       "\t\t------- ------ ------- ----\n"
+       "Initial number is cost in B.T.U. units.\n"
+       "Next 2 chars (if present) are:\n"
+       "$ - must be non-broke\tc -- must have capital\n"
+       "Args in [brackets] are optional.\n"
+       "All-caps args in <angle brackets>"
+       " have the following meanings:\n"
+       /* FIXME incomplete */
+       "  <NUM> :: a number in unspecified units\n"
+       "  <COMM> :: a commodity such as `food', `guns', etc\n"
+       "  <TYPE> :: an item type such as `ship', `plane', etc\n");
+    for (com = player_coms; com->c_form; com++) {
+       if ((com->c_permit & player->nstat) == com->c_permit) {
+           pr("%2d ", com->c_cost);
+           if (com->c_permit & MONEY)
                pr("$");
            else
                pr(" ");
-           if ((player_coms[i].c_permit & CAP) == CAP)
+           if (com->c_permit & CAP)
                pr("c");
            else
                pr(" ");
-           pr(" %s\n", format);
+           pr(" %s\n", com->c_form);
        }
     }
     pr("For further info on command syntax see \"info Syntax\".\n");
     return RET_OK;
 }
 
-/*
- * returns true if down
- */
-int
-gamedown(void)
+static void
+disable_coms(void)
 {
-    int downf;
-    struct telstr tgm;
-    s_char buf[1024];
-
-    if (player->god)
-       return 0;
-    if ((downf = open(downfil, O_RDONLY, 0)) < 0)
-       return 0;
-    if (read(downf, (s_char *)&tgm, sizeof(tgm)) != sizeof(tgm)) {
-       logerror("bad header on login message (downfil)");
-       close(downf);
-       return 1;
-    }
-    if (read(downf, buf, tgm.tel_length) != tgm.tel_length) {
-       logerror("bad length %ld on login message", tgm.tel_length);
-       close(downf);
-       return 1;
+    char *tmp = strdup(disabled_commands);
+    char *name;
+    int cmd;
+
+    for (name = strtok(tmp, " \t"); name; name = strtok(NULL, " \t")) {
+       cmd = comtch(name, player_coms, -1);
+       if (cmd < 0) {
+           logerror("Warning: not disabling %s command %s\n",
+                    cmd == M_NOTUNIQUE ? "ambiguous" : "unknown", name);
+           continue;
+       }
+       player_coms[cmd].c_permit |= GOD;
     }
-    if (tgm.tel_length >= (long)sizeof(buf))
-       tgm.tel_length = sizeof(buf) - 1;
-    buf[tgm.tel_length] = 0;
-    prnf(buf);
-    pr("\nThe game is down\n");
-    (void)close(downf);
-    return 1;
+
+    free(tmp);
+}
+
+static int
+seconds_since_midnight(time_t time)
+{
+    struct tm *tm = localtime(&time);
+
+    tm->tm_hour = 0;
+    tm->tm_min = 0;
+    tm->tm_sec = 0;
+    tm->tm_isdst = -1;
+    return time - mktime(tm);
 }
 
 void
-daychange(time_t now)
+update_timeused_login(time_t now)
 {
-    struct natstr *natp;
-    struct tm *tm;
-
-    natp = getnatp(player->cnum);
-    tm = localtime(&now);
-    if ((tm->tm_yday % 128) != natp->nat_dayno) {
-       natp->nat_dayno = tm->tm_yday % 128;
-       natp->nat_minused = 0;
+    struct natstr *natp = getnatp(player->cnum);
+    time_t midnight_secs = seconds_since_midnight(now);
+
+    if (now - natp->nat_last_logout > midnight_secs) {
+       natp->nat_timeused = 0;
+       putnat(natp);
     }
+    player->lasttime = now;
+}
+
+void
+update_timeused(time_t now)
+{
+    struct natstr *natp = getnatp(player->cnum);
+    time_t midnight_secs = seconds_since_midnight(now);
+    time_t dt = now - player->lasttime;
+
+    if (dt > midnight_secs)
+       natp->nat_timeused = midnight_secs;
+    else
+       natp->nat_timeused += dt;
+    player->lasttime = now;
+    putnat(natp);
+}
+
+void
+enforce_minimum_session_time(void)
+{
+    struct natstr *natp = getnatp(player->cnum);
+
+    time_t dt = natp->nat_last_logout - natp->nat_last_login;
+    if (dt > seconds_since_midnight(natp->nat_last_logout))
+       dt = seconds_since_midnight(natp->nat_last_logout);
+    if (dt < 15)
+       natp->nat_timeused += 15 - dt;
+    putnat(natp);
 }
 
 int
-getminleft(time_t now, int mpd)
+may_play_now(struct natstr *natp, time_t now)
 {
-    struct tm *tm;
-    int nminleft;
-    struct natstr *natp;
-    int n;
-
-    tm = localtime(&now);
-    natp = getnatp(player->cnum);
-    nminleft = mpd - natp->nat_minused;
-    n = 60 * 24 - (tm->tm_min + tm->tm_hour * 60);
-    if (n < nminleft)
-       nminleft = n;
-    return nminleft;
+    if (CANT_HAPPEN(natp->nat_cnum != player->cnum))
+       return 0;
+
+    if (gamehours(now)) {
+       if (player->flags & PF_HOURS) {
+           pr("\nEmpire hours restriction lifted\n");
+           player->flags &= ~PF_HOURS;
+       }
+    } else {
+       if (!(player->flags & PF_HOURS)) {
+           pr("\nEmpire hours restriction in force\n");
+           player->flags |= PF_HOURS;
+       }
+       if (natp->nat_stat != STAT_GOD)
+           return 0;
+    }
+
+    if (game_play_disabled()) {
+       if (!(player->flags & PF_DOWN)) {
+           show_first_tel(downfil);
+           pr("\nThe game is down\n");
+           player->flags |= PF_DOWN;
+       }
+       if (natp->nat_stat != STAT_GOD)
+           return 0;
+    } else
+       player->flags &= ~PF_DOWN;
+
+    if ((natp->nat_stat != STAT_GOD && natp->nat_stat != STAT_VIS)
+       && natp->nat_timeused > m_m_p_d * 60) {
+       pr("Max minutes per day limit exceeded.\n");
+       return 0;
+    }
+    return 1;
 }