]> git.pond.sub.org Git - empserver/blobdiff - src/lib/subs/show.c
License upgrade to GPL version 3 or later
[empserver] / src / lib / subs / show.c
index c243baa4a03674359e3cad0d26f55ca1c60b526f..199a3261d7764c576612fa2b1dcb8fac92d0ccc6 100644 (file)
@@ -1,11 +1,11 @@
 /*
  *  Empire - A multi-player, client/server Internet based war game.
- *  Copyright (C) 1986-2007, Dave Pare, Jeff Bailey, Thomas Ruschak,
- *                           Ken Stevens, Steve McClure
+ *  Copyright (C) 1986-2011, 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,
@@ -14,8 +14,7 @@
  *  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/>.
  *
  *  ---
  *
  *  ---
  *
  *  show.c: General show routines
- * 
+ *
  *  Known contributors to this file:
  *     Julian Onions, 1988
  *     Jeff Bailey, 1990
  *     Steve McClure, 1996
- *     Ron Koenderink, 2005
- *     Markus Armbruster, 2006-2007
+ *     Ron Koenderink, 2005-2009
+ *     Markus Armbruster, 2006-2009
  */
 
 #include <config.h>
 
-#if defined(_WIN32)
-#include <Windows.h>
-#endif
-
 #include <math.h>
 #include "file.h"
 #include "game.h"
@@ -140,9 +135,8 @@ show_bridge(int tlev)
 {
     if (tlev < buil_bt)
        return;
-    pr("Bridges require %g tech,", buil_bt);
-    pr(" %d hcm,", buil_bh);
-    pr(" %d workers,\n", 0);
+    pr("Bridges require %g tech, %d hcm, 0 workers,\n",
+       buil_bt, buil_bh);
     pr("%d available workforce, and cost $%g\n",
        (SCT_BLD_WORK(0, buil_bh) * SCT_MINEFF + 99) / 100,
        buil_bc);
@@ -153,9 +147,8 @@ show_tower(int tlev)
 {
     if (tlev < buil_tower_bt)
        return;
-    pr("Bridge Towers require %g tech,", buil_tower_bt);
-    pr(" %d hcm,", buil_tower_bh);
-    pr(" %d workers,\n", 0);
+    pr("Bridge towers require %g tech, %d hcm, 0 workers,\n",
+       buil_tower_bt, buil_tower_bh);
     pr("%d available workforce, and cost $%g\n",
        (SCT_BLD_WORK(0, buil_tower_bh) * SCT_MINEFF + 99) / 100,
        buil_tower_bc);
@@ -244,27 +237,14 @@ show_ship_stats(int tlev)
 {
     struct mchrstr *mp;
     int scount;
-    int techdiff;
 
-    pr("%25s      s  v  s  r  f  l  p", "");
-    pr("  h");
-    pr("  x");
-    if (opt_FUEL)
-       pr("  fuel");
+    pr("%25s      s  v  s  r  f  l  p  h  x", "");
     pr("\n");
 
-    pr("%25s      p  i  p  n  i  n  l", "");
-    pr("  e");
-    pr("  p");
-    if (opt_FUEL)
-       pr("   c/u");
+    pr("%25s      p  i  p  n  i  n  l  e  p", "");
     pr("\n");
 
-    pr("%25s def  d  s  y  g  r  d  n", "");
-    pr("  l");
-    pr("  l");
-    if (opt_FUEL)
-       pr("      ");
+    pr("%25s def  d  s  y  g  r  d  n  l  l", "");
     pr("\n");
 
 
@@ -275,22 +255,15 @@ show_ship_stats(int tlev)
        if ((mp->m_flags & M_TRADE) && !opt_TRADESHIPS)
            continue;
 
-       techdiff = (int)(tlev - mp->m_tech);
        pr("%-25.25s %3d %2d %2d %2d %2d %2d ",
-          mp->m_name,
-          (short)SHP_DEF(mp->m_armor, techdiff),
-          (short)SHP_SPD(mp->m_speed, techdiff),
-          (short)SHP_VIS(mp->m_visib, techdiff),
-          mp->m_vrnge,
-          (short)SHP_RNG(mp->m_frnge, techdiff),
-          (short)SHP_FIR(mp->m_glim, techdiff));
+          mp->m_name, m_armor(mp, tlev), m_speed(mp, tlev),
+          m_visib(mp, tlev), mp->m_vrnge,
+          m_frnge(mp, tlev), m_glim(mp, tlev));
 
        pr("%2d ", mp->m_nland);
        pr("%2d ", mp->m_nplanes);
        pr("%2d ", mp->m_nchoppers);
        pr("%2d ", mp->m_nxlight);
-       if (opt_FUEL)
-           pr("%3d/%1d ", mp->m_fuelc, mp->m_fuelu);
        pr("\n");
     }
 }
