{-# LANGUAGE TypeApplications #-}


-- | Copyright  : Will Thompson, Iñaki García Etxebarria and Jonas Platte
-- License    : LGPL-2.1
-- Maintainer : Iñaki García Etxebarria
-- 
-- /No description available in the introspection data./

#if (MIN_VERSION_haskell_gi_overloading(1,0,0) && !defined(__HADDOCK_VERSION__))
#define ENABLE_OVERLOADING
#endif

module GI.OSTree.Structs.BootloaderInterface
    ( 

-- * Exported types
    BootloaderInterface(..)                 ,
    newZeroBootloaderInterface              ,
    noBootloaderInterface                   ,


 -- * Methods
-- ** Overloaded methods #method:Overloaded methods#

#if defined(ENABLE_OVERLOADING)
    ResolveBootloaderInterfaceMethod        ,
#endif




 -- * Properties
-- ** gIface #attr:gIface#
-- | /No description available in the introspection data./

#if defined(ENABLE_OVERLOADING)
    bootloaderInterface_gIface              ,
#endif
    getBootloaderInterfaceGIface            ,


-- ** getName #attr:getName#
-- | /No description available in the introspection data./

#if defined(ENABLE_OVERLOADING)
    bootloaderInterface_getName             ,
#endif
    clearBootloaderInterfaceGetName         ,
    getBootloaderInterfaceGetName           ,
    setBootloaderInterfaceGetName           ,


-- ** isAtomic #attr:isAtomic#
-- | /No description available in the introspection data./

#if defined(ENABLE_OVERLOADING)
    bootloaderInterface_isAtomic            ,
#endif
    clearBootloaderInterfaceIsAtomic        ,
    getBootloaderInterfaceIsAtomic          ,
    setBootloaderInterfaceIsAtomic          ,


-- ** query #attr:query#
-- | /No description available in the introspection data./

#if defined(ENABLE_OVERLOADING)
    bootloaderInterface_query               ,
#endif
    clearBootloaderInterfaceQuery           ,
    getBootloaderInterfaceQuery             ,
    setBootloaderInterfaceQuery             ,




    ) where

import Data.GI.Base.ShortPrelude
import qualified Data.GI.Base.ShortPrelude as SP
import qualified Data.GI.Base.Overloading as O
import qualified Prelude as P

import qualified Data.GI.Base.Attributes as GI.Attributes
import qualified Data.GI.Base.ManagedPtr as B.ManagedPtr
import qualified Data.GI.Base.GClosure as B.GClosure
import qualified Data.GI.Base.GError as B.GError
import qualified Data.GI.Base.GVariant as B.GVariant
import qualified Data.GI.Base.GValue as B.GValue
import qualified Data.GI.Base.GParamSpec as B.GParamSpec
import qualified Data.GI.Base.CallStack as B.CallStack
import qualified Data.GI.Base.Properties as B.Properties
import qualified Data.GI.Base.Signals as B.Signals
import qualified Data.Text as T
import qualified Data.ByteString.Char8 as B
import qualified Data.Map as Map
import qualified Foreign.Ptr as FP
import qualified GHC.OverloadedLabels as OL

import qualified GI.GObject.Structs.TypeInterface as GObject.TypeInterface
import qualified GI.OSTree.Callbacks as OSTree.Callbacks

-- | Memory-managed wrapper type.
newtype BootloaderInterface = BootloaderInterface (ManagedPtr BootloaderInterface)
    deriving (BootloaderInterface -> BootloaderInterface -> Bool
(BootloaderInterface -> BootloaderInterface -> Bool)
-> (BootloaderInterface -> BootloaderInterface -> Bool)
-> Eq BootloaderInterface
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: BootloaderInterface -> BootloaderInterface -> Bool
$c/= :: BootloaderInterface -> BootloaderInterface -> Bool
== :: BootloaderInterface -> BootloaderInterface -> Bool
$c== :: BootloaderInterface -> BootloaderInterface -> Bool
Eq)
instance WrappedPtr BootloaderInterface where
    wrappedPtrCalloc :: IO (Ptr BootloaderInterface)
wrappedPtrCalloc = Int -> IO (Ptr BootloaderInterface)
forall a. Int -> IO (Ptr a)
callocBytes 48
    wrappedPtrCopy :: BootloaderInterface -> IO BootloaderInterface
wrappedPtrCopy = \p :: BootloaderInterface
p -> BootloaderInterface
-> (Ptr BootloaderInterface -> IO BootloaderInterface)
-> IO BootloaderInterface
forall a c.
(HasCallStack, ManagedPtrNewtype a) =>
a -> (Ptr a -> IO c) -> IO c
withManagedPtr BootloaderInterface
p (Int -> Ptr BootloaderInterface -> IO (Ptr BootloaderInterface)
forall a. WrappedPtr a => Int -> Ptr a -> IO (Ptr a)
copyBytes 48 (Ptr BootloaderInterface -> IO (Ptr BootloaderInterface))
-> (Ptr BootloaderInterface -> IO BootloaderInterface)
-> Ptr BootloaderInterface
-> IO BootloaderInterface
forall (m :: * -> *) a b c.
Monad m =>
(a -> m b) -> (b -> m c) -> a -> m c
>=> (ManagedPtr BootloaderInterface -> BootloaderInterface)
-> Ptr BootloaderInterface -> IO BootloaderInterface
forall a.
(HasCallStack, WrappedPtr a) =>
(ManagedPtr a -> a) -> Ptr a -> IO a
wrapPtr ManagedPtr BootloaderInterface -> BootloaderInterface
BootloaderInterface)
    wrappedPtrFree :: Maybe (GDestroyNotify BootloaderInterface)
wrappedPtrFree = GDestroyNotify BootloaderInterface
-> Maybe (GDestroyNotify BootloaderInterface)
forall a. a -> Maybe a
Just GDestroyNotify BootloaderInterface
forall a. FunPtr (Ptr a -> IO ())
ptr_to_g_free

-- | Construct a `BootloaderInterface` struct initialized to zero.
newZeroBootloaderInterface :: MonadIO m => m BootloaderInterface
newZeroBootloaderInterface :: m BootloaderInterface
newZeroBootloaderInterface = IO BootloaderInterface -> m BootloaderInterface
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO BootloaderInterface -> m BootloaderInterface)
-> IO BootloaderInterface -> m BootloaderInterface
forall a b. (a -> b) -> a -> b
$ IO (Ptr BootloaderInterface)
forall a. WrappedPtr a => IO (Ptr a)
wrappedPtrCalloc IO (Ptr BootloaderInterface)
-> (Ptr BootloaderInterface -> IO BootloaderInterface)
-> IO BootloaderInterface
forall (m :: * -> *) a b. Monad m => m a -> (a -> m b) -> m b
>>= (ManagedPtr BootloaderInterface -> BootloaderInterface)
-> Ptr BootloaderInterface -> IO BootloaderInterface
forall a.
(HasCallStack, WrappedPtr a) =>
(ManagedPtr a -> a) -> Ptr a -> IO a
wrapPtr ManagedPtr BootloaderInterface -> BootloaderInterface
BootloaderInterface

