]> git.pond.sub.org Git - empserver/blobdiff - src/lib/common/maps.c
Update copyright notice.
[empserver] / src / lib / common / maps.c
index 796c642f47047142119cbe1ff8d72f4e56f96ade..9b028e903f9a97e0d0040aa49ae69ffe89925898 100644 (file)
@@ -1,6 +1,6 @@
 /*
  *  Empire - A multi-player, client/server Internet based war game.
- *  Copyright (C) 1986-2006, Dave Pare, Jeff Bailey, Thomas Ruschak,
+ *  Copyright (C) 1986-2007, Dave Pare, Jeff Bailey, Thomas Ruschak,
  *                           Ken Stevens, Steve McClure
  *
  *  This program is free software; you can redistribute it and/or modify
 
 #include <config.h>
 
+#include <ctype.h>
+#include "com.h"
+#include "empobj.h"
+#include "file.h"
+#include "land.h"
+#include "map.h"
 #include "misc.h"
+#include "nat.h"
+#include "nsc.h"
+#include "nuke.h"
+#include "optlist.h"
+#include "plane.h"
 #include "player.h"
+#include "prototypes.h"
 #include "sect.h"
-#include "xy.h"
-#include "nsc.h"
-#include "file.h"
-#include "nat.h"
-#include "map.h"
 #include "ship.h"
-#include "land.h"
-#include "plane.h"
-#include "common.h"
-#include "gen.h"
-#include "subs.h"
-#include "optlist.h"
+#include "xy.h"
 
 static int bmnxtsct(struct nstr_sect *);
 static char map_char(unsigned char type, natid own, int owner_or_god);
 
+int
+do_map(int bmap, int unit_type, char *arg, char *map_flags_arg)
+{
+    struct nstr_sect ns;
+    char origin = '\0';
+    char *b;
+    int map_flags = 0;
+
+    if (!snxtsct(&ns, arg)) {
+       if (unit_map(unit_type, atoi(arg), &ns, &origin))
+           return RET_FAIL;
+    }
+    for (b = map_flags_arg; b && *b; b++) {
+       switch (*b) {
+       case 's':
+       case 'S':
+           map_flags |= MAP_SHIP;
+           break;
+       case 'l':
+       case 'L':
+           map_flags |= MAP_LAND;
+           break;
+       case 'p':
+       case 'P':
+           map_flags |= MAP_PLANE;
+           break;
+       case 'n':
+       case 'N':
+           map_flags |= MAP_NUKE;
+           break;
+       case 'h':
+       case 'H':
+           map_flags |= MAP_HIGH;
+           break;
+       case '*':
+           map_flags |= MAP_ALL;
+           break;
+       case 't':
+           if (bmap != 'b')
+               goto bad_flag;
+           bmap = 't';
+           *(b + 1) = 0;
+           break;
+       case 'r':
+           if (bmap != 'b')
+               goto bad_flag;
+           bmap = 'r';
+           *(b + 1) = 0;
+           break;
+       default:
+       bad_flag:
+           pr("Bad flag %c!\n", *b);
+           break;
+       }
+    }
+    return draw_map(bmap, origin, map_flags, &ns);
+}
+
 int
 draw_map(int bmap, char origin, int map_flags, struct nstr_sect *nsp)
 {
     struct natstr *np;
     struct range range;
     struct nstr_item ni;
-    struct shpstr ship;
-    struct lndstr land;
-    struct plnstr plane;
+    union empobj_storage unit;
     coord x, y;
     int i;
     /* Note this is not re-entrant anyway, so we keep the buffers
@@ -69,6 +127,9 @@ draw_map(int bmap, char origin, int map_flags, struct nstr_sect *nsp)
     static unsigned char *bitmap = NULL;
     static char *wmapbuf = NULL;
     static char **wmap = NULL;
+    static int ef_mappable[] = { EF_PLANE, EF_SHIP, EF_LAND, EF_NUKE, EF_BAD };
+    static int ef_unit_map[] = { MAP_PLANE, MAP_SHIP, MAP_LAND, MAP_NUKE };
+    char *name;
 
     if (!wmapbuf)
        wmapbuf = malloc(WORLD_Y * MAPWIDTH(1));
@@ -172,53 +233,34 @@ draw_map(int bmap, char origin, int map_flags, struct nstr_sect *nsp)
     }
     if (player->aborted)
        return RET_OK;
-    if (map_flags & MAP_PLANE) {
-       snxtitem_all(&ni, EF_PLANE);
-       while (nxtitem(&ni, &plane)) {
-           if (plane.pln_own == 0)
-               continue;
-           if (plane.pln_own != player->cnum && !player->god)
-               continue;
-           if (!xyinrange(plane.pln_x, plane.pln_y, &nsp->range))
-               continue;
 
-           x = xnorm(plane.pln_x - nsp->range.lx);
-           y = ynorm(plane.pln_y - nsp->range.ly);
-           wmap[y][x] = (*plchr[(int)plane.pln_type].pl_name) & ~0x20;
-       }
-    }
-    if (map_flags & MAP_SHIP) {
-       snxtitem_all(&ni, EF_SHIP);
-       while (nxtitem(&ni, &ship)) {
-           if (ship.shp_own == 0)
-               continue;
-           if (ship.shp_own != player->cnum && !player->god)
-               continue;
-           if (!xyinrange(ship.shp_x, ship.shp_y, &nsp->range))
-               continue;
+    i = 0;
+    while (ef_mappable[i] != EF_BAD) {
+       if (map_flags & ef_unit_map[i]) {
+           snxtitem_all(&ni, ef_mappable[i]);
+           while (nxtitem(&ni, &unit)) {
+               if (unit.gen.own == 0)
+                   continue;
+               if (unit.gen.own != player->cnum && !player->god)
+                   continue;
+               if (!xyinrange(unit.gen.x, unit.gen.y, &nsp->range))
+                   continue;
 
-           x = xnorm(ship.shp_x - nsp->range.lx);
-           y = ynorm(ship.shp_y - nsp->range.ly);
-           wmap[y][x] = (*mchr[(int)ship.shp_type].m_name) & ~0x20;
-       }
-    }
-    if (map_flags & MAP_LAND) {
-       snxtitem_all(&ni, EF_LAND);
-       while (nxtitem(&ni, &land)) {
-           if (land.lnd_own == 0)
-               continue;
-           if (land.lnd_own != player->cnum && !player->god)
-               continue;
-           if (!xyinrange(land.lnd_x, land.lnd_y, &nsp->range))
-               continue;
+               x = xnorm(unit.gen.x - nsp->range.lx);
+               y = ynorm(unit.gen.y - nsp->range.ly);
 
-           x = xnorm(land.lnd_x - nsp->range.lx);
-           y = ynorm(land.lnd_y - nsp->range.ly);
-           wmap[y][x] = (*lchr[(int)land.lnd_type].l_name) & ~0x20;
+               if (ef_mappable[i] == EF_NUKE)
+                   wmap[y][x] = 'N';
+               else {
+                   if ((name = emp_obj_chr_name(&unit.gen)) == NULL)
+                       return RET_FAIL;
+                   wmap[y][x] = *name & ~0x20;
+               }
+           }
        }
+       i++;
     }
     if (map_flags & MAP_HIGH) {
-       char *ptr;
        struct sctstr sect;
 
        snxtsct_rewind(nsp);
@@ -229,9 +271,8 @@ draw_map(int bmap, char origin, int map_flags, struct nstr_sect *nsp)
        while (nxtsct(nsp, &sect) && !player->aborted) {
            if (!player->god && !emp_getbit(nsp->x, nsp->y, bitmap))
                continue;
-           ptr = &wmap[nsp->dy][nsp->dx];
            if (sect.sct_own == player->cnum)
-                *ptr |= 0x80;
+                wmap[nsp->dy][nsp->dx] |= 0x80;
        }
     }
     if (origin)
@@ -290,10 +331,8 @@ bmnxtsct(struct nstr_sect *np)
 static char
 map_char(unsigned char type, natid own, int owner_or_god)
 {
-    if (type > SCT_MAXDEF) {
-       logerror("bad sector type %d\n", type);
+    if (CANT_HAPPEN(type > SCT_TYPE_MAX || !dchr[type].d_mnem))
        return '?';
-    }
     if (owner_or_god
        || type == SCT_WATER || type == SCT_MOUNT || type == SCT_WASTE
        || (!own && (type == SCT_RURAL || type == SCT_PLAINS)))
@@ -304,27 +343,20 @@ map_char(unsigned char type, natid own, int owner_or_god)
 int
 unit_map(int unit_type, int uid, struct nstr_sect *nsp, char *originp)
 {
-    struct shpstr origs;
-    struct lndstr origl;
-    struct plnstr origp;
-    struct genitem *gp;
+    struct empobj *gp;
     struct range range;
+    char *name;
 
-    if (unit_type == EF_LAND) {
-       if (!getland(uid, &origl) || !player->owner || origl.lnd_own == 0)
-           return RET_FAIL;
-       gp = (struct genitem *)&origl;
-       *originp = *lchr[(int)origl.lnd_type].l_name;
-    } else if (unit_type == EF_PLANE) {
-       if (!getplane(uid, &origp) || !player->owner || origp.pln_own == 0)
-           return RET_FAIL;
-       gp = (struct genitem *)&origp;
-       *originp = *plchr[(int)origp.pln_type].pl_name;
-    } else {
-       if (!getship(uid, &origs) || !player->owner || origs.shp_own == 0)
+    gp = get_empobjp(unit_type, uid);
+    if (!gp || (gp->own != player->cnum && !player->god) || gp->own == 0)
+       return RET_FAIL;
+
+    if (unit_type == EF_NUKE)
+       *originp = 'n';
+    else {
+       if ((name = emp_obj_chr_name(gp)) == NULL)
            return RET_FAIL;
-       gp = (struct genitem *)&origs;
-       *originp = *mchr[(int)origs.shp_type].m_name;
+       *originp = *name;
     }
 
     range.lx = xnorm(gp->x - 10);
@@ -336,6 +368,33 @@ unit_map(int unit_type, int uid, struct nstr_sect *nsp, char *originp)
     return RET_OK;
 }
 
+int
+display_region_map(int bmap, int unit_type, coord curx, coord cury,
+                  char *arg)
+{
+    char coordinates[80];
+    char *map_flag_arg;
+
+    if (!arg || !*arg) {
+       struct natstr *np;
+
+       np = getnatp(player->cnum);
+       sprintf(coordinates, "%d:%d,%d:%d",
+           xrel(np, curx - 10), xrel(np, curx + 11),
+           yrel(np, cury - 5), yrel(np, cury + 6));
+       arg = coordinates;
+       map_flag_arg = NULL;
+    } else {
+       map_flag_arg = strchr(arg, ' ');
+       if (map_flag_arg != NULL) {
+           *map_flag_arg++  = '\0';
+           while (isspace(*map_flag_arg)) map_flag_arg++;
+       }
+    }
+    player->condarg = NULL;
+    return do_map(bmap, unit_type, arg, map_flag_arg);
+}
+
 int
 bmaps_intersect(natid a, natid b)
 {