Yesod.Csp.Example

Assorted examples demonstrating different policies.

Documentation

data Example

Constructors

Example

Instances

RouteAttrs Example

Methods

routeAttrs :: Route Example -> Set Text

ParseRoute Example

Methods

parseRoute :: ([Text], [(Text, Text)]) -> Maybe (Route Example)

RenderRoute Example

Associated Types

data Route Example :: *

Methods

renderRoute :: Route Example -> ([Text], [(Text, Text)])

Yesod Example

Methods

approot :: Approot Example

errorHandler :: ErrorResponse -> HandlerT Example IO TypedContent

defaultLayout :: WidgetT Example IO () -> HandlerT Example IO Html

urlRenderOverride :: Example -> Route Example -> Maybe Builder

urlParamRenderOverride :: Example -> Route Example -> [(Text, Text)] -> Maybe Builder

isAuthorized :: Route Example -> Bool -> HandlerT Example IO AuthResult

isWriteRequest :: Route Example -> HandlerT Example IO Bool

authRoute :: Example -> Maybe (Route Example)

cleanPath :: Example -> [Text] -> Either [Text] [Text]

joinPath :: Example -> Text -> [Text] -> [(Text, Text)] -> Builder

addStaticContent :: Text -> Text -> ByteString -> HandlerT Example IO (Maybe (Either Text (Route Example, [(Text, Text)])))

maximumContentLength :: Example -> Maybe (Route Example) -> Maybe Word64

makeLogger :: Example -> IO Logger

messageLoggerSource :: Example -> Logger -> Loc -> LogSource -> LogLevel -> LogStr -> IO ()

jsLoader :: Example -> ScriptLoadPosition Example

jsAttributes :: Example -> [(Text, Text)]

makeSessionBackend :: Example -> IO (Maybe SessionBackend)

fileUpload :: Example -> RequestBodyLength -> FileUpload

shouldLog :: Example -> LogSource -> LogLevel -> Bool

shouldLogIO :: Example -> LogSource -> LogLevel -> IO Bool

yesodMiddleware :: ToTypedContent res => HandlerT Example IO res -> HandlerT Example IO res

yesodWithInternalState :: Example -> Maybe (Route Example) -> (InternalState -> IO a) -> IO a

defaultMessageWidget :: Html -> HtmlUrl (Route Example) -> WidgetT Example IO ()

YesodDispatch Example

Methods

yesodDispatch :: YesodRunnerEnv Example -> Application

Eq (Route Example)

Methods

(==) :: Route Example -> Route Example -> Bool

(/=) :: Route Example -> Route Example -> Bool

Read (Route Example)

Methods

readsPrec :: Int -> ReadS (Route Example)

readList :: ReadS [Route Example]

readPrec :: ReadPrec (Route Example)

readListPrec :: ReadPrec [Route Example]

Show (Route Example)

Methods

showsPrec :: Int -> Route Example -> ShowS

show :: Route Example -> String

showList :: [Route Example] -> ShowS

data Route Example

data Route Example

• = Example1R
• | Example2R
• | Example3R
• | Example4R
• | Example5R
• | Example6R
• | Example7R
• | Example8R
• | Example9R
• | Example10R
• | Example11R

type Handler = HandlerT Example IO

type Widget = WidgetT Example IO ()

resourcesExample :: [ResourceTree String]

getExample1R :: Handler Html

Allows scripts from self.

getExample2R :: Handler Html

Allows all styles over https.

getExample3R :: Handler Html

Allows images from a certain uri.

getExample4R :: Handler Html

Allows all images.

getExample5R :: Handler Html

Disallows images entirely.

getExample6R :: Handler Html

Blocks forms from being submitted

getExample7R :: Handler Html

postExample7R :: Handler Html

cdn :: Source

getExample8R :: Handler Html

getExample9R :: Handler Html

getExample10R :: Handler Html

getExample11R :: Handler Html

runExamples :: IO ()

Run a webserver to serve these examples at 1, 2, etc.