/*
* Empire - A multi-player, client/server Internet based war game.
- * Copyright (C) 1986-2009, Dave Pare, Jeff Bailey, Thomas Ruschak,
+ * Copyright (C) 1986-2010, Dave Pare, Jeff Bailey, Thomas Ruschak,
* Ken Stevens, Steve McClure
*
* This program is free software; you can redistribute it and/or modify
static void add_airport(struct emp_qelem *, coord, coord);
static int air_damage(struct emp_qelem *, coord, coord, int, natid,
char *, int);
-static void build_mission_list(struct genlist *, coord, coord, int, natid);
-static void build_mission_list_type(struct genlist *, coord, coord, int,
- int, natid);
+static void build_mission_list(struct genlist[],
+ unsigned char[], unsigned char[],
+ coord, coord, int);
+static void build_mission_list_type(struct genlist[], unsigned char[],
+ coord, coord, int, int);
static void divide(struct emp_qelem *, struct emp_qelem *, coord, coord);
-static int dosupport(struct genlist *, coord, coord, natid, natid);
+static int dosupport(coord, coord, natid, natid, int);
static int find_airport(struct emp_qelem *, coord, coord);
static void mission_pln_arm(struct emp_qelem *, coord, coord, int,
int, struct ichrstr *);
ground_interdict(coord x, coord y, natid victim, char *s)
{
int cn;
- int dam = 0, newdam, rel;
+ int dam = 0, newdam;
+ unsigned char act[MAXNOC];
struct genlist mi[MAXNOC];
memset(mi, 0, sizeof(mi));
- for (cn = 1; cn < MAXNOC; cn++)
+ act[0] = 0;
+ for (cn = 1; cn < MAXNOC; cn++) {
+ act[cn] = relations_with(cn, victim) <= HOSTILE;
emp_initque((struct emp_qelem *)&mi[cn]);
+ }
- build_mission_list(mi, x, y, MI_INTERDICT, victim);
+ build_mission_list(mi, act, act, x, y, MI_INTERDICT);
for (cn = 1; cn < MAXNOC; cn++) {
- rel = getrel(getnatp(cn), victim);
- if (rel > HOSTILE)
- continue;
-
if (QEMPTY(&mi[cn].queue))
continue;
unit_interdict(coord x, coord y, natid victim, char *s, int hardtarget,
int mission)
{
- int cn, newdam, osubs;
+ int cn, rel, newdam, osubs;
int dam = -1;
+ unsigned char plane_act[MAXNOC], other_act[MAXNOC];
struct genlist mi[MAXNOC];
memset(mi, 0, sizeof(mi));
- for (cn = 1; cn < MAXNOC; cn++)
+ other_act[0] = plane_act[0] = 0;
+ for (cn = 1; cn < MAXNOC; cn++) {
+ rel = getrel(getnatp(cn), victim);
+ other_act[cn] = rel <= HOSTILE;
+ plane_act[cn] = mission == MI_SINTERDICT
+ ? cn != victim && rel <= NEUTRAL : other_act[cn];
emp_initque((struct emp_qelem *)&mi[cn]);
+ }
- build_mission_list(mi, x, y, mission, victim);
+ build_mission_list(mi, other_act, plane_act, x, y, mission);
for (cn = 1; cn < MAXNOC; cn++) {
- if (cn == victim)
- continue;
- if (mission == MI_SINTERDICT) {
- if (getrel(getnatp(cn), victim) >= FRIENDLY)
- continue;
- } else if (getrel(getnatp(cn), victim) > HOSTILE)
- continue;
-
if (QEMPTY(&mi[cn].queue))
continue;
int
off_support(coord x, coord y, natid victim, natid actee)
{
- int dam = 0;
- struct genlist mi[MAXNOC];
- int cn;
-
- memset(mi, 0, sizeof(mi));
- for (cn = 1; cn < MAXNOC; cn++)
- emp_initque((struct emp_qelem *)&mi[cn]);
-
- build_mission_list(mi, x, y, MI_SUPPORT, victim);
- build_mission_list(mi, x, y, MI_OSUPPORT, victim);
-
- dam = dosupport(mi, x, y, victim, actee);
- return dam;
+ return dosupport(x, y, victim, actee, MI_OSUPPORT);
}
/*
int
def_support(coord x, coord y, natid victim, natid actee)
{
- int dam = 0;
- struct genlist mi[MAXNOC];
- int cn;
-
- memset(mi, 0, sizeof(mi));
- for (cn = 1; cn < MAXNOC; cn++)
- emp_initque((struct emp_qelem *)&mi[cn]);
-
- build_mission_list(mi, x, y, MI_SUPPORT, victim);
- build_mission_list(mi, x, y, MI_DSUPPORT, victim);
-
- dam = dosupport(mi, x, y, victim, actee);
- return dam;
+ return dosupport(x, y, victim, actee, MI_DSUPPORT);
}
+/*
+ * Perform support missions in X,Y against VICTIM for ACTEE.
+ * MISSION is either MI_OSUPPORT or MI_DSUPPORT.
+ * Return total damage.
+ */
static int
-dosupport(struct genlist *mi, coord x, coord y, natid victim, natid actee)
+dosupport(coord x, coord y, natid victim, natid actee, int mission)
{
int cn;
- int rel, newdam;
+ unsigned char act[MAXNOC];
+ struct genlist mi[MAXNOC];
+ int newdam;
int dam = 0;
+ memset(mi, 0, sizeof(mi));
+ act[0] = 0;
for (cn = 1; cn < MAXNOC; cn++) {
- rel = getrel(getnatp(cn), actee);
- if ((cn != actee) && (rel != ALLIED))
- continue;
- rel = getrel(getnatp(cn), victim);
- if ((cn != actee) && (rel != AT_WAR))
- continue;
+ act[cn] = feels_like_helping(cn, actee, victim);
+ emp_initque((struct emp_qelem *)&mi[cn]);
+ }
+ build_mission_list(mi, act, act, x, y, MI_SUPPORT);
+ build_mission_list(mi, act, act, x, y, mission);
+
+ for (cn = 1; cn < MAXNOC; cn++) {
if (QEMPTY(&mi[cn].queue))
continue;
}
static void
-build_mission_list(struct genlist *mi, coord x, coord y, int mission,
- natid victim)
+build_mission_list(struct genlist mi[],
+ unsigned char other_act[], unsigned char plane_act[],
+ coord x, coord y, int mission)
{
- build_mission_list_type(mi, x, y, mission, EF_LAND, victim);
- build_mission_list_type(mi, x, y, mission, EF_SHIP, victim);
- build_mission_list_type(mi, x, y, mission, EF_PLANE, victim);
+ build_mission_list_type(mi, other_act, x, y, mission, EF_LAND);
+ build_mission_list_type(mi, other_act, x, y, mission, EF_SHIP);
+ build_mission_list_type(mi, plane_act, x, y, mission, EF_PLANE);
}
static void
-build_mission_list_type(struct genlist *mi, coord x, coord y, int mission,
- int type, natid victim)
+build_mission_list_type(struct genlist mi[], unsigned char act[],
+ coord x, coord y, int mission, int type)
{
struct nstr_item ni;
struct genlist *glp;
struct empobj *gp;
union empobj_storage item;
- int relat;
- struct sctstr sect;
snxtitem_all(&ni, type);
while (nxtitem(&ni, &item)) {
gp = (struct empobj *)&item;
- if (gp->own == 0)
+ if (!act[gp->own])
continue;
if (gp->mobil < 1)
(gp->mission != MI_INTERDICT))
continue;
- relat = getrel(getnatp(gp->own), victim);
- if (mission == MI_SINTERDICT) {
- if (relat >= FRIENDLY)
- continue;
- else if (type != EF_PLANE && relat > HOSTILE)
- continue;
- } else if (relat > HOSTILE)
- continue;
-
if (!in_oparea(gp, x, y))
continue;
- if (opt_SLOW_WAR) {
- if (mission != MI_AIR_DEFENSE) {
- getsect(x, y, §);
- if (getrel(getnatp(gp->own), sect.sct_own) > AT_WAR) {
-
- /*
- * If the owner of the unit isn't at war
- * with the victim, and doesn't own the
- * sect being acted upon, and isn't the
- * old owner of that sect, bounce them.
- */
- if (sect.sct_type != SCT_WATER &&
- sect.sct_own != gp->own &&
- sect.sct_oldown != gp->own)
- continue;
- }
- }
- }
-
glp = malloc(sizeof(struct genlist));
memset(glp, 0, sizeof(struct genlist));
glp->thing = malloc(sizeof(item));
targeting_ships);
} else if (glp->thing->ef_type == EF_PLANE) {
pcp = &plchr[glp->thing->type];
- if (pcp->pl_flags & P_M)
- /* units have their own missile interdiction */
- if (hardtarget != SECT_HARDTARGET || pcp->pl_flags & P_MAR)
- continue;
-
- /* save planes for later */
- plp = malloc(sizeof(struct plist));
-
- memset(plp, 0, sizeof(struct plist));
- plp->pcp = pcp;
- memcpy(&plp->plane, glp->thing, sizeof(struct plnstr));
- if (plp->pcp->pl_flags & P_M)
- emp_insque(&plp->queue, &missiles);
- else
- emp_insque(&plp->queue, &bombers);
+ if ((pcp->pl_flags & P_M)
+ && (hardtarget != SECT_HARDTARGET
+ || (pcp->pl_flags & P_MAR)))
+ ; /* units have their own missile interdiction */
+ else {
+ /* save planes for later */
+ plp = malloc(sizeof(struct plist));
+
+ memset(plp, 0, sizeof(struct plist));
+ plp->pcp = pcp;
+ memcpy(&plp->plane, glp->thing, sizeof(struct plnstr));
+ if (plp->pcp->pl_flags & P_M)
+ emp_insque(&plp->queue, &missiles);
+ else
+ emp_insque(&plp->queue, &bombers);
+ }
} else {
CANT_REACH();
break;
}
if (mcp->m_flags & M_SUB) {
if (!targeting_ships)
- return dam; /* subs interdict only ships */
+ return dam; /* subs interdict only ships */
range = roundrange(torprange(sp));
if (md > range)
return dam;
use_up_msl:
plp->plane.pln_effic = 0;
putplane(plp->plane.pln_uid, &plp->plane);
- }
+ }
emp_remque(qp);
free(qp);
}
if (!plp->load)
continue;
- newdam = 0;
if (plp->pcp->pl_flags & P_A) {
if (roll(100) > pln_identchance(pp, hardtarget, EF_SHIP)) {
wu(0, pp->pln_own,
prplane(pp), xyas(x, y, pp->pln_own));
continue;
}
- if (getrel(getnatp(pp->pln_own), victim) > HOSTILE) {
+ if (relations_with(pp->pln_own, victim) > HOSTILE) {
wu(0, pp->pln_own,
"\t%s tracks %s %s at %s\n",
prplane(pp), cname(victim), s, xyas(x, y, pp->pln_own));