instance tag ~ 'AttrSet => Constructible BootloaderInterface tag where
    new :: (ManagedPtr BootloaderInterface -> BootloaderInterface)
-> [AttrOp BootloaderInterface tag] -> m BootloaderInterface
new _ attrs :: [AttrOp BootloaderInterface tag]
attrs = do
        BootloaderInterface
o <- m BootloaderInterface
forall (m :: * -> *). MonadIO m => m BootloaderInterface
newZeroBootloaderInterface
        BootloaderInterface
-> [AttrOp BootloaderInterface 'AttrSet] -> m ()
forall o (m :: * -> *).
MonadIO m =>
o -> [AttrOp o 'AttrSet] -> m ()
GI.Attributes.set BootloaderInterface
o [AttrOp BootloaderInterface tag]
[AttrOp BootloaderInterface 'AttrSet]
attrs
        BootloaderInterface -> m BootloaderInterface
forall (m :: * -> *) a. Monad m => a -> m a
return BootloaderInterface
o


-- | A convenience alias for `Nothing` :: `Maybe` `BootloaderInterface`.
noBootloaderInterface :: Maybe BootloaderInterface
noBootloaderInterface :: Maybe BootloaderInterface
noBootloaderInterface = Maybe BootloaderInterface
forall a. Maybe a
Nothing

-- | Get the value of the “@g_iface@” field.
-- When <https://github.com/haskell-gi/haskell-gi/wiki/Overloading overloading> is enabled, this is equivalent to
-- 
-- @
-- 'Data.GI.Base.Attributes.get' bootloaderInterface #gIface
-- @
getBootloaderInterfaceGIface :: MonadIO m => BootloaderInterface -> m GObject.TypeInterface.TypeInterface
getBootloaderInterfaceGIface :: BootloaderInterface -> m TypeInterface
getBootloaderInterfaceGIface s :: BootloaderInterface
s = IO TypeInterface -> m TypeInterface
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO TypeInterface -> m TypeInterface)
-> IO TypeInterface -> m TypeInterface
forall a b. (a -> b) -> a -> b
$ BootloaderInterface
-> (Ptr BootloaderInterface -> IO TypeInterface)
-> IO TypeInterface
forall a c.
(HasCallStack, ManagedPtrNewtype a) =>
a -> (Ptr a -> IO c) -> IO c
withManagedPtr BootloaderInterface
s ((Ptr BootloaderInterface -> IO TypeInterface) -> IO TypeInterface)
-> (Ptr BootloaderInterface -> IO TypeInterface)
-> IO TypeInterface
forall a b. (a -> b) -> a -> b
$ \ptr :: Ptr BootloaderInterface
ptr -> do
    let val :: Ptr TypeInterface
val = Ptr BootloaderInterface
ptr Ptr BootloaderInterface -> Int -> Ptr TypeInterface
forall a b. Ptr a -> Int -> Ptr b
`plusPtr` 0 :: (Ptr GObject.TypeInterface.TypeInterface)
    TypeInterface
val' <- ((ManagedPtr TypeInterface -> TypeInterface)
-> Ptr TypeInterface -> IO TypeInterface
forall a.
(HasCallStack, WrappedPtr a) =>
(ManagedPtr a -> a) -> Ptr a -> IO a
newPtr ManagedPtr TypeInterface -> TypeInterface
GObject.TypeInterface.TypeInterface) Ptr TypeInterface
val
    TypeInterface -> IO TypeInterface
forall (m :: * -> *) a. Monad m => a -> m a
return TypeInterface
val'

#if defined(ENABLE_OVERLOADING)
data BootloaderInterfaceGIfaceFieldInfo
instance AttrInfo BootloaderInterfaceGIfaceFieldInfo where
    type AttrBaseTypeConstraint BootloaderInterfaceGIfaceFieldInfo = (~) BootloaderInterface
    type AttrAllowedOps BootloaderInterfaceGIfaceFieldInfo = '[ 'AttrGet]
    type AttrSetTypeConstraint BootloaderInterfaceGIfaceFieldInfo = (~) (Ptr GObject.TypeInterface.TypeInterface)
    type AttrTransferTypeConstraint BootloaderInterfaceGIfaceFieldInfo = (~)(Ptr GObject.TypeInterface.TypeInterface)
    type AttrTransferType BootloaderInterfaceGIfaceFieldInfo = (Ptr GObject.TypeInterface.TypeInterface)
    type AttrGetType BootloaderInterfaceGIfaceFieldInfo = GObject.TypeInterface.TypeInterface
    type AttrLabel BootloaderInterfaceGIfaceFieldInfo = "g_iface"
    type AttrOrigin BootloaderInterfaceGIfaceFieldInfo = BootloaderInterface
    attrGet = getBootloaderInterfaceGIface
    attrSet = undefined
    attrConstruct = undefined
    attrClear = undefined
    attrTransfer = undefined

