]> git.pond.sub.org Git - empserver/blobdiff - src/lib/subs/paths.c
New macro ARRAY_SIZE()
[empserver] / src / lib / subs / paths.c
index 0dc056ffe6beeb70f71960d52a4c625a74007e18..23bd3bb5641cb9b69c4d7449a63ac7e29698921b 100644 (file)
@@ -1,11 +1,11 @@
 /*
  *  Empire - A multi-player, client/server Internet based war game.
- *  Copyright (C) 1986-2005, Dave Pare, Jeff Bailey, Thomas Ruschak,
- *                           Ken Stevens, Steve McClure
+ *  Copyright (C) 1986-2020, 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.
  *
  *  ---
  *
- *  path.c: Routines associated with paths, directions, etc.
- * 
+ *  paths.c: Routines associated with paths, directions, etc.
+ *
  *  Known contributors to this file:
- *   
+ *     Markus Armbruster, 2005-2020
  */
 
-#include "misc.h"
-#include "player.h"
-#include "xy.h"
+#include <config.h>
+
+#include "optlist.h"
 #include "path.h"
-#include "nat.h"
-#include "sect.h"
-#include "file.h"
+#include "player.h"
 #include "prototypes.h"
+#include "sect.h"
 
 int
-chkdir(s_char dir_char, int min_dir, int max_dir)
+chkdir(char dir_char, int min_dir, int max_dir)
 {
-    register int i;
+    int i;
 
     for (i = min_dir; i <= max_dir; i++)
        if (dir_char == dirch[i])
@@ -52,30 +50,30 @@ chkdir(s_char dir_char, int min_dir, int max_dir)
 }
 
 void
