git.pond.sub.org Git - empserver/blob - src/client/expect.c

   1 /*
   2  *  Empire - A multi-player, client/server Internet based war game.
   3  *  Copyright (C) 1986-2007, 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 files README, COPYING and CREDITS in the root of the source
  23  *  tree for related information and legal notices.  It is expected
  24  *  that future projects/authors will amend these files as needed.
  25  *
  26  *  ---
  27  *
  28  *  expect.c: Read from the socket, expecting to see a particular code.
  29  *
  30  *  Known contributors to this file:
  31  *      Steve McClure, 1998
  32  */
  33
  34 #include <config.h>
  35
  36 #include <ctype.h>
  37 #include <errno.h>
  38 #include <stdio.h>
  39 #include <stdlib.h>
  40 #include <string.h>
  41 #ifndef _WIN32
  42 #include <sys/types.h>
  43 #include <sys/socket.h>
  44 #include <unistd.h>
  45 #endif
  46 #include "misc.h"
  47
  48 #ifdef _WIN32
  49 #define recv(sock, buffer, buf_size, flags) \
  50         w32_recv((sock), (buffer), (buf_size), (flags))
  51 #define read(sock, buffer, buf_size) \
  52         w32_recv((sock), (buffer), (buf_size), 0)
  53 #define write(sock, buffer, buf_size) \
  54         w32_send((sock), (buffer), (buf_size), 0)
  55 #endif
  56
  57 int
  58 recvline(int s, char *buf)
  59 {
  60     int size;
  61     char *p;
  62     int n;
  63     int newline;
  64     char *ptr;
  65     int cc;
  66
  67     size = 1024;
  68     ptr = buf;
  69     n = recv(s, ptr, size, MSG_PEEK);
  70     if (n <= 0) {
  71         perror("recv");
  72         return 0;
  73     }
  74     size -= n;
  75     buf[n] = '\0';
  76     if ((p = strchr(ptr, '\n')) == NULL) {
  77         do {
  78             cc = read(s, ptr, n);
  79             if (cc < 0) {
  80                 perror("expect: read");
  81                 return 0;
  82             }
  83             if (cc != n) {
  84                 fprintf(stderr, "expect: short read (%d not %d)\n", cc, n);
  85                 return 0;
  86             }
  87             ptr += n;
  88             if ((n = recv(s, ptr, size, MSG_PEEK)) <= 0) {
  89                 perror("recv");
  90                 return 0;
  91             }
  92             size -= n;
  93             ptr[n] = '\0';
  94         } while ((p = strchr(ptr, '\n')) == 0);
  95         newline = 1 + p - buf;
  96         *p = 0;
  97     } else
  98         newline = 1 + p - ptr;
  99     cc = read(s, buf, newline);
 100     if (cc < 0) {
 101         perror("expect: read #2");
 102         return 0;
 103     }
 104     if (cc != newline) {
 105         fprintf(stderr, "expect: short read #2 (%d not %d)\n",
 106                 cc, newline);
 107         return 0;
 108     }
 109     buf[newline] = '\0';
 110     if (!isxdigit(buf[0]) || buf[1] != ' ') {
 111         fprintf(stderr, "Malformed line %s\n", buf);
 112         return 0;
 113     }
 114     return strtol(buf, NULL, 16);
 115 }
 116
 117 int
 118 expect(int s, int match, char *buf)
 119 {
 120     int code = recvline(s, buf);
 121     return code == match;
 122 }
 123
 124 void
 125 sendcmd(int s, char *cmd, char *arg)
 126 {
 127     char buf[128];
 128     char *p;
 129     ssize_t n;
 130     int len;
 131
 132     len = snprintf(buf, sizeof(buf), "%s %s\n",
 133                    cmd, arg != NULL ? arg : "");
 134     if (len >= (int)sizeof(buf)) {
 135         fprintf(stderr, "%s too long\n", cmd);
 136         exit(1);
 137     }
 138     p = buf;
 139     while (len > 0) {
 140         n = write(s, buf, len);
 141         if (n < 0) {
 142             if (errno != EINTR) {
 143                 perror("sendcmd: write");
 144                 exit(1);
 145             }
 146             n = 0;
 147         }
 148         p += n;
 149         len -= n;
 150     }
 151 }