git.pond.sub.org Git - empserver/blob - src/lib/common/snxtsct_subs.c

   1 /*
   2  *  Empire - A multi-player, client/server Internet based war game.
   3  *  Copyright (C) 1986-2000, Dave Pare, Jeff Bailey, Thomas Ruschak,
   4  *                           Ken Stevens, Steve McClure
   5  *
   6  *  This program is free software; you can redistribute it and/or modify
   7  *  it under the terms of the GNU General Public License as published by
   8  *  the Free Software Foundation; either version 2 of the License, or
   9  *  (at your option) any later version.
  10  *
  11  *  This program is distributed in the hope that it will be useful,
  12  *  but WITHOUT ANY WARRANTY; without even the implied warranty of
  13  *  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  14  *  GNU General Public License for more details.
  15  *
  16  *  You should have received a copy of the GNU General Public License
  17  *  along with this program; if not, write to the Free Software
  18  *  Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
  19  *
  20  *  ---
  21  *
  22  *  See the "LEGAL", "LICENSE", "CREDITS" and "README" files for all the
  23  *  related information and legal notices. It is expected that any future
  24  *  projects/authors will amend these files as needed.
  25  *
  26  *  ---
  27  *
  28  *  snxtsct_subs.c: arrange sector selection using either distance or area
  29  *
  30  *  Known contributors to this file:
  31  *     Dave Pare, 1989
  32  */
  33 /*
  34  * XXX we can *almost* treat sectors as items, but not quite.
  35  * Items are retrieved using id's, and sectors still use x,y.
  36  */
  37
  38 #include "misc.h"
  39 #include "var.h"
  40 #include "xy.h"
  41 #include "sect.h"
  42 #include "nsc.h"
  43 #include "file.h"
  44 #include "common.h"
  45 #include "optlist.h"
  46
  47 void
  48 snxtsct_all(struct nstr_sect *np)
  49 {
  50   struct range worldrange;
  51
  52   worldrange.lx = -WORLD_X/2;
  53   worldrange.ly = -WORLD_Y/2;
  54   worldrange.hx = WORLD_X/2;
  55   worldrange.hy = WORLD_Y/2;
  56   worldrange.width = worldrange.height = 0;
  57   snxtsct_area(np, &worldrange);
  58 }
  59
  60 void
  61 snxtsct_area(register struct nstr_sect *np, struct range *range)
  62 {
  63         bzero((s_char *)np, sizeof(*np));
  64         np->range = *range;
  65         np->ncond = 0;
  66         np->type = NS_AREA;
  67         np->read = ef_read;
  68         np->x = np->range.lx - 1;
  69         np->y = np->range.ly;
  70         np->dx = -1;
  71         np->dy = 0;
  72         xysize_range(&np->range);
  73         ef_zapcache(EF_SECTOR);
  74 }
  75
  76 void
  77 snxtsct_rewind(struct nstr_sect *np)
  78 {
  79         np->x = np->range.lx - 1;
  80         np->y = np->range.ly;
  81         np->dx = -1;
  82         np->dy = 0;
  83         np->id = -1;
  84         ef_zapcache(EF_SECTOR);
  85 }
  86
  87 void
  88 snxtsct_dist(register struct nstr_sect *np, coord cx, coord cy, int dist)
  89 {
  90         bzero((s_char *)np, sizeof(*np));
  91         xydist_range(cx, cy, dist, &np->range);
  92         np->cx = cx;
  93         np->cy = cy;
  94         np->ncond = 0;
  95         np->dist = dist;
  96         np->type = NS_DIST;
  97         np->read = ef_read;
  98         np->x = np->range.lx - 1;
  99         np->y = np->range.ly;
 100         np->dx = -1;
 101         np->dy = 0;
 102 #if 0
 103         /* This function is now done elsewhere. */
 104         /* It was not doing the right thing when the world was small */
 105         xysize_range(&np->range);
 106 #endif
 107         ef_zapcache(EF_SECTOR);
 108 }
 109
 110 void
 111 xysize_range(register struct range *rp)
 112 {
 113         if (rp->lx >= rp->hx)
 114                 rp->width = WORLD_X + rp->hx - rp->lx;
 115         else
 116                 rp->width = rp->hx - rp->lx;
 117 #ifndef HAY
 118         /* This is a necessary check for small, hitech worlds. */
 119         if (rp->width > WORLD_X)
 120                 rp->width = WORLD_X;
 121 #endif
 122         if (rp->ly >= rp->hy)
 123                 rp->height = WORLD_Y + rp->hy - rp->ly;
 124         else
 125                 rp->height = rp->hy - rp->ly;
 126 #ifndef HAY
 127         /* This is a necessary check for small, hitech worlds. */
 128         if (rp->height > WORLD_Y)
 129                 rp->height = WORLD_Y;
 130 #endif
 131 }
 132
 133 /* This is called also called in snxtitem.c */
 134 void
 135 xydist_range(coord x, coord y, register int dist, struct range *rp)
 136 {
 137         if (dist < WORLD_X/4) {
 138                 rp->lx = xnorm((coord)(x - 2 * dist));
 139                 rp->hx = xnorm((coord)(x + 2 * dist) + 1);
 140                 rp->width = 4 * dist + 1;
 141         } else {
 142                 /* Range is larger than the world */
 143                 /* Make sure we get lx in the right place. */
 144                 rp->lx = xnorm((coord)(x - WORLD_X/2));
 145                 rp->hx = xnorm((coord)(rp->lx + WORLD_X - 1));
 146                 rp->width = WORLD_X;
 147         }
 148
 149         if (dist < WORLD_Y/2) {
 150                 rp->ly = ynorm((coord)(y - dist));
 151                 rp->hy = ynorm((coord)(y + dist) + 1);
 152                 rp->height = 2 * dist + 1;
 153         } else {
 154                 /* Range is larger than the world */
 155                 rp->ly = ynorm((coord)(y - WORLD_Y/2));
 156                 rp->hy = ynorm((coord)(rp->ly + WORLD_Y - 1));
 157                 rp->height = WORLD_Y;
 158         }
 159 }