Add tests for retry logic based on response status code

Project.toml

@@ -4,14 +4,18 @@ version = "0.1.0"
 
 [compat]
 CloudBase = "1"
+HTTP = "1"
 ReTestItems = "1"
+Sockets = "1"
 Test = "1"
 julia = "1.8"
 
 [extras]
 CloudBase = "85eb1798-d7c4-4918-bb13-c944d38e27ed"
+HTTP = "cd3eb016-35fb-5094-929b-558a96fad6f3"
 ReTestItems = "817f1d60-ba6b-4fd5-9520-3cf149f6a823"
+Sockets = "6462fe0b-24de-5631-8697-dd941f90decc"
 Test = "8dfed614-e22c-5e08-85e1-65c5234f0b40"
 
 [targets]
-test = ["CloudBase", "ReTestItems", "Test"]
+test = ["CloudBase", "HTTP", "ReTestItems", "Sockets", "Test"]

test/azure_blobs_exception_tests.jl

@@ -41,7 +41,7 @@
                 @test false # Should have thrown an error
             catch e
                 @test e isa ErrorException
-                @test occursin("400 Bad Request", e.msg)
+                @test occursin("400 Bad Request", e.msg) # Should this be 403 Forbidden? We've seen that with invalid SAS tokens
                 @test occursin("Authentication information is not given in the correct format", e.msg)
             end
 
@@ -151,3 +151,187 @@
         @test res == 1 # Rust CResult::Error
     end
 end # @testitem
