HTMLFormElement.hs

{-# LANGUAGE PatternSynonyms #-}
{-# LANGUAGE ImplicitParams, ConstraintKinds, KindSignatures #-}
{-# OPTIONS_GHC -fno-warn-unused-imports #-}
-- | Generated by dom-gen from html (webref). Do not edit.
module JSDOM.Generated.HTMLFormElement
       (checkValidity, checkValidity_, reportValidity, reportValidity_, requestSubmit, reset, submit, setAcceptCharset, getAcceptCharset, setAction, getAction, setAutocomplete, getAutocomplete, setEnctype, getEnctype, setEncoding, getEncoding, setMethod, getMethod, setName, getName, setNoValidate, getNoValidate, setTarget, getTarget, setRel, getRel, getRelList, getElements, getLength, HTMLFormElement(..), gTypeHTMLFormElement)
       where
import Prelude ((.), (==), (>>=), (<$>), (++), Bool(..), Maybe(..), IO, Int, Word, Double, Float)
import qualified Prelude as P
import Control.Monad (void)
import Control.Lens.Operators ((^.))
import Language.Javascript.JSaddle (JSM, JSVal, JSString, toJSVal, valToBool, valToNumber, js, jss, jsf, jsg, new, function, asyncFunction, jsUndefined, jsNull)
import JSDOM.Types
import qualified JSDOM.Types as Types
import JSDOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync)
import JSDOM.Generated.Enums

-- | <https://developer.mozilla.org/docs/Web/API/HTMLFormElement/checkValidity MDN HTMLFormElement.checkValidity documentation>
checkValidity :: (MonadDOM m) => HTMLFormElement -> m Bool
checkValidity self = liftDOM (((self ^. jsf "checkValidity" ()) >>= valToBool))

-- | <https://developer.mozilla.org/docs/Web/API/HTMLFormElement/checkValidity MDN HTMLFormElement.checkValidity documentation>
checkValidity_ :: (MonadDOM m) => HTMLFormElement -> m ()
checkValidity_ self = liftDOM (void (self ^. jsf "checkValidity" ()))

-- | <https://developer.mozilla.org/docs/Web/API/HTMLFormElement/reportValidity MDN HTMLFormElement.reportValidity documentation>
reportValidity :: (MonadDOM m) => HTMLFormElement -> m Bool
reportValidity self = liftDOM (((self ^. jsf "reportValidity" ()) >>= valToBool))

-- | <https://developer.mozilla.org/docs/Web/API/HTMLFormElement/reportValidity MDN HTMLFormElement.reportValidity documentation>
reportValidity_ :: (MonadDOM m) => HTMLFormElement -> m ()
reportValidity_ self = liftDOM (void (self ^. jsf "reportValidity" ()))

-- | <https://developer.mozilla.org/docs/Web/API/HTMLFormElement/requestSubmit MDN HTMLFormElement.requestSubmit documentation>
requestSubmit :: (MonadDOM m, IsHTMLElement submitter) => HTMLFormElement -> Maybe submitter -> m ()
requestSubmit self submitter = liftDOM (void (self ^. jsf "requestSubmit" [toJSVal submitter]))

-- | <https://developer.mozilla.org/docs/Web/API/HTMLFormElement/reset MDN HTMLFormElement.reset documentation>
reset :: (MonadDOM m) => HTMLFormElement -> m ()
reset self = liftDOM (void (self ^. jsf "reset" ()))

-- | <https://developer.mozilla.org/docs/Web/API/HTMLFormElement/submit MDN HTMLFormElement.submit documentation>
submit :: (MonadDOM m) => HTMLFormElement -> m ()
submit self = liftDOM (void (self ^. jsf "submit" ()))

-- | <https://developer.mozilla.org/docs/Web/API/HTMLFormElement/acceptCharset MDN HTMLFormElement.acceptCharset documentation>
setAcceptCharset :: (MonadDOM m, ToJSString val) => HTMLFormElement -> val -> m ()
setAcceptCharset self val = liftDOM (void (self ^. jss "acceptCharset" (toJSVal val)))

-- | <https://developer.mozilla.org/docs/Web/API/HTMLFormElement/acceptCharset MDN HTMLFormElement.acceptCharset documentation>
getAcceptCharset :: (MonadDOM m, FromJSString result) => HTMLFormElement -> m result
getAcceptCharset self = liftDOM (((self ^. js "acceptCharset") >>= fromJSValUnchecked))

-- | <https://developer.mozilla.org/docs/Web/API/HTMLFormElement/action MDN HTMLFormElement.action documentation>
setAction :: (MonadDOM m, ToJSString val) => HTMLFormElement -> val -> m ()
setAction self val = liftDOM (void (self ^. jss "action" (toJSVal val)))

-- | <https://developer.mozilla.org/docs/Web/API/HTMLFormElement/action MDN HTMLFormElement.action documentation>
getAction :: (MonadDOM m, FromJSString result) => HTMLFormElement -> m result
getAction self = liftDOM (((self ^. js "action") >>= fromJSValUnchecked))

-- | <https://developer.mozilla.org/docs/Web/API/HTMLFormElement/autocomplete MDN HTMLFormElement.autocomplete documentation>
setAutocomplete :: (MonadDOM m, ToJSString val) => HTMLFormElement -> val -> m ()
setAutocomplete self val = liftDOM (void (self ^. jss "autocomplete" (toJSVal val)))

-- | <https://developer.mozilla.org/docs/Web/API/HTMLFormElement/autocomplete MDN HTMLFormElement.autocomplete documentation>
getAutocomplete :: (MonadDOM m, FromJSString result) => HTMLFormElement -> m result
getAutocomplete self = liftDOM (((self ^. js "autocomplete") >>= fromJSValUnchecked))

-- | <https://developer.mozilla.org/docs/Web/API/HTMLFormElement/enctype MDN HTMLFormElement.enctype documentation>
setEnctype :: (MonadDOM m, ToJSString val) => HTMLFormElement -> val -> m ()
setEnctype self val = liftDOM (void (self ^. jss "enctype" (toJSVal val)))

-- | <https://developer.mozilla.org/docs/Web/API/HTMLFormElement/enctype MDN HTMLFormElement.enctype documentation>
getEnctype :: (MonadDOM m, FromJSString result) => HTMLFormElement -> m result
getEnctype self = liftDOM (((self ^. js "enctype") >>= fromJSValUnchecked))

-- | <https://developer.mozilla.org/docs/Web/API/HTMLFormElement/encoding MDN HTMLFormElement.encoding documentation>
setEncoding :: (MonadDOM m, ToJSString val) => HTMLFormElement -> val -> m ()
setEncoding self val = liftDOM (void (self ^. jss "encoding" (toJSVal val)))

-- | <https://developer.mozilla.org/docs/Web/API/HTMLFormElement/encoding MDN HTMLFormElement.encoding documentation>
getEncoding :: (MonadDOM m, FromJSString result) => HTMLFormElement -> m result
getEncoding self = liftDOM (((self ^. js "encoding") >>= fromJSValUnchecked))

-- | <https://developer.mozilla.org/docs/Web/API/HTMLFormElement/method MDN HTMLFormElement.method documentation>
setMethod :: (MonadDOM m, ToJSString val) => HTMLFormElement -> val -> m ()
setMethod self val = liftDOM (void (self ^. jss "method" (toJSVal val)))

-- | <https://developer.mozilla.org/docs/Web/API/HTMLFormElement/method MDN HTMLFormElement.method documentation>
getMethod :: (MonadDOM m, FromJSString result) => HTMLFormElement -> m result
getMethod self = liftDOM (((self ^. js "method") >>= fromJSValUnchecked))

-- | <https://developer.mozilla.org/docs/Web/API/HTMLFormElement/name MDN HTMLFormElement.name documentation>
setName :: (MonadDOM m, ToJSString val) => HTMLFormElement -> val -> m ()
setName self val = liftDOM (void (self ^. jss "name" (toJSVal val)))

-- | <https://developer.mozilla.org/docs/Web/API/HTMLFormElement/name MDN HTMLFormElement.name documentation>
getName :: (MonadDOM m, FromJSString result) => HTMLFormElement -> m result
getName self = liftDOM (((self ^. js "name") >>= fromJSValUnchecked))

-- | <https://developer.mozilla.org/docs/Web/API/HTMLFormElement/noValidate MDN HTMLFormElement.noValidate documentation>
setNoValidate :: (MonadDOM m) => HTMLFormElement -> Bool -> m ()
setNoValidate self val = liftDOM (void (self ^. jss "noValidate" (toJSVal val)))

-- | <https://developer.mozilla.org/docs/Web/API/HTMLFormElement/noValidate MDN HTMLFormElement.noValidate documentation>
getNoValidate :: (MonadDOM m) => HTMLFormElement -> m Bool
getNoValidate self = liftDOM (((self ^. js "noValidate") >>= valToBool))

-- | <https://developer.mozilla.org/docs/Web/API/HTMLFormElement/target MDN HTMLFormElement.target documentation>
setTarget :: (MonadDOM m, ToJSString val) => HTMLFormElement -> val -> m ()
setTarget self val = liftDOM (void (self ^. jss "target" (toJSVal val)))

-- | <https://developer.mozilla.org/docs/Web/API/HTMLFormElement/target MDN HTMLFormElement.target documentation>
getTarget :: (MonadDOM m, FromJSString result) => HTMLFormElement -> m result
getTarget self = liftDOM (((self ^. js "target") >>= fromJSValUnchecked))

-- | <https://developer.mozilla.org/docs/Web/API/HTMLFormElement/rel MDN HTMLFormElement.rel documentation>
setRel :: (MonadDOM m, ToJSString val) => HTMLFormElement -> val -> m ()
setRel self val = liftDOM (void (self ^. jss "rel" (toJSVal val)))

-- | <https://developer.mozilla.org/docs/Web/API/HTMLFormElement/rel MDN HTMLFormElement.rel documentation>
getRel :: (MonadDOM m, FromJSString result) => HTMLFormElement -> m result
getRel self = liftDOM (((self ^. js "rel") >>= fromJSValUnchecked))

-- | <https://developer.mozilla.org/docs/Web/API/HTMLFormElement/relList MDN HTMLFormElement.relList documentation>
getRelList :: (MonadDOM m) => HTMLFormElement -> m DOMTokenList
getRelList self = liftDOM (((self ^. js "relList") >>= fromJSValUnchecked))

-- | <https://developer.mozilla.org/docs/Web/API/HTMLFormElement/elements MDN HTMLFormElement.elements documentation>
getElements :: (MonadDOM m) => HTMLFormElement -> m HTMLFormControlsCollection
getElements self = liftDOM (((self ^. js "elements") >>= fromJSValUnchecked))

-- | <https://developer.mozilla.org/docs/Web/API/HTMLFormElement/length MDN HTMLFormElement.length documentation>
getLength :: (MonadDOM m) => HTMLFormElement -> m Word
getLength self = liftDOM ((P.round <$> ((self ^. js "length") >>= valToNumber)))