From 79c6d62e1859f583b3ada6d6cee5a339527321ac Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?Edwin=20T=C3=B6r=C3=B6k?= Date: Tue, 11 Jul 2023 15:04:21 +0100 Subject: [PATCH] eof --- ocaml/loadgen/speculative.ml | 5 ++--- ocaml/loadgen/zero_http/zero_buffer.ml | 1 + 2 files changed, 3 insertions(+), 3 deletions(-) diff --git a/ocaml/loadgen/speculative.ml b/ocaml/loadgen/speculative.ml index a3707adfe93..940e5a3d7af 100644 --- a/ocaml/loadgen/speculative.ml +++ b/ocaml/loadgen/speculative.ml @@ -173,7 +173,6 @@ let fastpath_handle_event mux fd events t = if Polly.Events.(test events inp) then ( Connection.receive conn ; if Zero_http.Zero_buffer.is_eof conn.zb then begin - prerr_endline "EOF"; Connection.disconnect conn ; do_disconnect t mux conn end @@ -208,9 +207,9 @@ let build_conntable connections = connections ; conntbl -let repeat = 30 +let repeat = 100 -let nconn = 1 +let nconn = 100 let run ?(receive_buffer_size = 16384) t = let connections = List.length t.connections in diff --git a/ocaml/loadgen/zero_http/zero_buffer.ml b/ocaml/loadgen/zero_http/zero_buffer.ml index 2fb200c693e..ff2364e09aa 100644 --- a/ocaml/loadgen/zero_http/zero_buffer.ml +++ b/ocaml/loadgen/zero_http/zero_buffer.ml @@ -92,6 +92,7 @@ let refill t reader input = if not t.eof then let producer = t.producer in let len = View.size producer in + if len > 0 then let nread = reader input ~off:producer.start ~len t.buf in if nread = 0 then t.eof <- true else if nread > 0 then begin