bootloaderInterface_gIface :: AttrLabelProxy "gIface"
bootloaderInterface_gIface = AttrLabelProxy

#endif


-- | Get the value of the “@query@” field.
-- When <https://github.com/haskell-gi/haskell-gi/wiki/Overloading overloading> is enabled, this is equivalent to
-- 
-- @
-- 'Data.GI.Base.Attributes.get' bootloaderInterface #query
-- @
getBootloaderInterfaceQuery :: MonadIO m => BootloaderInterface -> m (Maybe OSTree.Callbacks.BootloaderInterfaceQueryFieldCallback)
getBootloaderInterfaceQuery :: BootloaderInterface
-> m (Maybe BootloaderInterfaceQueryFieldCallback)
getBootloaderInterfaceQuery s :: BootloaderInterface
s = IO (Maybe BootloaderInterfaceQueryFieldCallback)
-> m (Maybe BootloaderInterfaceQueryFieldCallback)
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO (Maybe BootloaderInterfaceQueryFieldCallback)
 -> m (Maybe BootloaderInterfaceQueryFieldCallback))
-> IO (Maybe BootloaderInterfaceQueryFieldCallback)
-> m (Maybe BootloaderInterfaceQueryFieldCallback)
forall a b. (a -> b) -> a -> b
$ BootloaderInterface
-> (Ptr BootloaderInterface
    -> IO (Maybe BootloaderInterfaceQueryFieldCallback))
-> IO (Maybe BootloaderInterfaceQueryFieldCallback)
forall a c.
(HasCallStack, ManagedPtrNewtype a) =>
a -> (Ptr a -> IO c) -> IO c
withManagedPtr BootloaderInterface
s ((Ptr BootloaderInterface
  -> IO (Maybe BootloaderInterfaceQueryFieldCallback))
 -> IO (Maybe BootloaderInterfaceQueryFieldCallback))
-> (Ptr BootloaderInterface
    -> IO (Maybe BootloaderInterfaceQueryFieldCallback))
-> IO (Maybe BootloaderInterfaceQueryFieldCallback)
forall a b. (a -> b) -> a -> b
$ \ptr :: Ptr BootloaderInterface
ptr -> do
    FunPtr C_BootloaderInterfaceQueryFieldCallback
val <- Ptr (FunPtr C_BootloaderInterfaceQueryFieldCallback)
-> IO (FunPtr C_BootloaderInterfaceQueryFieldCallback)
forall a. Storable a => Ptr a -> IO a
peek (Ptr BootloaderInterface
ptr Ptr BootloaderInterface
-> Int -> Ptr (FunPtr C_BootloaderInterfaceQueryFieldCallback)
forall a b. Ptr a -> Int -> Ptr b
`plusPtr` 16) :: IO (FunPtr OSTree.Callbacks.C_BootloaderInterfaceQueryFieldCallback)
    Maybe BootloaderInterfaceQueryFieldCallback
result <- FunPtr C_BootloaderInterfaceQueryFieldCallback
-> (FunPtr C_BootloaderInterfaceQueryFieldCallback
    -> IO BootloaderInterfaceQueryFieldCallback)
-> IO (Maybe BootloaderInterfaceQueryFieldCallback)
forall a b. FunPtr a -> (FunPtr a -> IO b) -> IO (Maybe b)
SP.convertFunPtrIfNonNull FunPtr C_BootloaderInterfaceQueryFieldCallback
val ((FunPtr C_BootloaderInterfaceQueryFieldCallback
  -> IO BootloaderInterfaceQueryFieldCallback)
 -> IO (Maybe BootloaderInterfaceQueryFieldCallback))
-> (FunPtr C_BootloaderInterfaceQueryFieldCallback
    -> IO BootloaderInterfaceQueryFieldCallback)
-> IO (Maybe BootloaderInterfaceQueryFieldCallback)
forall a b. (a -> b) -> a -> b
$ \val' :: FunPtr C_BootloaderInterfaceQueryFieldCallback
val' -> do
        let val'' :: BootloaderInterfaceQueryFieldCallback
val'' = FunPtr C_BootloaderInterfaceQueryFieldCallback
-> BootloaderInterfaceQueryFieldCallback
forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsCancellable a) =>
FunPtr C_BootloaderInterfaceQueryFieldCallback
-> Bootloader -> Bool -> a -> m ()
OSTree.Callbacks.dynamic_BootloaderInterfaceQueryFieldCallback FunPtr C_BootloaderInterfaceQueryFieldCallback
val'
        BootloaderInterfaceQueryFieldCallback
-> IO BootloaderInterfaceQueryFieldCallback
forall (m :: * -> *) a. Monad m => a -> m a
return BootloaderInterfaceQueryFieldCallback
val''
    Maybe BootloaderInterfaceQueryFieldCallback
-> IO (Maybe BootloaderInterfaceQueryFieldCallback)
forall (m :: * -> *) a. Monad m => a -> m a
return Maybe BootloaderInterfaceQueryFieldCallback
result

