2 * Empire - A multi-player, client/server Internet based war game.
3 * Copyright (C) 1986-2005, Dave Pare, Jeff Bailey, Thomas Ruschak,
4 * Ken Stevens, Steve McClure
6 * This program is free software; you can redistribute it and/or modify
7 * it under the terms of the GNU General Public License as published by
8 * the Free Software Foundation; either version 2 of the License, or
9 * (at your option) any later version.
11 * This program is distributed in the hope that it will be useful,
12 * but WITHOUT ANY WARRANTY; without even the implied warranty of
13 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
14 * GNU General Public License for more details.
16 * You should have received a copy of the GNU General Public License
17 * along with this program; if not, write to the Free Software
18 * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
22 * See the "LEGAL", "LICENSE", "CREDITS" and "README" files for all the
23 * related information and legal notices. It is expected that any future
24 * projects/authors will amend these files as needed.
28 * empdis.c: Empire dispatcher stuff
30 * Known contributors to this file:
35 #include "prototypes.h"
56 #define KEEP_COMMANDS 50
58 /* ring buffer of most recent command prompts and commands, user text */
59 static char player_commands[KEEP_COMMANDS][1024 + 8];
61 /* the slot holding the most recent command in player_commands[] */
62 static int player_commands_index = 0;
65 * Get a command from the current player into COMBUFP[1024], in UTF-8.
66 * This may block for input, yielding the processor. Flush buffered
67 * output when blocking, to make sure player sees the prompt.
68 * Return command's byte length on success, -1 on error.
71 getcommand(char *combufp)
73 struct natstr *natp = getnatp(player->cnum);
74 char buf[1024]; /* user text */
76 if (++player_commands_index >= KEEP_COMMANDS)
77 player_commands_index = 0;
78 sprintf(player_commands[player_commands_index], "%3d %3d [prompt]",
79 player_commands_index, player->cnum);
82 prprompt(natp->nat_minused, natp->nat_btu);
84 if (recvclient(buf, 1024) < 0) {
87 } while (buf[0] == 0);
89 if (++player_commands_index >= KEEP_COMMANDS)
90 player_commands_index = 0;
91 sprintf(player_commands[player_commands_index], "%3d %3d %s",
92 player_commands_index, player->cnum, buf);
94 if (player->flags & PF_UTF8)
95 return copy_utf8_no_funny(combufp, buf);
96 return copy_ascii_no_funny(combufp, buf);
100 init_player_commands(void)
104 for (i = 0; i < KEEP_COMMANDS; ++i)
105 *player_commands[i] = 0;
109 log_last_commands(void)
113 logerror("Most recent player commands:");
114 for (i = player_commands_index; i >= 0; --i)
115 if (*player_commands[i])
116 logerror("%s", player_commands[i] + 4);
117 for (i = KEEP_COMMANDS - 1; i > player_commands_index; --i)
118 if (*player_commands[i])
119 logerror("%s", player_commands[i] + 4);
125 register s_char *format;
128 pr("\t\tCurrent EMPIRE Command List\n");
129 pr("\t\t------- ------ ------- ----\n");
130 pr("Initial number is cost in B.T.U. units.\n");
131 pr("Next 2 chars (if present) are:\n");
132 pr("$ - must be non-broke\tc -- must have capital\n");
133 pr("Args in [brackets] are optional.\n");
134 if (player->nstat > 4) {
135 pr("All-caps args in <angle brackets>");
136 pr(" have the following meanings:\n");
137 pr(" <NUM> :: a number in unspecified units\n");
138 pr(" <COMM> :: a commodity such as `food', `guns', etc\n");
139 pr(" <VAR> :: a commodity such as `food', `guns', etc\n");
140 pr(" <TYPE> :: an item type such as `ship', `plane', etc\n");
142 for (i = 0; (format = player_coms[i].c_form) != 0; i++) {
143 if ((player_coms[i].c_permit & player->ncomstat) ==
144 player_coms[i].c_permit) {
145 pr("%2d ", player_coms[i].c_cost);
146 if ((player_coms[i].c_permit & MONEY) == MONEY)
150 if ((player_coms[i].c_permit & CAP) == CAP)
157 pr("For further info on command syntax see \"info Syntax\".\n");
162 * returns true if down
169 char buf[MAXTELSIZE + 1]; /* UTF-8 */
173 if ((down_fp = fopen(downfil, "rb")) == NULL)
175 if (fread(&tgm, sizeof(tgm), 1, down_fp) != 1) {
176 logerror("bad header on login message (downfil)");
180 if (tgm.tel_length >= (long)sizeof(buf)) {
181 logerror("text length (%ld) is too long for login message (downfil)", tgm.tel_length);
185 if (fread(buf, tgm.tel_length, 1, down_fp) != 1) {
186 logerror("bad length %ld on login message", tgm.tel_length);
190 buf[tgm.tel_length] = 0;
192 pr("\nThe game is down\n");
198 daychange(time_t now)
203 natp = getnatp(player->cnum);
204 tm = localtime(&now);
205 if ((tm->tm_yday % 128) != natp->nat_dayno) {
206 natp->nat_dayno = tm->tm_yday % 128;
207 natp->nat_minused = 0;
212 getminleft(time_t now, int mpd)
219 tm = localtime(&now);
220 natp = getnatp(player->cnum);
221 nminleft = mpd - natp->nat_minused;
222 n = 60 * 24 - (tm->tm_min + tm->tm_hour * 60);