]> git.pond.sub.org Git - empserver/blobdiff - src/lib/subs/radmap.c
Update copyright notice
[empserver] / src / lib / subs / radmap.c
index 0b78b3cb9abc36c5b57310b982b17bcc2af5ed2e..026233c71bc820be1d9fbc0f9691826e124d0dc4 100644 (file)
@@ -1,11 +1,11 @@
 /*
  *  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,
@@ -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/>.
  *
  *  ---
  *
  *  ---
  *
  *  radmap.c: Do a radar map given an x,y location, effic, and other
- * 
+ *
  *  Known contributors to this file:
  *     Dave Pare, 1989
+ *     Markus Armbruster, 2004-2010
  */
 
 #include <config.h>
 
+#include <stdlib.h>
+#include "file.h"
+#include "map.h"
 #include "misc.h"
-#include "player.h"
-#include "xy.h"
 #include "nat.h"
-#include "sect.h"
-#include "ship.h"
-#include "plane.h"
-#include "file.h"
 #include "nsc.h"
-#include "prototypes.h"
 #include "optlist.h"
+#include "plane.h"
+#include "player.h"
+#include "prototypes.h"
+#include "sect.h"
+#include "ship.h"
+#include "xy.h"
 
-static void radmap2(int, int, int, int, int, double, int);
-
-void
-radmap(int cx, int cy, int eff, int range, double seesub)
-{
-    radmap2(player->cnum, cx, cy, eff, range, seesub, 1);
-}
-
-void
-radmapnopr(int cx, int cy, int eff, int range, double seesub)
-{
-    radmap2(player->cnum, cx, cy, eff, range, seesub, 0);
-}
-
-void
-radmapupd(int own, int cx, int cy, int eff, int range, double seesub)
-{
-    radmap2(own, cx, cy, eff, range, seesub, 0);
-}
+static int rad_range(int, double, int);
+static char rad_char(struct sctstr *, int, int, natid);
 
 /* More dynamic world sized buffers.  We create 'em once, and then
  * never again.  No need to keep creating/tearing apart.  We may
  * want to do this in other places too where it doesn't matter. */
