1 /* Licensed to the Apache Software Foundation (ASF) under one or more
2 * contributor license agreements. See the NOTICE file distributed with
3 * this work for additional information regarding copyright ownership.
4 * The ASF licenses this file to You under the Apache License, Version 2.0
5 * (the "License"); you may not use this file except in compliance with
6 * the License. You may obtain a copy of the License at
8 * http://www.apache.org/licenses/LICENSE-2.0
10 * Unless required by applicable law or agreed to in writing, software
11 * distributed under the License is distributed on an "AS IS" BASIS,
12 * WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
13 * See the License for the specific language governing permissions and
14 * limitations under the License.
18 ** This program is based on ZeusBench V1.0 written by Adam Twiss
19 ** which is Copyright (c) 1996 by Zeus Technology Ltd. http://www.zeustech.net/
21 ** This software is provided "as is" and any express or implied waranties,
22 ** including but not limited to, the implied warranties of merchantability and
23 ** fitness for a particular purpose are disclaimed. In no event shall
24 ** Zeus Technology Ltd. be liable for any direct, indirect, incidental, special,
25 ** exemplary, or consequential damaged (including, but not limited to,
26 ** procurement of substitute good or services; loss of use, data, or profits;
27 ** or business interruption) however caused and on theory of liability. Whether
28 ** in contract, strict liability or tort (including negligence or otherwise)
29 ** arising in any way out of the use of this software, even if advised of the
30 ** possibility of such damage.
36 ** - Originally written by Adam Twiss <adam@zeus.co.uk>, March 1996
37 ** with input from Mike Belshe <mbelshe@netscape.com> and
38 ** Michael Campanella <campanella@stevms.enet.dec.com>
39 ** - Enhanced by Dean Gaudet <dgaudet@apache.org>, November 1997
40 ** - Cleaned up by Ralf S. Engelschall <rse@apache.org>, March 1998
41 ** - POST and verbosity by Kurt Sussman <kls@merlot.com>, August 1998
42 ** - HTML table output added by David N. Welton <davidw@prosa.it>, January 1999
43 ** - Added Cookie, Arbitrary header and auth support. <dirkx@webweaving.org>, April 1999
45 ** - Increased version number - as some of the socket/error handling has
46 ** fundamentally changed - and will give fundamentally different results
47 ** in situations where a server is dropping requests. Therefore you can
48 ** no longer compare results of AB as easily. Hence the inc of the version.
49 ** They should be closer to the truth though. Sander & <dirkx@covalent.net>, End 2000.
50 ** - Fixed proxy functionality, added median/mean statistics, added gnuplot
51 ** output option, added _experimental/rudimentary_ SSL support. Added
52 ** confidence guestimators and warnings. Sander & <dirkx@covalent.net>, End 2000
53 ** - Fixed serious int overflow issues which would cause realistic (longer
54 ** than a few minutes) run's to have wrong (but believable) results. Added
55 ** trapping of connection errors which influenced measurements.
56 ** Contributed by Sander Temme, Early 2001
58 ** - Changed timeout behavour during write to work whilst the sockets
59 ** are filling up and apr_write() does writes a few - but not all.
60 ** This will potentially change results. <dirkx@webweaving.org>, April 2001
62 ** Improvements to concurrent processing:
63 ** - Enabled non-blocking connect()s.
64 ** - Prevent blocking calls to apr_socket_recv() (thereby allowing AB to
65 ** manage its entire set of socket descriptors).
66 ** - Any error returned from apr_socket_recv() that is not EAGAIN or EOF
67 ** is now treated as fatal.
68 ** Contributed by Aaron Bannert, April 24, 2002
71 ** Internalized the version string - this string is part
72 ** of the Agent: header and the result output.
75 ** Adopted SSL code by Madhu Mathihalli <madhusudan_mathihalli@hp.com>
76 ** [PATCH] ab with SSL support Posted Wed, 15 Aug 2001 20:55:06 GMT
77 ** Introduces four 'if (int == value)' tests per non-ssl request.
80 ** Switched to the new abstract pollset API, allowing ab to
81 ** take advantage of future apr_pollset_t scalability improvements.
82 ** Contributed by Brian Pane, August 31, 2002
85 ** SIGINT now triggers output_results().
86 ** Contributed by colm, March 30, 2006
89 /* Note: this version string should start with \d+[\d\.]* and be a valid
90 * string for an HTTP Agent: header when prefixed with 'ApacheBench/'.
91 * It should reflect the version of AB - and not that of the apache server
92 * it happens to accompany. And it should be updated or changed whenever
93 * the results are no longer fundamentally comparable to the results of
94 * a previous version of ab. Either due to a change in the logic of
95 * ab - or to due to a change in the distribution it is compiled with
96 * (such as an APR change in for example blocking).
98 #define AP_AB_BASEREVISION "2.3"
104 * - has various other poor buffer attacks related to the lazy parsing of
105 * response headers from the server
106 * - doesn't implement much of HTTP/1.x, only accepts certain forms of
108 * - (performance problem) heavy use of strstr shows up top in profile
109 * only an issue for loopback usage
112 /* -------------------------------------------------------------------- */
115 /* Hmmm... This source code isn't being compiled in ASCII.
116 * In order for data that flows over the network to make
117 * sense, we need to translate to/from ASCII.
122 /* affects include files on Solaris */
126 #include "apr_signal.h"
127 #include "apr_strings.h"
128 #include "apr_network_io.h"
129 #include "apr_file_io.h"
130 #include "apr_time.h"
131 #include "apr_getopt.h"
132 #include "apr_general.h"
134 #include "apr_portable.h"
135 #include "ap_release.h"
136 #include "apr_poll.h"
138 #define APR_WANT_STRFUNC
139 #include "apr_want.h"
141 #include "apr_base64.h"
143 #include "apr_xlate.h"
148 #if APR_HAVE_STDLIB_H
151 #if APR_HAVE_UNISTD_H
152 #include <unistd.h> /* for getpid() */
155 #if !defined(WIN32) && !defined(NETWARE)
156 #include "ap_config_auto.h"
159 #if defined(HAVE_OPENSSL)
161 #include <openssl/rsa.h>
162 #include <openssl/crypto.h>
163 #include <openssl/x509.h>
164 #include <openssl/pem.h>
165 #include <openssl/err.h>
166 #include <openssl/ssl.h>
167 #include <openssl/rand.h>
169 #define SK_NUM(x) sk_X509_num(x)
170 #define SK_VALUE(x,y) sk_X509_value(x,y)
171 typedef STACK_OF(X509) X509_STACK_TYPE;
173 #if defined(_MSC_VER) && !defined(LIBRESSL_VERSION_NUMBER)
174 /* The following logic ensures we correctly glue FILE* within one CRT used
175 * by the OpenSSL library build to another CRT used by the ab.exe build.
176 * This became especially problematic with Visual Studio 2015.
178 #include <openssl/applink.c>
184 #if (OPENSSL_VERSION_NUMBER >= 0x00909000)
185 #define AB_SSL_METHOD_CONST const
187 #define AB_SSL_METHOD_CONST
189 #if (OPENSSL_VERSION_NUMBER >= 0x0090707f)
190 #define AB_SSL_CIPHER_CONST const
192 #define AB_SSL_CIPHER_CONST
194 #ifdef SSL_OP_NO_TLSv1_2
197 #if !defined(OPENSSL_NO_TLSEXT) && defined(SSL_set_tlsext_host_name)
200 #if defined(LIBRESSL_VERSION_NUMBER) && LIBRESSL_VERSION_NUMBER < 0x2060000f
201 #define SSL_CTRL_SET_MIN_PROTO_VERSION 123
202 #define SSL_CTRL_SET_MAX_PROTO_VERSION 124
203 #define SSL_CTX_set_min_proto_version(ctx, version) \
204 SSL_CTX_ctrl(ctx, SSL_CTRL_SET_MIN_PROTO_VERSION, version, NULL)
205 #define SSL_CTX_set_max_proto_version(ctx, version) \
206 SSL_CTX_ctrl(ctx, SSL_CTRL_SET_MAX_PROTO_VERSION, version, NULL)
214 #if APR_HAVE_LIMITS_H
218 /* ------------------- DEFINITIONS -------------------------- */
221 #define AB_MAX APR_INT64_C(0x7fffffffffffffff)
223 #define AB_MAX LLONG_MAX
226 /* maximum number of requests on a time limited test */
227 #define MAX_REQUESTS (INT_MAX > 50000 ? 50000 : INT_MAX)
230 * don't add enums or rearrange or otherwise change values without
231 * visiting set_conn_state()
234 STATE_UNCONNECTED = 0,
235 STATE_CONNECTING, /* TCP connect initiated, but we don't
236 * know if it worked yet
238 STATE_CONNECTED, /* we know TCP connect completed */
242 #define CBUFFSIZE (8192)
246 apr_socket_t *aprsock;
249 apr_size_t read; /* amount of bytes read */
250 apr_size_t bread; /* amount of body read */
251 apr_size_t rwrite, rwrote; /* keep pointers in what we write - across
253 apr_size_t length; /* Content-Length value used for keep-alive */
254 char cbuff[CBUFFSIZE]; /* a buffer to store server response header */
255 int cbx; /* offset in cbuffer */
256 int keepalive; /* non-zero if a keep-alive request */
257 int gotheader; /* non-zero if we have the entire header in
259 apr_time_t start, /* Start of connection */
260 connect, /* Connected, start writing */
261 endwrite, /* Request written */
262 beginread, /* First byte of input */
263 done; /* Connection closed */
272 apr_time_t starttime; /* start time of connection */
273 apr_interval_time_t waittime; /* between request and reading response */
274 apr_interval_time_t ctime; /* time to connect */
275 apr_interval_time_t time; /* time for connection */
278 #define ap_min(a,b) (((a)<(b))?(a):(b))
279 #define ap_max(a,b) (((a)>(b))?(a):(b))
280 #define ap_round_ms(a) ((apr_time_t)((a) + 500)/1000)
281 #define ap_double_ms(a) ((double)(a)/1000.0)
282 #define MAX_CONCURRENCY 20000
284 /* --------------------- GLOBALS ---------------------------- */
286 int verbosity = 0; /* no verbosity by default */
287 int recverrok = 0; /* ok to proceed after socket receive errors */
288 enum {NO_METH = 0, GET, HEAD, PUT, POST, CUSTOM_METHOD} method = NO_METH;
289 const char *method_str[] = {"bug", "GET", "HEAD", "PUT", "POST", ""};
290 int send_body = 0; /* non-zero if sending body with request */
291 int requests = 1; /* Number of requests to make */
292 int heartbeatres = 100; /* How often do we say we're alive */
293 int concurrency = 1; /* Number of multiple requests to make */
294 int percentile = 1; /* Show percentile served */
295 int nolength = 0; /* Accept variable document length */
296 int confidence = 1; /* Show confidence estimator and warnings */
297 int tlimit = 0; /* time limit in secs */
298 int keepalive = 0; /* try and do keepalive connections */
299 int windowsize = 0; /* we use the OS default window size */
300 char servername[1024]; /* name that server reports */
301 char *hostname; /* host name from URL */
302 const char *host_field; /* value of "Host:" header field */
303 const char *path; /* path name */
304 char *postdata; /* *buffer containing data from postfile */
305 apr_size_t postlen = 0; /* length of data to be POSTed */
306 char *content_type = NULL; /* content type to put in POST header */
307 const char *cookie, /* optional cookie line */
308 *auth, /* optional (basic/uuencoded) auhentication */
309 *hdrs; /* optional arbitrary headers */
310 apr_port_t port; /* port number */
311 char *proxyhost = NULL; /* proxy host name */
312 int proxyport = 0; /* proxy port */
313 const char *connecthost;
315 apr_port_t connectport;
316 const char *gnuplot; /* GNUplot file */
317 const char *csvperc; /* CSV Percentile file */
319 const char *colonhost;
321 apr_interval_time_t aprtimeout = apr_time_from_sec(30); /* timeout value */
323 /* overrides for ab-generated common headers */
324 const char *opt_host; /* which optional "Host:" header specified, if any */
325 int opt_useragent = 0; /* was an optional "User-Agent:" header specified? */
326 int opt_accept = 0; /* was an optional "Accept:" header specified? */
328 * XXX - this is now a per read/write transact type of value
331 int use_html = 0; /* use html in the report */
332 const char *tablestring;
333 const char *trstring;
334 const char *tdstring;
336 apr_size_t doclen = 0; /* the length the document should be */
337 apr_int64_t totalread = 0; /* total number of bytes read */
338 apr_int64_t totalbread = 0; /* totoal amount of entity body read */
339 apr_int64_t totalposted = 0; /* total number of bytes posted, inc. headers */
340 int started = 0; /* number of requests started, so no excess */
341 int done = 0; /* number of requests we have done */
342 int doneka = 0; /* number of keep alive connections done */
343 int good = 0, bad = 0; /* number of good and bad requests */
344 int epipe = 0; /* number of broken pipe writes */
345 int err_length = 0; /* requests failed due to response length */
346 int err_conn = 0; /* requests failed due to connection drop */
347 int err_recv = 0; /* requests failed due to broken read */
348 int err_except = 0; /* requests failed due to exception */
349 int err_response = 0; /* requests with invalid or non-200 response */
354 char *ssl_cipher = NULL;
355 char *ssl_info = NULL;
356 #if OPENSSL_VERSION_NUMBER >= 0x10002000L
357 char *ssl_tmp_key = NULL;
359 BIO *bio_out,*bio_err;
361 int tls_use_sni = 1; /* used by default, -I disables it */
362 const char *tls_sni = NULL; /* 'opt_host' if any, 'hostname' otherwise */
366 apr_time_t start, lasttime, stoptime;
368 /* global request (and its length) */
370 char *request = _request;
372 int requests_initialized = 0;
374 /* one global throw-away buffer to read stuff into */
377 /* interesting percentiles */
378 int percs[] = {50, 66, 75, 80, 90, 95, 98, 99, 100};
380 struct connection *con; /* connection array */
381 struct data *stats; /* data for each request */
384 apr_pollset_t *readbits;
386 apr_sockaddr_t *mysa;
387 apr_sockaddr_t *destsa;
390 apr_xlate_t *from_ascii, *to_ascii;
393 static void write_request(struct connection * c);
394 static void close_connection(struct connection * c);
396 /* --------------------------------------------------------- */
398 /* simple little function to write an error string and exit */
400 static void err(const char *s)
402 fprintf(stderr, "%s\n", s);
404 printf("Total of %d requests completed\n" , done);
408 /* simple little function to write an APR error string and exit */
410 static void apr_err(const char *s, apr_status_t rv)
416 s, apr_strerror(rv, buf, sizeof buf), rv);
418 printf("Total of %d requests completed\n" , done);
422 static void *xmalloc(size_t size)
424 void *ret = malloc(size);
426 fprintf(stderr, "Could not allocate memory (%"
427 APR_SIZE_T_FMT" bytes)\n", size);
433 static void *xcalloc(size_t num, size_t size)
435 void *ret = calloc(num, size);
437 fprintf(stderr, "Could not allocate memory (%"
438 APR_SIZE_T_FMT" bytes)\n", size*num);
444 static char *xstrdup(const char *s)
446 char *ret = strdup(s);
448 fprintf(stderr, "Could not allocate memory (%"
449 APR_SIZE_T_FMT " bytes)\n", strlen(s));
456 * Similar to standard strstr() but we ignore case in this version.
457 * Copied from ap_strcasestr().
459 static char *xstrcasestr(const char *s1, const char *s2)
467 for ( ; (*s1 != '\0') && (apr_tolower(*s1) != apr_tolower(*s2)); s1++);
471 /* found first character of s2, see if the rest matches */
474 for (++p1, ++p2; apr_tolower(*p1) == apr_tolower(*p2); ++p1, ++p2) {
476 /* both strings ended together */
481 /* second string ended, a match */
484 /* didn't find a match here, try starting at next character in s1 */
490 /* pool abort function */
491 static int abort_on_oom(int retcode)
493 fprintf(stderr, "Could not allocate memory\n");
499 static void set_polled_events(struct connection *c, apr_int16_t new_reqevents)
503 if (c->pollfd.reqevents != new_reqevents) {
504 if (c->pollfd.reqevents != 0) {
505 rv = apr_pollset_remove(readbits, &c->pollfd);
506 if (rv != APR_SUCCESS) {
507 apr_err("apr_pollset_remove()", rv);
511 if (new_reqevents != 0) {
512 c->pollfd.reqevents = new_reqevents;
513 rv = apr_pollset_add(readbits, &c->pollfd);
514 if (rv != APR_SUCCESS) {
515 apr_err("apr_pollset_add()", rv);
521 static void set_conn_state(struct connection *c, connect_state_e new_state)
523 apr_int16_t events_by_state[] = {
524 0, /* for STATE_UNCONNECTED */
525 APR_POLLOUT, /* for STATE_CONNECTING */
526 APR_POLLIN, /* for STATE_CONNECTED; we don't poll in this state,
527 * so prepare for polling in the following state --
530 APR_POLLIN /* for STATE_READ */
533 c->state = new_state;
535 set_polled_events(c, events_by_state[new_state]);
538 /* --------------------------------------------------------- */
539 /* write out request to a connection - assumes we can write
540 * (small) request out in one go into our new socket buffer
544 static long ssl_print_cb(BIO *bio,int cmd,const char *argp,int argi,long argl,long ret)
548 out=(BIO *)BIO_get_callback_arg(bio);
549 if (out == NULL) return(ret);
551 if (cmd == (BIO_CB_READ|BIO_CB_RETURN)) {
552 BIO_printf(out,"read from %p [%p] (%d bytes => %ld (0x%lX))\n",
553 bio, argp, argi, ret, ret);
554 BIO_dump(out,(char *)argp,(int)ret);
557 else if (cmd == (BIO_CB_WRITE|BIO_CB_RETURN)) {
558 BIO_printf(out,"write to %p [%p] (%d bytes => %ld (0x%lX))\n",
559 bio, argp, argi, ret, ret);
560 BIO_dump(out,(char *)argp,(int)ret);
565 static void ssl_state_cb(const SSL *s, int w, int r)
567 if (w & SSL_CB_ALERT) {
568 BIO_printf(bio_err, "SSL/TLS Alert [%s] %s:%s\n",
569 (w & SSL_CB_READ ? "read" : "write"),
570 SSL_alert_type_string_long(r),
571 SSL_alert_desc_string_long(r));
572 } else if (w & SSL_CB_LOOP) {
573 BIO_printf(bio_err, "SSL/TLS State [%s] %s\n",
574 (SSL_in_connect_init((SSL*)s) ? "connect" : "-"),
575 SSL_state_string_long(s));
576 } else if (w & (SSL_CB_HANDSHAKE_START|SSL_CB_HANDSHAKE_DONE)) {
577 BIO_printf(bio_err, "SSL/TLS Handshake [%s] %s\n",
578 (w & SSL_CB_HANDSHAKE_START ? "Start" : "Done"),
579 SSL_state_string_long(s));
584 #define RAND_MAX INT_MAX
587 static int ssl_rand_choosenum(int l, int h)
592 srand((unsigned int)time(NULL));
593 apr_snprintf(buf, sizeof(buf), "%.0f",
594 (((double)(rand()%RAND_MAX)/RAND_MAX)*(h-l)));
601 static void ssl_rand_seed(void)
606 unsigned char stackdata[256];
609 * seed in the current time (usually just 4 bytes)
613 RAND_seed((unsigned char *)&t, l);
616 * seed in the current process id (usually just 4 bytes)
620 RAND_seed((unsigned char *)&pid, l);
623 * seed in some current state of the run-time stack (128 bytes)
625 n = ssl_rand_choosenum(0, sizeof(stackdata)-128-1);
626 RAND_seed(stackdata+n, 128);
629 static int ssl_print_connection_info(BIO *bio, SSL *ssl)
631 AB_SSL_CIPHER_CONST SSL_CIPHER *c;
634 BIO_printf(bio,"Transport Protocol :%s\n", SSL_get_version(ssl));
636 c = SSL_get_current_cipher(ssl);
637 BIO_printf(bio,"Cipher Suite Protocol :%s\n", SSL_CIPHER_get_version(c));
638 BIO_printf(bio,"Cipher Suite Name :%s\n",SSL_CIPHER_get_name(c));
640 bits = SSL_CIPHER_get_bits(c,&alg_bits);
641 BIO_printf(bio,"Cipher Suite Cipher Bits:%d (%d)\n",bits,alg_bits);
646 static void ssl_print_cert_info(BIO *bio, X509 *cert)
652 BIO_printf(bio, "Certificate version: %ld\n", X509_get_version(cert)+1);
653 BIO_printf(bio,"Valid from: ");
654 ASN1_UTCTIME_print(bio, X509_get_notBefore(cert));
655 BIO_printf(bio,"\n");
657 BIO_printf(bio,"Valid to : ");
658 ASN1_UTCTIME_print(bio, X509_get_notAfter(cert));
659 BIO_printf(bio,"\n");
661 pk = X509_get_pubkey(cert);
662 BIO_printf(bio,"Public key is %d bits\n",
666 dn = X509_get_issuer_name(cert);
667 X509_NAME_oneline(dn, buf, sizeof(buf));
668 BIO_printf(bio,"The issuer name is %s\n", buf);
670 dn=X509_get_subject_name(cert);
671 X509_NAME_oneline(dn, buf, sizeof(buf));
672 BIO_printf(bio,"The subject name is %s\n", buf);
674 /* dump the extension list too */
675 BIO_printf(bio, "Extension Count: %d\n", X509_get_ext_count(cert));
678 static void ssl_print_info(struct connection *c)
684 BIO_printf(bio_err, "\n");
685 sk = SSL_get_peer_cert_chain(c->ssl);
686 if ((count = SK_NUM(sk)) > 0) {
688 for (i=1; i<count; i++) {
689 cert = (X509 *)SK_VALUE(sk, i);
690 ssl_print_cert_info(bio_out, cert);
693 cert = SSL_get_peer_certificate(c->ssl);
695 BIO_printf(bio_out, "Anon DH\n");
697 BIO_printf(bio_out, "Peer certificate\n");
698 ssl_print_cert_info(bio_out, cert);
701 ssl_print_connection_info(bio_err,c->ssl);
702 SSL_SESSION_print(bio_err, SSL_get_session(c->ssl));
705 static void ssl_proceed_handshake(struct connection *c)
712 ret = SSL_do_handshake(c->ssl);
713 ecode = SSL_get_error(c->ssl, ret);
719 if (ssl_info == NULL) {
720 AB_SSL_CIPHER_CONST SSL_CIPHER *ci;
722 int sk_bits, pk_bits, swork;
724 ci = SSL_get_current_cipher(c->ssl);
725 sk_bits = SSL_CIPHER_get_bits(ci, &swork);
726 cert = SSL_get_peer_certificate(c->ssl);
728 pk_bits = EVP_PKEY_bits(X509_get_pubkey(cert));
730 pk_bits = 0; /* Anon DH */
732 ssl_info = xmalloc(128);
733 apr_snprintf(ssl_info, 128, "%s,%s,%d,%d",
734 SSL_get_version(c->ssl),
735 SSL_CIPHER_get_name(ci),
738 #if OPENSSL_VERSION_NUMBER >= 0x10002000L
739 if (ssl_tmp_key == NULL) {
741 if (SSL_get_server_tmp_key(c->ssl, &key)) {
742 ssl_tmp_key = xmalloc(128);
743 switch (EVP_PKEY_id(key)) {
745 apr_snprintf(ssl_tmp_key, 128, "RSA %d bits",
749 apr_snprintf(ssl_tmp_key, 128, "DH %d bits",
752 #ifndef OPENSSL_NO_EC
754 const char *cname = NULL;
755 EC_KEY *ec = EVP_PKEY_get1_EC_KEY(key);
756 int nid = EC_GROUP_get_curve_name(EC_KEY_get0_group(ec));
758 cname = EC_curve_nid2nist(nid);
760 cname = OBJ_nid2sn(nid);
762 apr_snprintf(ssl_tmp_key, 128, "ECDH %s %d bits",
769 apr_snprintf(ssl_tmp_key, 128, "%s %d bits",
770 OBJ_nid2sn(EVP_PKEY_id(key)),
781 case SSL_ERROR_WANT_READ:
782 set_polled_events(c, APR_POLLIN);
785 case SSL_ERROR_WANT_WRITE:
786 set_polled_events(c, APR_POLLOUT);
789 case SSL_ERROR_WANT_CONNECT:
791 case SSL_ERROR_SYSCALL:
792 /* Unexpected result */
793 BIO_printf(bio_err, "SSL handshake failed (%d).\n", ecode);
794 ERR_print_errors(bio_err);
804 static void write_request(struct connection * c)
806 if (started >= requests) {
812 apr_size_t l = c->rwrite;
813 apr_status_t e = APR_SUCCESS; /* prevent gcc warning */
815 tnow = lasttime = apr_time_now();
820 if (c->rwrite == 0) {
821 apr_socket_timeout_set(c->aprsock, 0);
826 c->rwrite += postlen;
829 else if (tnow > c->connect + aprtimeout) {
830 printf("Send request timed out!\n");
837 e = SSL_write(c->ssl, request + c->rwrote, l);
839 switch (SSL_get_error(c->ssl, e)) {
840 case SSL_ERROR_WANT_READ:
841 set_polled_events(c, APR_POLLIN);
843 case SSL_ERROR_WANT_WRITE:
844 set_polled_events(c, APR_POLLOUT);
847 BIO_printf(bio_err, "SSL write failed - closing connection\n");
848 ERR_print_errors(bio_err);
849 close_connection (c);
859 e = apr_socket_send(c->aprsock, request + c->rwrote, &l);
860 if (e != APR_SUCCESS && !l) {
861 if (!APR_STATUS_IS_EAGAIN(e)) {
863 printf("Send request failed!\n");
867 set_polled_events(c, APR_POLLOUT);
877 c->endwrite = lasttime = apr_time_now();
879 set_conn_state(c, STATE_READ);
882 /* --------------------------------------------------------- */
884 /* calculate and output results */
886 static int compradre(struct data * a, struct data * b)
888 if ((a->ctime) < (b->ctime))
890 if ((a->ctime) > (b->ctime))
895 static int comprando(struct data * a, struct data * b)
897 if ((a->time) < (b->time))
899 if ((a->time) > (b->time))
904 static int compri(struct data * a, struct data * b)
906 apr_interval_time_t p = a->time - a->ctime;
907 apr_interval_time_t q = b->time - b->ctime;
915 static int compwait(struct data * a, struct data * b)
917 if ((a->waittime) < (b->waittime))
919 if ((a->waittime) > (b->waittime))
924 static void output_results(int sig)
929 lasttime = apr_time_now(); /* record final time if interrupted */
931 timetaken = (double) (lasttime - start) / APR_USEC_PER_SEC;
934 printf("Server Software: %s\n", servername);
935 printf("Server Hostname: %s\n", hostname);
936 printf("Server Port: %hu\n", port);
938 if (is_ssl && ssl_info) {
939 printf("SSL/TLS Protocol: %s\n", ssl_info);
941 #if OPENSSL_VERSION_NUMBER >= 0x10002000L
942 if (is_ssl && ssl_tmp_key) {
943 printf("Server Temp Key: %s\n", ssl_tmp_key);
947 if (is_ssl && tls_sni) {
948 printf("TLS Server Name: %s\n", tls_sni);
953 printf("Document Path: %s\n", path);
955 printf("Document Length: Variable\n");
957 printf("Document Length: %" APR_SIZE_T_FMT " bytes\n", doclen);
959 printf("Concurrency Level: %d\n", concurrency);
960 printf("Time taken for tests: %.3f seconds\n", timetaken);
961 printf("Complete requests: %d\n", done);
962 printf("Failed requests: %d\n", bad);
964 printf(" (Connect: %d, Receive: %d, Length: %d, Exceptions: %d)\n",
965 err_conn, err_recv, err_length, err_except);
967 printf("Write errors: %d\n", epipe);
969 printf("Non-2xx responses: %d\n", err_response);
971 printf("Keep-Alive requests: %d\n", doneka);
972 printf("Total transferred: %" APR_INT64_T_FMT " bytes\n", totalread);
974 printf("Total body sent: %" APR_INT64_T_FMT "\n",
976 printf("HTML transferred: %" APR_INT64_T_FMT " bytes\n", totalbread);
978 /* avoid divide by zero */
979 if (timetaken && done) {
980 printf("Requests per second: %.2f [#/sec] (mean)\n",
981 (double) done / timetaken);
982 printf("Time per request: %.3f [ms] (mean)\n",
983 (double) concurrency * timetaken * 1000 / done);
984 printf("Time per request: %.3f [ms] (mean, across all concurrent requests)\n",
985 (double) timetaken * 1000 / done);
986 printf("Transfer rate: %.2f [Kbytes/sec] received\n",
987 (double) totalread / 1024 / timetaken);
989 printf(" %.2f kb/s sent\n",
990 (double) totalposted / 1024 / timetaken);
991 printf(" %.2f kb/s total\n",
992 (double) (totalread + totalposted) / 1024 / timetaken);
997 /* work out connection times */
999 apr_time_t totalcon = 0, total = 0, totald = 0, totalwait = 0;
1000 apr_time_t meancon, meantot, meand, meanwait;
1001 apr_interval_time_t mincon = AB_MAX, mintot = AB_MAX, mind = AB_MAX,
1003 apr_interval_time_t maxcon = 0, maxtot = 0, maxd = 0, maxwait = 0;
1004 apr_interval_time_t mediancon = 0, mediantot = 0, mediand = 0, medianwait = 0;
1005 double sdtot = 0, sdcon = 0, sdd = 0, sdwait = 0;
1007 for (i = 0; i < done; i++) {
1008 struct data *s = &stats[i];
1009 mincon = ap_min(mincon, s->ctime);
1010 mintot = ap_min(mintot, s->time);
1011 mind = ap_min(mind, s->time - s->ctime);
1012 minwait = ap_min(minwait, s->waittime);
1014 maxcon = ap_max(maxcon, s->ctime);
1015 maxtot = ap_max(maxtot, s->time);
1016 maxd = ap_max(maxd, s->time - s->ctime);
1017 maxwait = ap_max(maxwait, s->waittime);
1019 totalcon += s->ctime;
1021 totald += s->time - s->ctime;
1022 totalwait += s->waittime;
1024 meancon = totalcon / done;
1025 meantot = total / done;
1026 meand = totald / done;
1027 meanwait = totalwait / done;
1029 /* calculating the sample variance: the sum of the squared deviations, divided by n-1 */
1030 for (i = 0; i < done; i++) {
1031 struct data *s = &stats[i];
1033 a = ((double)s->time - meantot);
1035 a = ((double)s->ctime - meancon);
1037 a = ((double)s->time - (double)s->ctime - meand);
1039 a = ((double)s->waittime - meanwait);
1043 sdtot = (done > 1) ? sqrt(sdtot / (done - 1)) : 0;
1044 sdcon = (done > 1) ? sqrt(sdcon / (done - 1)) : 0;
1045 sdd = (done > 1) ? sqrt(sdd / (done - 1)) : 0;
1046 sdwait = (done > 1) ? sqrt(sdwait / (done - 1)) : 0;
1049 * XXX: what is better; this hideous cast of the compradre function; or
1050 * the four warnings during compile ? dirkx just does not know and
1053 qsort(stats, done, sizeof(struct data),
1054 (int (*) (const void *, const void *)) compradre);
1055 if ((done > 1) && (done % 2))
1056 mediancon = (stats[done / 2].ctime + stats[done / 2 + 1].ctime) / 2;
1058 mediancon = stats[done / 2].ctime;
1060 qsort(stats, done, sizeof(struct data),
1061 (int (*) (const void *, const void *)) compri);
1062 if ((done > 1) && (done % 2))
1063 mediand = (stats[done / 2].time + stats[done / 2 + 1].time \
1064 -stats[done / 2].ctime - stats[done / 2 + 1].ctime) / 2;
1066 mediand = stats[done / 2].time - stats[done / 2].ctime;
1068 qsort(stats, done, sizeof(struct data),
1069 (int (*) (const void *, const void *)) compwait);
1070 if ((done > 1) && (done % 2))
1071 medianwait = (stats[done / 2].waittime + stats[done / 2 + 1].waittime) / 2;
1073 medianwait = stats[done / 2].waittime;
1075 qsort(stats, done, sizeof(struct data),
1076 (int (*) (const void *, const void *)) comprando);
1077 if ((done > 1) && (done % 2))
1078 mediantot = (stats[done / 2].time + stats[done / 2 + 1].time) / 2;
1080 mediantot = stats[done / 2].time;
1082 printf("\nConnection Times (ms)\n");
1084 * Reduce stats from apr time to milliseconds
1086 mincon = ap_round_ms(mincon);
1087 mind = ap_round_ms(mind);
1088 minwait = ap_round_ms(minwait);
1089 mintot = ap_round_ms(mintot);
1090 meancon = ap_round_ms(meancon);
1091 meand = ap_round_ms(meand);
1092 meanwait = ap_round_ms(meanwait);
1093 meantot = ap_round_ms(meantot);
1094 mediancon = ap_round_ms(mediancon);
1095 mediand = ap_round_ms(mediand);
1096 medianwait = ap_round_ms(medianwait);
1097 mediantot = ap_round_ms(mediantot);
1098 maxcon = ap_round_ms(maxcon);
1099 maxd = ap_round_ms(maxd);
1100 maxwait = ap_round_ms(maxwait);
1101 maxtot = ap_round_ms(maxtot);
1102 sdcon = ap_double_ms(sdcon);
1103 sdd = ap_double_ms(sdd);
1104 sdwait = ap_double_ms(sdwait);
1105 sdtot = ap_double_ms(sdtot);
1108 #define CONF_FMT_STRING "%5" APR_TIME_T_FMT " %4" APR_TIME_T_FMT " %5.1f %6" APR_TIME_T_FMT " %7" APR_TIME_T_FMT "\n"
1109 printf(" min mean[+/-sd] median max\n");
1110 printf("Connect: " CONF_FMT_STRING,
1111 mincon, meancon, sdcon, mediancon, maxcon);
1112 printf("Processing: " CONF_FMT_STRING,
1113 mind, meand, sdd, mediand, maxd);
1114 printf("Waiting: " CONF_FMT_STRING,
1115 minwait, meanwait, sdwait, medianwait, maxwait);
1116 printf("Total: " CONF_FMT_STRING,
1117 mintot, meantot, sdtot, mediantot, maxtot);
1118 #undef CONF_FMT_STRING
1120 #define SANE(what,mean,median,sd) \
1122 double d = (double)mean - median; \
1123 if (d < 0) d = -d; \
1125 printf("ERROR: The median and mean for " what " are more than twice the standard\n" \
1126 " deviation apart. These results are NOT reliable.\n"); \
1128 printf("WARNING: The median and mean for " what " are not within a normal deviation\n" \
1129 " These results are probably not that reliable.\n"); \
1131 SANE("the initial connection time", meancon, mediancon, sdcon);
1132 SANE("the processing time", meand, mediand, sdd);
1133 SANE("the waiting time", meanwait, medianwait, sdwait);
1134 SANE("the total time", meantot, mediantot, sdtot);
1137 printf(" min avg max\n");
1138 #define CONF_FMT_STRING "%5" APR_TIME_T_FMT " %5" APR_TIME_T_FMT "%5" APR_TIME_T_FMT "\n"
1139 printf("Connect: " CONF_FMT_STRING, mincon, meancon, maxcon);
1140 printf("Processing: " CONF_FMT_STRING, mind, meand, maxd);
1141 printf("Waiting: " CONF_FMT_STRING, minwait, meanwait, maxwait);
1142 printf("Total: " CONF_FMT_STRING, mintot, meantot, maxtot);
1143 #undef CONF_FMT_STRING
1147 /* Sorted on total connect times */
1148 if (percentile && (done > 1)) {
1149 printf("\nPercentage of the requests served within a certain time (ms)\n");
1150 for (i = 0; i < sizeof(percs) / sizeof(int); i++) {
1152 printf(" 0%% <0> (never)\n");
1153 else if (percs[i] >= 100)
1154 printf(" 100%% %5" APR_TIME_T_FMT " (longest request)\n",
1155 ap_round_ms(stats[done - 1].time));
1157 printf(" %d%% %5" APR_TIME_T_FMT "\n", percs[i],
1158 ap_round_ms(stats[(unsigned long)done * percs[i] / 100].time));
1162 FILE *out = fopen(csvperc, "w");
1164 perror("Cannot open CSV output file");
1167 fprintf(out, "" "Percentage served" "," "Time in ms" "\n");
1168 for (i = 0; i <= 100; i++) {
1171 t = ap_double_ms(stats[0].time);
1173 t = ap_double_ms(stats[done - 1].time);
1175 t = ap_double_ms(stats[(unsigned long) (0.5 + (double)done * i / 100.0)].time);
1176 fprintf(out, "%d,%.3f\n", i, t);
1181 FILE *out = fopen(gnuplot, "w");
1182 char tmstring[APR_CTIME_LEN];
1184 perror("Cannot open gnuplot output file");
1187 fprintf(out, "starttime\tseconds\tctime\tdtime\tttime\twait\n");
1188 for (i = 0; i < done; i++) {
1189 (void) apr_ctime(tmstring, stats[i].starttime);
1190 fprintf(out, "%s\t%" APR_TIME_T_FMT "\t%" APR_TIME_T_FMT
1191 "\t%" APR_TIME_T_FMT "\t%" APR_TIME_T_FMT
1192 "\t%" APR_TIME_T_FMT "\n", tmstring,
1193 apr_time_sec(stats[i].starttime),
1194 ap_round_ms(stats[i].ctime),
1195 ap_round_ms(stats[i].time - stats[i].ctime),
1196 ap_round_ms(stats[i].time),
1197 ap_round_ms(stats[i].waittime));
1208 /* --------------------------------------------------------- */
1210 /* calculate and output results in HTML */
1212 static void output_html_results(void)
1214 double timetaken = (double) (lasttime - start) / APR_USEC_PER_SEC;
1216 printf("\n\n<table %s>\n", tablestring);
1217 printf("<tr %s><th colspan=2 %s>Server Software:</th>"
1218 "<td colspan=2 %s>%s</td></tr>\n",
1219 trstring, tdstring, tdstring, servername);
1220 printf("<tr %s><th colspan=2 %s>Server Hostname:</th>"
1221 "<td colspan=2 %s>%s</td></tr>\n",
1222 trstring, tdstring, tdstring, hostname);
1223 printf("<tr %s><th colspan=2 %s>Server Port:</th>"
1224 "<td colspan=2 %s>%hu</td></tr>\n",
1225 trstring, tdstring, tdstring, port);
1226 printf("<tr %s><th colspan=2 %s>Document Path:</th>"
1227 "<td colspan=2 %s>%s</td></tr>\n",
1228 trstring, tdstring, tdstring, path);
1230 printf("<tr %s><th colspan=2 %s>Document Length:</th>"
1231 "<td colspan=2 %s>Variable</td></tr>\n",
1232 trstring, tdstring, tdstring);
1234 printf("<tr %s><th colspan=2 %s>Document Length:</th>"
1235 "<td colspan=2 %s>%" APR_SIZE_T_FMT " bytes</td></tr>\n",
1236 trstring, tdstring, tdstring, doclen);
1237 printf("<tr %s><th colspan=2 %s>Concurrency Level:</th>"
1238 "<td colspan=2 %s>%d</td></tr>\n",
1239 trstring, tdstring, tdstring, concurrency);
1240 printf("<tr %s><th colspan=2 %s>Time taken for tests:</th>"
1241 "<td colspan=2 %s>%.3f seconds</td></tr>\n",
1242 trstring, tdstring, tdstring, timetaken);
1243 printf("<tr %s><th colspan=2 %s>Complete requests:</th>"
1244 "<td colspan=2 %s>%d</td></tr>\n",
1245 trstring, tdstring, tdstring, done);
1246 printf("<tr %s><th colspan=2 %s>Failed requests:</th>"
1247 "<td colspan=2 %s>%d</td></tr>\n",
1248 trstring, tdstring, tdstring, bad);
1250 printf("<tr %s><td colspan=4 %s > (Connect: %d, Length: %d, Exceptions: %d)</td></tr>\n",
1251 trstring, tdstring, err_conn, err_length, err_except);
1253 printf("<tr %s><th colspan=2 %s>Non-2xx responses:</th>"
1254 "<td colspan=2 %s>%d</td></tr>\n",
1255 trstring, tdstring, tdstring, err_response);
1257 printf("<tr %s><th colspan=2 %s>Keep-Alive requests:</th>"
1258 "<td colspan=2 %s>%d</td></tr>\n",
1259 trstring, tdstring, tdstring, doneka);
1260 printf("<tr %s><th colspan=2 %s>Total transferred:</th>"
1261 "<td colspan=2 %s>%" APR_INT64_T_FMT " bytes</td></tr>\n",
1262 trstring, tdstring, tdstring, totalread);
1264 printf("<tr %s><th colspan=2 %s>Total body sent:</th>"
1265 "<td colspan=2 %s>%" APR_INT64_T_FMT "</td></tr>\n",
1267 tdstring, totalposted);
1268 printf("<tr %s><th colspan=2 %s>HTML transferred:</th>"
1269 "<td colspan=2 %s>%" APR_INT64_T_FMT " bytes</td></tr>\n",
1270 trstring, tdstring, tdstring, totalbread);
1272 /* avoid divide by zero */
1274 printf("<tr %s><th colspan=2 %s>Requests per second:</th>"
1275 "<td colspan=2 %s>%.2f</td></tr>\n",
1276 trstring, tdstring, tdstring, (double) done / timetaken);
1277 printf("<tr %s><th colspan=2 %s>Transfer rate:</th>"
1278 "<td colspan=2 %s>%.2f kb/s received</td></tr>\n",
1279 trstring, tdstring, tdstring, (double) totalread / 1024 / timetaken);
1281 printf("<tr %s><td colspan=2 %s> </td>"
1282 "<td colspan=2 %s>%.2f kb/s sent</td></tr>\n",
1283 trstring, tdstring, tdstring,
1284 (double) totalposted / 1024 / timetaken);
1285 printf("<tr %s><td colspan=2 %s> </td>"
1286 "<td colspan=2 %s>%.2f kb/s total</td></tr>\n",
1287 trstring, tdstring, tdstring,
1288 (double) (totalread + totalposted) / 1024 / timetaken);
1292 /* work out connection times */
1294 apr_interval_time_t totalcon = 0, total = 0;
1295 apr_interval_time_t mincon = AB_MAX, mintot = AB_MAX;
1296 apr_interval_time_t maxcon = 0, maxtot = 0;
1298 for (i = 0; i < done; i++) {
1299 struct data *s = &stats[i];
1300 mincon = ap_min(mincon, s->ctime);
1301 mintot = ap_min(mintot, s->time);
1302 maxcon = ap_max(maxcon, s->ctime);
1303 maxtot = ap_max(maxtot, s->time);
1304 totalcon += s->ctime;
1308 * Reduce stats from apr time to milliseconds
1310 mincon = ap_round_ms(mincon);
1311 mintot = ap_round_ms(mintot);
1312 maxcon = ap_round_ms(maxcon);
1313 maxtot = ap_round_ms(maxtot);
1314 totalcon = ap_round_ms(totalcon);
1315 total = ap_round_ms(total);
1317 if (done > 0) { /* avoid division by zero (if 0 done) */
1318 printf("<tr %s><th %s colspan=4>Connnection Times (ms)</th></tr>\n",
1319 trstring, tdstring);
1320 printf("<tr %s><th %s> </th> <th %s>min</th> <th %s>avg</th> <th %s>max</th></tr>\n",
1321 trstring, tdstring, tdstring, tdstring, tdstring);
1322 printf("<tr %s><th %s>Connect:</th>"
1323 "<td %s>%5" APR_TIME_T_FMT "</td>"
1324 "<td %s>%5" APR_TIME_T_FMT "</td>"
1325 "<td %s>%5" APR_TIME_T_FMT "</td></tr>\n",
1326 trstring, tdstring, tdstring, mincon, tdstring, totalcon / done, tdstring, maxcon);
1327 printf("<tr %s><th %s>Processing:</th>"
1328 "<td %s>%5" APR_TIME_T_FMT "</td>"
1329 "<td %s>%5" APR_TIME_T_FMT "</td>"
1330 "<td %s>%5" APR_TIME_T_FMT "</td></tr>\n",
1331 trstring, tdstring, tdstring, mintot - mincon, tdstring,
1332 (total / done) - (totalcon / done), tdstring, maxtot - maxcon);
1333 printf("<tr %s><th %s>Total:</th>"
1334 "<td %s>%5" APR_TIME_T_FMT "</td>"
1335 "<td %s>%5" APR_TIME_T_FMT "</td>"
1336 "<td %s>%5" APR_TIME_T_FMT "</td></tr>\n",
1337 trstring, tdstring, tdstring, mintot, tdstring, total / done, tdstring, maxtot);
1339 printf("</table>\n");
1343 /* --------------------------------------------------------- */
1345 /* start asnchronous non-blocking connection */
1347 static void start_connect(struct connection * c)
1351 if (!(started < requests))
1361 apr_pool_clear(c->ctx);
1363 apr_pool_create(&c->ctx, cntxt);
1365 if ((rv = apr_socket_create(&c->aprsock, destsa->family,
1366 SOCK_STREAM, 0, c->ctx)) != APR_SUCCESS) {
1367 apr_err("socket", rv);
1371 if ((rv = apr_socket_bind(c->aprsock, mysa)) != APR_SUCCESS) {
1372 apr_err("bind", rv);
1376 c->pollfd.desc_type = APR_POLL_SOCKET;
1377 c->pollfd.desc.s = c->aprsock;
1378 c->pollfd.reqevents = 0;
1379 c->pollfd.client_data = c;
1381 if ((rv = apr_socket_opt_set(c->aprsock, APR_SO_NONBLOCK, 1))
1383 apr_err("socket nonblock", rv);
1386 if (windowsize != 0) {
1387 rv = apr_socket_opt_set(c->aprsock, APR_SO_SNDBUF,
1389 if (rv != APR_SUCCESS && rv != APR_ENOTIMPL) {
1390 apr_err("socket send buffer", rv);
1392 rv = apr_socket_opt_set(c->aprsock, APR_SO_RCVBUF,
1394 if (rv != APR_SUCCESS && rv != APR_ENOTIMPL) {
1395 apr_err("socket receive buffer", rv);
1399 c->start = lasttime = apr_time_now();
1405 if ((c->ssl = SSL_new(ssl_ctx)) == NULL) {
1406 BIO_printf(bio_err, "SSL_new failed.\n");
1407 ERR_print_errors(bio_err);
1411 apr_os_sock_get(&fd, c->aprsock);
1412 bio = BIO_new_socket(fd, BIO_NOCLOSE);
1413 BIO_set_nbio(bio, 1);
1414 SSL_set_bio(c->ssl, bio, bio);
1415 SSL_set_connect_state(c->ssl);
1416 if (verbosity >= 4) {
1417 BIO_set_callback(bio, ssl_print_cb);
1418 BIO_set_callback_arg(bio, (void *)bio_err);
1422 SSL_set_tlsext_host_name(c->ssl, tls_sni);
1429 if ((rv = apr_socket_connect(c->aprsock, destsa)) != APR_SUCCESS) {
1430 if (APR_STATUS_IS_EINPROGRESS(rv)) {
1431 set_conn_state(c, STATE_CONNECTING);
1436 set_conn_state(c, STATE_UNCONNECTED);
1437 apr_socket_close(c->aprsock);
1438 if (good == 0 && destsa->next) {
1439 destsa = destsa->next;
1442 else if (bad++ > 10) {
1444 "\nTest aborted after 10 failures\n\n");
1445 apr_err("apr_socket_connect()", rv);
1456 /* connected first time */
1457 set_conn_state(c, STATE_CONNECTED);
1460 ssl_proceed_handshake(c);
1468 /* --------------------------------------------------------- */
1470 /* close down connection and save stats */
1472 static void close_connection(struct connection * c)
1474 if (c->read == 0 && c->keepalive) {
1476 * server has legitimately shut down an idle keep alive request
1479 good--; /* connection never happened */
1483 /* first time here */
1486 else if ((c->bread != doclen) && !nolength) {
1491 if (done < requests) {
1492 struct data *s = &stats[done++];
1493 c->done = lasttime = apr_time_now();
1494 s->starttime = c->start;
1495 s->ctime = ap_max(0, c->connect - c->start);
1496 s->time = ap_max(0, c->done - c->start);
1497 s->waittime = ap_max(0, c->beginread - c->endwrite);
1498 if (heartbeatres && !(done % heartbeatres)) {
1499 fprintf(stderr, "Completed %d requests\n", done);
1505 set_conn_state(c, STATE_UNCONNECTED);
1508 SSL_shutdown(c->ssl);
1513 apr_socket_close(c->aprsock);
1520 /* --------------------------------------------------------- */
1522 /* read data from connection */
1524 static void read_connection(struct connection * c)
1527 apr_status_t status;
1529 char respcode[4]; /* 3 digits and null */
1536 status = SSL_read(c->ssl, buffer, r);
1538 int scode = SSL_get_error(c->ssl, status);
1540 if (scode == SSL_ERROR_ZERO_RETURN) {
1541 /* connection closed cleanly: */
1543 close_connection(c);
1545 else if (scode == SSL_ERROR_SYSCALL
1548 /* connection closed, but in violation of the protocol, after
1549 * some data has already been read; this commonly happens, so
1550 * let the length check catch any response errors
1553 close_connection(c);
1555 else if (scode == SSL_ERROR_SYSCALL
1558 && c->state == STATE_CONNECTING
1562 else if (scode == SSL_ERROR_WANT_READ) {
1563 set_polled_events(c, APR_POLLIN);
1565 else if (scode == SSL_ERROR_WANT_WRITE) {
1566 set_polled_events(c, APR_POLLOUT);
1569 /* some fatal error: */
1571 BIO_printf(bio_err, "SSL read failed (%d) - closing connection\n", scode);
1572 ERR_print_errors(bio_err);
1573 close_connection(c);
1582 status = apr_socket_recv(c->aprsock, buffer, &r);
1583 if (APR_STATUS_IS_EAGAIN(status))
1585 else if (r == 0 && APR_STATUS_IS_EOF(status)) {
1587 close_connection(c);
1590 /* catch legitimate fatal apr_socket_recv errors */
1591 else if (status != APR_SUCCESS) {
1595 close_connection(c);
1596 if (verbosity >= 1) {
1598 fprintf(stderr,"%s: %s (%d)\n", "apr_socket_recv", apr_strerror(status, buf, sizeof buf), status);
1601 } else if (destsa->next && c->state == STATE_CONNECTING
1602 && c->read == 0 && good == 0) {
1607 apr_err("apr_socket_recv", status);
1614 c->beginread = apr_time_now();
1619 if (!c->gotheader) {
1622 apr_size_t space = CBUFFSIZE - c->cbx - 1; /* -1 allows for \0 term */
1623 int tocopy = (space < r) ? space : r;
1625 apr_size_t inbytes_left = space, outbytes_left = space;
1627 status = apr_xlate_conv_buffer(from_ascii, buffer, &inbytes_left,
1628 c->cbuff + c->cbx, &outbytes_left);
1629 if (status || inbytes_left || outbytes_left) {
1630 fprintf(stderr, "only simple translation is supported (%d/%" APR_SIZE_T_FMT
1631 "/%" APR_SIZE_T_FMT ")\n", status, inbytes_left, outbytes_left);
1635 memcpy(c->cbuff + c->cbx, buffer, space);
1636 #endif /* NOT_ASCII */
1639 c->cbuff[c->cbx] = 0; /* terminate for benefit of strstr */
1640 if (verbosity >= 2) {
1641 printf("LOG: header received:\n%s\n", c->cbuff);
1643 s = strstr(c->cbuff, "\r\n\r\n");
1645 * this next line is so that we talk to NCSA 1.5 which blatantly
1646 * breaks the http specifaction
1649 s = strstr(c->cbuff, "\n\n");
1654 /* read rest next time */
1659 /* header is in invalid or too big - close connection */
1660 set_conn_state(c, STATE_UNCONNECTED);
1661 apr_socket_close(c->aprsock);
1664 err("\nTest aborted after 10 failures\n\n");
1670 /* have full header */
1673 * this is first time, extract some interesting info
1677 p = xstrcasestr(c->cbuff, "Server:");
1681 /* -1 to not overwrite last '\0' byte */
1682 while (*p > 32 && len++ < sizeof(servername) - 1)
1688 * XXX: this parsing isn't even remotely HTTP compliant... but in
1689 * the interest of speed it doesn't totally have to be, it just
1690 * needs to be extended to handle whatever servers folks want to
1691 * test against. -djg
1694 /* check response code */
1695 part = strstr(c->cbuff, "HTTP"); /* really HTTP/1.x_ */
1696 if (part && strlen(part) > strlen("HTTP/1.x_")) {
1697 strncpy(respcode, (part + strlen("HTTP/1.x_")), 3);
1701 strcpy(respcode, "500");
1704 if (respcode[0] != '2') {
1707 printf("WARNING: Response code not 2xx (%s)\n", respcode);
1709 else if (verbosity >= 3) {
1710 printf("LOG: Response code = %s\n", respcode);
1713 *s = 0; /* terminate at end of header */
1714 if (keepalive && xstrcasestr(c->cbuff, "Keep-Alive")) {
1717 cl = xstrcasestr(c->cbuff, "Content-Length:");
1718 if (cl && method != HEAD) {
1719 /* response to HEAD doesn't have entity body */
1720 c->length = atoi(cl + 16);
1726 c->bread += c->cbx - (s + l - c->cbuff) + r - tocopy;
1727 totalbread += c->bread;
1729 /* We have received the header, so we know this destination socket
1730 * address is working, so initialize all remaining requests. */
1731 if (!requests_initialized) {
1732 for (i = 1; i < concurrency; i++) {
1734 start_connect(&con[i]);
1736 requests_initialized = 1;
1741 /* outside header, everything we have read is entity body */
1745 if (r == sizeof(buffer) && c->bread < c->length) {
1746 /* read was full, try more immediately (nonblocking already) */
1750 if (c->keepalive && (c->bread >= c->length)) {
1751 /* finished a keep-alive connection */
1755 /* first time here */
1758 else if ((c->bread != doclen) && !nolength) {
1762 if (done < requests) {
1763 struct data *s = &stats[done++];
1765 c->done = apr_time_now();
1766 s->starttime = c->start;
1767 s->ctime = ap_max(0, c->connect - c->start);
1768 s->time = ap_max(0, c->done - c->start);
1769 s->waittime = ap_max(0, c->beginread - c->endwrite);
1770 if (heartbeatres && !(done % heartbeatres)) {
1771 fprintf(stderr, "Completed %d requests\n", done);
1779 c->read = c->bread = 0;
1780 /* zero connect time with keep-alive */
1781 c->start = c->connect = lasttime = apr_time_now();
1782 set_conn_state(c, STATE_CONNECTED);
1787 /* --------------------------------------------------------- */
1791 static void test(void)
1793 apr_time_t stoptime;
1797 apr_status_t status;
1798 int snprintf_res = 0;
1800 apr_size_t inbytes_left, outbytes_left;
1804 connecthost = apr_pstrdup(cntxt, proxyhost);
1805 connectport = proxyport;
1808 connecthost = apr_pstrdup(cntxt, hostname);
1813 printf("Benchmarking %s ", hostname);
1815 printf("[through %s:%d] ", proxyhost, proxyport);
1816 printf("(be patient)%s",
1817 (heartbeatres ? "\n" : "..."));
1821 con = xcalloc(concurrency, sizeof(struct connection));
1824 * XXX: a way to calculate the stats without requiring O(requests) memory
1825 * XXX: would be nice.
1827 stats = xcalloc(requests, sizeof(struct data));
1829 if ((status = apr_pollset_create(&readbits, concurrency, cntxt,
1830 APR_POLLSET_NOCOPY)) != APR_SUCCESS) {
1831 apr_err("apr_pollset_create failed", status);
1834 /* add default headers if necessary */
1836 /* Host: header not overridden, add default value to hdrs */
1837 hdrs = apr_pstrcat(cntxt, hdrs, "Host: ", host_field, colonhost, "\r\n", NULL);
1840 /* Header overridden, no need to add, as it is already in hdrs */
1844 if (is_ssl && tls_use_sni) {
1846 if (((tls_sni = opt_host) || (tls_sni = hostname)) &&
1847 (!*tls_sni || apr_ipsubnet_create(&ip, tls_sni, NULL,
1848 cntxt) == APR_SUCCESS)) {
1849 /* IP not allowed in TLS SNI extension */
1855 if (!opt_useragent) {
1856 /* User-Agent: header not overridden, add default value to hdrs */
1857 hdrs = apr_pstrcat(cntxt, hdrs, "User-Agent: ApacheBench/", AP_AB_BASEREVISION, "\r\n", NULL);
1860 /* Header overridden, no need to add, as it is already in hdrs */
1864 /* Accept: header not overridden, add default value to hdrs */
1865 hdrs = apr_pstrcat(cntxt, hdrs, "Accept: */*\r\n", NULL);
1868 /* Header overridden, no need to add, as it is already in hdrs */
1873 snprintf_res = apr_snprintf(request, sizeof(_request),
1874 "%s %s HTTP/1.0\r\n"
1878 (isproxy) ? fullurl : path,
1879 keepalive ? "Connection: Keep-Alive\r\n" : "",
1880 cookie, auth, hdrs);
1883 snprintf_res = apr_snprintf(request, sizeof(_request),
1884 "%s %s HTTP/1.0\r\n"
1886 "Content-length: %" APR_SIZE_T_FMT "\r\n"
1887 "Content-type: %s\r\n"
1891 (isproxy) ? fullurl : path,
1892 keepalive ? "Connection: Keep-Alive\r\n" : "",
1895 (content_type != NULL) ? content_type : "text/plain", hdrs);
1897 if (snprintf_res >= sizeof(_request)) {
1898 err("Request too long\n");
1902 printf("INFO: %s header == \n---\n%s\n---\n",
1903 method_str[method], request);
1905 reqlen = strlen(request);
1908 * Combine headers and (optional) post file into one continuous buffer
1911 char *buff = xmalloc(postlen + reqlen + 1);
1912 strcpy(buff, request);
1913 memcpy(buff + reqlen, postdata, postlen);
1918 inbytes_left = outbytes_left = reqlen;
1919 status = apr_xlate_conv_buffer(to_ascii, request, &inbytes_left,
1920 request, &outbytes_left);
1921 if (status || inbytes_left || outbytes_left) {
1922 fprintf(stderr, "only simple translation is supported (%d/%"
1923 APR_SIZE_T_FMT "/%" APR_SIZE_T_FMT ")\n",
1924 status, inbytes_left, outbytes_left);
1927 #endif /* NOT_ASCII */
1930 /* This only needs to be done once */
1931 if ((rv = apr_sockaddr_info_get(&mysa, myhost, APR_UNSPEC, 0, 0, cntxt)) != APR_SUCCESS) {
1933 apr_snprintf(buf, sizeof(buf),
1934 "apr_sockaddr_info_get() for %s", myhost);
1940 if ((rv = apr_sockaddr_info_get(&destsa, connecthost,
1941 myhost ? mysa->family : APR_UNSPEC,
1942 connectport, 0, cntxt))
1945 apr_snprintf(buf, sizeof(buf),
1946 "apr_sockaddr_info_get() for %s", connecthost);
1950 /* ok - lets start */
1951 start = lasttime = apr_time_now();
1952 stoptime = tlimit ? (start + apr_time_from_sec(tlimit)) : AB_MAX;
1955 /* Output the results if the user terminates the run early. */
1956 apr_signal(SIGINT, output_results);
1959 /* initialise first connection to determine destination socket address
1960 * which should be used for next connections. */
1962 start_connect(&con[0]);
1966 const apr_pollfd_t *pollresults, *pollfd;
1970 status = apr_pollset_poll(readbits, aprtimeout, &n, &pollresults);
1971 } while (APR_STATUS_IS_EINTR(status));
1972 if (status != APR_SUCCESS)
1973 apr_err("apr_pollset_poll", status);
1975 for (i = 0, pollfd = pollresults; i < n; i++, pollfd++) {
1976 struct connection *c;
1978 c = pollfd->client_data;
1981 * If the connection isn't connected how can we check it?
1983 if (c->state == STATE_UNCONNECTED)
1986 rtnev = pollfd->rtnevents;
1989 if (c->state == STATE_CONNECTED && c->ssl && SSL_in_init(c->ssl)) {
1990 ssl_proceed_handshake(c);
1996 * Notes: APR_POLLHUP is set after FIN is received on some
1997 * systems, so treat that like APR_POLLIN so that we try to read
2000 * Some systems return APR_POLLERR with APR_POLLHUP. We need to
2001 * call read_connection() for APR_POLLHUP, so check for
2002 * APR_POLLHUP first so that a closed connection isn't treated
2003 * like an I/O error. If it is, we never figure out that the
2004 * connection is done and we loop here endlessly calling
2007 if ((rtnev & APR_POLLIN) || (rtnev & APR_POLLPRI) || (rtnev & APR_POLLHUP))
2009 if ((rtnev & APR_POLLERR) || (rtnev & APR_POLLNVAL)) {
2010 if (destsa->next && c->state == STATE_CONNECTING && good == 0) {
2011 destsa = destsa->next;
2017 /* avoid apr_poll/EINPROGRESS loop on HP-UX, let recv discover ECONNREFUSED */
2018 if (c->state == STATE_CONNECTING) {
2027 if (rtnev & APR_POLLOUT) {
2028 if (c->state == STATE_CONNECTING) {
2029 /* call connect() again to detect errors */
2030 rv = apr_socket_connect(c->aprsock, destsa);
2031 if (rv != APR_SUCCESS) {
2032 set_conn_state(c, STATE_UNCONNECTED);
2033 apr_socket_close(c->aprsock);
2037 "\nTest aborted after 10 failures\n\n");
2038 apr_err("apr_socket_connect()", rv);
2044 set_conn_state(c, STATE_CONNECTED);
2047 ssl_proceed_handshake(c);
2054 /* POLLOUT is one shot */
2055 set_polled_events(c, APR_POLLIN);
2056 if (c->state == STATE_READ) {
2065 } while (lasttime < stoptime && done < requests);
2068 fprintf(stderr, "Finished %d requests\n", done);
2073 output_html_results();
2078 /* ------------------------------------------------------- */
2080 /* display copyright information */
2081 static void copyright(void)
2084 printf("This is ApacheBench, Version %s\n", AP_AB_BASEREVISION " <$Revision$>");
2085 printf("Copyright 1996 Adam Twiss, Zeus Technology Ltd, http://www.zeustech.net/\n");
2086 printf("Licensed to The Apache Software Foundation, http://www.apache.org/\n");
2091 printf(" This is ApacheBench, Version %s <i><%s></i><br>\n", AP_AB_BASEREVISION, "$Revision$");
2092 printf(" Copyright 1996 Adam Twiss, Zeus Technology Ltd, http://www.zeustech.net/<br>\n");
2093 printf(" Licensed to The Apache Software Foundation, http://www.apache.org/<br>\n");
2094 printf("</p>\n<p>\n");
2098 /* display usage information */
2099 static void usage(const char *progname)
2101 fprintf(stderr, "Usage: %s [options] [http"
2105 "://]hostname[:port]/path\n", progname);
2106 /* 80 column ruler: ********************************************************************************
2108 fprintf(stderr, "Options are:\n");
2109 fprintf(stderr, " -n requests Number of requests to perform\n");
2110 fprintf(stderr, " -c concurrency Number of multiple requests to make at a time\n");
2111 fprintf(stderr, " -t timelimit Seconds to max. to spend on benchmarking\n");
2112 fprintf(stderr, " This implies -n 50000\n");
2113 fprintf(stderr, " -s timeout Seconds to max. wait for each response\n");
2114 fprintf(stderr, " Default is 30 seconds\n");
2115 fprintf(stderr, " -b windowsize Size of TCP send/receive buffer, in bytes\n");
2116 fprintf(stderr, " -B address Address to bind to when making outgoing connections\n");
2117 fprintf(stderr, " -p postfile File containing data to POST. Remember also to set -T\n");
2118 fprintf(stderr, " -u putfile File containing data to PUT. Remember also to set -T\n");
2119 fprintf(stderr, " -T content-type Content-type header to use for POST/PUT data, eg.\n");
2120 fprintf(stderr, " 'application/x-www-form-urlencoded'\n");
2121 fprintf(stderr, " Default is 'text/plain'\n");
2122 fprintf(stderr, " -v verbosity How much troubleshooting info to print\n");
2123 fprintf(stderr, " -w Print out results in HTML tables\n");
2124 fprintf(stderr, " -i Use HEAD instead of GET\n");
2125 fprintf(stderr, " -x attributes String to insert as table attributes\n");
2126 fprintf(stderr, " -y attributes String to insert as tr attributes\n");
2127 fprintf(stderr, " -z attributes String to insert as td or th attributes\n");
2128 fprintf(stderr, " -C attribute Add cookie, eg. 'Apache=1234'. (repeatable)\n");
2129 fprintf(stderr, " -H attribute Add Arbitrary header line, eg. 'Accept-Encoding: gzip'\n");
2130 fprintf(stderr, " Inserted after all normal header lines. (repeatable)\n");
2131 fprintf(stderr, " -A attribute Add Basic WWW Authentication, the attributes\n");
2132 fprintf(stderr, " are a colon separated username and password.\n");
2133 fprintf(stderr, " -P attribute Add Basic Proxy Authentication, the attributes\n");
2134 fprintf(stderr, " are a colon separated username and password.\n");
2135 fprintf(stderr, " -X proxy:port Proxyserver and port number to use\n");
2136 fprintf(stderr, " -V Print version number and exit\n");
2137 fprintf(stderr, " -k Use HTTP KeepAlive feature\n");
2138 fprintf(stderr, " -d Do not show percentiles served table.\n");
2139 fprintf(stderr, " -S Do not show confidence estimators and warnings.\n");
2140 fprintf(stderr, " -q Do not show progress when doing more than 150 requests\n");
2141 fprintf(stderr, " -l Accept variable document length (use this for dynamic pages)\n");
2142 fprintf(stderr, " -g filename Output collected data to gnuplot format file.\n");
2143 fprintf(stderr, " -e filename Output CSV file with percentages served\n");
2144 fprintf(stderr, " -r Don't exit on socket receive errors.\n");
2145 fprintf(stderr, " -m method Method name\n");
2146 fprintf(stderr, " -h Display usage information (this message)\n");
2149 #ifndef OPENSSL_NO_SSL2
2150 #define SSL2_HELP_MSG "SSL2, "
2152 #define SSL2_HELP_MSG ""
2155 #ifndef OPENSSL_NO_SSL3
2156 #define SSL3_HELP_MSG "SSL3, "
2158 #define SSL3_HELP_MSG ""
2162 #define TLS1_X_HELP_MSG ", TLS1.1, TLS1.2"
2164 #define TLS1_X_HELP_MSG ""
2168 fprintf(stderr, " -I Disable TLS Server Name Indication (SNI) extension\n");
2170 fprintf(stderr, " -Z ciphersuite Specify SSL/TLS cipher suite (See openssl ciphers)\n");
2171 fprintf(stderr, " -f protocol Specify SSL/TLS protocol\n");
2172 fprintf(stderr, " (" SSL2_HELP_MSG SSL3_HELP_MSG "TLS1" TLS1_X_HELP_MSG " or ALL)\n");
2177 /* ------------------------------------------------------- */
2179 /* split URL into parts */
2181 static int parse_url(const char *url)
2188 /* Save a copy for the proxy */
2189 fullurl = apr_pstrdup(cntxt, url);
2191 if (strlen(url) > 7 && strncmp(url, "http://", 7) == 0) {
2199 if (strlen(url) > 8 && strncmp(url, "https://", 8) == 0) {
2204 if (strlen(url) > 8 && strncmp(url, "https://", 8) == 0) {
2205 fprintf(stderr, "SSL not compiled in; no https support\n");
2210 if ((cp = strchr(url, '/')) == NULL)
2212 h = apr_pstrmemdup(cntxt, url, cp - url);
2213 rv = apr_parse_addr_port(&hostname, &scope_id, &port, h, cntxt);
2214 if (rv != APR_SUCCESS || !hostname || scope_id) {
2217 path = apr_pstrdup(cntxt, cp);
2219 if (*url == '[') { /* IPv6 numeric address string */
2220 host_field = apr_psprintf(cntxt, "[%s]", hostname);
2223 host_field = hostname;
2226 if (port == 0) { /* no port specified */
2237 is_ssl && (port != 443)) || (!is_ssl &&
2241 colonhost = apr_psprintf(cntxt,":%d",port);
2247 /* ------------------------------------------------------- */
2249 /* read data to POST/PUT from file, save contents and length */
2251 static apr_status_t open_postfile(const char *pfile)
2258 rv = apr_file_open(&postfd, pfile, APR_READ, APR_OS_DEFAULT, cntxt);
2259 if (rv != APR_SUCCESS) {
2260 fprintf(stderr, "ab: Could not open POST data file (%s): %s\n", pfile,
2261 apr_strerror(rv, errmsg, sizeof errmsg));
2265 rv = apr_file_info_get(&finfo, APR_FINFO_NORM, postfd);
2266 if (rv != APR_SUCCESS) {
2267 fprintf(stderr, "ab: Could not stat POST data file (%s): %s\n", pfile,
2268 apr_strerror(rv, errmsg, sizeof errmsg));
2271 postlen = (apr_size_t)finfo.size;
2272 postdata = xmalloc(postlen);
2273 rv = apr_file_read_full(postfd, postdata, postlen, NULL);
2274 if (rv != APR_SUCCESS) {
2275 fprintf(stderr, "ab: Could not read POST data file: %s\n",
2276 apr_strerror(rv, errmsg, sizeof errmsg));
2279 apr_file_close(postfd);
2283 /* ------------------------------------------------------- */
2285 /* sort out command-line args and call test */
2286 int main(int argc, const char * const argv[])
2290 apr_status_t status;
2292 const char *opt_arg;
2294 #if OPENSSL_VERSION_NUMBER >= 0x10100000L
2295 int max_prot = TLS1_2_VERSION;
2296 #ifndef OPENSSL_NO_SSL3
2297 int min_prot = SSL3_VERSION;
2299 int min_prot = TLS1_VERSION;
2301 #endif /* #if OPENSSL_VERSION_NUMBER >= 0x10100000L */
2303 AB_SSL_METHOD_CONST SSL_METHOD *meth = SSLv23_client_method();
2306 /* table defaults */
2309 tdstring = "bgcolor=white";
2315 apr_app_initialize(&argc, &argv, NULL);
2316 atexit(apr_terminate);
2317 apr_pool_create(&cntxt, NULL);
2318 apr_pool_abort_set(abort_on_oom, cntxt);
2321 status = apr_xlate_open(&to_ascii, "ISO-8859-1", APR_DEFAULT_CHARSET, cntxt);
2323 fprintf(stderr, "apr_xlate_open(to ASCII)->%d\n", status);
2326 status = apr_xlate_open(&from_ascii, APR_DEFAULT_CHARSET, "ISO-8859-1", cntxt);
2328 fprintf(stderr, "apr_xlate_open(from ASCII)->%d\n", status);
2331 status = apr_base64init_ebcdic(to_ascii, from_ascii);
2333 fprintf(stderr, "apr_base64init_ebcdic()->%d\n", status);
2338 myhost = NULL; /* 0.0.0.0 or :: */
2340 apr_getopt_init(&opt, cntxt, argc, argv);
2341 while ((status = apr_getopt(opt, "n:c:t:s:b:T:p:u:v:lrkVhwiIx:y:z:C:H:P:A:g:X:de:SqB:m:"
2345 ,&c, &opt_arg)) == APR_SUCCESS) {
2348 requests = atoi(opt_arg);
2349 if (requests <= 0) {
2350 err("Invalid number of requests\n");
2360 concurrency = atoi(opt_arg);
2363 windowsize = atoi(opt_arg);
2366 if (method != NO_METH)
2367 err("Cannot mix HEAD with other methods\n");
2371 gnuplot = xstrdup(opt_arg);
2377 csvperc = xstrdup(opt_arg);
2383 aprtimeout = apr_time_from_sec(atoi(opt_arg)); /* timeout value */
2386 if (method != NO_METH)
2387 err("Cannot mix POST with other methods\n");
2388 if (open_postfile(opt_arg) != APR_SUCCESS) {
2395 if (method != NO_METH)
2396 err("Cannot mix PUT with other methods\n");
2397 if (open_postfile(opt_arg) != APR_SUCCESS) {
2410 verbosity = atoi(opt_arg);
2413 tlimit = atoi(opt_arg);
2414 requests = MAX_REQUESTS; /* need to size data array on
2418 content_type = apr_pstrdup(cntxt, opt_arg);
2421 cookie = apr_pstrcat(cntxt, "Cookie: ", opt_arg, "\r\n", NULL);
2425 * assume username passwd already to be in colon separated form.
2426 * Ready to be uu-encoded.
2428 while (apr_isspace(*opt_arg))
2430 if (apr_base64_encode_len(strlen(opt_arg)) > sizeof(tmp)) {
2431 err("Authentication credentials too long\n");
2433 l = apr_base64_encode(tmp, opt_arg, strlen(opt_arg));
2436 auth = apr_pstrcat(cntxt, auth, "Authorization: Basic ", tmp,
2441 * assume username passwd already to be in colon separated form.
2443 while (apr_isspace(*opt_arg))
2445 if (apr_base64_encode_len(strlen(opt_arg)) > sizeof(tmp)) {
2446 err("Proxy credentials too long\n");
2448 l = apr_base64_encode(tmp, opt_arg, strlen(opt_arg));
2451 auth = apr_pstrcat(cntxt, auth, "Proxy-Authorization: Basic ",
2455 hdrs = apr_pstrcat(cntxt, hdrs, opt_arg, "\r\n", NULL);
2457 * allow override of some of the common headers that ab adds
2459 if (strncasecmp(opt_arg, "Host:", 5) == 0) {
2463 while (apr_isspace(*opt_arg))
2465 len = strlen(opt_arg);
2466 host = strdup(opt_arg);
2467 while (len && apr_isspace(host[len-1]))
2470 } else if (strncasecmp(opt_arg, "Accept:", 7) == 0) {
2472 } else if (strncasecmp(opt_arg, "User-Agent:", 11) == 0) {
2480 * if any of the following three are used, turn on html output
2485 tablestring = opt_arg;
2491 * assume proxy-name[:port]
2493 if ((p = strchr(opt_arg, ':'))) {
2496 proxyport = atoi(p);
2498 proxyhost = apr_pstrdup(cntxt, opt_arg);
2517 myhost = apr_pstrdup(cntxt, opt_arg);
2520 method = CUSTOM_METHOD;
2521 method_str[CUSTOM_METHOD] = strdup(opt_arg);
2525 ssl_cipher = strdup(opt_arg);
2528 #if OPENSSL_VERSION_NUMBER < 0x10100000L
2529 if (strncasecmp(opt_arg, "ALL", 3) == 0) {
2530 meth = SSLv23_client_method();
2531 #ifndef OPENSSL_NO_SSL2
2532 } else if (strncasecmp(opt_arg, "SSL2", 4) == 0) {
2533 meth = SSLv2_client_method();
2538 #ifndef OPENSSL_NO_SSL3
2539 } else if (strncasecmp(opt_arg, "SSL3", 4) == 0) {
2540 meth = SSLv3_client_method();
2546 } else if (strncasecmp(opt_arg, "TLS1.1", 6) == 0) {
2547 meth = TLSv1_1_client_method();
2548 } else if (strncasecmp(opt_arg, "TLS1.2", 6) == 0) {
2549 meth = TLSv1_2_client_method();
2551 } else if (strncasecmp(opt_arg, "TLS1", 4) == 0) {
2552 meth = TLSv1_client_method();
2554 #else /* #if OPENSSL_VERSION_NUMBER < 0x10100000L */
2555 meth = TLS_client_method();
2556 if (strncasecmp(opt_arg, "ALL", 3) == 0) {
2557 max_prot = TLS1_2_VERSION;
2558 #ifndef OPENSSL_NO_SSL3
2559 min_prot = SSL3_VERSION;
2561 min_prot = TLS1_VERSION;
2563 #ifndef OPENSSL_NO_SSL3
2564 } else if (strncasecmp(opt_arg, "SSL3", 4) == 0) {
2565 max_prot = SSL3_VERSION;
2566 min_prot = SSL3_VERSION;
2568 } else if (strncasecmp(opt_arg, "TLS1.1", 6) == 0) {
2569 max_prot = TLS1_1_VERSION;
2570 min_prot = TLS1_1_VERSION;
2571 } else if (strncasecmp(opt_arg, "TLS1.2", 6) == 0) {
2572 max_prot = TLS1_2_VERSION;
2573 min_prot = TLS1_2_VERSION;
2574 } else if (strncasecmp(opt_arg, "TLS1", 4) == 0) {
2575 max_prot = TLS1_VERSION;
2576 min_prot = TLS1_VERSION;
2578 #endif /* #if OPENSSL_VERSION_NUMBER < 0x10100000L */
2589 if (opt->ind != argc - 1) {
2590 fprintf(stderr, "%s: wrong number of arguments\n", argv[0]);
2594 if (method == NO_METH) {
2598 if (parse_url(apr_pstrdup(cntxt, opt->argv[opt->ind++]))) {
2599 fprintf(stderr, "%s: invalid URL\n", argv[0]);
2603 if ((concurrency < 0) || (concurrency > MAX_CONCURRENCY)) {
2604 fprintf(stderr, "%s: Invalid Concurrency [Range 0..%d]\n",
2605 argv[0], MAX_CONCURRENCY);
2609 if (concurrency > requests) {
2610 fprintf(stderr, "%s: Cannot use concurrency level greater than "
2611 "total number of requests\n", argv[0]);
2615 if ((heartbeatres) && (requests > 150)) {
2616 heartbeatres = requests / 10; /* Print line every 10% of requests */
2617 if (heartbeatres < 100)
2618 heartbeatres = 100; /* but never more often than once every 100
2628 #if OPENSSL_VERSION_NUMBER < 0x10100000L
2629 CRYPTO_malloc_init();
2632 SSL_load_error_strings();
2634 bio_out=BIO_new_fp(stdout,BIO_NOCLOSE);
2635 bio_err=BIO_new_fp(stderr,BIO_NOCLOSE);
2637 if (!(ssl_ctx = SSL_CTX_new(meth))) {
2638 BIO_printf(bio_err, "Could not initialize SSL Context.\n");
2639 ERR_print_errors(bio_err);
2642 SSL_CTX_set_options(ssl_ctx, SSL_OP_ALL);
2643 #if OPENSSL_VERSION_NUMBER >= 0x10100000L
2644 SSL_CTX_set_max_proto_version(ssl_ctx, max_prot);
2645 SSL_CTX_set_min_proto_version(ssl_ctx, min_prot);
2647 #ifdef SSL_MODE_RELEASE_BUFFERS
2648 /* Keep memory usage as low as possible */
2649 SSL_CTX_set_mode (ssl_ctx, SSL_MODE_RELEASE_BUFFERS);
2651 if (ssl_cipher != NULL) {
2652 if (!SSL_CTX_set_cipher_list(ssl_ctx, ssl_cipher)) {
2653 fprintf(stderr, "error setting cipher list [%s]\n", ssl_cipher);
2654 ERR_print_errors_fp(stderr);
2658 if (verbosity >= 3) {
2659 SSL_CTX_set_info_callback(ssl_ctx, ssl_state_cb);
2663 apr_signal(SIGPIPE, SIG_IGN); /* Ignore writes to connections that
2664 * have been closed at the other end. */
2668 apr_pool_destroy(cntxt);