/*
* Empire - A multi-player, client/server Internet based war game.
- * Copyright (C) 1986-2006, 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.
*
* ---
*
* repo.c: Report on various levels (tech, research) of other nations
- *
+ *
* Known contributors to this file:
* Keith Muller, 1983
* Dave Pare, 1986 (rewrite)
#include <config.h>
-#include "misc.h"
-#include "player.h"
-#include "sect.h"
-#include "nat.h"
-#include "file.h"
-#include "xy.h"
-#include "nsc.h"
-#include <fcntl.h>
-#include <ctype.h>
#include "commands.h"
#include "optlist.h"
-struct stats {
- double res;
- double tech;
- double edu;
- double hap;
- int stat;
-};
-
-static void printdiff(int mystat, double ours, struct natstr *natp,
- int what);
static void repo_header(void);
-static void repo_list(struct stats *stat, natid cn, struct natstr *natp);
-
-static int check(s_char *buf, double theirs, double min, double max,
- int shift, int tolerance);
+static void repo_list(struct natstr *, struct natstr *);
+static void printdiff(struct natstr *, struct natstr *, int what);
+static int tryprdiff(double, double, double, int, int);
int
repo(void)
{
struct natstr *natp;
- struct stats mystat;
struct natstr nat;
struct nstr_item ni;
- int first;
- if (!snxtitem(&ni, EF_NATION, player->argp[1]))
+ if (!snxtitem(&ni, EF_NATION, player->argp[1], NULL))
return RET_SYN;
prdate();
natp = getnatp(player->cnum);
- memset(&mystat, 0, sizeof(struct stats));
- mystat.stat = natp->nat_stat;
- if (mystat.stat >= STAT_ACTIVE) {
- mystat.res = natp->nat_level[NAT_RLEV];
- mystat.tech = natp->nat_level[NAT_TLEV];
- mystat.edu = natp->nat_level[NAT_ELEV];
- mystat.hap = natp->nat_level[NAT_HLEV];
- }
- if (opt_HIDDEN) {
- repo_header();
- first = 0;
- } else {
- first = 1;
- }
+ repo_header();
while (nxtitem(&ni, &nat)) {
if (nat.nat_stat == STAT_UNUSED)
continue;
if (opt_HIDDEN) {
- if (!player->god && !getcontact(getnatp(player->cnum), ni.cur))
+ if (!player->god && !getcontact(natp, ni.cur))
continue;
}
- if (first) {
- repo_header();
- first = 0;
- }
- repo_list(&mystat, (natid)ni.cur, &nat);
+ if (!player->god && nat.nat_stat != STAT_ACTIVE)
+ continue;
+ repo_list(natp, &nat);
}
return RET_OK;
}
static void
repo_header(void)
{
- pr(" # name tech research education happiness ");
- if (player->god)
- pr("capital\n");
- else
- pr(" status\n");
+ pr(" # name tech research education happiness"
+ " %s\n",
+ player->god ? "capital" : " status");
}
static void
-repo_list(struct stats *stat, natid cn, struct natstr *natp)
+repo_list(struct natstr *plnatp, struct natstr *natp)
{
- if (player->god) {
- pr(" %-3d %-14.14s ", cn, natp->nat_cnam);
- pr(" %7.2f %7.2f %7.2f %7.2f",
- natp->nat_level[NAT_TLEV],
- natp->nat_level[NAT_RLEV],
- natp->nat_level[NAT_ELEV], natp->nat_level[NAT_HLEV]);
- prxy(" %4d,%-4d\n", natp->nat_xcap, natp->nat_ycap, player->cnum);
- return;
+ pr(" %-3d %-14.14s ", natp->nat_cnum, natp->nat_cnam);
+ if (player->god || player->cnum == natp->nat_cnum) {
+ pr(" %7.2f %7.2f %7.2f %7.2f%s",
+ natp->nat_level[NAT_TLEV], natp->nat_level[NAT_RLEV],
+ natp->nat_level[NAT_ELEV], natp->nat_level[NAT_HLEV],
+ player->god ? "" : " ");
+ } else {
+ printdiff(plnatp, natp, NAT_TLEV);
+ printdiff(plnatp, natp, NAT_RLEV);
+ printdiff(plnatp, natp, NAT_ELEV);
+ printdiff(plnatp, natp, NAT_HLEV);
}
- if (natp->nat_stat == STAT_ACTIVE) {
- pr(" %-3d %-14.14s ", cn, natp->nat_cnam);
- printdiff(stat->stat, stat->tech, natp, NAT_TLEV);
- printdiff(stat->stat, stat->res, natp, NAT_RLEV);
- printdiff(stat->stat, stat->edu, natp, NAT_ELEV);
- printdiff(stat->stat, stat->hap, natp, NAT_HLEV);
+ if (player->god) {
+ prxy(" %4d,%-4d\n", natp->nat_xcap, natp->nat_ycap);
+ } else {
if (!opt_HIDDEN && influx(natp))
pr("In flux\n");
- else if (!opt_HIDDEN && natp->nat_money <= 0)
+ else if (!opt_HIDDEN && natp->nat_money < 0)
pr("Broke\n");
else
pr("Active\n");
}
static void
-printdiff(int mystat, double ours, struct natstr *natp, int what)
+printdiff(struct natstr *plnatp, struct natstr *natp, int what)
{
+ double ours = plnatp->nat_level[what];
double theirs;
int shift;
int tolerance;
- s_char buf[128];
- if (natp->nat_cnum == player->cnum) {
- pr(" %7.2f ", ours);
- return;
- }
- if (ours && mystat >= STAT_ACTIVE && natp->nat_stat >= STAT_ACTIVE) {
+ if (ours
+ && plnatp->nat_stat >= STAT_ACTIVE
+ && natp->nat_stat >= STAT_ACTIVE) {
theirs = natp->nat_level[what];
- if ((shift = min((int)theirs, (int)ours) - 100) > 0) {
+ if ((shift = MIN((int)theirs, (int)ours) - 100) > 0) {
ours -= shift;
theirs -= shift;
} else
}
if (tolerance > 2 * ours)
tolerance = (int)(2 * ours);
- if (check(buf, theirs, 2 * ours, -1.0, shift, tolerance))
+ if (tryprdiff(theirs, 2 * ours, -1.0, shift, tolerance))
;
- else if (check(buf, theirs, 1.5 * ours, 2.0 * ours, shift, tolerance))
+ else if (tryprdiff(theirs, 1.5 * ours, 2.0 * ours, shift, tolerance))
;
- else if (check(buf, theirs, 1.2 * ours, 1.5 * ours, shift, tolerance))
+ else if (tryprdiff(theirs, 1.2 * ours, 1.5 * ours, shift, tolerance))
;
- else if (check(buf, theirs, 1.1 * ours, 1.2 * ours, shift, tolerance))
+ else if (tryprdiff(theirs, 1.1 * ours, 1.2 * ours, shift, tolerance))
;
- else if (check(buf, theirs, ours / 1.1, 1.1 * ours, shift, tolerance))
+ else if (tryprdiff(theirs, ours / 1.1, 1.1 * ours, shift, tolerance))
;
- else if (check(buf, theirs, ours / 1.2, ours / 1.1, shift, tolerance))
+ else if (tryprdiff(theirs, ours / 1.2, ours / 1.1, shift, tolerance))
;
- else if (check(buf, theirs, ours / 1.5, ours / 1.2, shift, tolerance))
+ else if (tryprdiff(theirs, ours / 1.5, ours / 1.2, shift, tolerance))
;
- else if (check(buf, theirs, ours / 2.0, ours / 1.5, shift, tolerance))
+ else if (tryprdiff(theirs, ours / 2.0, ours / 1.5, shift, tolerance))
;
- else if (check(buf, theirs, -1.0, ours / 2.0, shift, tolerance)) ;
+ else if (tryprdiff(theirs, -1.0, ours / 2.0, shift, tolerance)) ;
else
- sprintf(buf, " n/a");
+ pr(" n/a ");
} else
- sprintf(buf, " n/a");
-
- pr("%-11s ", buf);
+ pr(" n/a ");
}
static int
-check(s_char *buf, double theirs, double min, double max, int shift,
- int tolerance)
+tryprdiff(double theirs, double min, double max, int shift, int tolerance)
{
double shove;
if (theirs <= max) {
if (max < tolerance)
max = tolerance;
- sprintf(buf, " 0 - %d", (int)max + shift);
+ pr(" 0 - %-4d ", (int)max + shift);
return 1;
}
} else if (max < 0) {
if (theirs >= min) {
- sprintf(buf, " >= %d", (int)min + shift);
+ pr(" >= %-4d ", (int)min + shift);
return 1;
}
} else if (theirs >= min && theirs <= max) {
max = tolerance;
}
}
- sprintf(buf, "%4d - %d", (int)min + shift, (int)max + shift);
+ pr("%4d - %-4d ", (int)min + shift, (int)max + shift);
return 1;
}