]> git.pond.sub.org Git - empserver/blobdiff - src/lib/subs/getele.c
License upgrade to GPL version 3 or later
[empserver] / src / lib / subs / getele.c
index 4041980a65d6130ddb232aa1d9071fb0b03c3734..7426b6042de4ed66af10a2540fe835f9718a872e 100644 (file)
@@ -1,11 +1,11 @@
 /*
  *  Empire - A multi-player, client/server Internet based war game.
- *  Copyright (C) 1986-2000, Dave Pare, Jeff Bailey, Thomas Ruschak,
- *                           Ken Stevens, Steve McClure
+ *  Copyright (C) 1986-2011, Dave Pare, Jeff Bailey, Thomas Ruschak,
+ *                Ken Stevens, Steve McClure, Markus Armbruster
  *
- *  This program is free software; you can redistribute it and/or modify
+ *  Empire is free software: you can redistribute it and/or modify
  *  it under the terms of the GNU General Public License as published by
- *  the Free Software Foundation; either version 2 of the License, or
+ *  the Free Software Foundation, either version 3 of the License, or
  *  (at your option) any later version.
  *
  *  This program is distributed in the hope that it will be useful,
  *  GNU General Public License for more details.
  *
  *  You should have received a copy of the GNU General Public License
- *  along with this program; if not, write to the Free Software
- *  Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
+ *  along with this program.  If not, see <http://www.gnu.org/licenses/>.
  *
  *  ---
  *
- *  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.
  *
  *  ---
  *
  *  getele.c: Read a telegram from a file or stdin and send it to a country
- * 
+ *
  *  Known contributors to this file:
- *    
+ *     Ron Koenderink, 2005
+ *     Markus Armbruster, 2005-2009
+ *
  */
 
-#include <ctype.h>
-#include "misc.h"
+#include <config.h>
+
 #include "player.h"
-#include "tel.h"
 #include "prototypes.h"
+#include "tel.h"
 
-static int tilde_escape(s_char *s, s_char c);
+static int tilde_escape(char *s);
 
+/*
+ * Read a telegram for RECIPIENT into BUF, in UTF-8.
+ * BUF must have space for MAXTELSIZE+1 characters.
+ * Return telegram length, or -1 on error.
+ */
 int
-getele(s_char *nation, s_char *buf)
+getele(char *recipient, char *buf)
 {
-       register s_char *bp;
-       register int len;
-       register int c;
-       s_char  buffer[MAXTELSIZE + 2];
-       s_char  left[MAXTELSIZE + 2];
+    char *bp;
+    size_t len;
+    char buffer[MAXTELSIZE + 2]; /* UTF-8 */
+    char left[16];
 
-       pr("Enter telegram for %s\n", nation);
-       pr("undo last line with ~u, print with ~p, abort with ~q, end with ^D or .\n");
-       bp = buf;
-       while (!player->aborted) {
-               sprintf(left, "%4d left: ", (int)(buf + MAXTELSIZE - bp));
-               buffer[0] = 0;
-               if (prmptrd(left, buffer, MAXTELSIZE-2) <= 0)
-                       break;
-               if (tilde_escape(buffer, 'q'))
-                       return -1;
-               if (tilde_escape(buffer, 'u')) {
-                       if (bp == buf) {
-                               pr("No more lines to undo\n");
-                               continue;
-                       }
-                       pr("Last line deleted.\n");
-                       for (bp -= 2; bp > buf && *bp != '\n'; --bp);
-                       if (bp > buf)
-                               *(++bp) = 0;
-                       else
-                               bp = buf;
-                       continue;
-               }
-               if (tilde_escape(buffer, 'p')) {
-                       pr("This is what you have written so far:\n");
-                       pr("%s", buf);
-                       continue;
-               }
-               if (buffer[0] == '.' && ((buffer[1] == 0) ||
-                       (buffer[1] == '\n') || (buffer[1] == '\r')))
-                       break;
-               len = strlen(buffer);
-               buffer[len++] = '\n';
-               buffer[len] = 0;
-               if (len + (bp - buf) > MAXTELSIZE)
-                       pr("Too long.  Try that last line again...\n");
-               else {
-                       if (buffer[0] == '>')           /* forgery attempt? */
-                               buffer[0] = '?';        /* foil it */
-                       (void) strcpy(bp, buffer);
-                       bp += len;
-               }
+    pr("Enter telegram for %s\n", recipient);
+    pr("undo last line with ~u, print with ~p, abort with ~q, end with .\n");
+    bp = buf;
+    *bp = 0;
+    for (;;) {
+       sprintf(left, "%4d left: ", (int)(buf + MAXTELSIZE - bp));
+       if (uprmptrd(left, buffer, sizeof(buffer) - 2) <= 0)
+           return -1;
+       switch (tilde_escape(buffer)) {
+       case 'q':
+           return -1;
+       case 'u':
+           if (bp == buf) {
+               pr("No more lines to undo\n");
+               continue;
+           }
+           for (bp -= 2; bp >= buf && *bp != '\n'; --bp) ;
+           *++bp = 0;
+           pr("Last line deleted.\n");
+           continue;
+       case 'p':
+           pr("This is what you have written so far:\n");
+           uprnf(buf);
+           continue;
        }
-       if (player->aborted)
-               return -1;
-       len = bp - buf;
-       buf[len] = 0;
-       /* Get rid of non-ASCII and control characters.  */
-       for (bp = buf; 0 != (c = *bp); bp++) {
-               if (isascii(c) && (isprint(c) || isspace(c)))
-                       continue;
-               *bp = '?';
+       if (buffer[0] == '.' && buffer[1] == 0)
+           break;
+       if (buffer[0] == '>')   /* forgery attempt? */
+           buffer[0] = '?';    /* foil it */
+       len = strlen(buffer);
+       if (CANT_HAPPEN(len > sizeof(buffer) - 2))
+           len = sizeof(buffer) - 2;
+       buffer[len++] = '\n';
+       buffer[len] = 0;
+       if (bp + len > buf + MAXTELSIZE)
+           pr("Too long.  Try that last line again...\n");
+       else {
+           memcpy(bp, buffer, len + 1);
+           bp += len;
        }
-       return len;
+    }
+    return bp - buf;
 }
 
+/*
+ * If S is a `tilde escape', return its code, else 0.
+ * A tilde escape is '~' followed by the code character.
+ */
 static int
-tilde_escape(s_char *s, s_char c)
+tilde_escape(char *s)
 {
-       if (s[0] == '~' && s[1] == c && 
-           ((s[2] == 0) || (s[2] == '\n') || (s[2] == '\r')))
-               return 1;
-       return 0;
+    return s[0] == '~' && s[2] == 0 ? s[1] : 0;
 }
-