(sigil http client)
(sigil http client) - HTTP Client Implementation
Provides HTTP/1.1 client functionality for making requests to HTTP and HTTPS servers.
Example: (import (sigil http client)) (let ((response (http-get "https://example.com/"))) (display (http-response-body response)))
Exports
urlprocedureConstruct a url struct.
url?procedureTest if a value is a url struct.
url-schemeprocedureGet the scheme field of a url struct.
url-hostprocedureGet the host field of a url struct.
url-portprocedureGet the port field of a url struct.
url-pathprocedureGet the path field of a url struct.
url-queryprocedureGet the query field of a url struct.
parse-urlprocedureParse a URL string into a url record.
Supports http://host:port/path?query and https://.... Use url-scheme, url-host, url-port, url-path, url-query to access the components.
(let ((u (parse-url "https://example.com:8080/api?key=val")))
(url-host u)) ; => "example.com"connect-to-serverprocedureConnect to a server, using TLS if scheme is https Returns connection object or #f on failure
conn-writeprocedureWrite data to connection (socket or TLS)
conn-readprocedureRead data from connection (socket or TLS)
conn-read-bytesprocedureRead binary data from connection as bytevector (socket or TLS)
conn-closeprocedureClose connection
build-request-stringprocedureBuild HTTP request string
build-header-linesprocedureBuild header lines from headers (dict or alist)
parse-status-lineprocedureParse HTTP status line Returns (version status-code reason) or #f
parse-response-headersprocedureParse response headers from data Returns dict with keyword keys
read-http-responseprocedureRead HTTP response from connection Returns http-response or #f on error
read-all-dataprocedureRead all data from connection until closed
parse-http-responseprocedureParse HTTP response from string
decode-chunked-bodyprocedureDecode chunked transfer encoding Format: <hex-size>rn<data>rn ... 0rnrn
find-crlfprocedureFind position of rn starting at pos
hex-string->numberprocedureConvert hex string to number
find-header-endprocedureFind the end of HTTP headers (position of rnrn)
skip-crlfprocedureSkip CRLF sequence(s) at position
http-requestvariableMake an HTTP request.
Low-level function for making HTTP requests. Prefer the convenience functions (http-get, http-post, etc.) for common cases.
(http-request 'GET "https://api.example.com/users"
headers: #{ authorization: "Bearer token" })
(http-request 'POST "https://api.example.com/users"
headers: #{ content-type: "application/json" }
body: "{\"name\": \"Alice\"}")http-getvariableHTTP GET request.
(http-get "https://example.com/")
(http-get "https://api.example.com/users"
headers: #{ authorization: "Bearer token" })http-postvariableHTTP POST request.
If no Content-Type header is provided, defaults to application/x-www-form-urlencoded.
(http-post "https://api.example.com/data" "key=value")
(http-post "https://api.example.com/data"
"{\"key\": \"value\"}"
headers: #{ content-type: "application/json" })http-putvariableHTTP PUT request.
(http-put "https://api.example.com/users/123"
"{\"name\": \"Alice\"}"
headers: #{ content-type: "application/json" })http-deletevariableHTTP DELETE request.
(http-delete "https://api.example.com/users/123")
(http-delete "https://api.example.com/users/123"
headers: #{ authorization: "Bearer token" })http-headvariableHTTP HEAD request.
Like GET but only retrieves headers, not body. Useful for checking if a resource exists or getting metadata.
(let ((res (http-head "https://example.com/file.pdf")))
(http-response-header res "Content-Length"))http-optionsvariableHTTP OPTIONS request.
Query server for allowed methods on a resource.
(let ((res (http-options "https://api.example.com/users")))
(http-response-header res "Allow"))
; => "GET, POST, OPTIONS"http-patchvariableHTTP PATCH request.
Partially update a resource. Unlike PUT which replaces the entire resource, PATCH applies partial modifications.
(http-patch "https://api.example.com/users/123"
"{\"email\": \"new@example.com\"}"
headers: #{ content-type: "application/json" })http-response-jsonprocedureParse HTTP response body as JSON.
Returns the parsed JSON value, or #f if the response is #f or parsing fails. Requires sigil-json package.
(let ((res (http-get "https://api.example.com/data")))
(http-response-json res))
; => #{ users: #[...] count: 42 }http-get/jsonvariableHTTP GET request expecting JSON response.
Makes a GET request and parses the response body as JSON. Returns the parsed JSON value, or #f if request fails or status is not 2xx.
(http-get/json "https://api.example.com/users")
; => #{ users: #[...] }
(http-get/json "https://api.example.com/users"
headers: #{ authorization: "Bearer token" })http-post/jsonvariableHTTP POST request with JSON body, expecting JSON response.
Encodes the body as JSON, sets Content-Type to application/json, and parses the response as JSON. Returns parsed JSON or #f.
(http-post/json "https://api.example.com/users"
#{ name: "Alice" email: "alice@example.com" })
; => #{ id: 123 name: "Alice" }
(http-post/json "https://api.example.com/users"
#{ name: "Alice" }
headers: #{ authorization: "Bearer token" })read-response-headersprocedureRead HTTP response headers only, without consuming the body.
Returns a list: (status-code headers leftover-string) where leftover-string is any body data already read past the header boundary. Returns #f on failure.
parse-header-resultprocedureParse headers from data at the given header-end position. Returns (status-code headers leftover-string).
stream-body-to-portprocedureStream response body from connection to an output port.
Writes leftover bytes (from header read) first, then reads remaining data as bytevectors and writes them to the port.
http-downloadprocedureDownload a URL to a file, streaming data directly to disk.
Unlike http-get which loads the entire response into memory, http-download streams the response body to a file, making it suitable for large downloads.
The on-progress callback receives (bytes-received total-bytes) where total-bytes may be #f if the server didn't send Content-Length.
Returns a dict with download info on success, or #f on failure.
(http-download "https://example.com/large-file.bin"
"/tmp/file.bin")
; => #{ status: 200 size: 12345 path: "/tmp/file.bin" }
(http-download "https://example.com/file.bin"
"/tmp/file.bin"
on-progress: (lambda (received total)
(display (str received "/" total "\r"))))http-response?procedureTest if a value is a http-response struct.
Re-exported from (sigil http response)
http-response-statusprocedureGet the status field of a http-response struct.
Re-exported from (sigil http response)
http-response-headersprocedureGet the headers field of a http-response struct.
Re-exported from (sigil http response)
http-response-bodyprocedureGet the body field of a http-response struct.
Re-exported from (sigil http response)