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