Use nat_reset() for POGO in files.c

[empserver] / src / lib / subs / natsub.c

diff --git a/src/lib/subs/natsub.c b/src/lib/subs/natsub.c
index 1a365a9c83fe49c159c606e9008b6d08427a18f7..6379a64c1cd7f5b1537f0ade7896b97673413ee9 100644 (file)
--- a/src/lib/subs/natsub.c
+++ b/src/lib/subs/natsub.c
@@ -33,48 +33,10 @@
 
 #include <config.h>
 
-#include <string.h>
 #include <ctype.h>
-#include <fcntl.h>
-#include <sys/stat.h>
-#include <unistd.h>
 #include "file.h"
 #include "nat.h"
-#include "optlist.h"
 #include "prototypes.h"
-#include "tel.h"
-
-/*
- * Initialize NATP for country #CNUM in status STAT.
- * STAT must be STAT_UNUSED, STAT_NEW, STAT_VIS or STAT_GOD.
- * Also wipe realms and telegrams.
- */
-struct natstr *
-nat_reset(struct natstr *natp, natid cnum, enum nat_status stat)
-{
-    struct realmstr newrealm;
-    char buf[1024];
-    int i;
-
-    ef_blank(EF_NATION, cnum, natp);
-    natp->nat_stat = stat;
-    for (i = 0; i < MAXNOR; i++) {
-       ef_blank(EF_REALM, i + cnum * MAXNOR, &newrealm);
-       putrealm(&newrealm);
-    }
-    close(creat(mailbox(buf, cnum),
-               S_IRUSR | S_IWUSR | S_IRGRP | S_IWGRP));
-    /* FIXME natp->nat_ann = #annos */
-    natp->nat_level[NAT_HLEV] = start_happiness;
-    natp->nat_level[NAT_RLEV] = start_research;
-    natp->nat_level[NAT_TLEV] = start_technology;
-    natp->nat_level[NAT_ELEV] = start_education;
-    for (i = 0; i < MAXNOC; i++)
-       natp->nat_relate[i] = NEUTRAL;
-    natp->nat_flags =
-       NF_FLASH | NF_BEEP | NF_COASTWATCH | NF_SONAR | NF_TECHLISTS;
-    return natp;
-}
 
 int
 check_nat_name(char *cname, natid cnum)