COPYING duplicates information from README. Remove. Move GPL from

[empserver] / src / lib / update / main.c

diff --git a/src/lib/update/main.c b/src/lib/update/main.c
index 1082aaa6cd41442780eb92d50115b2dc625156ac..9e90de9fab61ed6ab38842db61955c301b19f7cd 100644 (file)
--- a/src/lib/update/main.c
+++ b/src/lib/update/main.c
@@ -1,6 +1,6 @@
 /*
  *  Empire - A multi-player, client/server Internet based war game.
- *  Copyright (C) 1986-2000, Dave Pare, Jeff Bailey, Thomas Ruschak,
+ *  Copyright (C) 1986-2006, Dave Pare, Jeff Bailey, Thomas Ruschak,
  *                           Ken Stevens, Steve McClure
  *
  *  This program is free software; you can redistribute it and/or modify
@@ -19,9 +19,9 @@
  *
  *  ---
  *
- *  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.
  *
  *  ---
  *
@@ -33,19 +33,20 @@
  *     Doug Hay, 1998
  */
 
+#include <config.h>
+
 #include "misc.h"
 #include "nat.h"
 #include "file.h"
 #include "sect.h"
 #include "player.h"
 #include "empthread.h"
-#include "var.h"
 #include "budg.h"
-#include "product.h"
 #include "player.h"
 #include "update.h"
 #include "common.h"
 #include "optlist.h"
+#include "server.h"
 #include <stdlib.h>
 #if !defined(_WIN32)
 #include <sys/time.h>
@@ -58,15 +59,15 @@ long lnd_money[MAXNOC];
 long air_money[MAXNOC];
 long tpops[MAXNOC];
 
-extern int mil_dbl_pay;
 int update_pending = 0;
 
+static void do_prod(int, int, int, int *, long int (*)[2], int *, int *,
+                   int *, int *, int *, int *);
+
 /*ARGSUSED*/
 void
-update_main(void *argv)
+update_main(void *unused)
 {
-    extern int etu_per_update;
-    extern double money_res;
     int etu = etu_per_update;
     int n;
     int x;
@@ -75,6 +76,9 @@ update_main(void *argv)
     struct natstr *cnp;
     struct natstr *np;
 
+    if (CANT_HAPPEN(!update_pending))
+        update_pending = 1;
+
     /* First, make sure all mobility is updated correctly. */
     if (opt_MOB_ACCESS) {
        mob_ship(etu);
@@ -82,7 +86,6 @@ update_main(void *argv)
        mob_plane(etu);
        mob_land(etu);
     }
-    update_pending = 1;
     player->proc = empth_self();
     player->cnum = 0;
     player->god = 1;
@@ -92,11 +95,11 @@ update_main(void *argv)
      * happiness, and printing out the state of the nation)
      */
     logerror("production update (%d etus)", etu);
-    bzero((s_char *)pops, sizeof(pops));
-    bzero((s_char *)air_money, sizeof(air_money));
-    bzero((s_char *)sea_money, sizeof(sea_money));
-    bzero((s_char *)lnd_money, sizeof(lnd_money));
-    bp = (int *)calloc(WORLD_X * WORLD_Y * 7, sizeof(int));
+    memset(pops, 0, sizeof(pops));
+    memset(air_money, 0, sizeof(air_money));
+    memset(sea_money, 0, sizeof(sea_money));
+    memset(lnd_money, 0, sizeof(lnd_money));
+    bp = calloc(WORLD_X * WORLD_Y * 7, sizeof(int));
     for (n = 0; n < MAXNOC; n++) {
        money[n] = 0;
        if ((np = getnatp(n)) == (struct natstr *)0)
@@ -111,13 +114,13 @@ update_main(void *argv)
     logerror("producing for countries...");
     for (x = 0; x < MAXNOC; x++) {
        int y, z, sb = 0, sm = 0, pb = 0, pm = 0, lm = 0, lb = 0;
-       long p_sect[SCT_MAXDEF + 1][2];
+       long p_sect[SCT_MAXDEF+1][2];
 
-       bzero((s_char *)p_sect, sizeof(p_sect));
+       memset(p_sect, 0, sizeof(p_sect));
        mil_dbl_pay = 0;
        if ((np = getnatp(x)) == (struct natstr *)0)
            continue;
-       if (np->nat_stat & STAT_SANCT) {
+       if (np->nat_stat == STAT_SANCT) {
 #ifdef DEBUG
            logerror("Country %i is in sanctuary and did not update", x);
 #endif
@@ -125,8 +128,8 @@ update_main(void *argv)
        }
        np->nat_money += (int)(np->nat_reserve * money_res * etu);
 
-       for (y = 1; y < SCT_MAXDEF + 8; y++) {
-           for (z = 0; z < SCT_MAXDEF + 8; z++) {
+       for (y = 1; y <= PRI_MAX; y++) {
+           for (z = 0; z <= PRI_MAX; z++) {
                if (np->nat_priorities[z] == y) {
                    do_prod(z, etu, x, bp, p_sect,
                            &sb, &sm, &pb, &pm, &lb, &lm);
@@ -178,13 +181,6 @@ update_main(void *argv)
            }
        }
     }
-    /* Age contact */
-    if (opt_LOSE_CONTACT) {
-       for (cn = 1; cn < MAXNOC; cn++) {
-           if ((cnp = getnatp(cn)) != NULL)
-               agecontact(cnp);
-       }
-    }
     /* Only update mobility for non-MOB_ACCESS here, since it doesn't
        get done for MOB_ACCESS anyway during the update */
     if (!opt_MOB_ACCESS) {
@@ -202,6 +198,7 @@ update_main(void *argv)
     ef_flush(EF_PLANE);
     ef_flush(EF_LAND);
     delete_old_announcements();
+    delete_old_news();
     /* Clear all the telegram flags */
     for (cn = 0; cn < MAXNOC; cn++)
        clear_telegram_is_new(cn);
@@ -212,12 +209,11 @@ update_main(void *argv)
     /*NOTREACHED*/
 }
 
-void
+static void
 do_prod(int sector_type, int etu, int n, int *bp, long int (*p_sect)[2],
        int *ship_build, int *ship_maint, int *plane_build,
        int *plane_maint, int *land_build, int *land_maint)
 {
-    extern double money_mil;
     struct natstr *np;
 
     np = getnatp(n);