-static s_char **rad;
-static s_char *radbuf;
-static s_char **vis;
-static s_char *visbuf;
-
-static void
-radmap2(int owner,
-       int cx, int cy, int eff, int range, double seesub, int pr_flag)
+static char **rad;
+static char *radbuf;
+static signed char **vis;
+static signed char *visbuf;
+
+/*
+ * Draw a radar map for radar at CX,CY.
+ * EFF is the radar's efficiency, TLEV its tech level, SPY its power.
+ * Submarines are detected at fraction SEESUB of the range.
+ */
+void
+radmap(int cx, int cy, int eff, double tlev, int spy, double seesub)
 {
-    int rng;
+    int visib, rng;
     struct sctstr sect;
     struct shpstr ship;
     struct plnstr plane;
@@ -86,21 +75,22 @@ radmap2(int owner,
     int x, y;
     int row;
     int n;
+    int range = rad_range(eff, tlev, spy);
     int changed = 0;
 
     if (!radbuf)
-       radbuf = malloc(WORLD_Y * (WORLD_X + 1));
+       radbuf = malloc(WORLD_Y * MAPWIDTH(1));
     if (!visbuf)
-       visbuf = malloc(WORLD_Y * (WORLD_X + 1));
+       visbuf = malloc(WORLD_Y * MAPWIDTH(1));
     if (!rad) {
-       rad = malloc(WORLD_Y * sizeof(s_char *));
+       rad = malloc(WORLD_Y * sizeof(char *));
        if (rad && radbuf) {
            for (x = 0; x < WORLD_Y; x++)
                rad[x] = &radbuf[(WORLD_X + 1) * x];
        }
     }
     if (!vis) {
-       vis = malloc(WORLD_Y * sizeof(s_char *));
+       vis = malloc(WORLD_Y * sizeof(signed char *));
        if (vis && visbuf) {
            for (x = 0; x < WORLD_Y; x++)
                vis[x] = &visbuf[(WORLD_X + 1) * x];
@@ -112,29 +102,17 @@ radmap2(int owner,
     }
 
     memset(visbuf, 0, (WORLD_Y * (WORLD_X + 1)));
-    range = (int)(range * (eff / 100.0));
-    if (range < 1)
-       range = 1;
-    if (pr_flag)
-       pr("%s efficiency %d%%, max range %d\n",
-          xyas(cx, cy, owner), eff, range);
+    pr("%s efficiency %d%%, max range %d\n",
+       xyas(cx, cy, player->cnum), eff, range);
     snxtsct_dist(&ns, cx, cy, range);
     blankfill(radbuf, &ns.range, 1);
     while (nxtsct(&ns, &sect)) {
-       if (sect.sct_own == owner
-           || sect.sct_type == SCT_WATER
-           || sect.sct_type == SCT_MOUNT
-           || sect.sct_type == SCT_WASTE
-           || ns.curdist <= range / 3)
-           rad[ns.dy][ns.dx] = dchr[sect.sct_type].d_mnem;
-       else
-           rad[ns.dy][ns.dx] = '?';
-       changed += map_set(owner, ns.x, ns.y, rad[ns.dy][ns.dx], 0);
+       rad[ns.dy][ns.dx] = rad_char(&sect, ns.curdist, range,
+                                    player->cnum);
+       changed += map_set(player->cnum, ns.x, ns.y, rad[ns.dy][ns.dx], 0);
     }
     if (changed)
-       writemap(owner);
-    if (!pr_flag)
-       return;
+       writemap(player->cnum);
     snxtitem_dist(&ni, EF_PLANE, cx, cy, range);
     while (nxtitem(&ni, &plane)) {
        if (plane.pln_own == 0)
@@ -143,7 +121,7 @@ radmap2(int owner,
        x = deltx(&ns.range, (int)plane.pln_x);
        y = delty(&ns.range, (int)plane.pln_y);
 
-       if ((plane.pln_flags & PLN_LAUNCHED) && plane.pln_own != owner) {
+       if (pln_is_in_orbit(&plane) && plane.pln_own != player->cnum) {
            vis[y][x] = 100;
            rad[y][x] = '$';
        }
@@ -156,56 +134,107 @@ radmap2(int owner,
        x = deltx(&ns.range, (int)ship.shp_x);
        y = delty(&ns.range, (int)ship.shp_y);
 
-       rng = (int)(range * ship.shp_visib / 20.0);
+       visib = shp_visib(&ship);
+       rng = (int)(range * visib / 20.0);
        if (ni.curdist > rng)
            continue;
        if ((mchr[(int)ship.shp_type].m_flags & M_SUB) &&
            ni.curdist > rng * seesub)
            continue;
-       if (ship.shp_visib > vis[y][x]) {
-           vis[y][x] = ship.shp_visib;
+       if (visib > vis[y][x]) {
+           vis[y][x] = visib;
            /* &~0x20 makes it a cap letter */
            rad[y][x] = (*mchr[(int)ship.shp_type].m_name) & ~0x20;
        }
     }
-    /* 
+    /*
      * make the center of the display 0
      * so ve et al can find it.
      */
-    rad[deltay(cy, ns.range.ly)][deltax(cx, ns.range.lx)] = '0';
-    /* won't work for radar maps > WORLD_Y/2 */
-#ifdef HAY
-    /* This is not correct for small, hitech worlds. */
-    n = deltay(ns.range.hy, ns.range.ly);
-#else
-    /* This is already available, so why not use it. */
+    rad[delty(&ns.range, cy)][deltx(&ns.range, cx)] = '0';
+
     n = ns.range.height;
-#endif
     for (row = 0; row < n; row++)
        pr("%s\n", rad[row]);
     pr("\n");
 }
 
+/*
+ * Return distance from left edge of R to X.
+ * Value is between 0 (inclusive) and WORLD_X (exclusive).
+ * X must be normalized.
+ */
 int
 deltx(struct range *r, coord x)
 {
-    if (r->lx < r->hx)
-       return x - r->lx;
-
     if (x >= r->lx)
        return x - r->lx;
-
     return x + WORLD_X - r->lx;
 }
 
+/*
+ * Return distance from top edge of R to Y.
+ * Value is between 0 (inclusive) and WORLD_Y (exclusive).
+ * Y must be normalized.
+ */
 int
 delty(struct range *r, coord y)
 {
-    if (r->ly < r->hy)
-       return y - r->ly;
-
     if (y >= r->ly)
        return y - r->ly;
-
     return y + WORLD_Y - r->ly;
 }
+
+/*
+ * Update OWNER's bmap for radar at CX,CY.
+ * EFF is the radar's efficiency, TLEV its tech level, SPY its power.
+ */
+void
+rad_map_set(natid owner, int cx, int cy, int eff, double tlev, int spy)
+{
+    struct nstr_sect ns;
+    struct sctstr sect;
+    int range = rad_range(eff, tlev, spy);
+    int changed = 0;
+    char ch;
+
+    snxtsct_dist(&ns, cx, cy, range);
+    while (nxtsct(&ns, &sect)) {
+       ch = rad_char(&sect, ns.curdist, range, owner);
+       changed += map_set(owner, ns.x, ns.y, ch, 0);
+    }
+    if (changed)
+       writemap(owner);
+}
+
+/*
+ * Range of a radar with EFF efficiency, TLEV tech, and SPY power.
+ */
+static int
+rad_range(int eff, double tlev, int spy)
+{
+    int range;
+
+    range = (int)techfact(tlev, spy);
+    range = (int)(range * (eff / 100.0));
+    if (range < 1)
+       range = 1;
+    return range;
+}
+
+/*
+ * Return character to use in radar maps for sector SP.
+ * DIST is the distance from the radar, RANGE its range.
+ * Country CN is using the radar.
+ */
+static char
+rad_char(struct sctstr *sp, int dist, int range, natid cn)
+{
+    if (sp->sct_own == cn
+       || sp->sct_type == SCT_WATER
+       || sp->sct_type == SCT_MOUNT
+       || sp->sct_type == SCT_WASTE
+       || dist <= range / 3)
+       return dchr[sp->sct_type].d_mnem;
+    return '?';
+}