servr (version 0.33)

create_server: Create a server

Description

Create a server with a custom handler to handle the HTTP request.

Usage

create_server(..., handler, ws_open = function(ws) NULL)

Arguments

...

Arguments to be passed to server_config().

handler

A function that takes the HTTP request and returns a response.

ws_open

A function to be called back when a WebSocket connection is established (see httpuv::startServer()).

Examples

# always return 'Success:' followed by the requested path
s = servr::create_server(handler = function(req) {
    list(status = 200L, body = paste("Success:", req$PATH_INFO))
}, daemon = TRUE)
s$url
if (FALSE) {
browseURL(paste0(s$url, "/hello"))
browseURL(paste0(s$url, "/world"))
}
s$stop_server()