-- | Set the value of the “@query@” field.
-- When <https://github.com/haskell-gi/haskell-gi/wiki/Overloading overloading> is enabled, this is equivalent to
-- 
-- @
-- 'Data.GI.Base.Attributes.set' bootloaderInterface [ #query 'Data.GI.Base.Attributes.:=' value ]
-- @
setBootloaderInterfaceQuery :: MonadIO m => BootloaderInterface -> FunPtr OSTree.Callbacks.C_BootloaderInterfaceQueryFieldCallback -> m ()
setBootloaderInterfaceQuery :: BootloaderInterface
-> FunPtr C_BootloaderInterfaceQueryFieldCallback -> m ()
setBootloaderInterfaceQuery s :: BootloaderInterface
s val :: FunPtr C_BootloaderInterfaceQueryFieldCallback
val = IO () -> m ()
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ BootloaderInterface -> (Ptr BootloaderInterface -> IO ()) -> IO ()
forall a c.
(HasCallStack, ManagedPtrNewtype a) =>
a -> (Ptr a -> IO c) -> IO c
withManagedPtr BootloaderInterface
s ((Ptr BootloaderInterface -> IO ()) -> IO ())
-> (Ptr BootloaderInterface -> IO ()) -> IO ()
forall a b. (a -> b) -> a -> b
$ \ptr :: Ptr BootloaderInterface
ptr -> do
    Ptr (FunPtr C_BootloaderInterfaceQueryFieldCallback)
-> FunPtr C_BootloaderInterfaceQueryFieldCallback -> IO ()
forall a. Storable a => Ptr a -> a -> IO ()
poke (Ptr BootloaderInterface
ptr Ptr BootloaderInterface
-> Int -> Ptr (FunPtr C_BootloaderInterfaceQueryFieldCallback)
forall a b. Ptr a -> Int -> Ptr b
`plusPtr` 16) (FunPtr C_BootloaderInterfaceQueryFieldCallback
val :: FunPtr OSTree.Callbacks.C_BootloaderInterfaceQueryFieldCallback)

-- | Set the value of the “@query@” field to `Nothing`.
-- When <https://github.com/haskell-gi/haskell-gi/wiki/Overloading overloading> is enabled, this is equivalent to
-- 
-- @
-- 'Data.GI.Base.Attributes.clear' #query
-- @
clearBootloaderInterfaceQuery :: MonadIO m => BootloaderInterface -> m ()
clearBootloaderInterfaceQuery :: BootloaderInterface -> m ()
clearBootloaderInterfaceQuery s :: BootloaderInterface
s = IO () -> m ()
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ BootloaderInterface -> (Ptr BootloaderInterface -> IO ()) -> IO ()
forall a c.
(HasCallStack, ManagedPtrNewtype a) =>
a -> (Ptr a -> IO c) -> IO c
withManagedPtr BootloaderInterface
s ((Ptr BootloaderInterface -> IO ()) -> IO ())
-> (Ptr BootloaderInterface -> IO ()) -> IO ()
forall a b. (a -> b) -> a -> b
$ \ptr :: Ptr BootloaderInterface
ptr -> do
    Ptr (FunPtr C_BootloaderInterfaceQueryFieldCallback)
-> FunPtr C_BootloaderInterfaceQueryFieldCallback -> IO ()
forall a. Storable a => Ptr a -> a -> IO ()
poke (Ptr BootloaderInterface
ptr Ptr BootloaderInterface
-> Int -> Ptr (FunPtr C_BootloaderInterfaceQueryFieldCallback)
forall a b. Ptr a -> Int -> Ptr b
`plusPtr` 16) (FunPtr C_BootloaderInterfaceQueryFieldCallback
forall a. FunPtr a
FP.nullFunPtr :: FunPtr OSTree.Callbacks.C_BootloaderInterfaceQueryFieldCallback)

#if defined(ENABLE_OVERLOADING)
data BootloaderInterfaceQueryFieldInfo
instance AttrInfo BootloaderInterfaceQueryFieldInfo where
    type AttrBaseTypeConstraint BootloaderInterfaceQueryFieldInfo = (~) BootloaderInterface
    type AttrAllowedOps BootloaderInterfaceQueryFieldInfo = '[ 'AttrSet, 'AttrGet, 'AttrClear]
    type AttrSetTypeConstraint BootloaderInterfaceQueryFieldInfo = (~) (FunPtr OSTree.Callbacks.C_BootloaderInterfaceQueryFieldCallback)
    type AttrTransferTypeConstraint BootloaderInterfaceQueryFieldInfo = (~)(FunPtr OSTree.Callbacks.C_BootloaderInterfaceQueryFieldCallback)
    type AttrTransferType BootloaderInterfaceQueryFieldInfo = (FunPtr OSTree.Callbacks.C_BootloaderInterfaceQueryFieldCallback)
    type AttrGetType BootloaderInterfaceQueryFieldInfo = Maybe OSTree.Callbacks.BootloaderInterfaceQueryFieldCallback
    type AttrLabel BootloaderInterfaceQueryFieldInfo = "query"
    type AttrOrigin BootloaderInterfaceQueryFieldInfo = BootloaderInterface
    attrGet = getBootloaderInterfaceQuery
    attrSet = setBootloaderInterfaceQuery
    attrConstruct = undefined
    attrClear = clearBootloaderInterfaceQuery
    attrTransfer _ v = do
        return v

bootloaderInterface_query :: AttrLabelProxy "query"
bootloaderInterface_query = AttrLabelProxy

#endif


