IDBTransaction.hs

{-# LANGUAGE PatternSynonyms #-}
{-# LANGUAGE ForeignFunctionInterface, JavaScriptFFI #-}
{-# LANGUAGE ImplicitParams, ConstraintKinds, KindSignatures #-}
{-# OPTIONS_GHC -fno-warn-unused-imports #-}
-- | Generated by dom-gen from IndexedDB-3 (webref). Do not edit.
module GHCJS.DOM.JSFFI.Generated.IDBTransaction
       (js_abort, js_commit, js_objectStore, js_getObjectStoreNames, js_getMode, js_getDurability, js_getDb, js_getError, abort, commit, objectStore, objectStore_, getObjectStoreNames, getMode, getDurability, getDb, getError, getErrorUnsafe, getErrorUnchecked, abortEvent, complete, error, IDBTransaction(..), gTypeIDBTransaction)
       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 $1[\"abort\"](); })"
        js_abort :: IDBTransaction -> IO ()
-- | <https://developer.mozilla.org/docs/Web/API/IDBTransaction/abort MDN IDBTransaction.abort documentation>
abort :: (MonadDOM m) => IDBTransaction -> m ()
abort self = liftDOM (void ((js_abort (self))))

foreign import javascript safe "(($1) => { return $1[\"commit\"](); })"
        js_commit :: IDBTransaction -> IO ()
-- | <https://developer.mozilla.org/docs/Web/API/IDBTransaction/commit MDN IDBTransaction.commit documentation>
commit :: (MonadDOM m) => IDBTransaction -> m ()
commit self = liftDOM (void ((js_commit (self))))

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

-- | <https://developer.mozilla.org/docs/Web/API/IDBTransaction/objectStore MDN IDBTransaction.objectStore documentation>
objectStore_ :: (MonadDOM m, ToJSString name) => IDBTransaction -> name -> m ()
objectStore_ self name = liftDOM (void ((js_objectStore (self) (toJSString name))))

foreign import javascript unsafe "(($1) => { return $1[\"objectStoreNames\"]; })"
        js_getObjectStoreNames :: IDBTransaction -> IO DOMStringList
-- | <https://developer.mozilla.org/docs/Web/API/IDBTransaction/objectStoreNames MDN IDBTransaction.objectStoreNames documentation>
getObjectStoreNames :: (MonadDOM m) => IDBTransaction -> m DOMStringList
getObjectStoreNames self = liftDOM ((js_getObjectStoreNames (self)))

foreign import javascript unsafe "(($1) => { return $1[\"mode\"]; })"
        js_getMode :: IDBTransaction -> IO JSVal
-- | <https://developer.mozilla.org/docs/Web/API/IDBTransaction/mode MDN IDBTransaction.mode documentation>
getMode :: (MonadDOM m) => IDBTransaction -> m IDBTransactionMode
getMode self = liftDOM (((js_getMode (self)) >>= fromJSValUnchecked))

foreign import javascript unsafe "(($1) => { return $1[\"durability\"]; })"
        js_getDurability :: IDBTransaction -> IO JSVal
-- | <https://developer.mozilla.org/docs/Web/API/IDBTransaction/durability MDN IDBTransaction.durability documentation>
getDurability :: (MonadDOM m) => IDBTransaction -> m IDBTransactionDurability
getDurability self = liftDOM (((js_getDurability (self)) >>= fromJSValUnchecked))

foreign import javascript unsafe "(($1) => { return $1[\"db\"]; })"
        js_getDb :: IDBTransaction -> IO IDBDatabase
-- | <https://developer.mozilla.org/docs/Web/API/IDBTransaction/db MDN IDBTransaction.db documentation>
getDb :: (MonadDOM m) => IDBTransaction -> m IDBDatabase
getDb self = liftDOM ((js_getDb (self)))

foreign import javascript unsafe "(($1) => { return $1[\"error\"]; })"
        js_getError :: IDBTransaction -> IO JSVal
-- | <https://developer.mozilla.org/docs/Web/API/IDBTransaction/error MDN IDBTransaction.error documentation>
getError :: (MonadDOM m) => IDBTransaction -> m (Maybe DOMException)
getError self = liftDOM (((js_getError (self)) >>= fromJSValUnchecked))

-- | <https://developer.mozilla.org/docs/Web/API/IDBTransaction/error MDN IDBTransaction.error documentation>
getErrorUnsafe :: (MonadDOM m, HasCallStack) => IDBTransaction -> m DOMException
getErrorUnsafe self = liftDOM ((((js_getError (self)) >>= fromJSValUnchecked) >>= P.maybe (P.error "Nothing to return") P.return))

-- | <https://developer.mozilla.org/docs/Web/API/IDBTransaction/error MDN IDBTransaction.error documentation>
getErrorUnchecked :: (MonadDOM m) => IDBTransaction -> m DOMException
getErrorUnchecked self = liftDOM ((pFromJSVal <$> (js_getError (self))))

-- | <https://w3c.github.io/IndexedDB/#dom-idbtransaction-onabort abort event>
abortEvent :: EventName IDBTransaction Event
abortEvent = unsafeEventName (toJSString "abort")

-- | <https://w3c.github.io/IndexedDB/#dom-idbtransaction-oncomplete complete event>
complete :: EventName IDBTransaction Event
complete = unsafeEventName (toJSString "complete")

-- | <https://w3c.github.io/IndexedDB/#dom-idbtransaction-onerror error event>
error :: EventName IDBTransaction Event
error = unsafeEventName (toJSString "error")