+
+### See Azure Blob Storage docs: https://learn.microsoft.com/en-us/rest/api/storageservices
+### - "Common REST API error codes":
+###   https://learn.microsoft.com/en-us/rest/api/storageservices/common-rest-api-error-codes
+### - "Azure Blob Storage error codes":
+###   https://learn.microsoft.com/en-us/rest/api/storageservices/blob-service-error-codes
+### - "Get Blob"
+###  https://learn.microsoft.com/en-us/rest/api/storageservices/get-blob
+### - "Put Blob"
+###  https://learn.microsoft.com/en-us/rest/api/storageservices/put-blob
+@testitem "BlobStorage retries" setup=[InitializeObjectStore] begin
+    using CloudBase.CloudTest: Azurite
+    import CloudBase
+    using ObjectStore: blob_get!, blob_put, AzureCredentials
+    import HTTP
+    import Sockets
+
+    max_retries = InitializeObjectStore.max_retries
+
+    function test_status(method, response_status, headers=nothing)
+        @assert method === :GET || method === :PUT
+        nrequests = Ref(0)
+        response_body = "response body from the dummy server"
+        account = "myaccount"
+        container = "mycontainer"
+        shared_key_from_azurite = "Eby8vdM02xNOcqFlqUwJPLlmEtlCDXJ1OUzFT50uSRZ6IFsuFq2UVErCz4I6tq/K1SZFPTOtr/KBHBeksoGMGw=="
+
+        (port, tcp_server) = Sockets.listenany(8081)
+        http_server = HTTP.serve!(tcp_server) do request::HTTP.Request
+            if request.method == "GET" && request.target == "/$account/$container/_this_file_does_not_exist"
+                # This is the exploratory ping from connect_and_test in lib.rs
+                return HTTP.Response(404, "Yup, still doesn't exist")
+            end
+            nrequests[] += 1
+            response = isnothing(headers) ? HTTP.Response(response_status, response_body) : HTTP.Response(response_status, headers, response_body)
+            return response
+        end
+
+        baseurl = "http://127.0.0.1:$port/$account/$container/"
+        creds = AzureCredentials(account, container, shared_key_from_azurite, baseurl)
+
+        try
+            method === :GET && blob_get!(joinpath(baseurl, "blob"), zeros(UInt8, 5), creds)
+            method === :PUT && blob_put(joinpath(baseurl, "blob"), codeunits("a,b,c"), creds)
+            @test false # Should have thrown an error
+        catch e
+            @test e isa ErrorException
+            @test occursin(string(response_status), e.msg)
+            response_status < 500 && (@test occursin("response body from the dummy server", e.msg))
+        finally
+            close(http_server)
+        end
+        wait(http_server)
+        return nrequests[]
+    end
+
+    @testset "400: Bad Request" begin
+        # Returned when there's an error in the request URI, headers, or body. The response body
+        # contains an error message explaining what the specific problem is.
+        # See https://learn.microsoft.com/en-us/rest/api/storageservices/blob-service-error-codes
+        # See https://www.rfc-editor.org/rfc/rfc9110#status.400
+        nrequests = test_status(:GET, 400)
+        @test nrequests == 1
+        nrequests = test_status(:PUT, 400)
+        @test nrequests == 1
+    end
+
+    @testset "403: Forbidden" begin
+        # Returned when you pass an invalid api-key.
+        # See https://www.rfc-editor.org/rfc/rfc9110#status.403
+        nrequests = test_status(:GET, 403)
+        @test nrequests == 1
+        nrequests = test_status(:PUT, 403)
+        @test nrequests == 1
+    end
+
+    @testset "404: Not Found" begin
+        # Returned when container not found or blob not found
+        # See https://learn.microsoft.com/en-us/rest/api/storageservices/blob-service-error-codes
+        # See https://www.rfc-editor.org/rfc/rfc9110#status.404
+        nrequests = test_status(:GET, 404)
+        @test nrequests == 1
+    end
+
+    @testset "405: Method Not Supported" begin
+        # See https://www.rfc-editor.org/rfc/rfc9110#status.405
+        nrequests = test_status(:GET, 405, ["Allow" => "PUT"])
+        @test nrequests == 1
+        nrequests = test_status(:PUT, 405, ["Allow" => "GET"])
+        @test nrequests == 1
+    end
+
+    @testset "409: Conflict" begin
+        # Returned when write operations conflict.
+        # See https://learn.microsoft.com/en-us/rest/api/storageservices/blob-service-error-codes
+        # See https://www.rfc-editor.org/rfc/rfc9110#status.409
+        nrequests = test_status(:GET, 409)
+        @test nrequests == 1
+        nrequests = test_status(:PUT, 409)
+        @test nrequests == 1
+    end
+
+    @testset "412: Precondition Failed" begin
+        # Returned when an If-Match or If-None-Match header's condition evaluates to false
+        # See https://learn.microsoft.com/en-us/rest/api/storageservices/put-blob#blob-custom-properties
+        # See https://www.rfc-editor.org/rfc/rfc9110#status.412
+        nrequests = test_status(:GET, 412)
+        @test nrequests == 1
+        nrequests = test_status(:PUT, 412)
+        @test nrequests == 1
+    end
+
+    @testset "413: Content Too Large" begin
+        # See https://learn.microsoft.com/en-us/rest/api/storageservices/put-blob#remarks
+        #   If you attempt to upload either a block blob that's larger than the maximum
+        #   permitted size for that service version or a page blob that's larger than 8 TiB,
+        #   the service returns status code 413 (Request Entity Too Large). Blob Storage also
+        #   returns additional information about the error in the response, including the
+        #   maximum permitted blob size, in bytes.
+        # See https://www.rfc-editor.org/rfc/rfc9110#status.413
+        nrequests = test_status(:PUT, 413)
+        @test nrequests == 1
+    end
+
+    @testset "429: Too Many Requests" begin
+        # See https://www.rfc-editor.org/rfc/rfc6585#section-4
+        nrequests = test_status(:GET, 429)
+        @test nrequests == 1
+        nrequests = test_status(:PUT, 429)
+        @test nrequests == 1
+        # See https://www.rfc-editor.org/rfc/rfc9110#field.retry-after
+        # TODO: We probably should respect the Retry-After header, but we currently don't
+        # (and we don't know if Azure actually sets it)
+        # This can happen when Azure is throttling us, so it might be a good idea to retry with some
+        # larger initial backoff (very eager retries probably only make the situation worse).
+        nrequests = test_status(:GET, 429, ["Retry-After" => 10])
+        @test nrequests == 1 + max_retries broken=true
+        nrequests = test_status(:PUT, 429, ["Retry-After" => 10])
+        @test nrequests == 1 + max_retries broken=true
+    end
+
+    @testset "502: Bad Gateway" begin
+        # https://www.rfc-editor.org/rfc/rfc9110#status.502
+        #   The 502 (Bad Gateway) status code indicates that the server, while acting as a
+        #   gateway or proxy, received an invalid response from an inbound server it accessed
+        #   while attempting to fulfill the request.
+        # This error can occur when you enter HTTP instead of HTTPS in the connection.
+        nrequests = test_status(:GET, 502)
+        @test nrequests == 1 + max_retries
+        nrequests = test_status(:PUT, 502)
+        @test nrequests == 1 + max_retries
+    end
+
+    @testset "503: Service Unavailable" begin
+        # See https://www.rfc-editor.org/rfc/rfc9110#status.503
+        #   The 503 (Service Unavailable) status code indicates that the server is currently
+        #   unable to handle the request due to a temporary overload or scheduled maintenance,
+        #   which will likely be alleviated after some delay. The server MAY send a Retry-After
+        #   header field (Section 10.2.3) to suggest an appropriate amount of time for the
+        #   client to wait before retrying the request.
+        # See https://learn.microsoft.com/en-us/rest/api/storageservices/common-rest-api-error-codes
+        #   An operation on any of the Azure Storage services can return the following error codes:
+        #   Error code 	HTTP status code 	        User message
+        #   ServerBusy 	Service Unavailable (503) 	The server is currently unable to receive requests. Please retry your request.
+        #   ServerBusy 	Service Unavailable (503) 	Ingress is over the account limit.
+        #   ServerBusy 	Service Unavailable (503) 	Egress is over the account limit.
+        #   ServerBusy 	Service Unavailable (503) 	Operations per second is over the account limit.
+        nrequests = test_status(:GET, 503)
+        @test nrequests == 1 + max_retries
+        nrequests = test_status(:PUT, 503)
+        @test nrequests == 1 + max_retries
+    end
+
+    @testset "504: Gateway Timeout" begin
+        # See https://www.rfc-editor.org/rfc/rfc9110#status.504
+        #   The 504 (Gateway Timeout) status code indicates that the server, while acting as
+        #   a gateway or proxy, did not receive a timely response from an upstream server it
+        #   needed to access in order to complete the request
+        nrequests = test_status(:GET, 504)
+        @test nrequests == 1 + max_retries
+        nrequests = test_status(:PUT, 504)
+        @test nrequests == 1 + max_retries
+    end
+end

test/common_testsetup.jl

@@ -2,7 +2,7 @@
     using ObjectStore
     # Since we currently only support centralized configs, we need to have one that is compatible
     # with all the tests (some of the tests would take too long if we use default values).
-    max_retries = 5
-    retry_timeout_sec = 5
+    max_retries = 2
+    retry_timeout_sec = 2
     init_object_store(ObjectStoreConfig(max_retries, retry_timeout_sec))
 end

test/runtests.jl

@@ -2,5 +2,5 @@ using ReTestItems
 using ObjectStore
 
 withenv("RUST_BACKTRACE"=>1) do
-    runtests(ObjectStore, testitem_timeout=120, nworkers=1)
-end
+    runtests(ObjectStore, testitem_timeout=180, nworkers=1)
+end