-- | Get the value of the “@get_name@” field.
-- When <https://github.com/haskell-gi/haskell-gi/wiki/Overloading overloading> is enabled, this is equivalent to
-- 
-- @
-- 'Data.GI.Base.Attributes.get' bootloaderInterface #getName
-- @
getBootloaderInterfaceGetName :: MonadIO m => BootloaderInterface -> m (Maybe OSTree.Callbacks.BootloaderInterfaceGetNameFieldCallback)
getBootloaderInterfaceGetName :: BootloaderInterface
-> m (Maybe BootloaderInterfaceGetNameFieldCallback)
getBootloaderInterfaceGetName s :: BootloaderInterface
s = IO (Maybe BootloaderInterfaceGetNameFieldCallback)
-> m (Maybe BootloaderInterfaceGetNameFieldCallback)
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO (Maybe BootloaderInterfaceGetNameFieldCallback)
 -> m (Maybe BootloaderInterfaceGetNameFieldCallback))
-> IO (Maybe BootloaderInterfaceGetNameFieldCallback)
-> m (Maybe BootloaderInterfaceGetNameFieldCallback)
forall a b. (a -> b) -> a -> b
$ BootloaderInterface
-> (Ptr BootloaderInterface
    -> IO (Maybe BootloaderInterfaceGetNameFieldCallback))
-> IO (Maybe BootloaderInterfaceGetNameFieldCallback)
forall a c.
(HasCallStack, ManagedPtrNewtype a) =>
a -> (Ptr a -> IO c) -> IO c
withManagedPtr BootloaderInterface
s ((Ptr BootloaderInterface
  -> IO (Maybe BootloaderInterfaceGetNameFieldCallback))
 -> IO (Maybe BootloaderInterfaceGetNameFieldCallback))
-> (Ptr BootloaderInterface
    -> IO (Maybe BootloaderInterfaceGetNameFieldCallback))
-> IO (Maybe BootloaderInterfaceGetNameFieldCallback)
forall a b. (a -> b) -> a -> b
$ \ptr :: Ptr BootloaderInterface
ptr -> do
    FunPtr C_BootloaderInterfaceGetNameFieldCallback
val <- Ptr (FunPtr C_BootloaderInterfaceGetNameFieldCallback)
-> IO (FunPtr C_BootloaderInterfaceGetNameFieldCallback)
forall a. Storable a => Ptr a -> IO a
peek (Ptr BootloaderInterface
ptr Ptr BootloaderInterface
-> Int -> Ptr (FunPtr C_BootloaderInterfaceGetNameFieldCallback)
forall a b. Ptr a -> Int -> Ptr b
`plusPtr` 24) :: IO (FunPtr OSTree.Callbacks.C_BootloaderInterfaceGetNameFieldCallback)
    Maybe BootloaderInterfaceGetNameFieldCallback
result <- FunPtr C_BootloaderInterfaceGetNameFieldCallback
-> (FunPtr C_BootloaderInterfaceGetNameFieldCallback
    -> IO BootloaderInterfaceGetNameFieldCallback)
-> IO (Maybe BootloaderInterfaceGetNameFieldCallback)
forall a b. FunPtr a -> (FunPtr a -> IO b) -> IO (Maybe b)
SP.convertFunPtrIfNonNull FunPtr C_BootloaderInterfaceGetNameFieldCallback
val ((FunPtr C_BootloaderInterfaceGetNameFieldCallback
  -> IO BootloaderInterfaceGetNameFieldCallback)
 -> IO (Maybe BootloaderInterfaceGetNameFieldCallback))
-> (FunPtr C_BootloaderInterfaceGetNameFieldCallback
    -> IO BootloaderInterfaceGetNameFieldCallback)
-> IO (Maybe BootloaderInterfaceGetNameFieldCallback)
forall a b. (a -> b) -> a -> b
$ \val' :: FunPtr C_BootloaderInterfaceGetNameFieldCallback
val' -> do
        let val'' :: BootloaderInterfaceGetNameFieldCallback
val'' = FunPtr C_BootloaderInterfaceGetNameFieldCallback
-> BootloaderInterfaceGetNameFieldCallback
forall (m :: * -> *).
(HasCallStack, MonadIO m) =>
FunPtr C_BootloaderInterfaceGetNameFieldCallback
-> Bootloader -> m Text
OSTree.Callbacks.dynamic_BootloaderInterfaceGetNameFieldCallback FunPtr C_BootloaderInterfaceGetNameFieldCallback
val'
        BootloaderInterfaceGetNameFieldCallback
-> IO BootloaderInterfaceGetNameFieldCallback
forall (m :: * -> *) a. Monad m => a -> m a
return BootloaderInterfaceGetNameFieldCallback
val''
    Maybe BootloaderInterfaceGetNameFieldCallback
-> IO (Maybe BootloaderInterfaceGetNameFieldCallback)
forall (m :: * -> *) a. Monad m => a -> m a
return Maybe BootloaderInterfaceGetNameFieldCallback
result

