git.ozlabs.org Git - ccan/blob - ccan/io/test/run-17-homemade-io.c

   1 #include <ccan/io/io.h>
   2 /* Include the C files directly. */
   3 #include <ccan/io/poll.c>
   4 #include <ccan/io/io.c>
   5 #include <ccan/tap/tap.h>
   6 #include <sys/wait.h>
   7 #include <stdio.h>
   8
   9 #ifdef DEBUG_CONN
  10 #define PORT "64017"
  11 #else
  12 #define PORT "65017"
  13 #endif
  14
  15 struct packet {
  16         int state;
  17         size_t len;
  18         void *contents;
  19 };
  20
  21 static void finish_ok(struct io_conn *conn, struct packet *pkt)
  22 {
  23         ok1(pkt->state == 3);
  24         pkt->state++;
  25         io_break(pkt);
  26 }
  27
  28 static int do_read_packet(int fd, struct io_plan *plan)
  29 {
  30         struct packet *pkt = plan->u1.vp;
  31         char *dest;
  32         ssize_t ret;
  33         size_t off, totlen;
  34
  35         /* Reading len? */
  36         if (plan->u2.s < sizeof(size_t)) {
  37                 ok1(pkt->state == 1);
  38                 pkt->state++;
  39                 dest = (char *)&pkt->len;
  40                 off = plan->u2.s;
  41                 totlen = sizeof(pkt->len);
  42         } else {
  43                 ok1(pkt->state == 2);
  44                 pkt->state++;
  45                 if (pkt->len == 0)
  46                         return 1;
  47                 if (!pkt->contents && !(pkt->contents = malloc(pkt->len)))
  48                         goto fail;
  49                 else {
  50                         dest = pkt->contents;
  51                         off = plan->u2.s - sizeof(pkt->len);
  52                         totlen = pkt->len;
  53                 }
  54         }
  55
  56         ret = read(fd, dest + off, totlen - off);
  57         if (ret <= 0)
  58                 goto fail;
  59
  60         plan->u2.s += ret;
  61
  62         /* Finished? */
  63         return plan->u2.s >= sizeof(pkt->len)
  64                 && plan->u2.s == pkt->len + sizeof(pkt->len);
  65
  66 fail:
  67         free(pkt->contents);
  68         return -1;
  69 }
  70
  71 static struct io_plan *io_read_packet(struct io_conn *conn,
  72                                       struct packet *pkt,
  73                                       struct io_plan *(*cb)(struct io_conn *, void *),
  74                                       void *arg)
  75 {
  76         struct io_plan *plan = io_get_plan(conn, IO_IN);
  77
  78         assert(cb);
  79         pkt->contents = NULL;
  80         plan->u1.vp = pkt;
  81         plan->u2.s = 0;
  82
  83         return io_set_plan(conn, plan, do_read_packet, cb, arg);
  84 }
  85
  86 static struct io_plan *init_conn(struct io_conn *conn, struct packet *pkt)
  87 {
  88 #ifdef DEBUG_CONN
  89         io_set_debug(conn, true);
  90 #endif
  91         ok1(pkt->state == 0);
  92         pkt->state++;
  93
  94         io_set_finish(conn, finish_ok, pkt);
  95         return io_read_packet(conn, pkt, io_close_cb, pkt);
  96 }
  97
  98 static int make_listen_fd(const char *port, struct addrinfo **info)
  99 {
 100         int fd, on = 1;
 101         struct addrinfo *addrinfo, hints;
 102
 103         memset(&hints, 0, sizeof(hints));
 104         hints.ai_family = AF_UNSPEC;
 105         hints.ai_socktype = SOCK_STREAM;
 106         hints.ai_flags = AI_PASSIVE;
 107         hints.ai_protocol = 0;
 108
 109         if (getaddrinfo(NULL, port, &hints, &addrinfo) != 0)
 110                 return -1;
 111
 112         fd = socket(addrinfo->ai_family, addrinfo->ai_socktype,
 113                     addrinfo->ai_protocol);
 114         if (fd < 0)
 115                 return -1;
 116
 117         setsockopt(fd, SOL_SOCKET, SO_REUSEADDR, &on, sizeof(on));
 118         if (bind(fd, addrinfo->ai_addr, addrinfo->ai_addrlen) != 0) {
 119                 close(fd);
 120                 return -1;
 121         }
 122         if (listen(fd, 1) != 0) {
 123                 close(fd);
 124                 return -1;
 125         }
 126         *info = addrinfo;
 127         return fd;
 128 }
 129
 130 int main(void)
 131 {
 132         struct packet *pkt = malloc(sizeof(*pkt));
 133         struct addrinfo *addrinfo;
 134         struct io_listener *l;
 135         int fd, status;
 136
 137         /* This is how many tests you plan to run */
 138         plan_tests(13);
 139         pkt->state = 0;
 140         fd = make_listen_fd(PORT, &addrinfo);
 141         ok1(fd >= 0);
 142         l = io_new_listener(NULL, fd, init_conn, pkt);
 143         ok1(l);
 144         fflush(stdout);
 145         if (!fork()) {
 146                 struct {
 147                         size_t len;
 148                         char data[8];
 149                 } data;
 150
 151                 io_close_listener(l);
 152                 fd = socket(addrinfo->ai_family, addrinfo->ai_socktype,
 153                             addrinfo->ai_protocol);
 154                 if (fd < 0)
 155                         exit(1);
 156                 if (connect(fd, addrinfo->ai_addr, addrinfo->ai_addrlen) != 0)
 157                         exit(2);
 158                 signal(SIGPIPE, SIG_IGN);
 159
 160                 data.len = sizeof(data.data);
 161                 memcpy(data.data, "hithere!", sizeof(data.data));
 162                 if (write(fd, &data, sizeof(data)) != sizeof(data))
 163                         exit(3);
 164
 165                 close(fd);
 166                 freeaddrinfo(addrinfo);
 167                 free(pkt);
 168                 exit(0);
 169         }
 170         freeaddrinfo(addrinfo);
 171         ok1(io_loop(NULL, NULL) == pkt);
 172         ok1(pkt->state == 4);
 173         ok1(pkt->len == 8);
 174         ok1(memcmp(pkt->contents, "hithere!", 8) == 0);
 175         free(pkt->contents);
 176         free(pkt);
 177         io_close_listener(l);
 178
 179         ok1(wait(&status));
 180         ok1(WIFEXITED(status));
 181         ok1(WEXITSTATUS(status) == 0);
 182
 183         /* This exits depending on whether all tests passed */
 184         return exit_status();
 185 }