contrib/ntp/sntp/libevent/test/bench_httpclient.c

   1 /*
   2  * Copyright 2009-2012 Niels Provos and Nick Mathewson
   3  *
   4  * Redistribution and use in source and binary forms, with or without
   5  * modification, are permitted provided that the following conditions
   6  * are met:
   7  * 1. Redistributions of source code must retain the above copyright
   8  *    notice, this list of conditions and the following disclaimer.
   9  * 2. Redistributions in binary form must reproduce the above copyright
  10  *    notice, this list of conditions and the following disclaimer in the
  11  *    documentation and/or other materials provided with the distribution.
  12  * 4. The name of the author may not be used to endorse or promote products
  13  *    derived from this software without specific prior written permission.
  14  *
  15  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
  16  * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
  17  * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
  18  * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
  19  * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
  20  * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
  21  * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
  22  * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
  23  * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
  24  * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
  25  *
  26  */
  27
  28 /* for EVUTIL_ERR_CONNECT_RETRIABLE macro */
  29 #include "util-internal.h"
  30
  31 #include <sys/types.h>
  32 #ifdef _WIN32
  33 #include <winsock2.h>
  34 #else
  35 #include <sys/socket.h>
  36 #include <netinet/in.h>
  37 # ifdef _XOPEN_SOURCE_EXTENDED
  38 #  include <arpa/inet.h>
  39 # endif
  40 #endif
  41 #include <stdlib.h>
  42 #include <string.h>
  43 #include <errno.h>
  44
  45 #include "event2/event.h"
  46 #include "event2/bufferevent.h"
  47 #include "event2/buffer.h"
  48 #include "event2/util.h"
  49
  50 const char *resource = NULL;
  51 struct event_base *base = NULL;
  52
  53 int total_n_handled = 0;
  54 int total_n_errors = 0;
  55 int total_n_launched = 0;
  56 size_t total_n_bytes = 0;
  57 struct timeval total_time = {0,0};
  58 int n_errors = 0;
  59
  60 const int PARALLELISM = 200;
  61 const int N_REQUESTS = 20000;
  62
  63 struct request_info {
  64         size_t n_read;
  65         struct timeval started;
  66 };
  67
  68 static int launch_request(void);
  69 static void readcb(struct bufferevent *b, void *arg);
  70 static void errorcb(struct bufferevent *b, short what, void *arg);
  71
  72 static void
  73 readcb(struct bufferevent *b, void *arg)
  74 {
  75         struct request_info *ri = arg;
  76         struct evbuffer *input = bufferevent_get_input(b);
  77         size_t n = evbuffer_get_length(input);
  78
  79         ri->n_read += n;
  80         evbuffer_drain(input, n);
  81 }
  82
  83 static void
  84 errorcb(struct bufferevent *b, short what, void *arg)
  85 {
  86         struct request_info *ri = arg;
  87         struct timeval now, diff;
  88         if (what & BEV_EVENT_EOF) {
  89                 ++total_n_handled;
  90                 total_n_bytes += ri->n_read;
  91                 evutil_gettimeofday(&now, NULL);
  92                 evutil_timersub(&now, &ri->started, &diff);
  93                 evutil_timeradd(&diff, &total_time, &total_time);
  94
  95                 if (total_n_handled && (total_n_handled%1000)==0)
  96                         printf("%d requests done\n",total_n_handled);
  97
  98                 if (total_n_launched < N_REQUESTS) {
  99                         if (launch_request() < 0)
 100                                 perror("Can't launch");
 101                 }
 102         } else {
 103                 ++total_n_errors;
 104                 perror("Unexpected error");
 105         }
 106
 107         bufferevent_setcb(b, NULL, NULL, NULL, NULL);
 108         free(ri);
 109         bufferevent_disable(b, EV_READ|EV_WRITE);
 110         bufferevent_free(b);
 111 }
 112
 113 static void
 114 frob_socket(evutil_socket_t sock)
 115 {
 116 #ifdef HAVE_SO_LINGER
 117         struct linger l;
 118 #endif
 119         int one = 1;
 120         if (setsockopt(sock, SOL_SOCKET, SO_REUSEADDR, (void*)&one, sizeof(one))<0)
 121                 perror("setsockopt(SO_REUSEADDR)");
 122 #ifdef HAVE_SO_LINGER
 123         l.l_onoff = 1;
 124         l.l_linger = 0;
 125         if (setsockopt(sock, SOL_SOCKET, SO_LINGER, (void*)&l, sizeof(l))<0)
 126                 perror("setsockopt(SO_LINGER)");
 127 #endif
 128 }
 129
 130 static int
 131 launch_request(void)
 132 {
 133         evutil_socket_t sock;
 134         struct sockaddr_in sin;
 135         struct bufferevent *b;
 136
 137         struct request_info *ri;
 138
 139         memset(&sin, 0, sizeof(sin));
 140
 141         ++total_n_launched;
 142
 143         sin.sin_family = AF_INET;
 144         sin.sin_addr.s_addr = htonl(0x7f000001);
 145         sin.sin_port = htons(8080);
 146         if ((sock = socket(AF_INET, SOCK_STREAM, 0)) < 0)
 147                 return -1;
 148         if (evutil_make_socket_nonblocking(sock) < 0) {
 149                 evutil_closesocket(sock);
 150                 return -1;
 151         }
 152         frob_socket(sock);
 153         if (connect(sock, (struct sockaddr*)&sin, sizeof(sin)) < 0) {
 154                 int e = errno;
 155                 if (! EVUTIL_ERR_CONNECT_RETRIABLE(e)) {
 156                         evutil_closesocket(sock);
 157                         return -1;
 158                 }
 159         }
 160
 161         ri = malloc(sizeof(*ri));
 162         if (ri == NULL) {
 163                 printf("Unable to allocate memory in launch_request()\n");
 164                 return -1;
 165         }
 166         ri->n_read = 0;
 167         evutil_gettimeofday(&ri->started, NULL);
 168
 169         b = bufferevent_socket_new(base, sock, BEV_OPT_CLOSE_ON_FREE);
 170
 171         bufferevent_setcb(b, readcb, NULL, errorcb, ri);
 172         bufferevent_enable(b, EV_READ|EV_WRITE);
 173
 174         evbuffer_add_printf(bufferevent_get_output(b),
 175             "GET %s HTTP/1.0\r\n\r\n", resource);
 176
 177         return 0;
 178 }
 179
 180
 181 int
 182 main(int argc, char **argv)
 183 {
 184         int i;
 185         struct timeval start, end, total;
 186         long long usec;
 187         double throughput;
 188         resource = "/ref";
 189
 190         setvbuf(stdout, NULL, _IONBF, 0);
 191
 192         base = event_base_new();
 193
 194         for (i=0; i < PARALLELISM; ++i) {
 195                 if (launch_request() < 0)
 196                         perror("launch");
 197         }
 198
 199         evutil_gettimeofday(&start, NULL);
 200
 201         event_base_dispatch(base);
 202
 203         evutil_gettimeofday(&end, NULL);
 204         evutil_timersub(&end, &start, &total);
 205         usec = total_time.tv_sec * (long long)1000000 + total_time.tv_usec;
 206
 207         if (!total_n_handled) {
 208                 puts("Nothing worked.  You probably did something dumb.");
 209                 return 0;
 210         }
 211
 212
 213         throughput = total_n_handled /
 214             (total.tv_sec+ ((double)total.tv_usec)/1000000.0);
 215
 216 #ifdef _WIN32
 217 #define I64_FMT "%I64d"
 218 #define I64_TYP __int64
 219 #else
 220 #define I64_FMT "%lld"
 221 #define I64_TYP long long int
 222 #endif
 223
 224         printf("\n%d requests in %d.%06d sec. (%.2f throughput)\n"
 225             "Each took about %.02f msec latency\n"
 226             I64_FMT "bytes read. %d errors.\n",
 227             total_n_handled,
 228             (int)total.tv_sec, (int)total.tv_usec,
 229             throughput,
 230             (double)(usec/1000) / total_n_handled,
 231             (I64_TYP)total_n_bytes, n_errors);
 232
 233         return 0;
 234 }