-- | Set the value of the “@get_name@” field.
-- When <https://github.com/haskell-gi/haskell-gi/wiki/Overloading overloading> is enabled, this is equivalent to
-- 
-- @
-- 'Data.GI.Base.Attributes.set' bootloaderInterface [ #getName 'Data.GI.Base.Attributes.:=' value ]
-- @
setBootloaderInterfaceGetName :: MonadIO m => BootloaderInterface -> FunPtr OSTree.Callbacks.C_BootloaderInterfaceGetNameFieldCallback -> m ()
setBootloaderInterfaceGetName :: BootloaderInterface
-> FunPtr C_BootloaderInterfaceGetNameFieldCallback -> m ()
setBootloaderInterfaceGetName s :: BootloaderInterface
s val :: FunPtr C_BootloaderInterfaceGetNameFieldCallback
val = IO () -> m ()
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ BootloaderInterface -> (Ptr BootloaderInterface -> IO ()) -> IO ()
forall a c.
(HasCallStack, ManagedPtrNewtype a) =>
a -> (Ptr a -> IO c) -> IO c
withManagedPtr BootloaderInterface
s ((Ptr BootloaderInterface -> IO ()) -> IO ())
-> (Ptr BootloaderInterface -> IO ()) -> IO ()
forall a b. (a -> b) -> a -> b
$ \ptr :: Ptr BootloaderInterface
ptr -> do
    Ptr (FunPtr C_BootloaderInterfaceGetNameFieldCallback)
-> FunPtr C_BootloaderInterfaceGetNameFieldCallback -> IO ()
forall a. Storable a => Ptr a -> a -> IO ()
poke (Ptr BootloaderInterface
ptr Ptr BootloaderInterface
-> Int -> Ptr (FunPtr C_BootloaderInterfaceGetNameFieldCallback)
forall a b. Ptr a -> Int -> Ptr b
`plusPtr` 24) (FunPtr C_BootloaderInterfaceGetNameFieldCallback
val :: FunPtr OSTree.Callbacks.C_BootloaderInterfaceGetNameFieldCallback)

-- | Set the value of the “@get_name@” field to `Nothing`.
-- When <https://github.com/haskell-gi/haskell-gi/wiki/Overloading overloading> is enabled, this is equivalent to
-- 
-- @
-- 'Data.GI.Base.Attributes.clear' #getName
-- @
clearBootloaderInterfaceGetName :: MonadIO m => BootloaderInterface -> m ()
clearBootloaderInterfaceGetName :: BootloaderInterface -> m ()
clearBootloaderInterfaceGetName s :: BootloaderInterface
s = IO () -> m ()
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ BootloaderInterface -> (Ptr BootloaderInterface -> IO ()) -> IO ()
forall a c.
(HasCallStack, ManagedPtrNewtype a) =>
a -> (Ptr a -> IO c) -> IO c
withManagedPtr BootloaderInterface
s ((Ptr BootloaderInterface -> IO ()) -> IO ())
-> (Ptr BootloaderInterface -> IO ()) -> IO ()
forall a b. (a -> b) -> a -> b
$ \ptr :: Ptr BootloaderInterface
ptr -> do
    Ptr (FunPtr C_BootloaderInterfaceGetNameFieldCallback)
-> FunPtr C_BootloaderInterfaceGetNameFieldCallback -> IO ()
forall a. Storable a => Ptr a -> a -> IO ()
poke (Ptr BootloaderInterface
ptr Ptr BootloaderInterface
-> Int -> Ptr (FunPtr C_BootloaderInterfaceGetNameFieldCallback)
forall a b. Ptr a -> Int -> Ptr b
`plusPtr` 24) (FunPtr C_BootloaderInterfaceGetNameFieldCallback
forall a. FunPtr a
FP.nullFunPtr :: FunPtr OSTree.Callbacks.C_BootloaderInterfaceGetNameFieldCallback)

#if defined(ENABLE_OVERLOADING)
data BootloaderInterfaceGetNameFieldInfo
instance AttrInfo BootloaderInterfaceGetNameFieldInfo where
    type AttrBaseTypeConstraint BootloaderInterfaceGetNameFieldInfo = (~) BootloaderInterface
    type AttrAllowedOps BootloaderInterfaceGetNameFieldInfo = '[ 'AttrSet, 'AttrGet, 'AttrClear]
    type AttrSetTypeConstraint BootloaderInterfaceGetNameFieldInfo = (~) (FunPtr OSTree.Callbacks.C_BootloaderInterfaceGetNameFieldCallback)
    type AttrTransferTypeConstraint BootloaderInterfaceGetNameFieldInfo = (~)OSTree.Callbacks.BootloaderInterfaceGetNameFieldCallback
    type AttrTransferType BootloaderInterfaceGetNameFieldInfo = (FunPtr OSTree.Callbacks.C_BootloaderInterfaceGetNameFieldCallback)
    type AttrGetType BootloaderInterfaceGetNameFieldInfo = Maybe OSTree.Callbacks.BootloaderInterfaceGetNameFieldCallback
    type AttrLabel BootloaderInterfaceGetNameFieldInfo = "get_name"
    type AttrOrigin BootloaderInterfaceGetNameFieldInfo = BootloaderInterface
    attrGet = getBootloaderInterfaceGetName
    attrSet = setBootloaderInterfaceGetName
    attrConstruct = undefined
    attrClear = clearBootloaderInterfaceGetName
    attrTransfer _ v = do
        OSTree.Callbacks.mk_BootloaderInterfaceGetNameFieldCallback (OSTree.Callbacks.wrap_BootloaderInterfaceGetNameFieldCallback Nothing v)

bootloaderInterface_getName :: AttrLabelProxy "getName"
bootloaderInterface_getName = AttrLabelProxy

#endif


-- | Get the value of the “@is_atomic@” field.
-- When <https://github.com/haskell-gi/haskell-gi/wiki/Overloading overloading> is enabled, this is equivalent to
-- 
-- @
-- 'Data.GI.Base.Attributes.get' bootloaderInterface #isAtomic
-- @
getBootloaderInterfaceIsAtomic :: MonadIO m => BootloaderInterface -> m (Maybe OSTree.Callbacks.BootloaderInterfaceIsAtomicFieldCallback)
getBootloaderInterfaceIsAtomic :: BootloaderInterface
-> m (Maybe BootloaderInterfaceIsAtomicFieldCallback)
getBootloaderInterfaceIsAtomic s :: BootloaderInterface
s = IO (Maybe BootloaderInterfaceIsAtomicFieldCallback)
-> m (Maybe BootloaderInterfaceIsAtomicFieldCallback)
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO (Maybe BootloaderInterfaceIsAtomicFieldCallback)
 -> m (Maybe BootloaderInterfaceIsAtomicFieldCallback))
