Web.VKHS.Login

Documentation

data LoginState

Constructors

LoginState

Fields

• ls_rights :: [AccessRight]

  Access rights to be requested

• ls_appid :: AppID

  Application ID provided by vk.com

• ls_formdata :: [(String, String)]

  Dictionary containig inputID/value map for filling forms

• ls_input_sets :: [[String]]

defaultState :: GenericOptions -> LoginState

class ToGenericOptions s => ToLoginState s where

Minimal complete definition

toLoginState, modifyLoginState

Methods

toLoginState :: s -> LoginState

modifyLoginState :: (LoginState -> LoginState) -> s -> s

Instances

ToLoginState State

Methods

toLoginState :: State -> LoginState

modifyLoginState :: (LoginState -> LoginState) -> State -> State

class (MonadIO m, MonadClient m s, ToLoginState s, MonadVK m r) => MonadLogin m r s | m -> s

Instances

MonadLogin (VK r) r State

data RobotAction

Login robot action

Constructors

DoGET URL Cookies

DoPOST FilledForm Cookies

Instances

Show RobotAction

Methods

showsPrec :: Int -> RobotAction -> ShowS

show :: RobotAction -> String

showList :: [RobotAction] -> ShowS

printAction :: String -> RobotAction -> Text

type Login m x a = m (R m x) a

initialAction :: MonadLogin (m (R m x)) (R m x) s => Login m x RobotAction

printForm :: String -> Form -> Text

fillForm :: MonadLogin (m (R m x)) (R m x) s => Form -> Login m x FilledForm

actionRequest :: MonadLogin (m (R m x)) (R m x) s => RobotAction -> Login m x (Response, Cookies)

analyzeResponse :: MonadLogin (m (R m x)) (R m x) s => (Response, Cookies) -> Login m x (Either RobotAction AccessToken)

login :: MonadLogin (m (R m x)) (R m x) s => Login m x AccessToken