Skip to content
This repository was archived by the owner on Mar 22, 2023. It is now read-only.

uses DemandedContentListener to incrementally demand content #50

Open
wants to merge 1 commit into
base: waiter-patch
Choose a base branch
from
Open

uses DemandedContentListener to incrementally demand content #50

Changes from all commits
Commits
Show all changes
1 commit
Select commit
File filter

Filter by extension

Filter by extension
Conversations
Failed to load comments.
Loading
Jump to
Jump to file
Failed to load files.
Loading
Diff view
Diff view
24 changes: 13 additions & 11 deletions src/clj/qbits/jet/client/http.clj
View file
Open in desktop
Original file line number Diff line number Diff line change
Expand Up @@ -48,8 +48,8 @@
Request
Request$FailureListener
Response
Response$AsyncContentListener
Response$CompleteListener
Response$DemandedContentListener
Response$HeadersListener)
(org.eclipse.jetty.client.http
HttpClientTransportOverHTTP)))
Expand Down Expand Up @@ -445,16 +445,18 @@
(doseq [[name value] cookies]
(.cookie request (HttpCookie. name value))))

(.onResponseContentAsync request
(reify Response$AsyncContentListener
(onContent [_ _ byte-buffer callback]
(if (protocols/closed? body-ch)
(let [ex (IOException. "Body channel closed unexpectedly")]
(report-error! ex)
(.failed callback ex)
(.abort request ex))
(async/put! body-ch (byte-buffer->bytes byte-buffer)
(fn [_] (.succeeded callback)))))))
(.onResponseContentDemanded request
(reify Response$DemandedContentListener
(onContent [_ _ demand byte-buffer callback]
(if (protocols/closed? body-ch)
(let [ex (IOException. "Body channel closed unexpectedly")]
(report-error! ex)
(.failed callback ex)
(.abort request ex))
(async/put! body-ch (byte-buffer->bytes byte-buffer)
(fn [_]
(.succeeded callback)
(.accept demand 1)))))))

(.onResponseHeaders request
(reify Response$HeadersListener
Expand Down