s4.core — s4 0.1.0

aleph-async-ring-adapter clj

(aleph-async-ring-adapter async-handler)

bucket-get-ops clj

(bucket-get-ops bucket
                request
                {:keys [konserve cost-tracker] :as system}
                request-id)

bucket-put-ops clj

(bucket-put-ops bucket request {:keys [konserve]} request-id)

get-object clj

(get-object bucket
            object
            request
            {:keys [konserve cost-tracker]}
            request-id
            with-body?)

list-objects clj

(list-objects bucket bucket-meta request system request-id)

list-objects-v2 clj

(list-objects-v2 bucket bucket-meta request {:keys [konserve]} request-id)

list-versions clj

(list-versions bucket bucket-meta request {:keys [konserve]} request-id)

make-handler clj

(make-handler system)

make-reloadable-handler clj

(make-reloadable-handler system)

Create an S3 handler that will rebuild the handler functions on every request; this way you can reload the namespace in between calls via a REPL. System is an atom containing a system map.

make-server! clj

(make-server! {:keys [bind-address port konserve cost-tracker reloadable?
                      auth-store hostname request-id-prefix]
               :or {bind-address "127.0.0.1" port 0 hostname "localhost"}})

Launch a HTTP server that serves the S3 HTTP API.

Arguments include:

• bind-address A string, or an InetAddress; the address to bind to. Defaults to "127.0.0.1".
• port A port number to bind to. Defaults to 0, which will bind to a random available port.
• konserve An instance satisfying konserve.protocols/PEDNAsyncKeyValueStore. Will default to a in-memory store if not supplied.
• cost-tracker A s4.$$$$/ICostTracker instance. Defaults to one that simulates default usage in us-west-2.
• reloadable? If truthy, creates the HTTP handler such that if you reload namespaces s4.core or s4.auth, the changes are reflected in the running server. Default false.
• auth-store An instance satisfying s4.auth.protocols/AuthStore. Defaults to a s4.auth/AtomAuthStore instance.
• hostname The hostname to assign the server, default "localhost".
• request-id-prefix A string to prepend to request IDs. Default nil.

Return value is an atom, containing a map of keys:

• server The aleph HTTP server.
• bind-address The InetSocketAddress that was bound, including the port that was selected, if a random port was used.
• konserve The konserve store instance.
• cost-tracker The cost tracker instance.
• auth-store The auth store instance. If you let this create the default store, you likely want to assoc your fake access keys into the atom contained by the AtomAuthStore.

parse-date-header clj

(parse-date-header d)

parse-range clj

(parse-range r)

put-object clj

(put-object bucket object request {:keys [konserve cost-tracker]} request-id)

random clj

read-handlers clj

s3-handler clj

(s3-handler {:keys [konserve hostname request-id-prefix request-counter
                    cost-tracker]
             :as system})

s3-xmlns clj

write-handlers clj

xml-content-type clj