member cache, which becomes char * to keep pointer arithmetic simple.
};
#define getcomm(n, p) \
- ef_read(EF_COMM, n, (caddr_t)p)
+ ef_read(EF_COMM, n, p)
#define putcomm(n, p) \
- ef_write(EF_COMM, n, (caddr_t)p)
+ ef_write(EF_COMM, n, p)
#endif /* _COMMODITY_H_ */
#define _COMMON_H_
#include <stdio.h> /* FILE */
-#include <sys/types.h> /* caddr_t */
#include "misc.h" /* s_char coord natid */
#include "sect.h" /* struct sctstr */
#include "ship.h" /* struct shpstr */
#if defined(EMP_CONFIG_C_OUTPUT)
#define EMPCFONLYC(fvname, vname, vtype, ctype, num, descr) \
- { (fvname), (ctype), ((caddr_t)&(vname)), (num), (descr) },
+ { (fvname), (ctype), &(vname), (num), (descr) },
#define EMPCFBOTH(fvname, vname, vtype, ctype, num, descr) \
- { (fvname), (ctype), ((caddr_t)&(vname)), (num), (descr) },
+ { (fvname), (ctype), &(vname), (num), (descr) },
#elif defined(EMP_CONFIG_H_OUTPUT)
int baseid; /* starting item in cache */
int cids; /* # ids in cache */
int csize; /* size of cache in bytes */
- caddr_t cache; /* pointer to cache */
+ char *cache; /* pointer to cache */
int fids; /* # of ids in file */
struct castr *cadef; /* ca defs selection list */
};
};
extern struct castr *ef_cadef(int);
-extern int ef_read(int, int, caddr_t);
+extern int ef_read(int, int, void *);
extern s_char *ef_ptr(int, int);
extern s_char *ef_nameof(int);
extern time_t ef_mtime(int);
extern int ef_check(int);
extern int ef_close(int);
extern int ef_flush(int);
-extern int ef_write(int, int, caddr_t);
+extern int ef_write(int, int, void *);
extern int ef_extend(int, int);
extern int ef_ensure_space(int, int, int);
extern void ef_zapcache(int);
extern u_short *ef_items(int, void *);
extern int ef_byname(s_char *);
-extern int ef_nbread(int type, int id, caddr_t ptr);
+extern int ef_nbread(int type, int id, void *ptr);
extern struct empfile empfile[];
#endif /* _FILE_H_ */
#define LND_SPY_DETECT_CHANCE(eff) ((110-(eff))/100.0)
#define getland(n, p) \
- ef_read(EF_LAND, n, (caddr_t)p)
+ ef_read(EF_LAND, n, p)
#define putland(n, p) \
- ef_write(EF_LAND, n, (caddr_t)p)
+ ef_write(EF_LAND, n, p)
#define getlandp(n) \
(struct lndstr *) ef_ptr(EF_LAND, n)
#define LS_SIGNED 2
#define getloan(n, lp) \
- ef_read(EF_LOAN, n, (caddr_t)lp)
+ ef_read(EF_LOAN, n, lp)
#define putloan(n, lp) \
- ef_write(EF_LOAN, n, (caddr_t)lp)
+ ef_write(EF_LOAN, n, lp)
#define getloanp(n) \
(struct lonstr *) ef_ptr(EF_LOAN, n)
time_t lost_timestamp; /* When it was lost */
};
-#define getlost(n, p) ef_read(EF_LOST, n, (caddr_t)p)
-#define putlost(n, p) ef_write(EF_LOST, n, (caddr_t)p)
+#define getlost(n, p) ef_read(EF_LOST, n, p)
+#define putlost(n, p) ef_write(EF_LOST, n, p)
/* src/lib/subs/lostsub.c */
extern int findlost(char, natid, short, coord, coord, int);
#if defined(_WIN32)
typedef unsigned char u_char;
typedef unsigned short u_short;
-typedef char *caddr_t;
typedef unsigned int u_int;
/* integral mismatch, due to misuse of sector short */
/* procedures relating to nation stuff */
#define putnat(n) \
- ef_write(EF_NATION, n->nat_cnum, (caddr_t)n)
+ ef_write(EF_NATION, n->nat_cnum, n)
#define getnatp(n) \
(struct natstr *) ef_ptr(EF_NATION, (int)n)
#define NEWS_PERIOD days(10)
#define getnews(n, p) \
- ef_read(EF_NEWS, n, (caddr_t)p)
+ ef_read(EF_NEWS, n, p)
#define putnews(n, p) \
- ef_write(EF_NEWS, n, (caddr_t)p)
+ ef_write(EF_NEWS, n, p)
#define getnewsp(n) \
(struct nwsstr *) ef_ptr(EF_NEWS, n)
struct range range; /* area of coverage */
int dist; /* dist query: range */
coord cx, cy; /* dist query: center x-y */
- int (*read)(int type, int id, caddr_t ptr); /* read function */
+ int (*read)(int type, int id, void *ptr); /* read function */
int ncond; /* # of selection conditions */
struct nscstr cond[NS_NCOND]; /* selection conditions */
};
int size; /* NS_LIST: size of list */
int index; /* NS_LIST: index */
int list[NS_LSIZE]; /* NS_LIST: item list */
- int (*read)(int type, int id, caddr_t ptr); /* read function */
+ int (*read)(int type, int id, void *ptr); /* read function */
int flags; /* ef_flags(TYPE) */
int ncond; /* # of selection conditions */
struct nscstr cond[NS_NCOND]; /* selection conditions */
#define N_NEUT bit(0) /* Neutron bomb (low damage, high fallout) */
#define getnuke(n, p) \
- ef_read(EF_NUKE, n, (caddr_t)p)
+ ef_read(EF_NUKE, n, p)
#define putnuke(n, p) \
- ef_write(EF_NUKE, n, (caddr_t)p)
+ ef_write(EF_NUKE, n, p)
#define getnukep(n) \
(struct nukstr *) ef_ptr(EF_NUKE, n)
s_char *km_key; /* the key */
void (*km_func)(struct keymatch * kp, s_char **av);
/* the function to call if matches */
- caddr_t km_data; /* associated data */
+ void *km_data; /* associated data */
int km_flags; /* useful flags */
#define KM_ALLOC 0x01 /* memory allocated */
s_char *km_comment; /* Comment (hopefully useful) */
#define P_DEL 2
#define getplane(n, p) \
- ef_read(EF_PLANE, n, (caddr_t)p)
+ ef_read(EF_PLANE, n, p)
#define putplane(n, p) \
- ef_write(EF_PLANE, n, (caddr_t)p)
+ ef_write(EF_PLANE, n, p)
#define getplanep(n) \
(struct plnstr *) ef_ptr(EF_PLANE, n)
};
#define getpower(n, p) \
- ef_read(EF_POWER, n, (caddr_t)p)
+ ef_read(EF_POWER, n, p)
#define putpower(n, p) \
- ef_write(EF_POWER, n, (caddr_t)p)
+ ef_write(EF_POWER, n, p)
#define getpowerp(n) \
(struct powstr *) ef_ptr(EF_POWER, n)
int old, int new);
extern int line_of_sight(char **rad, int ax, int ay, int bx, int by);
extern void plane_sona(struct emp_qelem *, int, int, struct shiplook *);
-extern int tend_nxtitem(struct nstr_item *, caddr_t);
+extern int tend_nxtitem(struct nstr_item *, void *);
extern s_char *prsub(struct shpstr *);
extern int check_trade(void);
extern int ontradingblock(int, int *);
extern void nuk_add(coord, coord, int, int);
extern void nuk_delete(struct nukstr *, int, int);
/* nxtitem.c */
-extern int nxtitem(struct nstr_item *, caddr_t);
+extern int nxtitem(struct nstr_item *, void *);
/* nxtsct.c */
extern int nxtsct(register struct nstr_sect *, struct sctstr *);
/* plane.c */
#define SCT_MAXDEF 34 /* highest sector type in header files */
#define getsect(x, y, p) \
- ef_read(EF_SECTOR, sctoff((int) x, (int) y), (caddr_t)p)
+ ef_read(EF_SECTOR, sctoff((int) x, (int) y), p)
#define putsect(p) \
ef_write(EF_SECTOR, sctoff((int) (p)->sct_x, \
- (int) (p)->sct_y), (caddr_t)p)
+ (int) (p)->sct_y), p)
#define getsectp(x, y) \
(struct sctstr *) ef_ptr(EF_SECTOR, sctoff((int)x, (int)y))
#define getsectid(id) \
#define M_ANTIMISSILE bit(20) /* Shoot down missile */
#define getship(n, p) \
- ef_read(EF_SHIP, n, (caddr_t)p)
+ ef_read(EF_SHIP, n, p)
#define putship(n, p) \
- ef_write(EF_SHIP, n, (caddr_t)p)
+ ef_write(EF_SHIP, n, p)
#define getshipp(n) \
(struct shpstr *) ef_ptr(EF_SHIP, n)
extern double loan_owed(struct lonstr *loan, time_t paytime);
#define gettrade(n, p) \
- ef_read(EF_TRADE, n, (caddr_t)p)
+ ef_read(EF_TRADE, n, p)
#define puttrade(n, p) \
- ef_write(EF_TRADE, n, (caddr_t)p)
+ ef_write(EF_TRADE, n, p)
#define gettradep(n) \
(struct trdstr *) ef_ptr(EF_TRADE, n)
/* global treaty variables */
#define gettre(n, p) \
- ef_read(EF_TREATY, n, (caddr_t)p)
+ ef_read(EF_TREATY, n, p)
#define puttre(n, p) \
- ef_write(EF_TREATY, n, (caddr_t)p)
+ ef_write(EF_TREATY, n, p)
#define gettrep(n) \
(struct trtstr *) ef_ptr(EF_TREATY, n)
pp = &p;
snxtitem_xy(&ni, EF_PLANE, sp->sct_x, sp->sct_y);
- while (nxtitem(&ni, (caddr_t)pp)) {
+ while (nxtitem(&ni, pp)) {
if (pp->pln_own == 0)
continue;
if (pp->pln_ship >= 0)
np = &nuk;
snxtitem_xy(&ni, EF_NUKE, sp->sct_x, sp->sct_y);
- while (nxtitem(&ni, (caddr_t)np)) {
+ while (nxtitem(&ni, np)) {
if (np->nuk_own == 0)
continue;
lp = &l;
snxtitem_xy(&ni, EF_LAND, sp->sct_x, sp->sct_y);
- while (nxtitem(&ni, (caddr_t)lp)) {
+ while (nxtitem(&ni, lp)) {
if (lp->lnd_own == 0)
continue;
if (lp->lnd_ship == 0)
pp = &p;
snxtitem_xy(&ni, EF_PLANE, sp->shp_x, sp->shp_y);
- while (nxtitem(&ni, (caddr_t)pp)) {
+ while (nxtitem(&ni, pp)) {
if (pp->pln_own == 0)
continue;
if (pp->pln_flags & PLN_LAUNCHED)
lp = &l;
snxtitem_xy(&ni, EF_LAND, sp->shp_x, sp->shp_y);
- while (nxtitem(&ni, (caddr_t)lp)) {
+ while (nxtitem(&ni, lp)) {
if (lp->lnd_own == 0)
continue;
if (lp->lnd_ship != sp->shp_uid)
sprintf(prompt, "%s number? ", ltcp->Name);
if ((ltcp->num = onearg(player->argp[2], prompt)) < 0)
return RET_SYN;
- if (!ef_read(ltcp->type, ltcp->num, (caddr_t)<cp->u) ||
+ if (!ef_read(ltcp->type, ltcp->num, <cp->u) ||
!(ltcp->type == EF_TREATY
? distrea(ltcp->num, <cp->u.t)
: disloan(ltcp->num, <cp->u.l))) {
pr("%s %d is still pending.\n", ltcp->Name, ltcp->num);
return RET_OK;
}
- if (!getloan(ltcp->num, (caddr_t)lp)) {
+ if (!getloan(ltcp->num, lp)) {
pr("loan_accept: can't read loan; get help!\n");
return RET_SYS;
}
prdate();
pr("Loan From To Rate Dur Paid Total\n");
snxtitem(&ni, EF_LOAN, "*");
- while (nxtitem(&ni, (caddr_t)&loan)) {
+ while (nxtitem(&ni, &loan)) {
if (loan.l_status != LS_SIGNED)
continue;
pr(" %-2d (%3d) %-8.8s (%3d) %-8.8s ", ni.cur,
}
goodtarget = 0;
snxtitem_dist(&ni, EF_PLANE, sx, sy, 0);
- while (!goodtarget && nxtitem(&ni, (caddr_t)&plane)) {
+ while (!goodtarget && nxtitem(&ni, &plane)) {
if (!plane.pln_own)
continue;
if (!(plane.pln_flags & PLN_LAUNCHED))
return 0;
dam = 0;
snxtitem_dist(&ni, EF_SHIP, ax, ay, 8);
- while (nxtitem(&ni, (caddr_t)&ship)) {
+ while (nxtitem(&ni, &ship)) {
if (ship.shp_own == 0)
continue;
}
}
snxtitem_dist(&ni, EF_LAND, ax, ay, 8);
- while (nxtitem(&ni, (caddr_t)&land)) {
+ while (nxtitem(&ni, &land)) {
if (land.lnd_own == 0)
continue;
if (land.lnd_effic < LAND_MINFIREEFF)
}
memset(visbuf, 0, (WORLD_Y * (WORLD_X + 1)));
snxtitem_dist(&nit, EF_SHIP, ship.shp_x, ship.shp_y, range);
- while (nxtitem(&nit, (caddr_t)&targ)) {
+ while (nxtitem(&nit, &targ)) {
if (targ.shp_own == player->cnum || targ.shp_own == 0)
continue;
*/
int
-tend_nxtitem(struct nstr_item *np, caddr_t ptr)
+tend_nxtitem(struct nstr_item *np, void *ptr)
{
struct genitem *gp;
int selected;
snxtitem_xy(&nstr, EF_NUKE, sect.sct_x, sect.sct_y);
#endif
found = 0;
- while (nxtitem(&nstr, (caddr_t)&nuke)) {
+ while (nxtitem(&nstr, &nuke)) {
if (player->owner) {
found = 1;
break;
* This system won't work if item size is > sizeof buffer area.
*/
int
-ef_read(int type, int id, caddr_t ptr)
+ef_read(int type, int id, void *ptr)
{
register struct empfile *ep;
- caddr_t from;
+ void *from;
if (ef_check(type) < 0)
return 0;
* zaps read cache
*/
int
-ef_nbread(int type, int id, caddr_t ptr)
+ef_nbread(int type, int id, void *ptr)
{
register struct empfile *ep;
int r;
* and writes through to disk.
*/
int
-ef_write(int type, int id, caddr_t ptr)
+ef_write(int type, int id, void *ptr)
{
register int r;
register struct empfile *ep;
* zaps read cache
*/
int
-ef_nbwrite(int type, int id, caddr_t ptr)
+ef_nbwrite(int type, int id, void *ptr)
{
register struct empfile *ep;
register int r;
return RET_OK;
if (map_flags & MAP_PLANE) {
snxtitem_all(&ni, EF_PLANE);
- while (nxtitem(&ni, (caddr_t)&plane)) {
+ while (nxtitem(&ni, &plane)) {
if (plane.pln_own == 0)
continue;
if (plane.pln_own != player->cnum && !player->god)
}
if (map_flags & MAP_SHIP) {
snxtitem_all(&ni, EF_SHIP);
- while (nxtitem(&ni, (caddr_t)&ship)) {
+ while (nxtitem(&ni, &ship)) {
if (ship.shp_own == 0)
continue;
if (ship.shp_own != player->cnum && !player->god)
}
if (map_flags & MAP_LAND) {
snxtitem_all(&ni, EF_LAND);
- while (nxtitem(&ni, (caddr_t)&land)) {
+ while (nxtitem(&ni, &land)) {
if (land.lnd_own == 0)
continue;
if (land.lnd_own != player->cnum && !player->god)
}
}
snxtitem_dist(&ni, EF_PLANE, x, y, rad);
- while (nxtitem(&ni, (caddr_t)&plane)) {
+ while (nxtitem(&ni, &plane)) {
/* Nukes falling on water affect only 1 sector */
if ((plane.pln_x != x) && issea)
continue;
putplane(ni.cur, &plane);
}
snxtitem_dist(&ni, EF_LAND, x, y, rad);
- while (nxtitem(&ni, (caddr_t)&land)) {
+ while (nxtitem(&ni, &land)) {
/* Nukes falling on water affect only 1 sector */
if ((land.lnd_x != x) && issea)
continue;
putland(land.lnd_uid, &land);
}
snxtitem_dist(&ni, EF_SHIP, x, y, rad);
- while (nxtitem(&ni, (caddr_t)&ship)) {
+ while (nxtitem(&ni, &ship)) {
/* Nukes falling on water affect only 1 sector */
if ((ship.shp_x != x) && issea)
continue;
putship(ship.shp_uid, &ship);
}
snxtitem_dist(&ni, EF_NUKE, x, y, rad);
- while (nxtitem(&ni, (caddr_t)&nuke)) {
+ while (nxtitem(&ni, &nuke)) {
/* Nukes falling on water affect only 1 sector */
if ((nuke.nuk_x != x) && issea)
continue;
return 0;
eff = 1.0;
snxtitem_dist(&ni, EF_SHIP, x, y, 8);
- while (nxtitem(&ni, (caddr_t)&ship) && eff > 0.30) {
+ while (nxtitem(&ni, &ship) && eff > 0.30) {
if (ship.shp_own == att)
continue;
if (ship.shp_own == 0)
#include "prototypes.h"
int
-nxtitem(struct nstr_item *np, caddr_t ptr)
+nxtitem(struct nstr_item *np, void *ptr)
{
struct genitem *gp;
int selected;
continue;
}
np->id = sctoff(np->x, np->y);
- if (!np->read(EF_SECTOR, np->id, (caddr_t)sp))
+ if (!np->read(EF_SECTOR, np->id, sp))
continue;
if (np->ncond == 0)
return 1;
if (!pr_flag)
return;
snxtitem_dist(&ni, EF_PLANE, cx, cy, range);
- while (nxtitem(&ni, (caddr_t)&plane)) {
+ while (nxtitem(&ni, &plane)) {
if (plane.pln_own == 0)
continue;
/* Used to have 'ghosts' when scanning whole world --ts */
}
}
snxtitem_dist(&ni, EF_SHIP, cx, cy, range);
- while (nxtitem(&ni, (caddr_t)&ship)) {
+ while (nxtitem(&ni, &ship)) {
if (ship.shp_own == 0)
continue;
/* Used to have 'ghosts' when scanning whole world --ts */
pr(" own shp# ship type sector eff\n");
}
}
- while (nxtitem(&ni, (caddr_t)&ship)) {
+ while (nxtitem(&ni, &ship)) {
if (ship.shp_own == 0)
continue;
if ((mchr[(int)ship.shp_type].m_flags & M_SUB) &&
prdate();
pr(" own lnd# unit type sector eff\n");
}
- while (nxtitem(&ni, (caddr_t)&land)) {
+ while (nxtitem(&ni, &land)) {
if (land.lnd_own == 0)
continue;
if (!chance((double)land.lnd_effic / 20.0))
return;
snxtitem_xy(&ni, EF_SHIP, sp->sct_x, sp->sct_y);
first = 1;
- while (nxtitem(&ni, (caddr_t)&ship)) {
+ while (nxtitem(&ni, &ship)) {
if (ship.shp_own == 0)
continue;
if (mchr[(int)ship.shp_type].m_flags & M_SUB)
snxtitem_xy(&ni, EF_LAND, sp->sct_x, sp->sct_y);
first = 1;
- while (nxtitem(&ni, (caddr_t)&land)) {
+ while (nxtitem(&ni, &land)) {
if (land.lnd_own == 0)
continue;
if (!chance((double)land.lnd_effic / 20.0))
snxtitem_dist(&ni, EF_SHIP, dx, dy, 1);
- while (nxtitem(&ni, (caddr_t)&ship)) {
+ while (nxtitem(&ni, &ship)) {
if (!ship.shp_own)
continue;
pp = &p;
/* Take over planes */
snxtitem_dist(&ni, EF_PLANE, sp->sct_x, sp->sct_y, 0);
- while (nxtitem(&ni, (caddr_t)pp)) {
+ while (nxtitem(&ni, pp)) {
if (pp->pln_own != sp->sct_own)
continue;
takeover_plane(pp, newown);
/* Take over land units */
lp = &land;
snxtitem_dist(&ni, EF_LAND, sp->sct_x, sp->sct_y, 0);
- while (nxtitem(&ni, (caddr_t)lp)) {
+ while (nxtitem(&ni, lp)) {
if ((lp->lnd_own == newown) || (lp->lnd_own == 0))
continue;
if (lp->lnd_own != sp->sct_own)
lp = &llp;
/* Take over planes */
snxtitem_all(&ni, EF_PLANE);
- while (nxtitem(&ni, (caddr_t)pp)) {
+ while (nxtitem(&ni, pp)) {
if (pp->pln_ship != sp->shp_uid)
continue;
if (pp->pln_own == 0)
}
/* Take over land units */
snxtitem_all(&ni, EF_LAND);
- while (nxtitem(&ni, (caddr_t)lp)) {
+ while (nxtitem(&ni, lp)) {
if (lp->lnd_ship != sp->shp_uid)
continue;
if (lp->lnd_own == 0)
lp = &llp;
/* Take over planes */
snxtitem_all(&ni, EF_PLANE);
- while (nxtitem(&ni, (caddr_t)pp)) {
+ while (nxtitem(&ni, pp)) {
if (pp->pln_land != landp->lnd_uid)
continue;
if (pp->pln_own == 0)
}
/* Take over land units */
snxtitem_all(&ni, EF_LAND);
- while (nxtitem(&ni, (caddr_t)lp)) {
+ while (nxtitem(&ni, lp)) {
if (lp->lnd_land != landp->lnd_uid)
continue;
if (lp->lnd_own == 0)
tel.tel_length = len;
tel.tel_type = type;
#if !defined(_WIN32)
- iov[0].iov_base = (caddr_t)&tel;
+ iov[0].iov_base = &tel;
iov[0].iov_len = sizeof(tel);
iov[1].iov_base = message;
iov[1].iov_len = len;
# indent needs to know type names do to a proper job.
# Type names located with grep typedef, then extracted by hand:
-types="caddr_t coord empth_sem_t empth_t loc_Sem_t loc_Thread_t natid ns_seltype nsc_cat nsc_flags nsc_type packed_nsc_cat packed_nsc_type qsort_func_t s_char stkalign_t u_char u_int u_short"
+types="coord empth_sem_t empth_t loc_Sem_t loc_Thread_t natid ns_seltype nsc_cat nsc_flags nsc_type packed_nsc_cat packed_nsc_type qsort_func_t s_char stkalign_t u_char u_int u_short"
opts="-kr -cdw -cp8 -ncs -psl -ss"
for t in $types