FileSystemDirectoryHandle.hs

{-# LANGUAGE PatternSynonyms #-}
{-# LANGUAGE ImplicitParams, ConstraintKinds, KindSignatures #-}
{-# OPTIONS_GHC -fno-warn-unused-imports #-}
-- | Generated by dom-gen from fs (webref). Do not edit.
module JSDOM.Generated.FileSystemDirectoryHandle
       (getDirectoryHandle, getDirectoryHandle_, getFileHandle, getFileHandle_, removeEntry, resolve, resolve_, resolveUnsafe, resolveUnchecked, FileSystemDirectoryHandle(..), gTypeFileSystemDirectoryHandle)
       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/FileSystemDirectoryHandle/getDirectoryHandle MDN FileSystemDirectoryHandle.getDirectoryHandle documentation>
getDirectoryHandle :: (MonadDOM m, ToJSString name) => FileSystemDirectoryHandle -> name -> Maybe FileSystemGetDirectoryOptions -> m FileSystemDirectoryHandle
getDirectoryHandle self name options = liftDOM (((((self ^. jsf "getDirectoryHandle" [toJSVal name, P.maybe (P.return jsUndefined) toJSVal options]) >>= readPromise)) >>= fromJSValUnchecked))

-- | <https://developer.mozilla.org/docs/Web/API/FileSystemDirectoryHandle/getDirectoryHandle MDN FileSystemDirectoryHandle.getDirectoryHandle documentation>
getDirectoryHandle_ :: (MonadDOM m, ToJSString name) => FileSystemDirectoryHandle -> name -> Maybe FileSystemGetDirectoryOptions -> m ()
getDirectoryHandle_ self name options = liftDOM (void (((self ^. jsf "getDirectoryHandle" [toJSVal name, P.maybe (P.return jsUndefined) toJSVal options]) >>= readPromise)))

-- | <https://developer.mozilla.org/docs/Web/API/FileSystemDirectoryHandle/getFileHandle MDN FileSystemDirectoryHandle.getFileHandle documentation>
getFileHandle :: (MonadDOM m, ToJSString name) => FileSystemDirectoryHandle -> name -> Maybe FileSystemGetFileOptions -> m FileSystemFileHandle
getFileHandle self name options = liftDOM (((((self ^. jsf "getFileHandle" [toJSVal name, P.maybe (P.return jsUndefined) toJSVal options]) >>= readPromise)) >>= fromJSValUnchecked))

-- | <https://developer.mozilla.org/docs/Web/API/FileSystemDirectoryHandle/getFileHandle MDN FileSystemDirectoryHandle.getFileHandle documentation>
getFileHandle_ :: (MonadDOM m, ToJSString name) => FileSystemDirectoryHandle -> name -> Maybe FileSystemGetFileOptions -> m ()
getFileHandle_ self name options = liftDOM (void (((self ^. jsf "getFileHandle" [toJSVal name, P.maybe (P.return jsUndefined) toJSVal options]) >>= readPromise)))

-- | <https://developer.mozilla.org/docs/Web/API/FileSystemDirectoryHandle/removeEntry MDN FileSystemDirectoryHandle.removeEntry documentation>
removeEntry :: (MonadDOM m, ToJSString name) => FileSystemDirectoryHandle -> name -> Maybe FileSystemRemoveOptions -> m ()
removeEntry self name options = liftDOM (void (((self ^. jsf "removeEntry" [toJSVal name, P.maybe (P.return jsUndefined) toJSVal options]) >>= readPromise)))

-- | <https://developer.mozilla.org/docs/Web/API/FileSystemDirectoryHandle/resolve MDN FileSystemDirectoryHandle.resolve documentation>
resolve :: (MonadDOM m, IsFileSystemHandle possibleDescendant, FromJSString result) => FileSystemDirectoryHandle -> possibleDescendant -> m (Maybe [result])
resolve self possibleDescendant = liftDOM (((((self ^. jsf "resolve" [toJSVal possibleDescendant]) >>= readPromise)) >>= fromJSValUnchecked))

-- | <https://developer.mozilla.org/docs/Web/API/FileSystemDirectoryHandle/resolve MDN FileSystemDirectoryHandle.resolve documentation>
resolve_ :: (MonadDOM m, IsFileSystemHandle possibleDescendant) => FileSystemDirectoryHandle -> possibleDescendant -> m ()
resolve_ self possibleDescendant = liftDOM (void (((self ^. jsf "resolve" [toJSVal possibleDescendant]) >>= readPromise)))

-- | <https://developer.mozilla.org/docs/Web/API/FileSystemDirectoryHandle/resolve MDN FileSystemDirectoryHandle.resolve documentation>
resolveUnsafe :: (MonadDOM m, IsFileSystemHandle possibleDescendant, HasCallStack, FromJSString result) => FileSystemDirectoryHandle -> possibleDescendant -> m [result]
resolveUnsafe self possibleDescendant = liftDOM ((((((self ^. jsf "resolve" [toJSVal possibleDescendant]) >>= readPromise)) >>= fromJSValUnchecked) >>= P.maybe (P.error "Nothing to return") P.return))

-- | <https://developer.mozilla.org/docs/Web/API/FileSystemDirectoryHandle/resolve MDN FileSystemDirectoryHandle.resolve documentation>
resolveUnchecked :: (MonadDOM m, IsFileSystemHandle possibleDescendant, FromJSString result) => FileSystemDirectoryHandle -> possibleDescendant -> m [result]
resolveUnchecked self possibleDescendant = liftDOM (((((self ^. jsf "resolve" [toJSVal possibleDescendant]) >>= readPromise)) >>= fromJSValUnchecked))