@@ -344,12 +317,8 @@ show_plane_stats(int tlev)
     for (pcount = 0; pcount < lookup_list_cnt; pcount++) {
        pp = (struct plchrstr *)lookup_list[pcount].l_u.pp;
        pr("%-25.25s %3d %4d %3d %3d %3d %4d ",
-          pp->pl_name,
-          (int)PLN_ACC(pp->pl_acc, (int)(tlev - pp->pl_tech)),
-          (int)PLN_LOAD(pp->pl_load, (int)(tlev - pp->pl_tech)),
-          (int)PLN_ATTDEF(pp->pl_att, (int)(tlev - pp->pl_tech)),
-          (int)PLN_ATTDEF(pp->pl_def, (int)(tlev - pp->pl_tech)),
-          (int)PLN_RAN(pp->pl_range, (int)(tlev - pp->pl_tech)),
+          pp->pl_name, pl_acc(pp, tlev), pl_load(pp, tlev),
+          pl_att(pp, tlev), pl_def(pp, tlev), pl_range(pp, tlev),
           pp->pl_fuel);
        pr("%4d%% ", pp->pl_stealth);
        pr("\n");
@@ -462,11 +431,10 @@ show_land_stats(int tlev)
 {
     struct lchrstr *lcp;
     int lcount;
-    int ourtlev;
 
-    pr("%25s              s  v  s  r  r  a  f  a  a        x  l\n", "");
-    pr("%25s              p  i  p  a  n  c  i  m  a  f  f  p  n\n", "");
-    pr("%25s att def vul  d  s  y  d  g  c  r  m  f  c  u  l  d\n", "");
+    pr("%25s              s  v  s  r  r  a  f  a  a  x  l\n", "");
+    pr("%25s              p  i  p  a  n  c  i  m  a  p  n\n", "");
+    pr("%25s att def vul  d  s  y  d  g  c  r  m  f  l  d\n", "");
 
     make_new_list(tlev, EF_LAND);
     for (lcount = 0; lcount < lookup_list_cnt; lcount++) {
@@ -474,29 +442,14 @@ show_land_stats(int tlev)
        if ((lcp->l_flags & L_SPY) && !opt_LANDSPIES)
            continue;
 
-       ourtlev = (int)(tlev - lcp->l_tech);
        pr("%-25s %1.1f %1.1f %3d ",
           lcp->l_name,
-          LND_ATTDEF(lcp->l_att, ourtlev),
-          LND_ATTDEF(lcp->l_def, ourtlev),
-          (int)LND_VUL(lcp->l_vul, ourtlev));
+          l_att(lcp, tlev), l_def(lcp, tlev), l_vul(lcp, tlev));
        pr("%2d %2d %2d %2d ",
-          (int)LND_SPD(lcp->l_spd, ourtlev),
-          (int)LND_VIS(lcp->l_vis, ourtlev),
-          (int)LND_SPY(lcp->l_spy, ourtlev),
-          (int)LND_RAD(lcp->l_rad, ourtlev));
+          l_spd(lcp, tlev), lcp->l_vis, lcp->l_spy, lcp->l_rad);
        pr("%2d %2d %2d %2d %2d ",
-          (int)LND_FRG(lcp->l_frg, ourtlev),
-          (int)LND_ACC(lcp->l_acc, ourtlev),
-          (int)LND_DAM(lcp->l_dam, ourtlev),
-          (int)LND_AMM(lcp->l_ammo, ourtlev),
-          (int)LND_AAF(lcp->l_aaf, ourtlev));
-       pr("%2d %2d %2d %2d ",
-          (int)LND_FC(lcp->l_fuelc, ourtlev),
-          (int)LND_FU(lcp->l_fuelu, ourtlev),
-          (int)LND_XPL(lcp->l_nxlight, ourtlev),
-          (int)LND_MXL(lcp->l_nland, ourtlev));
-
+          l_frg(lcp, tlev), l_acc(lcp, tlev), l_dam(lcp, tlev),
+          lcp->l_ammo, lcp->l_aaf);
        pr("\n");
     }
 }
