simon/tiny_httpd
1
0
Fork 0
mirror of https://github.com/c-cube/tiny_httpd.git synced 2025-12-06 11:15:35 -05:00
Code Issues Projects Releases Packages Wiki Activity Actions

remove debug messages

Browse source
This commit is contained in:
Simon Cruanes 2024-04-05 13:48:39 -04:00
parent 2292128d30
commit e4303b2fd4
No known key found for this signature in database
GPG key ID: EBFFF6F283F3A2B4
1 changed files with 0 additions and 7 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

7
src/ws/tiny_httpd_ws.ml
View file

@ -307,13 +307,8 @@ module Reader = struct
self.state <- Begin; self.state <- Begin;
read_rec self buf i len read_rec self buf i len
| Reading_frame r -> | Reading_frame r ->
Printf.printf "reading len=%d from frame remaining=%d (key=%S)\n%!" len
r.remaining_bytes
(Bytes.unsafe_to_string self.header.mask_key);
let len = min len r.remaining_bytes in let len = min len r.remaining_bytes in
let n = IO.Input.input self.ic buf i len in let n = IO.Input.input self.ic buf i len in
Printf.printf "got n=%d bytes\n%!" n;
Printf.printf "in buf: %S\n%!" (Bytes.sub_string buf i n);
(* apply masking *) (* apply masking *)
if self.header.mask then if self.header.mask then
@ -328,8 +323,6 @@ module Reader = struct
r.remaining_bytes <- r.remaining_bytes - n; r.remaining_bytes <- r.remaining_bytes - n;
r.num_read <- r.num_read + n; r.num_read <- r.num_read + n;
if r.remaining_bytes = 0 then self.state <- Begin; if r.remaining_bytes = 0 then self.state <- Begin;
Printf.printf "in buf (unmasked): %S\n%!" (Bytes.sub_string buf i n);
n n
| Begin -> | Begin ->
read_frame_header self; read_frame_header self;