Generic web app for testing HTTP clients

Source: R/httpbin.R

A web app similar to https://httpbin.org. See its specific docs. You can also see these docs locally, by starting the app:

httpbin <- new_app_process(httpbin_app())
browseURL(httpbin$url())


httpbin_app(log = interactive())

Arguments

log

Whether to log requests to the standard output.

Value

A webfakes_app.

Examples

app <- httpbin_app()
proc <- new_app_process(app)
url <- proc$url("/get")
resp <- curl::curl_fetch_memory(url)
curl::parse_headers_list(resp$headers)

#> $connection
#> [1] "close"
#> 
#> $date
#> [1] "2021-04-05 11:12:30"
#> 
#> $`content-type`
#> [1] "application/json"
#> 
#> $`content-length`
#> [1] "308"
#> 
#> $etag
#> [1] "\"ec3f2ffb\""
#> 
cat(rawToChar(resp$content))

#> {
#>   "args": {},
#>   "headers": {
#>     "Host": "127.0.0.1:49797",
#>     "User-Agent": "R/4.0.5 R (4.0.5 x86_64-apple-darwin17.0 x86_64 darwin17.0) on GitHub Actions",
#>     "Accept": "*/*",
#>     "Accept-Encoding": "deflate, gzip"
#>   },
#>   "origin": "127.0.0.1",
#>   "path": "/get",
#>   "url": "http://127.0.0.1:49797/get"
#> }
proc$stop()