]> git.pond.sub.org Git - empserver/blobdiff - src/lib/commands/flash.c
Permit flash to yourself
[empserver] / src / lib / commands / flash.c
index 094b62754152b1b8a7c05e088a7d9ec79ddd0913..ffdba7a517a733d7a2c2a6a0d7db8ea10e1a5b42 100644 (file)
@@ -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-2010, Dave Pare, Jeff Bailey, Thomas Ruschak,
  *                           Ken Stevens, Steve McClure
  *
  *  This program is free software; you can redistribute it and/or modify
  *
  *  ---
  *
- *  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.
  *
  *  ---
  *
  *  flash.c: Flash a message to another player
- * 
+ *
  *  Known contributors to this file:
  *     Ken Stevens, 1995
  *     Steve McClure, 1998
+ *     Ron Koenderink, 2005
+ *     Markus Armbruster, 2004-2009
  */
 
-#if defined(Rel4) || defined(_WIN32)
-#include <time.h>
-#else
-#include <sys/time.h>
-#endif /* Rel4 */
-#include "misc.h"
-#include "player.h"
-#include "nat.h"
-#include "file.h"
+#include <config.h>
+
 #include "commands.h"
 
+static int chat(struct natstr *, char *);
+static int sendmessage(struct natstr *, char *, int);
+
 int
 flash(void)
 {
-       struct  natstr *us;
-       struct  natstr *to;
-       s_char  buf[600];
-       int     tocn;
-       s_char *sp;
+    struct natstr *us;
+    struct natstr *to;
+    int tocn;
 
-       us = getnatp(player->cnum);
-       if ((tocn = natarg(player->argp[1], "to which country? ")) < 0)
-               return RET_SYN;
-       if (!(to = getnatp((natid)tocn))) {
-               pr("Bad country number\n");
-               return RET_SYN;
-       }
-
-        if (us->nat_stat & STAT_GOD) {
-           /* We are gods, we can flash anyone */
-        } else if (us->nat_stat == VIS) {
-           /* We are a visitor.  We can only flash the gods. :) */
-          if (!(to->nat_stat & STAT_GOD)) {
-            pr("Visitors can only flash the gods.\n");
-            return RET_SYN;
-          }
-        } else {
-           /* Ok, we are a normal country, can we flash them? */
-          if ((!(to->nat_stat & STAT_GOD)) &&
-              (getrel(to, player->cnum) < FRIENDLY)) {
-            pr("%s is not a deity or friendly with us.\n", to->nat_cnam);
-            return RET_SYN;
-          }
-        }
+    us = getnatp(player->cnum);
+    if ((tocn = natarg(player->argp[1], "to which country? ")) < 0)
+       return RET_SYN;
+    to = getnatp(tocn);
 
-       if (player->argp[2]) {
-               for (sp = &player->combuf[0]; *sp && *sp != ' '; ++sp);
-               for (++sp; *sp && *sp != ' '; ++sp);
-               sprintf(buf, ":%s", sp);
-               sendmessage(us, to, buf, 1);
-       } else {
-               sendmessage(us, to, "...", 1);
-               while (getstring("> ", buf)) {
-                       if (*buf == '.')
-                               break;
-                       sendmessage(us, to, buf, 0);
-               }
-               sendmessage(us, to, "<EOT>", 0);
+    if (us->nat_stat == STAT_GOD) {
+       /* We are gods, we can flash anyone */
+    } else if (us->nat_stat == STAT_VIS) {
+       /* We are a visitor.  We can only flash the gods. :) */
+       if (to->nat_stat != STAT_GOD) {
+           pr("Visitors can only flash the gods.\n");
+           return RET_SYN;
        }
-       return RET_OK;
+    } else {
+       /* Ok, we are a normal country, can we flash them? */
+       if (to->nat_stat != STAT_GOD && tocn != player->cnum
+           && getrel(to, player->cnum) < FRIENDLY) {
+           pr("%s is not a deity or friendly with us.\n", to->nat_cnam);
+           return RET_SYN;
+       }
+    }
+
+    return chat(to, player->comtail[2]);
 }
 
 int
 wall(void)
 {
-       struct  natstr *us;
-       s_char  buf[600];
-       s_char *sp;
+    return chat(NULL, player->comtail[1]);
+}
 
-       us = getnatp(player->cnum);
-       if (player->argp[1]) {
-               for (sp = &player->combuf[0]; *sp && *sp != ' '; ++sp);
-               for (++sp; *sp && *sp != ' '; ++sp);
-               sprintf(buf, ":%s", sp);
-               sendmessage(us, 0, buf, 1);
-       } else {
-               sendmessage(us, 0, "...", 1);
-               while (getstring("> ", buf)) {
-                       if (*buf == '.')
-                               break;
-                       sendmessage(us, 0, buf, 0);
-               }
-               sendmessage(us, 0, "<EOT>", 0);
+/*
+ * Send flash message(s) from US to TO.
+ * Null TO broadcasts to all.
+ * MESSAGE is UTF-8.  If it is null, prompt for messages interactively.
+ * Return RET_OK.
+ */
+static int
+chat(struct natstr *to, char *message)
+{
+    char buf[1024];            /* UTF-8 */
+
+    if (message) {
+       buf[0] = ':';
+       buf[1] = ' ';
+       strcpy(buf+2, message);
+       sendmessage(to, buf, 1);
+    } else {
+       sendmessage(to, "...", 1);
+       while (ugetstring("> ", buf)) {
+           if (*buf == '.')
+               break;
+           sendmessage(to, buf, 0);
        }
-       return RET_OK;
+       sendmessage(to, "<EOT>", 0);
+    }
+    return RET_OK;
 }
 
-int
-sendmessage(struct natstr *us, struct natstr *to, char *message, int oneshot)
+/*
+ * Send flash message MESSAGE from US to TO.
+ * MESSAGE is UTF-8.
+ * Null TO broadcasts to all.
+ * A header identifying US is prepended to the message.  It is more
+ * verbose if VERBOSE.
+ */
+static int
+sendmessage(struct natstr *to, char *message, int verbose)
 {
-       struct  player *other;  
-       struct  tm *tm;
-       char    *p;
-       char    c;
-       time_t  now;
-       int     sent = 0;
-       struct  natstr *wto;
+    struct player *other;
+    struct tm *tm;
+    time_t now;
+    int sent = 0, rejected = 0;
+    struct natstr *wto;
 
-       for (p = message; 0 != (c = *p); p++) {
-               if (!isprint(c))
-                       *p = '*';
+    time(&now);
+    tm = localtime(&now);
+    for (other = player_next(NULL); other; other = player_next(other)) {
+       if (other->state != PS_PLAYING)
+           continue;
+       if (to) {
+           /* flash */
+           if (other->cnum != to->nat_cnum)
+               continue;
+           wto = to;
+       } else {
+           /* wall */
+           if (player == other)
+               continue;
+           wto = getnatp(other->cnum);
+           if (CANT_HAPPEN(!wto))
+               continue;
+           if (!player->god && getrel(wto, player->cnum) != ALLIED)
+               continue;
        }
-       if (strlen(message) > 60) {
-               s_char c = message[60];
-               message[60] = '\0';
-               sendmessage(us, to, message, oneshot);
-               message[60] = c;
-               sendmessage(us, to, &message[60], 0);
-               return 0;
+       if (!player->god && !(wto->nat_flags & NF_FLASH)) {
+           rejected++;
+           continue;
        }
-       time(&now);
-       tm = localtime(&now);
-       for (other = player_next(0); other != 0; other = player_next(other)) {
-               if (to && other->cnum != to->nat_cnum)
-                       continue;
-               if (!(wto = getnatp(other->cnum)))
-                       continue;
-               if (!to && !player->god && getrel(wto, player->cnum) != ALLIED)
-                       continue;
-               if (!player->god && !(wto->nat_flags & NF_FLASH))
-                       continue;
-               if (player == other)
-                       continue;
-               if (oneshot)
-                       if (to)
-                               pr_flash(other, "FLASH from %s (#%d) @ %02d:%02d%s\n",
-                                        us->nat_cnam, us->nat_cnum, tm->tm_hour,
-                                        tm->tm_min, message);
-                       else
-                               pr_flash(other, "BROADCAST from %s (#%d) @ %02d:%02d%s\n",
-                                        us->nat_cnam, us->nat_cnum, tm->tm_hour,
-                                        tm->tm_min, message);
 
-               else 
-                       pr_flash(other, "%s (#%d): %s\n",
-                               us->nat_cnam, us->nat_cnum, message);
-               player_wakeup(other);
-               sent++;
+       if (verbose)
+           if (to)
+               pr_flash(other, "FLASH from %s (#%d) @ %02d:%02d%s\n",
+                        cname(player->cnum), player->cnum, tm->tm_hour,
+                        tm->tm_min, message);
+           else
+               pr_flash(other, "BROADCAST from %s (#%d) @ %02d:%02d%s\n",
+                        cname(player->cnum), player->cnum, tm->tm_hour,
+                        tm->tm_min, message);
+
+       else
+           pr_flash(other, "%s (#%d): %s\n",
+                    cname(player->cnum), player->cnum, message);
+       sent++;
+    }
+
+    if (to) {
+       /* flash */
+       if (player->god || to->nat_cnum == player->cnum
+           || getrel(to, player->cnum) == ALLIED) {
+           /* Can see TO logged in anyway, so it's okay to tell */
+           if (rejected)
+               pr("%s is not accepting flashes\n", to->nat_cnam);
+           else if (!sent) {
+               pr("%s is not logged on\n", to->nat_cnam);
+           }
        }
+    } else {
+       /* wall */
        if (player->god) {
-               if (to)
-                       if (sent)
-                               pr("Flash sent to %s\n", to->nat_cnam);
-                       else
-                               pr("%s is not logged on\n", to->nat_cnam);
-               else
-                       if (sent)
-                               pr("Broadcast sent to %d players\n", sent);
-                       else
-                               pr("No-one is logged in\n");
-       }
-       if (to && !player->god) {
-         /* If they are allied with us, we would normally see that
-          * they are logged in anyway, so just tell us */
-         if ((getrel(to, player->cnum) == ALLIED) && !sent) {
-           if (to->nat_flags & NF_FLASH)
-             pr("%s is not logged on\n", to->nat_cnam);
+           if (sent)
+               pr("Broadcast sent to %d players\n", sent);
            else
-             pr("%s is not accepting flashes\n", to->nat_cnam);
-         }
+               pr("No-one is logged in\n");
        }
-       return 0;
+    }
+    return 0;
 }