-> IO (Maybe BootloaderInterfaceIsAtomicFieldCallback)
-> m (Maybe BootloaderInterfaceIsAtomicFieldCallback)
forall a b. (a -> b) -> a -> b
$ BootloaderInterface
-> (Ptr BootloaderInterface
    -> IO (Maybe BootloaderInterfaceIsAtomicFieldCallback))
-> IO (Maybe BootloaderInterfaceIsAtomicFieldCallback)
forall a c.
(HasCallStack, ManagedPtrNewtype a) =>
a -> (Ptr a -> IO c) -> IO c
withManagedPtr BootloaderInterface
s ((Ptr BootloaderInterface
  -> IO (Maybe BootloaderInterfaceIsAtomicFieldCallback))
 -> IO (Maybe BootloaderInterfaceIsAtomicFieldCallback))
-> (Ptr BootloaderInterface
    -> IO (Maybe BootloaderInterfaceIsAtomicFieldCallback))
-> IO (Maybe BootloaderInterfaceIsAtomicFieldCallback)
forall a b. (a -> b) -> a -> b
$ \ptr :: Ptr BootloaderInterface
ptr -> do
    FunPtr C_BootloaderInterfaceIsAtomicFieldCallback
val <- Ptr (FunPtr C_BootloaderInterfaceIsAtomicFieldCallback)
-> IO (FunPtr C_BootloaderInterfaceIsAtomicFieldCallback)
forall a. Storable a => Ptr a -> IO a
peek (Ptr BootloaderInterface
ptr Ptr BootloaderInterface
-> Int -> Ptr (FunPtr C_BootloaderInterfaceIsAtomicFieldCallback)
forall a b. Ptr a -> Int -> Ptr b
`plusPtr` 40) :: IO (FunPtr OSTree.Callbacks.C_BootloaderInterfaceIsAtomicFieldCallback)
    Maybe BootloaderInterfaceIsAtomicFieldCallback
result <- FunPtr C_BootloaderInterfaceIsAtomicFieldCallback
-> (FunPtr C_BootloaderInterfaceIsAtomicFieldCallback
    -> IO BootloaderInterfaceIsAtomicFieldCallback)
-> IO (Maybe BootloaderInterfaceIsAtomicFieldCallback)
forall a b. FunPtr a -> (FunPtr a -> IO b) -> IO (Maybe b)
SP.convertFunPtrIfNonNull FunPtr C_BootloaderInterfaceIsAtomicFieldCallback
val ((FunPtr C_BootloaderInterfaceIsAtomicFieldCallback
  -> IO BootloaderInterfaceIsAtomicFieldCallback)
 -> IO (Maybe BootloaderInterfaceIsAtomicFieldCallback))
-> (FunPtr C_BootloaderInterfaceIsAtomicFieldCallback
    -> IO BootloaderInterfaceIsAtomicFieldCallback)
-> IO (Maybe BootloaderInterfaceIsAtomicFieldCallback)
forall a b. (a -> b) -> a -> b
$ \val' :: FunPtr C_BootloaderInterfaceIsAtomicFieldCallback
val' -> do
        let val'' :: BootloaderInterfaceIsAtomicFieldCallback
val'' = FunPtr C_BootloaderInterfaceIsAtomicFieldCallback
-> BootloaderInterfaceIsAtomicFieldCallback
forall (m :: * -> *).
(HasCallStack, MonadIO m) =>
FunPtr C_BootloaderInterfaceIsAtomicFieldCallback
-> Bootloader -> m Bool
OSTree.Callbacks.dynamic_BootloaderInterfaceIsAtomicFieldCallback FunPtr C_BootloaderInterfaceIsAtomicFieldCallback
val'
        BootloaderInterfaceIsAtomicFieldCallback
-> IO BootloaderInterfaceIsAtomicFieldCallback
forall (m :: * -> *) a. Monad m => a -> m a
return BootloaderInterfaceIsAtomicFieldCallback
val''
    Maybe BootloaderInterfaceIsAtomicFieldCallback
-> IO (Maybe BootloaderInterfaceIsAtomicFieldCallback)
forall (m :: * -> *) a. Monad m => a -> m a
return Maybe BootloaderInterfaceIsAtomicFieldCallback
result

