ghcjs-dom-javascript-0.10.0.0: src/GHCJS/DOM/JSFFI/Generated/FormData.hs

{-# LANGUAGE PatternSynonyms #-}
{-# LANGUAGE ForeignFunctionInterface, JavaScriptFFI #-}
{-# LANGUAGE ImplicitParams, ConstraintKinds, KindSignatures #-}
{-# OPTIONS_GHC -fno-warn-unused-imports #-}
-- | Generated by dom-gen from xhr (webref). Do not edit.
module GHCJS.DOM.JSFFI.Generated.FormData
       (js_newFormData, js_newFormData', js_append, js_appendBlob, js_delete, js_get, js_getAll, js_has, js_set, js_setBlobValueFilename, newFormData, newFormData', append, appendBlob, delete, get, get_, getUnsafe, getUnchecked, getAll, getAll_, has, has_, set, setBlobValueFilename, FormData(..), gTypeFormData)
       where
import Prelude ((.), (==), (>>=), (<$>), (++), Bool(..), Maybe(..), IO, Int, Word, Double, Float)
import qualified Prelude as P
import Control.Monad (void)
import GHCJS.Types (JSVal, JSString)
import GHCJS.Foreign (jsUndefined, jsNull)
import GHCJS.DOM.Types
import qualified GHCJS.DOM.Types as Types
import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync)
import GHCJS.DOM.JSFFI.Generated.Enums

foreign import javascript safe "(($1) => { return new globalThis[\"FormData\"]($1); })"
        js_newFormData :: JSVal -> IO FormData
-- | <https://developer.mozilla.org/docs/Web/API/FormData/FormData MDN FormData. documentation>
newFormData :: (MonadDOM m) => Maybe HTMLFormElement -> m FormData
newFormData form = liftDOM (((P.maybe (P.return jsUndefined) toJSVal form) >>= \a1' -> js_newFormData a1'))

foreign import javascript safe "(($1, $2) => { return new globalThis[\"FormData\"]($1, $2); })"
        js_newFormData' :: JSVal -> JSVal -> IO FormData
-- | <https://developer.mozilla.org/docs/Web/API/FormData/FormData MDN FormData. documentation>
newFormData' :: (MonadDOM m, IsHTMLElement submitter) => Maybe HTMLFormElement -> Maybe submitter -> m FormData
newFormData' form submitter = liftDOM (((P.maybe (P.return jsUndefined) toJSVal form) >>= \a1' -> (toJSVal submitter) >>= \a2' -> js_newFormData' a1' a2'))

foreign import javascript safe "(($1, $2, $3) => { return $1[\"append\"]($2, $3); })"
        js_append :: FormData -> JSString -> JSString -> IO ()
-- | <https://developer.mozilla.org/docs/Web/API/FormData/append MDN FormData.append documentation>
append :: (MonadDOM m, ToJSString name, ToJSString value) => FormData -> name -> value -> m ()
append self name value = liftDOM (void ((js_append (self) (toJSString name) (toJSString value))))

foreign import javascript safe "(($1, $2, $3, $4) => { return $1[\"append\"]($2, $3, $4); })"
        js_appendBlob :: FormData -> JSString -> Blob -> (Optional JSString) -> IO ()
-- | <https://developer.mozilla.org/docs/Web/API/FormData/append MDN FormData.append documentation>
appendBlob :: (MonadDOM m, ToJSString name, IsBlob blobValue, ToJSString filename) => FormData -> name -> blobValue -> Maybe filename -> m ()
appendBlob self name blobValue filename = liftDOM (void ((js_appendBlob (self) (toJSString name) (Types.toBlob blobValue) (toOptionalJSString filename))))

foreign import javascript safe "(($1, $2) => { return $1[\"delete\"]($2); })"
        js_delete :: FormData -> JSString -> IO ()
-- | <https://developer.mozilla.org/docs/Web/API/FormData/delete MDN FormData.delete documentation>
delete :: (MonadDOM m, ToJSString name) => FormData -> name -> m ()
delete self name = liftDOM (void ((js_delete (self) (toJSString name))))

foreign import javascript safe "(($1, $2) => { return $1[\"get\"]($2); })"
        js_get :: FormData -> JSString -> IO JSVal
-- | <https://developer.mozilla.org/docs/Web/API/FormData/get MDN FormData.get documentation>
get :: (MonadDOM m, ToJSString name) => FormData -> name -> m (Maybe FormDataEntryValue)
get self name = liftDOM (((js_get (self) (toJSString name)) >>= fromJSValUnchecked))

-- | <https://developer.mozilla.org/docs/Web/API/FormData/get MDN FormData.get documentation>
get_ :: (MonadDOM m, ToJSString name) => FormData -> name -> m ()
get_ self name = liftDOM (void ((js_get (self) (toJSString name))))

-- | <https://developer.mozilla.org/docs/Web/API/FormData/get MDN FormData.get documentation>
getUnsafe :: (MonadDOM m, ToJSString name, HasCallStack) => FormData -> name -> m FormDataEntryValue
getUnsafe self name = liftDOM ((((js_get (self) (toJSString name)) >>= fromJSValUnchecked) >>= P.maybe (P.error "Nothing to return") P.return))

-- | <https://developer.mozilla.org/docs/Web/API/FormData/get MDN FormData.get documentation>
getUnchecked :: (MonadDOM m, ToJSString name) => FormData -> name -> m FormDataEntryValue
getUnchecked self name = liftDOM ((pFromJSVal <$> (js_get (self) (toJSString name))))

foreign import javascript safe "(($1, $2) => { return $1[\"getAll\"]($2); })"
        js_getAll :: FormData -> JSString -> IO JSVal
-- | <https://developer.mozilla.org/docs/Web/API/FormData/getAll MDN FormData.getAll documentation>
getAll :: (MonadDOM m, ToJSString name) => FormData -> name -> m [FormDataEntryValue]
getAll self name = liftDOM (((js_getAll (self) (toJSString name)) >>= fromJSValUnchecked))

-- | <https://developer.mozilla.org/docs/Web/API/FormData/getAll MDN FormData.getAll documentation>
getAll_ :: (MonadDOM m, ToJSString name) => FormData -> name -> m ()
getAll_ self name = liftDOM (void ((js_getAll (self) (toJSString name))))

foreign import javascript safe "(($1, $2) => { return $1[\"has\"]($2); })"
        js_has :: FormData -> JSString -> IO Bool
-- | <https://developer.mozilla.org/docs/Web/API/FormData/has MDN FormData.has documentation>
has :: (MonadDOM m, ToJSString name) => FormData -> name -> m Bool
has self name = liftDOM ((js_has (self) (toJSString name)))

-- | <https://developer.mozilla.org/docs/Web/API/FormData/has MDN FormData.has documentation>
has_ :: (MonadDOM m, ToJSString name) => FormData -> name -> m ()
has_ self name = liftDOM (void ((js_has (self) (toJSString name))))

foreign import javascript safe "(($1, $2, $3) => { return $1[\"set\"]($2, $3); })"
        js_set :: FormData -> JSString -> JSString -> IO ()
-- | <https://developer.mozilla.org/docs/Web/API/FormData/set MDN FormData.set documentation>
set :: (MonadDOM m, ToJSString name, ToJSString value) => FormData -> name -> value -> m ()
set self name value = liftDOM (void ((js_set (self) (toJSString name) (toJSString value))))

foreign import javascript safe "(($1, $2, $3, $4) => { return $1[\"set\"]($2, $3, $4); })"
        js_setBlobValueFilename :: FormData -> JSString -> Blob -> (Optional JSString) -> IO ()
-- | <https://developer.mozilla.org/docs/Web/API/FormData/set MDN FormData.set documentation>
setBlobValueFilename :: (MonadDOM m, ToJSString name, IsBlob blobValue, ToJSString filename) => FormData -> name -> blobValue -> Maybe filename -> m ()
setBlobValueFilename self name blobValue filename = liftDOM (void ((js_setBlobValueFilename (self) (toJSString name) (Types.toBlob blobValue) (toOptionalJSString filename))))