@@ -504,36 +457,42 @@ show_land_stats(int tlev)
 void
 show_sect_build(int foo)
 {
-    int x, first;
+    int i, first;
 
-    first = 1;
-    for (x = 0; dchr[x].d_name; x++) {
-       if (dchr[x].d_mnem == 0)
+    pr("                        desig   build 100%% eff  maint\n"
+       "sector type                 $   lcm  hcm     $      $\n");
+    for (i = 0; dchr[i].d_name; i++) {
+       if (dchr[i].d_mnem == 0)
            continue;
-       if (dchr[x].d_cost < 0)
+       if (dchr[i].d_mob0 < 0)
            continue;
-       if ((dchr[x].d_cost > 0) || (dchr[x].d_build != 1) ||
-           (dchr[x].d_lcms > 0) || (dchr[x].d_hcms > 0)) {
-           if (first) {
-               pr("sector type    cost to des    cost for 1%% eff   lcms for 1%%    hcms for 1%%\n");
-               first = 0;
-           }
-           pr("%-14c %-14d %-17d %-14d %d\n",
-              dchr[x].d_mnem, dchr[x].d_cost, dchr[x].d_build,
-              dchr[x].d_lcms, dchr[x].d_hcms);
-       }
+       if (dchr[i].d_cost <= 0 && dchr[i].d_build == 1
+           && dchr[i].d_lcms == 0 && dchr[i].d_hcms == 0
+           && dchr[i].d_maint == 0)
+           continue;           /* the usual, skip */
+       pr("%c %-21.21s", dchr[i].d_mnem, dchr[i].d_name);
+       if (dchr[i].d_cost < 0)
+           pr(" can't");
+       else
+           pr(" %5d", dchr[i].d_cost);
+       pr(" %5d%5d %5d  %5d\n",
+          100 * dchr[i].d_lcms,
+          100 * dchr[i].d_hcms,
+          100 * dchr[i].d_build,
+          dchr[i].d_maint * etu_per_update);
     }
+    pr("any other                   0     0    0   100      0\n");
 
     first = 1;
-    for (x = 0; intrchr[x].in_name; x++) {
-       if (!intrchr[x].in_enable)
+    for (i = 0; intrchr[i].in_name; i++) {
+       if (!intrchr[i].in_enable)
            continue;
        if (first)
            pr("\nInfrastructure building - adding 1 point of efficiency costs:\n"
               "       type          lcms    hcms    mobility    $$$$\n");
        pr("%-20s %4d    %4d    %8d    %4d\n",
-          intrchr[x].in_name, intrchr[x].in_lcms, intrchr[x].in_hcms,
-          intrchr[x].in_mcost, intrchr[x].in_dcost);
+          intrchr[i].in_name, intrchr[i].in_lcms, intrchr[i].in_hcms,
+          intrchr[i].in_mcost, intrchr[i].in_dcost);
        first = 0;
     }
 }
@@ -541,90 +500,41 @@ show_sect_build(int foo)
 void
 show_sect_stats(int foo)
 {
-    int x, first = 1;
-    struct natstr *natp;
+    int i;
+    struct natstr *natp = getnatp(player->cnum);
+
+    pr("                        mob cost   max   max   naviga    packing   max\n");
+    pr("  sector type            0%% 100%%   off   def   bility      bonus   pop\n");
 
-    natp = getnatp(player->cnum);
-    for (x = 0; dchr[x].d_name; x++) {
-       if (dchr[x].d_mnem == 0)
+    for (i = 0; dchr[i].d_name; i++) {
+       if (dchr[i].d_mnem == 0)
            continue;
-       if (first) {
-           pr("                        mob cost   max   max   --  packing bonus  --   max\n");
-           pr("  sector type            0%% 100%%   off   def   mil  uw civ bar other   pop\n");
-           first = 0;
-       }
-       pr("%c %-21.21s", dchr[x].d_mnem, dchr[x].d_name);
-       if (dchr[x].d_mob0 < 0)
+       pr("%c %-21.21s", dchr[i].d_mnem, dchr[i].d_name);
+       if (dchr[i].d_mob0 < 0)
            pr("  no way ");
        else
-           pr(" %3.1f  %3.1f", dchr[x].d_mob0, dchr[x].d_mob1);
-       pr("  %5.2f %5.2f   %3d %3d %3d %3d %5d %5d\n",
-          dchr[x].d_ostr, dchr[x].d_dstr,
-          ichr[I_MILIT].i_pkg[dchr[x].d_pkg],
-          ichr[I_UW].i_pkg[dchr[x].d_pkg],
-          ichr[I_CIVIL].i_pkg[dchr[x].d_pkg],
-          ichr[I_BAR].i_pkg[dchr[x].d_pkg],
-          ichr[I_LCM].i_pkg[dchr[x].d_pkg],
-          max_population(natp->nat_level[NAT_RLEV], x, 100));
+           pr(" %3.1f  %3.1f", dchr[i].d_mob0, dchr[i].d_mob1);
+       pr("  %5.2f %5.2f %7.7s %10.10s %5d\n",
+          dchr[i].d_ostr, dchr[i].d_dstr,
+          symbol_by_value(dchr[i].d_nav, sector_navigation),
+          symbol_by_value(dchr[i].d_pkg, packing),
+          max_population(natp->nat_level[NAT_RLEV], i, 100));
     }
 }
 
 void
 show_sect_capab(int foo)
 {
-    int x, first = 1, i, j;
-    char *tmpstr;
-
-    for (x = 0; dchr[x].d_name; x++) {
-       if (dchr[x].d_mnem == 0 || dchr[x].d_prd < 0)
-           continue;
-       if (first) {
-           pr("                                                 --- level ---          reso \n");
-           pr("  sector type             product use1 use2 use3 level min lag eff%% $$$ dep c\n");
-           first = 0;
-       }
-
-       j = dchr[x].d_prd;
+    int i;
 
-       pr("%c %-23s %-7s ",
-          dchr[x].d_mnem, dchr[x].d_name, pchr[j].p_sname);
-       (void)CANT_HAPPEN(MAXPRCON > 3); /* output has only three columns */
-       for (i = 0; i < 3; i++) {
-           if (i < MAXPRCON
-               && pchr[j].p_camt[i]
-               && pchr[j].p_ctype[i] > I_NONE
-               && pchr[j].p_ctype[i] <= I_MAX) {
-               pr("%2d %c ", pchr[j].p_camt[i],
-                  ichr[pchr[j].p_ctype[i]].i_name[0]);
-           } else {
-               pr("     ");
-           }
-       }
-       switch (pchr[j].p_nlndx) {
-       case NAT_TLEV:
-           tmpstr = "tech";
-           break;
-       case NAT_ELEV:
-           tmpstr = "edu";
-           break;
-       case NAT_RLEV:
-           tmpstr = "res";
-           break;
-       case NAT_HLEV:
-           tmpstr = "hap";
-           break;
-       default:
-           tmpstr = " ";
-           break;
-       }
-       pr("%-5s %3d %3d %4d %3d %3d %c",
-          tmpstr,
-          pchr[j].p_nlmin,
-          pchr[j].p_nllag,
-          dchr[x].d_peffic, pchr[j].p_cost, pchr[j].p_nrdep,
-          pchr[j].p_type != I_NONE ? ichr[pchr[j].p_type].i_mnem : ' ');
+    pr("  sector type             product  p.e.\n");
 
-       pr("\n");
+    for (i = 0; dchr[i].d_name; i++) {
+       if (dchr[i].d_mnem == 0 || dchr[i].d_prd < 0)
+           continue;
+       pr("%c %-23s %-7s %4d%%\n",
+          dchr[i].d_mnem, dchr[i].d_name, pchr[dchr[i].d_prd].p_sname,
+          dchr[i].d_peffic);
     }
 }
 
@@ -634,7 +544,7 @@ show_item(int tlev)
     struct ichrstr *ip;
 
     pr("item value sell lbs    packing     melt  item\n");
-    pr("mnem                in rg wh ur bk deno  name\n");
+    pr("mnem                in no wh ur bk deno  name\n");
 
     for (ip = ichr; ip->i_name; ip++) {
        pr("   %c %5d %4s %3d %2d %2d %2d %2d %2d %4d  %s\n",
@@ -645,11 +555,48 @@ show_item(int tlev)
     }
 }
 
+void
+show_product(int tlev)
+{
+    struct pchrstr *pp;
+    int i;
+    char *lev;
+
+    pr("product    cost  raw materials  reso dep  level p.e.\n");
+
+    for (pp = pchr; pp->p_sname; pp++) {
+       pr("%7.7s %c  $%-3d ",
+          pp->p_sname,
+          pp->p_type < 0 ? ' ' : ichr[pp->p_type].i_mnem,
+          pp->p_cost);
+       (void)CANT_HAPPEN(MAXPRCON > 3); /* output has only three columns */
+       for (i = 0; i < 3; i++) {
+           if (i < MAXPRCON && pp->p_camt[i]
+               && pp->p_ctype[i] > I_NONE && pp->p_ctype[i] <= I_MAX)
+               pr(" %2d%c", pp->p_camt[i], ichr[pp->p_ctype[i]].i_mnem);
+           else
+               pr("    ");
+       }
+       if (pp->p_nrndx)
+           pr("   %5.5s %3d  ",
+              symbol_by_value(pp->p_nrndx, resources), pp->p_nrdep);
+       else
+           pr("              ");
+       if (pp->p_nlndx < 0)
+           pr("1.0\n");
+       else {
+           lev = symbol_by_value(pp->p_nlndx, level);
+           pr("(%.4s%+d)/(%.4s%+d)\n",
+              lev, -pp->p_nlmin, lev, pp->p_nllag - pp->p_nlmin);
+       }
+    }
+}
+
 void
 show_news(int tlev)
 {
     int i, j;
-    
+
     pr("id category           good will\n");
     pr("    messsages\n");
 
@@ -657,7 +604,7 @@ show_news(int tlev)
        if (rpt[i].r_newspage == N_NOTUSED)
            continue;
        pr("%-2d %-20.20s %4d\n", rpt[i].r_uid,
-           page_headings[rpt[i].r_newspage].name, rpt[i].r_good_will);
+          page_headings[rpt[i].r_newspage].name, rpt[i].r_good_will);
        for (j = 0; j < NUM_RPTS; j++)
            pr("    %s\n", rpt[i].r_newstory[j]);
     }
@@ -724,26 +671,26 @@ fmttime2822(time_t t)
     int nn;
     TIME_ZONE_INFORMATION tzi;
     long time_offset;
-    struct tm time;
-    
-    localtime_s(&time, &t);
+    struct tm *time;
+
+    time = localtime(&t);
 
-    n = strftime(buf, sizeof(buf), "%a, %d %b %Y %H:%M:%S", &time);
+    n = strftime(buf, sizeof(buf), "%a, %d %b %Y %H:%M:%S", time);
     if (CANT_HAPPEN(n == 0)) {
        buf[0] = 0;
        return buf;
     }
     GetTimeZoneInformation(&tzi);
     time_offset = -(tzi.Bias +
-       (time.tm_isdst ? tzi.DaylightBias : tzi.StandardBias));
+       (time->tm_isdst ? tzi.DaylightBias : tzi.StandardBias));
 
-    nn = _snprintf_s(buf + n, sizeof(buf) - n, sizeof(buf) - n -1,
-       " %+03d%02d",   time_offset/60, abs(time_offset) % 60);
-    if (CANT_HAPPEN(nn <= 0))
+    nn = _snprintf(buf + n, sizeof(buf) - n, " %+03d%02d",
+                  time_offset / 60, abs(time_offset) % 60);
+    if (CANT_HAPPEN(nn <= 0 || nn + n >= sizeof(buf)))
        buf[0] = 0;
 #else
-    size_t int n = strftime(buf, sizeof(buf), "%a, %d %b %Y %T %z",
-                    localtime(&t));
+    size_t n = strftime(buf, sizeof(buf), "%a, %d %b %Y %T %z",
+                       localtime(&t));
     if (CANT_HAPPEN(n == 0))
        buf[0] = 0;
 #endif