git.pond.sub.org Git - empserver/blob - src/lib/subs/pr.c

   1 /*
   2  *  Empire - A multi-player, client/server Internet based war game.
   3  *  Copyright (C) 1986-2000, Dave Pare, Jeff Bailey, Thomas Ruschak,
   4  *                           Ken Stevens, Steve McClure
   5  *
   6  *  This program is free software; you can redistribute it and/or modify
   7  *  it under the terms of the GNU General Public License as published by
   8  *  the Free Software Foundation; either version 2 of the License, or
   9  *  (at your option) any later version.
  10  *
  11  *  This program is distributed in the hope that it will be useful,
  12  *  but WITHOUT ANY WARRANTY; without even the implied warranty of
  13  *  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  14  *  GNU General Public License for more details.
  15  *
  16  *  You should have received a copy of the GNU General Public License
  17  *  along with this program; if not, write to the Free Software
  18  *  Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
  19  *
  20  *  ---
  21  *
  22  *  See the "LEGAL", "LICENSE", "CREDITS" and "README" files for all the
  23  *  related information and legal notices. It is expected that any future
  24  *  projects/authors will amend these files as needed.
  25  *
  26  *  ---
  27  *
  28  *  pr.c: Use to do output to a player
  29  *
  30  *  Known contributors to this file:
  31  *     Dave Pare, 1986, 1989
  32  *     Steve McClure, 1998-2000
  33  */
  34 /*
  35  * The pr routine historically arranged for nonbuffered i/o
  36  * because stdio didn't used to automatically flush stdout before
  37  * it read something from stdin.  Now pr() prepends an "output id"
  38  * in front of each line of text, informing the user interface
  39  * what sort of item it is seeing; prompt, noecho prompt,
  40  * more input data, etc.
  41  */
  42
  43 #ifdef Rel4
  44 #include <string.h>
  45 #endif /* Rel4 */
  46 #include <fcntl.h>
  47 #include <ctype.h>
  48 #include <stdarg.h>
  49 #include "proto.h"
  50 #include "misc.h"
  51 #include "player.h"
  52 #include "nat.h"
  53 #include "empio.h"
  54 #include "file.h"
  55 #include "com.h"
  56 #include "news.h"
  57 #include "tel.h"
  58 extern  int update_pending;
  59 #include "prototypes.h"
  60
  61 void outid(struct player *pl, int n);
  62
  63 /*VARARGS*/
  64 void
  65 pr(s_char *format, ...)
  66 {
  67         s_char  buf[4096];
  68         va_list ap;
  69
  70         va_start(ap, format);
  71         (void) vsprintf(buf, format, ap);
  72         va_end(ap);
  73         pr_player(player, C_DATA, buf);
  74 }
  75
  76 void
  77 prnf(s_char *buf)
  78 {
  79         pr_player(player, C_DATA, buf);
  80 }
  81
  82 /*VARARGS*/
  83 void
  84 pr_id(struct player *p, int id, s_char  *format, ...)
  85 {
  86         s_char  buf[4096];
  87         va_list ap;
  88
  89       if (p->curid >= 0) {
  90                 io_puts(p->iop, "\n");
  91               p->curid = -1;
  92         }
  93         va_start(ap, format);
  94         (void) vsprintf(buf, format, ap);
  95         va_end(ap);
  96         pr_player(p, id, buf);
  97 }
  98
  99 void
 100 pr_flash(struct player *pl, s_char      *format, ...)
 101 {
 102         s_char  buf[4096];
 103         va_list ap;
 104
 105         if (pl->state != PS_PLAYING)
 106           return;
 107         va_start(ap, format);
 108         (void) vsprintf(buf, format, ap);
 109         va_end(ap);
 110         pr_player(pl, C_FLASH, buf);
 111         io_output(pl->iop, IO_NOWAIT);
 112 }
 113
 114 void
 115 pr_inform(struct        player *pl, s_char      *format, ...)
 116 {
 117         s_char  buf[4096];
 118         va_list ap;
 119
 120         if (pl->state != PS_PLAYING)
 121           return;
 122         va_start(ap, format);
 123         (void) vsprintf(buf, format, ap);
 124         va_end(ap);
 125         pr_player(pl, C_INFORM, buf);
 126         io_output(pl->iop, IO_NOWAIT);
 127 }
 128
 129 void
 130 pr_wall(s_char  *format, ...)
 131 {
 132         s_char  buf[4096];
 133         struct  player *p;
 134         va_list ap;
 135
 136         va_start(ap, format);
 137         (void) vsprintf(buf, format, ap);
 138         va_end(ap);
 139         for (p = player_next(0); p; p = player_next(p)) {
 140                 if (p->state != PS_PLAYING)
 141                         continue;
 142                 pr_player(p, C_FLASH, buf);
 143                 io_output(p->iop, IO_NOWAIT);
 144         }
 145 }
 146
 147 void
 148 pr_player(struct player *pl, int id, s_char *buf)
 149 {
 150         register s_char *p;
 151         register s_char *bp;
 152         register int len;
 153
 154         bp = buf;
 155         while (*bp != '\0') {
 156               if (pl->curid != -1 && pl->curid != id) {
 157                       io_puts (pl->iop, "\n");
 158                       pl->curid = -1;
 159               }
 160               if (pl->curid == -1) {
 161                         outid(pl, id);
 162                 }
 163                 p = index(bp, '\n');
 164                 if (p != 0) {
 165                         len = (p - bp) + 1;
 166                         if (pl->command && (pl->command->c_flags & C_MOD))
 167                                 io_write(pl->iop, bp, len, IO_NOWAIT);
 168                         else
 169                                 io_write(pl->iop, bp, len, IO_WAIT);
 170                         bp += len;
 171                       pl->curid = -1;
 172                 } else {
 173                         len = io_puts(pl->iop, bp);
 174                         bp += len;
 175                 }
 176         }
 177 }
 178
 179 /*
 180  * highlighted characters have hex 80 or'ed in
 181  * with them to designate their highlightedness
 182  */
 183 void
 184 pr_hilite(s_char *buf)
 185 {
 186         register s_char *bp;
 187         register s_char c;
 188         s_char  *p;
 189
 190         p = (s_char *)malloc(strlen(buf) + 1);
 191         strcpy(p, buf);
 192         for (bp=p; 0 != (c = *bp); bp++)
 193                 if (isprint(c))
 194                         *bp |= 0x80;
 195         pr(p);
 196         free(p);
 197 }
 198
 199 /*
 200  * output hex code + space
 201  */
 202 void
 203 outid(struct player *pl, int n)
 204 {
 205         s_char  c;
 206         s_char  buf[3];
 207
 208         if (n > C_LAST) {
 209                 logerror("outid: %d not valid code\n", n);
 210                 return;
 211         }
 212         if (n >= 10)
 213                 c = 'a' - 10 + n;
 214         else
 215                 c = '0' + n;
 216         buf[0] = c;
 217         buf[1] = ' ';
 218         buf[2] = '\0';
 219         io_puts(pl->iop, buf);
 220       pl->curid = n;
 221 }
 222
 223 void
 224 prredir(s_char *redir)
 225 {
 226         pr_id(player, *redir == '>' ? C_REDIR : C_PIPE, "%s\n", redir);
 227 }
 228
 229 void
 230 prexec(s_char *file)
 231 {
 232         pr_id(player, C_EXECUTE, "%s\n", file);
 233 }
 234
 235 void
 236 prprompt(int min, int btu)
 237 {
 238         pr_id(player, C_PROMPT, "%d %d\n", min, btu);
 239 }
 240
 241 void
 242 showvers(int vers)
 243 {
 244         pr_id(player, C_INIT, "%d\n", vers);
 245 }
 246
 247 int
 248 prmptrd(s_char *prompt, s_char *str, int size)
 249 {
 250         int     r;
 251
 252         pr_id(player, C_FLUSH, "%s\n", prompt);
 253         if ((r = recvclient(str, size)) < 0)
 254                 return r;
 255         time(&player->curup);
 256         if (*str == 0)
 257                 return 1;
 258         return strlen(str);
 259 }
 260
 261 void
 262 prdate(void)
 263 {
 264         time_t  now;
 265
 266         (void) time(&now);
 267         pr(ctime(&now));
 268 }
 269
 270 /*
 271  * print x,y formatting as country
 272  */
 273 void
 274 prxy(s_char *format, coord x, coord y, natid country)
 275 {
 276         s_char  buf[255];
 277         struct  natstr *np;
 278
 279         np = getnatp(country);
 280         sprintf(buf, format, xrel(np, x), yrel(np, y));
 281         pr(buf);
 282 }
 283
 284 /*VARARGS*/
 285 void
 286 PR(int   cn, s_char  *format, ...)
 287 {
 288         /* XXX should really do this on a per-nation basis */
 289         static s_char longline[MAXNOC][512];
 290         int     newline;
 291         va_list ap;
 292         s_char  buf[1024];
 293
 294         va_start(ap, format);
 295         (void) vsprintf(buf, format, ap);
 296         va_end(ap);
 297         newline = strrchr(buf, '\n') ? 1 : 0;
 298         strcat(longline[cn], buf);
 299         if (newline){
 300                 if (update_pending || (cn && cn != player->cnum))
 301                         typed_wu(0, cn, longline[cn], TEL_BULLETIN);
 302                 else
 303                         pr_player(player, C_DATA, longline[cn]);
 304                 longline[cn][0] = '\0';
 305         }
 306 }
 307
 308 void
 309 PRdate(natid cn)
 310 {
 311         time_t    now;
 312
 313         (void) time(&now);
 314         PR(cn, ctime(&now));
 315 }
 316
 317 void
 318 pr_beep(void)
 319 {
 320         struct natstr *np = getnatp(player->cnum);
 321
 322         if (np->nat_flags & NF_BEEP)
 323                 pr("\07");
 324 }
 325
 326 void
 327 mpr(int cn, s_char      *format, ...)
 328 {
 329         s_char  buf[4096];
 330         va_list ap;
 331
 332         va_start(ap, format);
 333         (void) vsprintf(buf, format, ap);
 334         va_end(ap);
 335         if (cn) {
 336                 if (update_pending || cn != player->cnum)
 337                         typed_wu(0, cn, buf, TEL_BULLETIN);
 338                 else
 339                         pr_player(player, C_DATA, buf);
 340         }
 341 }