Make streaming probe timing runtime-independent
This commit is contained in:
parent
80b987fbd0
commit
e8ee006b20
1 changed files with 4 additions and 3 deletions
|
|
@ -162,7 +162,7 @@ verifyThrottle context session directory = do
|
|||
prestart <- curlUploadBytesDeclared
|
||||
context sessionB "prestart.bin"
|
||||
"71000000-0000-4000-8000-000000000002"
|
||||
1 uploadDigest "x"
|
||||
65536 uploadDigest "x"
|
||||
assertEqual
|
||||
("pre-start upload throttle: " <> B8.unpack (probeBody prestart))
|
||||
429
|
||||
|
|
@ -370,7 +370,8 @@ interruptedUpload context session path operationId size digest bodyPath = do
|
|||
[ "--insecure"
|
||||
, "--silent"
|
||||
, "--show-error"
|
||||
, "--max-time", "1"
|
||||
, "--header", "Expect:"
|
||||
, "--max-time", "2"
|
||||
, "--limit-rate", "64k"
|
||||
, "--request", "POST"
|
||||
, "--upload-file", bodyPath
|
||||
|
|
@ -390,7 +391,7 @@ interruptedDownload context session outputPath = do
|
|||
[ "--insecure"
|
||||
, "--silent"
|
||||
, "--show-error"
|
||||
, "--max-time", "1"
|
||||
, "--max-time", "2"
|
||||
, "--limit-rate", "64k"
|
||||
, "--header", "Cookie: " <> B8.unpack cookies
|
||||
, "--output", outputPath
|
||||
|
|
|
|||
Loading…
Reference in a new issue