An R6 class suitable for testing purposes. Simulates, to the
extent possible, the behavior of the ShinySession
class. The session
parameter provided to Shiny server functions and modules is an instance of
a ShinySession
in normal operation.
Most kinds of module and server testing do not require this class be
instantiated manually. See instead testServer()
.
In order to support advanced usage, instances of MockShinySession
are
unlocked so that public methods and fields of instances may be
modified. For example, in order to test authentication workflows, the
user
or groups
fields may be overridden. Modified instances of
MockShinySession
may then be passed explicitly as the session
argument
of testServer()
.
env
The environment associated with the session.
returned
The value returned by the module under test.
singletons
Hardcoded as empty. Needed for rendering HTML (i.e. renderUI).
clientData
Mock client data that always returns a size for plots.
output
The shinyoutputs associated with the session.
input
The reactive inputs associated with the session.
userData
An environment initialized as empty.
progressStack
A stack of progress objects.
token
On a real ShinySession
, used to identify this instance in URLs.
cache
The session cache object.
appcache
The app cache object.
restoreContext
Part of bookmarking support in a real
ShinySession
but always NULL
for a MockShinySession
.
groups
Character vector of groups associated with an authenticated
user. Always NULL
for a MockShinySesion
.
user
The username of an authenticated user. Always NULL
for a
MockShinySession
.
options
A list containing session-level shinyOptions.
files
For internal use only.
downloads
For internal use only.
closed
Deprecated in ShinySession
and signals an error.
session
Deprecated in ShinySession and signals an error.
request
An empty environment where the request should be. The request isn't meaningfully mocked currently.
new()
Create a new MockShinySession.
MockShinySession$new()
onFlush()
Define a callback to be invoked before a reactive flush
MockShinySession$onFlush(fun, once = TRUE)
fun
The function to invoke
once
If TRUE
, will only run once. Otherwise, will run every time reactives are flushed.
onFlushed()
Define a callback to be invoked after a reactive flush
MockShinySession$onFlushed(fun, once = TRUE)
fun
The function to invoke
once
If TRUE
, will only run once. Otherwise, will run every time reactives are flushed.
onEnded()
Define a callback to be invoked when the session ends
MockShinySession$onEnded(sessionEndedCallback)
sessionEndedCallback
The callback to invoke when the session has ended.
isEnded()
Returns FALSE
if the session has not yet been closed
MockShinySession$isEnded()
isClosed()
Returns FALSE
if the session has not yet been closed
MockShinySession$isClosed()
cycleStartAction()
Unsophisticated mock implementation that merely invokes
MockShinySession$cycleStartAction(callback)
callback
The callback to be invoked.
fileUrl()
Base64-encode the given file. Needed for image rendering.
MockShinySession$fileUrl(name, file, contentType = "application/octet-stream")
name
Not used
file
The file to be encoded
contentType
The content type of the base64-encoded string
setInputs()
Sets reactive values associated with the session$inputs
object and flushes the reactives.
MockShinySession$setInputs(...)
...
The inputs to set. These arguments are processed with
rlang::list2()
and so are dynamic. Input names
may not be duplicated.
\dontrun{
session$setInputs(x=1, y=2)
}
.scheduleTask()
An internal method which shouldn't be used by others.
Schedules callback
for execution after some number of millis
milliseconds.
MockShinySession$.scheduleTask(millis, callback)
millis
The number of milliseconds on which to schedule a callback
callback
The function to schedule.
elapse()
Simulate the passing of time by the given number of milliseconds.
MockShinySession$elapse(millis)
millis
The number of milliseconds to advance time.
.now()
An internal method which shouldn't be used by others.
MockShinySession$.now()
Elapsed time in milliseconds.
defineOutput()
An internal method which shouldn't be used by others. Defines an output in a way that sets private$currentOutputName appropriately.
MockShinySession$defineOutput(name, func, label)
name
The name of the output.
func
The render definition.
label
Not used.
getOutput()
An internal method which shouldn't be used by others. Forces evaluation of any reactive dependencies of the output function.
MockShinySession$getOutput(name)
name
The name of the output.
The return value of the function responsible for rendering the output.
ns()
Returns the given id prefixed by this namespace's id.
MockShinySession$ns(id)
id
The id to prefix with a namespace id.
The id with a namespace prefix.
flushReact()
Trigger a reactive flush right now.
MockShinySession$flushReact()
makeScope()
Create and return a namespace-specific session proxy.
MockShinySession$makeScope(namespace)
namespace
Character vector indicating a namespace.
A new session proxy.
setEnv()
Set the environment associated with a testServer() call, but only if it has not previously been set. This ensures that only the environment of the outermost module under test is the one retained. In other words, the first assignment wins.
MockShinySession$setEnv(env)
env
The environment to retain.
The provided env
.
setReturned()
Set the value returned by the module call and proactively flush. Note that this method may be called multiple times if modules are nested. The last assignment, corresponding to an invocation of setReturned() in the outermost module, wins.
MockShinySession$setReturned(value)
value
The value returned from the module
The provided value
.
getReturned()
Get the value returned by the module call.
MockShinySession$getReturned()
The value returned by the module call
genId()
Generate a distinct character identifier for use as a proxy namespace.
MockShinySession$genId()
A character identifier unique to the current session.
rootScope()
Provides a way to access the root MockShinySession
from
any descendant proxy.
MockShinySession$rootScope()
The root MockShinySession
.
onUnhandledError()
Add an unhandled error callback.
MockShinySession$onUnhandledError(callback)
callback
The callback to add, which should accept an error object as its first argument.
A deregistration function.
unhandledError()
Called by observers when a reactive expression errors.
MockShinySession$unhandledError(e, close = TRUE)
e
An error object.
close
If TRUE
, the session will be closed after the error is
handled, defaults to FALSE
.
freezeValue()
Freeze a value until the flush cycle completes.
MockShinySession$freezeValue(x, name)
x
A ReactiveValues
object.
name
The name of a reactive value within x
.
onSessionEnded()
Registers the given callback to be invoked when the session is closed (i.e. the connection to the client has been severed). The return value is a function which unregisters the callback. If multiple callbacks are registered, the order in which they are invoked is not guaranteed.
MockShinySession$onSessionEnded(sessionEndedCallback)
sessionEndedCallback
Function to call when the session ends.
registerDownload()
Associated a downloadable file with the session.
MockShinySession$registerDownload(name, filename, contentType, content)
name
The un-namespaced output name to associate with the downloadable file.
filename
A string or function designating the name of the file.
contentType
A string of the content type of the file. Not used by
MockShinySession
.
content
A function that takes a single argument file that is a file path (string) of a nonexistent temp file, and writes the content to that file path. (Reactive values and functions may be used from this function.)
getCurrentOutputInfo()
Get information about the output that is currently being executed.
MockShinySession$getCurrentOutputInfo()
A list with with the name
of the output. If no output is
currently being executed, this will return NULL
.
output, or NULL
if no output is currently executing.
clone()
The objects of this class are cloneable with this method.
MockShinySession$clone(deep = FALSE)
deep
Whether to make a deep clone.
## ------------------------------------------------
## Method `MockShinySession$setInputs`
## ------------------------------------------------
if (FALSE) {
session$setInputs(x=1, y=2)
}
Run the code above in your browser using DataLab