-- | Set the value of the “@is_atomic@” field.
-- When <https://github.com/haskell-gi/haskell-gi/wiki/Overloading overloading> is enabled, this is equivalent to
-- 
-- @
-- 'Data.GI.Base.Attributes.set' bootloaderInterface [ #isAtomic 'Data.GI.Base.Attributes.:=' value ]
-- @
setBootloaderInterfaceIsAtomic :: MonadIO m => BootloaderInterface -> FunPtr OSTree.Callbacks.C_BootloaderInterfaceIsAtomicFieldCallback -> m ()
setBootloaderInterfaceIsAtomic :: BootloaderInterface
-> FunPtr C_BootloaderInterfaceIsAtomicFieldCallback -> m ()
setBootloaderInterfaceIsAtomic s :: BootloaderInterface
s val :: FunPtr C_BootloaderInterfaceIsAtomicFieldCallback
val = IO () -> m ()
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ BootloaderInterface -> (Ptr BootloaderInterface -> IO ()) -> IO ()
forall a c.
(HasCallStack, ManagedPtrNewtype a) =>
a -> (Ptr a -> IO c) -> IO c
withManagedPtr BootloaderInterface
s ((Ptr BootloaderInterface -> IO ()) -> IO ())
-> (Ptr BootloaderInterface -> IO ()) -> IO ()
forall a b. (a -> b) -> a -> b
$ \ptr :: Ptr BootloaderInterface
ptr -> do
    Ptr (FunPtr C_BootloaderInterfaceIsAtomicFieldCallback)
-> FunPtr C_BootloaderInterfaceIsAtomicFieldCallback -> IO ()
forall a. Storable a => Ptr a -> a -> IO ()
poke (Ptr BootloaderInterface
ptr Ptr BootloaderInterface
-> Int -> Ptr (FunPtr C_BootloaderInterfaceIsAtomicFieldCallback)
forall a b. Ptr a -> Int -> Ptr b
`plusPtr` 40) (FunPtr C_BootloaderInterfaceIsAtomicFieldCallback
val :: FunPtr OSTree.Callbacks.C_BootloaderInterfaceIsAtomicFieldCallback)

-- | Set the value of the “@is_atomic@” field to `Nothing`.
-- When <https://github.com/haskell-gi/haskell-gi/wiki/Overloading overloading> is enabled, this is equivalent to
-- 
-- @
-- 'Data.GI.Base.Attributes.clear' #isAtomic
-- @
clearBootloaderInterfaceIsAtomic :: MonadIO m => BootloaderInterface -> m ()
clearBootloaderInterfaceIsAtomic :: BootloaderInterface -> m ()
clearBootloaderInterfaceIsAtomic s :: BootloaderInterface
s = IO () -> m ()
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ BootloaderInterface -> (Ptr BootloaderInterface -> IO ()) -> IO ()
forall a c.
(HasCallStack, ManagedPtrNewtype a) =>
a -> (Ptr a -> IO c) -> IO c
withManagedPtr BootloaderInterface
s ((Ptr BootloaderInterface -> IO ()) -> IO ())
-> (Ptr BootloaderInterface -> IO ()) -> IO ()
forall a b. (a -> b) -> a -> b
$ \ptr :: Ptr BootloaderInterface
ptr -> do
    Ptr (FunPtr C_BootloaderInterfaceIsAtomicFieldCallback)
-> FunPtr C_BootloaderInterfaceIsAtomicFieldCallback -> IO ()
forall a. Storable a => Ptr a -> a -> IO ()
poke (Ptr BootloaderInterface
ptr Ptr BootloaderInterface
-> Int -> Ptr (FunPtr C_BootloaderInterfaceIsAtomicFieldCallback)
forall a b. Ptr a -> Int -> Ptr b
`plusPtr` 40) (FunPtr C_BootloaderInterfaceIsAtomicFieldCallback
forall a. FunPtr a
FP.nullFunPtr :: FunPtr OSTree.Callbacks.C_BootloaderInterfaceIsAtomicFieldCallback)

#if defined(ENABLE_OVERLOADING)
data BootloaderInterfaceIsAtomicFieldInfo
instance AttrInfo BootloaderInterfaceIsAtomicFieldInfo where
    type AttrBaseTypeConstraint BootloaderInterfaceIsAtomicFieldInfo = (~) BootloaderInterface
    type AttrAllowedOps BootloaderInterfaceIsAtomicFieldInfo = '[ 'AttrSet, 'AttrGet, 'AttrClear]
    type AttrSetTypeConstraint BootloaderInterfaceIsAtomicFieldInfo = (~) (FunPtr OSTree.Callbacks.C_BootloaderInterfaceIsAtomicFieldCallback)
    type AttrTransferTypeConstraint BootloaderInterfaceIsAtomicFieldInfo = (~)OSTree.Callbacks.BootloaderInterfaceIsAtomicFieldCallback
    type AttrTransferType BootloaderInterfaceIsAtomicFieldInfo = (FunPtr OSTree.Callbacks.C_BootloaderInterfaceIsAtomicFieldCallback)
    type AttrGetType BootloaderInterfaceIsAtomicFieldInfo = Maybe OSTree.Callbacks.BootloaderInterfaceIsAtomicFieldCallback
    type AttrLabel BootloaderInterfaceIsAtomicFieldInfo = "is_atomic"
    type AttrOrigin BootloaderInterfaceIsAtomicFieldInfo = BootloaderInterface
    attrGet = getBootloaderInterfaceIsAtomic
    attrSet = setBootloaderInterfaceIsAtomic
    attrConstruct = undefined
    attrClear = clearBootloaderInterfaceIsAtomic
    attrTransfer _ v = do
        OSTree.Callbacks.mk_BootloaderInterfaceIsAtomicFieldCallback (OSTree.Callbacks.wrap_BootloaderInterfaceIsAtomicFieldCallback Nothing v)

bootloaderInterface_isAtomic :: AttrLabelProxy "isAtomic"
bootloaderInterface_isAtomic = AttrLabelProxy

#endif



#if defined(ENABLE_OVERLOADING)
instance O.HasAttributeList BootloaderInterface
type instance O.AttributeList BootloaderInterface = BootloaderInterfaceAttributeList
type BootloaderInterfaceAttributeList = ('[ '("gIface", BootloaderInterfaceGIfaceFieldInfo), '("query", BootloaderInterfaceQueryFieldInfo), '("getName", BootloaderInterfaceGetNameFieldInfo), '("isAtomic", BootloaderInterfaceIsAtomicFieldInfo)] :: [(Symbol, *)])
#endif

#if defined(ENABLE_OVERLOADING)
type family ResolveBootloaderInterfaceMethod (t :: Symbol) (o :: *) :: * where
    ResolveBootloaderInterfaceMethod l o = O.MethodResolutionFailed l o

instance (info ~ ResolveBootloaderInterfaceMethod t BootloaderInterface, O.MethodInfo info BootloaderInterface p) => OL.IsLabel t (BootloaderInterface -> p) where
#if MIN_VERSION_base(4,10,0)
    fromLabel = O.overloadedMethod @info
#else
    fromLabel _ = O.overloadedMethod @info
#endif

#endif