-direrr(s_char *stop_msg, s_char *view_msg, s_char *map_msg)
+direrr(char *stop_msg, char *view_msg, char *map_msg)
 {
     pr("Legal directions are:\n");
     pr(" %c %c\n", dirch[DIR_UL], dirch[DIR_UR]);
     pr("%c   %c\n", dirch[DIR_L], dirch[DIR_R]);
     pr(" %c %c\n", dirch[DIR_DL], dirch[DIR_DR]);
-    if (stop_msg != 0)
+    if (stop_msg)
        pr(stop_msg, dirch[DIR_STOP]);
-    if (view_msg != 0)
+    if (view_msg)
        pr(view_msg, dirch[DIR_VIEW]);
-    if (map_msg != 0)
+    if (map_msg)
        pr(map_msg, dirch[DIR_MAP]);
 }
 
 /*
- * Map direction DIR to a direction index DIR_STOP..DIR_LAST.
- * DIR must be a valid direction.
+ * Map direction @dir to a direction index DIR_STOP..DIR_LAST.
+ * @dir must be a valid direction.
  */
 int
 diridx(char dir)
 {
     unsigned i = dir - 'a';
 
-    if (CANT_HAPPEN(i >= sizeof(dirindex) / sizeof(*dirindex)
+    if (CANT_HAPPEN(i >= ARRAY_SIZE(dirindex)
                    || dirindex[i] < 0))
        return DIR_STOP;
     return dirindex[i];
@@ -89,17 +87,18 @@ diridx(char dir)
  * which do not accept partial moves.
  */
 char *
-getpath(char *buf, char *arg, coord x, coord y, int onlyown,
-       int showdes, int destinations)
+getpath(char *buf, char *arg, coord x, coord y, int onlyown, int showdes,
+       int mobtype)
 {
+    char buf2[1024];
     char *p = buf;
     char *bp;
+    size_t len;
     char prompt[128];
     coord dx, dy;
-    struct sctstr sect, dsect;
+    struct sctstr sect;
     coord nx, ny;
     int dir;
-    double mv_cost;
 
     if (arg) {
        strncpy(buf, arg, MAX_PATH_LEN - 1);
@@ -109,67 +108,46 @@ getpath(char *buf, char *arg, coord x, coord y, int onlyown,
     }
 
     getsect(x, y, &sect);
-    nx = x;
-    ny = y;
 
-  more:
+more:
     while (*p) {
        if (sarg_xy(p, &dx, &dy)) {
-           bp = 0;
-           if (destinations == P_NONE) {
-               pr("Destination sectors not allowed here!\n");
-               *p = 0;
-           }
-           if (getsect(dx, dy, &dsect)) {
-               if (destinations == P_WALKING) {
-                   bp = BestLandPath(p, &sect, &dsect,
-                                     &mv_cost, MOB_ROAD);
-               } else if (destinations == P_FLYING) {
-                   bp = BestAirPath(p, nx, ny, dx, dy);
-               }
-           } else {
-               pr("Invalid destination sector!\n");
-               *p = 0;
-           }
-           if (bp) {
-               pr("Using best path  '%s'\n", p);
-               pr("Using total path '%s'\n", buf);
-               return buf;
-           } else {
+           if (path_find(x, y, dx, dy, player->cnum, mobtype) < 0) {
                pr("Can't get to %s from here!\n",
                   xyas(dx, dy, player->cnum));
-               *p = 0;
+               break;
            }
-           break;
+           len = path_find_route(p, buf + MAX_PATH_LEN - p, x, y, dx, dy);
+           if (p + len >= buf + MAX_PATH_LEN) {
+               pr("Can't handle path to %s, it's too long, sorry.\n",
+                  xyas(dx, dy, player->cnum));
+               break;
+           }
+           pr("Using best path  '%s'\n", p);
+           pr("Using total path '%s'\n", buf);
+           return buf;
        }
        dir = chkdir(*p, DIR_STOP, DIR_LAST);
        if (dir < 0) {
            pr("\"%c\" is not legal...", *p);
            direrr("'%c' to stop\n", NULL, NULL);
-           *p = 0;
            break;
        }
        nx = x + diroff[dir][0];
        ny = y + diroff[dir][1];
        getsect(nx, ny, &sect);
        if (onlyown && sect.sct_own != player->cnum) {
-           *p = 0;
            pr("You don't own %s; you can't go there!\n",
               xyas(nx, ny, player->cnum));
            break;
        }
-       if (dir == DIR_STOP || dir == DIR_MAP) {
-           p[1] = 0;
-           return buf;
-       }
-       if (++p - buf == MAX_PATH_LEN) {
-           pr("Path length may not exceed %d.\n", MAX_PATH_LEN);
-           pr("Aborting...\n");
-           *buf = 0;
+       if (dir == DIR_STOP) {
+           *p = 0;
            return buf;
        }
-       x = nx;
-       y = ny;
+       ++p;
+       x = sect.sct_x;
+       y = sect.sct_y;
     }
     fly_map(x, y);
     if (showdes) {
@@ -180,12 +158,18 @@ getpath(char *buf, char *arg, coord x, coord y, int onlyown,
        sprintf(prompt, "<%d: %s> ", (int)(p - buf),
                xyas(x, y, player->cnum));
     }
-    if (!(bp = getstring(prompt, p)) || !*bp) {
-       if (player->aborted)
-           *buf = 0;
-       return buf;
+    bp = getstring(prompt, buf2);
+    if (!bp)
+       return NULL;
+    if (p + strlen(bp) + 1 >= buf + MAX_PATH_LEN) {
+       pr("Path length may not exceed %d.\n", MAX_PATH_LEN);
+       pr("Aborting...\n");
+       return NULL;
     }
-    goto more;
+    strcpy(p, bp);
+    if (*bp)
+       goto more;
+    return buf[0] ? buf : NULL;
 }
 
 /*
@@ -213,11 +197,11 @@ ncost(struct sctstr *sp, natid own)
  * movement cost it takes to get there.
  */
 double
-pathtoxy(s_char *path, coord *xp, coord *yp,
-        double (*cost) (struct sctstr *, natid))
+pathtoxy(char *path, coord *xp, coord *yp,
+        double (*cost)(struct sctstr *, natid))
 {
     struct sctstr s;
-    s_char *pp;
+    char *pp;
     coord x;
     coord y;
     int val;
@@ -241,34 +225,36 @@ pathtoxy(s_char *path, coord *xp, coord *yp,
 }
 
 void
-pathrange(coord cx, coord cy, s_char *pp, int border, struct range *range)
+pathrange(coord cx, coord cy, char *pp, int border, struct range *range)
 {
-    int dir;
+    int dir, lx, ly, hx, hy;
 
-    range->lx = cx;
-    range->hx = cx;
-    range->ly = cy;
-    range->hy = cy;
-    range->width = 0;
-    range->height = 0;
+    lx = hx = cx;
+    ly = hy = cy;
     for (; *pp; pp++) {
        dir = diridx(*pp);
        if (dir == DIR_STOP)
            break;
        cx += diroff[dir][0];
        cy += diroff[dir][1];
-       if (cx < range->lx)
-           range->lx = cx;
-       if (cx > range->hx)
-           range->hx = cx;
-       if (cy < range->ly)
-           range->ly = cy;
-       if (cy > range->hy)
-           range->hy = cy;
+       if (cx < lx)
+           lx = cx;
+       if (cx > hx)
+           hx = cx;
+       if (cy < ly)
+           ly = cy;
+       if (cy > hy)
+           hy = cy;
     }
-    range->lx = xnorm(range->lx - border * 2);
-    range->ly = ynorm(range->ly - border);
-    range->hx = xnorm(range->hx + border * 2 + 1);
-    range->hy = ynorm(range->hy + border + 1);
+
+    lx -= border * 2;
+    hx += border * 2;
+    ly -= border;
+    hy += border;
+
+    range->lx = xnorm(lx);
+    range->hx = xnorm(hx - lx < WORLD_X ? hx : lx - 1);
+    range->ly = ynorm(ly);
+    range->hy = ynorm(hy - ly < WORLD_Y ? hy : ly - 1);
     xysize_range(range);
 }