]> git.pond.sub.org Git - empserver/blobdiff - src/lib/player/player.c
Indented with src/scripts/indent-emp.
[empserver] / src / lib / player / player.c
index b175279b846adc11a8bb1ccaa5381cdddd806aa2..c90d639a2b8aa9b3f8ffb2b2ccda225af21503ff 100644 (file)
 #include <stdio.h>
 #include <fcntl.h>
 
-struct player *player;
-extern int m_m_p_d;
+struct player *player;
+extern int m_m_p_d;
 
 void
 player_main(struct player *p)
 {
-       extern  s_char *authfil;
-       struct  natstr *natp;
-       int     hour[2];
-       int     secs;
-       s_char  buf[128];
+    extern s_char *authfil;
+    struct natstr *natp;
+    int hour[2];
+    int secs;
+    s_char buf[128];
 
-       p->state = PS_PLAYING;
-       player = p;
-       time(&player->lasttime);
-       (void) time(&player->curup);
-       showvers(CLIENTPROTO);
-       show_motd();
-       if (init_nats() < 0)
-               return;
-       natp = getnatp(player->cnum);
-        if (player->god &&
-           !match_user(authfil, player)) {
-               logerror("NON-AUTHed Login attempted by %s",
-                        praddr(player));
-               pr("You're not a deity!\n");
-               return;
-        }
-       if (!gamehours(player->curup, hour)) {
-               pr("Empire hours restriction in force\n");
-               if ((natp->nat_stat & STAT_GOD) == 0)
-                       return;
-       }
-       daychange(player->curup);
-       if ((player->minleft = getminleft(player->curup, hour, &m_m_p_d)) <= 0){
-               pr("Time exceeded today\n");
-               return;
+    p->state = PS_PLAYING;
+    player = p;
+    time(&player->lasttime);
+    (void)time(&player->curup);
+    showvers(CLIENTPROTO);
+    show_motd();
+    if (init_nats() < 0)
+       return;
+    natp = getnatp(player->cnum);
+    if (player->god && !match_user(authfil, player)) {
+       logerror("NON-AUTHed Login attempted by %s", praddr(player));
+       pr("You're not a deity!\n");
+       return;
+    }
+    if (!gamehours(player->curup, hour)) {
+       pr("Empire hours restriction in force\n");
+       if ((natp->nat_stat & STAT_GOD) == 0)
+           return;
+    }
+    daychange(player->curup);
+    if ((player->minleft = getminleft(player->curup, hour, &m_m_p_d)) <= 0) {
+       pr("Time exceeded today\n");
+       return;
+    }
+    if ((*natp->nat_hostaddr &&
+        *player->hostaddr &&
+        strcmp(natp->nat_hostaddr, player->hostaddr)) ||
+       (*natp->nat_userid &&
+        *player->userid && strcmp(natp->nat_userid, player->userid))) {
+       if (natp->nat_stat != VIS) {
+           pr("Last connection from: %s", ctime(&natp->nat_last_login));
+           pr("                  to: %s", natp->nat_last_login <
+              natp->nat_last_logout ? ctime(&natp->
+                                            nat_last_logout) : "?");
+           pr("                  by: %s@%s\n",
+              *natp->nat_userid ? natp->nat_userid : (s_char *)"nobody",
+              *natp->nat_hostname ? natp->nat_hostname : *natp->
+              nat_hostaddr ? natp->nat_hostaddr : (s_char *)"nowhere");
        }
-       if ((*natp->nat_hostaddr &&
-            *player->hostaddr &&
-            strcmp(natp->nat_hostaddr, player->hostaddr)) ||
-           (*natp->nat_userid &&
-            *player->userid &&
-            strcmp(natp->nat_userid, player->userid))) {
-           if (natp->nat_stat != VIS) {
-               pr("Last connection from: %s", ctime(&natp->nat_last_login));
-               pr("                  to: %s", natp->nat_last_login < 
-                  natp->nat_last_logout ? ctime(&natp->nat_last_logout):"?");
-               pr("                  by: %s@%s\n",
-                  *natp->nat_userid?natp->nat_userid : (s_char *)"nobody",
-                  *natp->nat_hostname?natp->nat_hostname:
-                  *natp->nat_hostaddr?natp->nat_hostaddr:(s_char *)"nowhere");
-           }
-       }
-       if (*player->userid)
-               strcpy(natp->nat_userid, player->userid);
-       else
-               strcpy(natp->nat_userid, "nobody");
+    }
+    if (*player->userid)
+       strcpy(natp->nat_userid, player->userid);
+    else
+       strcpy(natp->nat_userid, "nobody");
 
-       if (*player->hostname)
-               strcpy(natp->nat_hostname, player->hostname);
-       else
-               strcpy(natp->nat_hostname, "nowhere");
+    if (*player->hostname)
+       strcpy(natp->nat_hostname, player->hostname);
+    else
+       strcpy(natp->nat_hostname, "nowhere");
 
-       if (*player->hostaddr)
-               strcpy(natp->nat_hostaddr, player->hostaddr);
-       
-       time(&natp->nat_last_login);
-       natp->nat_connected = 1;
-       putnat(natp);
-       if (natp->nat_flags & NF_INFORM &&
-           natp->nat_tgms > 0) {
-               if (natp->nat_tgms == 1)
-                       pr("You have a new telegram waiting ...\n");
-               else
-                       pr("You have %s new telegrams waiting ...\n",
-                          numstr(buf, natp->nat_tgms));
-               natp->nat_tgms = 0;
-       }
+    if (*player->hostaddr)
+       strcpy(natp->nat_hostaddr, player->hostaddr);
 
-       while (status()) {
-               if (command() == 0 && !player->aborted)
-                       break;
-               player->aborted = 0;
-       }
-       /* #*# I put the following line in to prevent server crash -KHS */
-       natp = getnatp(player->cnum);
-       /*
-        * randomly round up to the nearest minute,
-        * charging at least 15 seconds.
-        */
-       time(&natp->nat_last_logout);
-       secs = max(natp->nat_last_logout - player->lasttime, 15);
-        natp->nat_minused += secs / 60;
-       secs = secs % 60;
-       if (chance(secs / 60.0))
-               natp->nat_minused += 1;
-       natp->nat_connected = 0;
-       putnat(natp);
-       pr("Bye-bye\n");
+    time(&natp->nat_last_login);
+    natp->nat_connected = 1;
+    putnat(natp);
+    if (natp->nat_flags & NF_INFORM && natp->nat_tgms > 0) {
+       if (natp->nat_tgms == 1)
+           pr("You have a new telegram waiting ...\n");
+       else
+           pr("You have %s new telegrams waiting ...\n",
+              numstr(buf, natp->nat_tgms));
+       natp->nat_tgms = 0;
+    }
+
+    while (status()) {
+       if (command() == 0 && !player->aborted)
+           break;
+       player->aborted = 0;
+    }
+    /* #*# I put the following line in to prevent server crash -KHS */
+    natp = getnatp(player->cnum);
+    /*
+     * randomly round up to the nearest minute,
+     * charging at least 15 seconds.
+     */
+    time(&natp->nat_last_logout);
+    secs = max(natp->nat_last_logout - player->lasttime, 15);
+    natp->nat_minused += secs / 60;
+    secs = secs % 60;
+    if (chance(secs / 60.0))
+       natp->nat_minused += 1;
+    natp->nat_connected = 0;
+    putnat(natp);
+    pr("Bye-bye\n");
 }
 
 int
 command(void)
 {
-       register unsigned int x;
-       s_char  *redir;
-       int     kill_player();
-       s_char  scanspace[1024];
+    register unsigned int x;
+    s_char *redir;
+    int kill_player();
+    s_char scanspace[1024];
 
-       if (getcommand(player->combuf) < 0)
-               return 0;
-       if (parse(player->combuf, player->argp, &player->condarg,
-           scanspace, &redir) < 0) {
-               pr("See \"info Syntax\"?\n");
-       } else {
-               /* XXX don't use alarm; use a scavenger thread */
-               /* DONT USE IT!!!! alarm and sleep may and dont work
-                  together -- Sasha */
-               /* alarm((unsigned int)60*60); 1 hour */
-               if (player->condarg != (s_char *)0)
-                       for(x=0;x<strlen(player->condarg);x++)
-                               if (isupper(*(player->condarg+x)))
-                                       *(player->condarg+x) = tolower(*(player->condarg+x));
-               if (dispatch(player->combuf, redir) < 0)
-                       pr("Try \"list of commands\" or \"info\"\n");
-       }
-       return 1;
+    if (getcommand(player->combuf) < 0)
+       return 0;
+    if (parse(player->combuf, player->argp, &player->condarg,
+             scanspace, &redir) < 0) {
+       pr("See \"info Syntax\"?\n");
+    } else {
+       /* XXX don't use alarm; use a scavenger thread */
+       /* DONT USE IT!!!! alarm and sleep may and dont work
+          together -- Sasha */
+       /* alarm((unsigned int)60*60); 1 hour */
+       if (player->condarg != (s_char *)0)
+           for (x = 0; x < strlen(player->condarg); x++)
+               if (isupper(*(player->condarg + x)))
+                   *(player->condarg + x) =
+                       tolower(*(player->condarg + x));
+       if (dispatch(player->combuf, redir) < 0)
+           pr("Try \"list of commands\" or \"info\"\n");
+    }
+    return 1;
 }
 
 int
 status(void)
 {
-       struct  natstr *natp;
-       int     minute;
-       struct  sctstr sect;
-       int     hour[2];
-       s_char  buf[128];
+    struct natstr *natp;
+    int minute;
+    struct sctstr sect;
+    int hour[2];
+    s_char buf[128];
 
-       if (player->state == PS_SHUTDOWN)
-               return 0;
-       natp = getnatp(player->cnum);
-       if (io_error(player->iop) || io_eof(player->iop)) {
-               putnat(natp);
-               return 0;
-       }
-       player->visitor = (natp->nat_stat & (STAT_NORM|STAT_GOD)) == 0;
-       if (player->dolcost != 0.0) {
-               if (player->dolcost > 100.0)
-                       pr("That just cost you $%.2f\n", player->dolcost);
-               else if (player->dolcost < -100.0)
-                       pr("You just made $%.2f\n", -player->dolcost);
-               if (natp->nat_money < player->dolcost && !player->broke) {
-                       player->broke = 1;
-                       player->nstat &= ~MONEY;
-                       pr("You are now broke; industries are on strike.\n");
-               } else if (player->broke && natp->nat_money - player->dolcost > 0) {
-                       player->broke = 0;
-                       player->nstat |= MONEY;
-                       pr("You are no longer broke!\n");
-               }
-               natp->nat_money -= roundavg(player->dolcost);
-               player->dolcost = 0.0;
-       } else { 
-               if (natp->nat_money < 0.0 && !player->broke) {
-                       player->broke = 1;
-                       player->nstat &= ~MONEY;
-                       pr("You are now broke; industries are on strike.\n");
-               }
-               if (player->broke && natp->nat_money > 0) {
-                       player->broke = 0;
-                       player->nstat |= MONEY;
-                       pr("You are no longer broke!\n");
-               }
-       }
-       getsect(natp->nat_xcap, natp->nat_ycap, &sect);
-       if ((sect.sct_type == SCT_CAPIT || sect.sct_type == SCT_MOUNT ||
-           sect.sct_type == SCT_SANCT) &&
-           sect.sct_own == player->cnum)
-               player->nstat |= CAP;
-       else
-               player->nstat &= ~CAP;
-       /* Ok, has the country owner reset his capital yet after it was sacked? */
-       if (natp->nat_flags & NF_SACKED)
-           player->nstat &= ~CAP; /* No capital yet */
-       player->ncomstat = player->nstat;
-       (void) time(&player->curup);
-       minute = (player->curup - player->lasttime) / 60;
-       if (minute > 0) {
-               player->minleft -= minute;
-               if (player->minleft <= 0) {
-                       /*
-                        * countdown timer "player->minleft" has expired.
-                        * either day change, or hours restriction
-                        */
-                       daychange(player->curup);
-                       if (!gamehours(player->curup, hour)) {
-                               pr("Empire hours restriction in force\n");
-                               if ((natp->nat_stat & STAT_GOD) == 0) {
-                                       putnat(natp);
-                                       return 0;
-                               }
-                       }
-                       player->minleft = getminleft(player->curup, hour, &m_m_p_d);
-               }
-               player->lasttime += minute * 60;
-               natp->nat_minused += minute;
+    if (player->state == PS_SHUTDOWN)
+       return 0;
+    natp = getnatp(player->cnum);
+    if (io_error(player->iop) || io_eof(player->iop)) {
+       putnat(natp);
+       return 0;
+    }
+    player->visitor = (natp->nat_stat & (STAT_NORM | STAT_GOD)) == 0;
+    if (player->dolcost != 0.0) {
+       if (player->dolcost > 100.0)
+           pr("That just cost you $%.2f\n", player->dolcost);
+       else if (player->dolcost < -100.0)
+           pr("You just made $%.2f\n", -player->dolcost);
+       if (natp->nat_money < player->dolcost && !player->broke) {
+           player->broke = 1;
+           player->nstat &= ~MONEY;
+           pr("You are now broke; industries are on strike.\n");
+       } else if (player->broke && natp->nat_money - player->dolcost > 0) {
+           player->broke = 0;
+           player->nstat |= MONEY;
+           pr("You are no longer broke!\n");
        }
-       if ((player->nstat & NORM) && natp->nat_minused > m_m_p_d) {
-               pr("Max minutes per day limit exceeded.\n");
-               player->ncomstat = VIS;
+       natp->nat_money -= roundavg(player->dolcost);
+       player->dolcost = 0.0;
+    } else {
+       if (natp->nat_money < 0.0 && !player->broke) {
+           player->broke = 1;
+           player->nstat &= ~MONEY;
+           pr("You are now broke; industries are on strike.\n");
        }
-       if (player->btused) {
-               natp->nat_btu -= player->btused;
-               player->btused = 0;
+       if (player->broke && natp->nat_money > 0) {
+           player->broke = 0;
+           player->nstat |= MONEY;
+           pr("You are no longer broke!\n");
        }
-       if (natp->nat_tgms > 0) {
-               if (!(natp->nat_flags & NF_INFORM)) {
-                       if (natp->nat_tgms == 1)
-                               pr("You have a new telegram waiting ...\n");
-                       else
-                               pr("You have %s new telegrams waiting ...\n",
-                                  numstr(buf, natp->nat_tgms));
-                       natp->nat_tgms = 0;
+    }
+    getsect(natp->nat_xcap, natp->nat_ycap, &sect);
+    if ((sect.sct_type == SCT_CAPIT || sect.sct_type == SCT_MOUNT ||
+        sect.sct_type == SCT_SANCT) && sect.sct_own == player->cnum)
+       player->nstat |= CAP;
+    else
+       player->nstat &= ~CAP;
+    /* Ok, has the country owner reset his capital yet after it was sacked? */
+    if (natp->nat_flags & NF_SACKED)
+       player->nstat &= ~CAP;  /* No capital yet */
+    player->ncomstat = player->nstat;
+    (void)time(&player->curup);
+    minute = (player->curup - player->lasttime) / 60;
+    if (minute > 0) {
+       player->minleft -= minute;
+       if (player->minleft <= 0) {
+           /*
+            * countdown timer "player->minleft" has expired.
+            * either day change, or hours restriction
+            */
+           daychange(player->curup);
+           if (!gamehours(player->curup, hour)) {
+               pr("Empire hours restriction in force\n");
+               if ((natp->nat_stat & STAT_GOD) == 0) {
+                   putnat(natp);
+                   return 0;
                }
+           }
+           player->minleft = getminleft(player->curup, hour, &m_m_p_d);
        }
-       if (natp->nat_ann > 0) {
-               if (natp->nat_ann == 1)
-                       pr("You have a new announcement waiting ...\n");
-               else
-                       pr("You have %s new announcements waiting ...\n",
-                               numstr(buf, natp->nat_ann));
-               natp->nat_ann = 0;
-       }
-       if (!player->visitor && !player->god && (player->nstat & CAP) == 0)
-               pr("You lost your capital... better designate one\n");
-       putnat(natp);
-       if (gamedown() && !player->god) {
-               pr("gamedown\n");
-               return 0;
+       player->lasttime += minute * 60;
+       natp->nat_minused += minute;
+    }
+    if ((player->nstat & NORM) && natp->nat_minused > m_m_p_d) {
+       pr("Max minutes per day limit exceeded.\n");
+       player->ncomstat = VIS;
+    }
+    if (player->btused) {
+       natp->nat_btu -= player->btused;
+       player->btused = 0;
+    }
+    if (natp->nat_tgms > 0) {
+       if (!(natp->nat_flags & NF_INFORM)) {
+           if (natp->nat_tgms == 1)
+               pr("You have a new telegram waiting ...\n");
+           else
+               pr("You have %s new telegrams waiting ...\n",
+                  numstr(buf, natp->nat_tgms));
+           natp->nat_tgms = 0;
        }
-       return 1;
+    }
+    if (natp->nat_ann > 0) {
+       if (natp->nat_ann == 1)
+           pr("You have a new announcement waiting ...\n");
+       else
+           pr("You have %s new announcements waiting ...\n",
+              numstr(buf, natp->nat_ann));
+       natp->nat_ann = 0;
+    }
+    if (!player->visitor && !player->god && (player->nstat & CAP) == 0)
+       pr("You lost your capital... better designate one\n");
+    putnat(natp);
+    if (gamedown() && !player->god) {
+       pr("gamedown\n");
+       return 0;
+    }
+    return 1;
 }
 
 /*
@@ -312,115 +309,115 @@ status(void)
 int
 execute(void)
 {
-       s_char  buf[512];
-       int     abort;
-       s_char  *p; 
-       s_char  *redir;
-       s_char  scanspace[1024];
+    s_char buf[512];
+    int abort;
+    s_char *p;
+    s_char *redir;
+    s_char scanspace[1024];
 
-       abort = 0;
-       redir = 0;
-        
-        p = getstarg (player->argp[1], "File? ", buf);
+    abort = 0;
+    redir = 0;
 
-        if (p == (s_char *) 0 || p == '\0')
-               return RET_SYN;  
+    p = getstarg(player->argp[1], "File? ", buf);
 
-       prexec(player->argp[1]);
-       while (!abort && status()) {
-               if (recvclient(buf, sizeof(buf)) < 0)
-                       break;
-               if (parse(buf, player->argp, &player->condarg,
-                   scanspace, &redir) < 0) {
-                       abort = 1;
-                       continue;
-               }
-               if (redir == 0)
-                       pr("\nExecute : %s\n", buf);
-               if (dispatch(buf, redir) < 0)
-                       abort = 1;
-       }
-       if (abort) {
-           while (recvclient(buf, sizeof(buf)) >= 0)
-               ;
+    if (p == (s_char *)0 || p == '\0')
+       return RET_SYN;
+
+    prexec(player->argp[1]);
+    while (!abort && status()) {
+       if (recvclient(buf, sizeof(buf)) < 0)
+           break;
+       if (parse(buf, player->argp, &player->condarg,
+                 scanspace, &redir) < 0) {
+           abort = 1;
+           continue;
        }
        if (redir == 0)
-               pr("Execute : %s\n", abort ? "aborted" : "terminated");
-       return RET_OK;
+           pr("\nExecute : %s\n", buf);
+       if (dispatch(buf, redir) < 0)
+           abort = 1;
+    }
+    if (abort) {
+       while (recvclient(buf, sizeof(buf)) >= 0) ;
+    }
+    if (redir == 0)
+       pr("Execute : %s\n", abort ? "aborted" : "terminated");
+    return RET_OK;
 }
 
 int
 show_motd(void)
 {
-       extern  s_char *upfil;
-       int     upf;
-       struct  telstr tgm;
-       s_char  buf[MAXTELSIZE];
+    extern s_char *upfil;
+    int upf;
+    struct telstr tgm;
+    s_char buf[MAXTELSIZE];
 
 #if !defined(_WIN32)
-       if ((upf = open(upfil, O_RDONLY, 0)) < 0)
+    if ((upf = open(upfil, O_RDONLY, 0)) < 0)
 #else
-       if ((upf = open(upfil, O_RDONLY|O_BINARY, 0)) < 0)
+    if ((upf = open(upfil, O_RDONLY | O_BINARY, 0)) < 0)
 #endif
-               return RET_FAIL;
-       if (read(upf, (s_char *) &tgm, sizeof(tgm)) != sizeof(tgm)) {
-               logerror("bad header on login message (upfil)");
-               close(upf);
-               return RET_FAIL;
-       }
-       if (read(upf, buf, tgm.tel_length) != tgm.tel_length) {
-               logerror("bad length %d on login message", tgm.tel_length);
-               close(upf);
-               return RET_FAIL;
-       }
-       if (tgm.tel_length >= (long)sizeof(buf))
-               tgm.tel_length = sizeof(buf)-1;
-       buf[tgm.tel_length] = 0;
-       pr(buf);
-       (void) close(upf);
-       return RET_OK;
+       return RET_FAIL;
+    if (read(upf, (s_char *)&tgm, sizeof(tgm)) != sizeof(tgm)) {
+       logerror("bad header on login message (upfil)");
+       close(upf);
+       return RET_FAIL;
+    }
+    if (read(upf, buf, tgm.tel_length) != tgm.tel_length) {
+       logerror("bad length %d on login message", tgm.tel_length);
+       close(upf);
+       return RET_FAIL;
+    }
+    if (tgm.tel_length >= (long)sizeof(buf))
+       tgm.tel_length = sizeof(buf) - 1;
+    buf[tgm.tel_length] = 0;
+    pr(buf);
+    (void)close(upf);
+    return RET_OK;
 }
 
-int match_user(char *file, struct player *player)
+int
+match_user(char *file, struct player *player)
 {
-        FILE   *fp;
-        int    match = 0;
-        s_char host[256];
-        s_char user[256];
+    FILE *fp;
+    int match = 0;
+    s_char host[256];
+    s_char user[256];
 
-        if ((fp = fopen(file, "r")) == NULL) {
-                /*logerror("Cannot find file %s", file);*/
-               return 0;
-       }
-       match = 0;
-       while (!feof(fp) && !match) {
-               if (fgets(host, sizeof(host)-1, fp) == NULL)
-                       break;
-              if (host[0] == '#') continue;
-               if (fgets(user, sizeof(user)-1, fp) == NULL)
-                       break;
-              host[strlen(host)-1] = '\0';
-              user[strlen(user)-1] = '\0';
-               if (strstr(player->userid, user) &&
-                   (strstr(player->hostaddr, host) ||
-                    strstr(player->hostname, host)))
-                       ++match;
-       }
-       fclose(fp);
-       return match;
+    if ((fp = fopen(file, "r")) == NULL) {
+       /*logerror("Cannot find file %s", file); */
+       return 0;
+    }
+    match = 0;
+    while (!feof(fp) && !match) {
+       if (fgets(host, sizeof(host) - 1, fp) == NULL)
+           break;
+       if (host[0] == '#')
+           continue;
+       if (fgets(user, sizeof(user) - 1, fp) == NULL)
+           break;
+       host[strlen(host) - 1] = '\0';
+       user[strlen(user) - 1] = '\0';
+       if (strstr(player->userid, user) &&
+           (strstr(player->hostaddr, host) ||
+            strstr(player->hostname, host)))
+           ++match;
+    }
+    fclose(fp);
+    return match;
 }
 
 int
 quit(void)
 {
-       player->state = PS_SHUTDOWN;
-       return RET_OK;
+    player->state = PS_SHUTDOWN;
+    return RET_OK;
 }
 
 s_char *
 praddr(struct player *player)
 {
-       return prbuf("%s@%s", player->userid,
-                    *player->hostname?player->hostname:player->hostaddr);
+    return prbuf("%s@%s", player->userid,
+                *player->hostname ? player->hostname : player->hostaddr);
 }
-