Skip to contents

Verify user credentials against authentication database.

Usage

loginUI(id)

logoutUI(id)

loginServer(input, output, session, db)

Arguments

id

Namespace id

input

Shiny input parameter

output

Shiny output parameter

session

Shiny session parameter

db

Database connection object

Value

A reactive values data frame with the following fields:

  • verified Boolean, whether or not the user is verified.

  • message A character string with any message from server to user.

Functions

  • loginUI(): loginUI

  • logoutUI(): logoutUI

  • loginServer(): loginServer

Examples

if (FALSE) {
library(shiny)
library(rlogin)

ui <- fluidPage(
  loginUI("login")
)

server <- function(input, output, session) {

  callModule(
    module = loginServer,
    id = "login"
  )
}

shinyApp(ui, server)
}