{-# 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              ,


 -- * 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          ,


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

#if defined(ENABLE_OVERLOADING)
    bootloaderInterface_postBlsSync         ,
#endif
    clearBootloaderInterfacePostBlsSync     ,
    getBootloaderInterfacePostBlsSync       ,
    setBootloaderInterfacePostBlsSync       ,


-- ** 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.BasicTypes as B.Types
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 Control.Monad.IO.Class as MIO
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 (SP.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 SP.ManagedPtrNewtype BootloaderInterface where
    toManagedPtr :: BootloaderInterface -> ManagedPtr BootloaderInterface
toManagedPtr (BootloaderInterface ManagedPtr BootloaderInterface
p) = ManagedPtr BootloaderInterface
p

instance BoxedPtr BootloaderInterface where
    boxedPtrCopy :: BootloaderInterface -> IO BootloaderInterface
boxedPtrCopy = \BootloaderInterface
p -> BootloaderInterface
-> (Ptr BootloaderInterface -> IO BootloaderInterface)
-> IO BootloaderInterface
forall a c.
(HasCallStack, ManagedPtrNewtype a) =>
a -> (Ptr a -> IO c) -> IO c
B.ManagedPtr.withManagedPtr BootloaderInterface
p (Int -> Ptr BootloaderInterface -> IO (Ptr BootloaderInterface)
forall a. (HasCallStack, CallocPtr a) => Int -> Ptr a -> IO (Ptr a)
copyBytes Int
56 (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, BoxedPtr a) =>
(ManagedPtr a -> a) -> Ptr a -> IO a
B.ManagedPtr.wrapPtr ManagedPtr BootloaderInterface -> BootloaderInterface
BootloaderInterface)
    boxedPtrFree :: BootloaderInterface -> IO ()
boxedPtrFree = \BootloaderInterface
x -> BootloaderInterface -> (Ptr BootloaderInterface -> IO ()) -> IO ()
forall a c.
(HasCallStack, ManagedPtrNewtype a) =>
a -> (Ptr a -> IO c) -> IO c
SP.withManagedPtr BootloaderInterface
x Ptr BootloaderInterface -> IO ()
forall a. Ptr a -> IO ()
SP.freeMem
instance CallocPtr BootloaderInterface where
    boxedPtrCalloc :: IO (Ptr BootloaderInterface)
boxedPtrCalloc = Int -> IO (Ptr BootloaderInterface)
forall a. Int -> IO (Ptr a)
callocBytes Int
56


-- | 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. CallocPtr a => IO (Ptr a)
boxedPtrCalloc 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, BoxedPtr 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 ManagedPtr BootloaderInterface -> BootloaderInterface
_ [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


-- | 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 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 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` Int
0 :: (Ptr GObject.TypeInterface.TypeInterface)
    TypeInterface
val' <- ((ManagedPtr TypeInterface -> TypeInterface)
-> Ptr TypeInterface -> IO TypeInterface
forall a.
(HasCallStack, BoxedPtr 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 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 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` Int
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
$ \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 BootloaderInterface
s 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 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` Int
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 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 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` Int
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 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 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` Int
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
$ \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 BootloaderInterface
s 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 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` Int
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 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 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` Int
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 “@post_bls_sync@” field.
-- When <https://github.com/haskell-gi/haskell-gi/wiki/Overloading overloading> is enabled, this is equivalent to
-- 
-- @
-- 'Data.GI.Base.Attributes.get' bootloaderInterface #postBlsSync
-- @
getBootloaderInterfacePostBlsSync :: MonadIO m => BootloaderInterface -> m (Maybe OSTree.Callbacks.BootloaderInterfacePostBlsSyncFieldCallback)
getBootloaderInterfacePostBlsSync :: BootloaderInterface
-> m (Maybe BootloaderInterfacePostBlsSyncFieldCallback)
getBootloaderInterfacePostBlsSync BootloaderInterface
s = IO (Maybe BootloaderInterfacePostBlsSyncFieldCallback)
-> m (Maybe BootloaderInterfacePostBlsSyncFieldCallback)
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO (Maybe BootloaderInterfacePostBlsSyncFieldCallback)
 -> m (Maybe BootloaderInterfacePostBlsSyncFieldCallback))
-> IO (Maybe BootloaderInterfacePostBlsSyncFieldCallback)
-> m (Maybe BootloaderInterfacePostBlsSyncFieldCallback)
forall a b. (a -> b) -> a -> b
$ BootloaderInterface
-> (Ptr BootloaderInterface
    -> IO (Maybe BootloaderInterfacePostBlsSyncFieldCallback))
-> IO (Maybe BootloaderInterfacePostBlsSyncFieldCallback)
forall a c.
(HasCallStack, ManagedPtrNewtype a) =>
a -> (Ptr a -> IO c) -> IO c
withManagedPtr BootloaderInterface
s ((Ptr BootloaderInterface
  -> IO (Maybe BootloaderInterfacePostBlsSyncFieldCallback))
 -> IO (Maybe BootloaderInterfacePostBlsSyncFieldCallback))
-> (Ptr BootloaderInterface
    -> IO (Maybe BootloaderInterfacePostBlsSyncFieldCallback))
-> IO (Maybe BootloaderInterfacePostBlsSyncFieldCallback)
forall a b. (a -> b) -> a -> b
$ \Ptr BootloaderInterface
ptr -> do
    FunPtr C_BootloaderInterfacePostBlsSyncFieldCallback
val <- Ptr (FunPtr C_BootloaderInterfacePostBlsSyncFieldCallback)
-> IO (FunPtr C_BootloaderInterfacePostBlsSyncFieldCallback)
forall a. Storable a => Ptr a -> IO a
peek (Ptr BootloaderInterface
ptr Ptr BootloaderInterface
-> Int
-> Ptr (FunPtr C_BootloaderInterfacePostBlsSyncFieldCallback)
forall a b. Ptr a -> Int -> Ptr b
`plusPtr` Int
40) :: IO (FunPtr OSTree.Callbacks.C_BootloaderInterfacePostBlsSyncFieldCallback)
    Maybe BootloaderInterfacePostBlsSyncFieldCallback
result <- FunPtr C_BootloaderInterfacePostBlsSyncFieldCallback
-> (FunPtr C_BootloaderInterfacePostBlsSyncFieldCallback
    -> IO BootloaderInterfacePostBlsSyncFieldCallback)
-> IO (Maybe BootloaderInterfacePostBlsSyncFieldCallback)
forall a b. FunPtr a -> (FunPtr a -> IO b) -> IO (Maybe b)
SP.convertFunPtrIfNonNull FunPtr C_BootloaderInterfacePostBlsSyncFieldCallback
val ((FunPtr C_BootloaderInterfacePostBlsSyncFieldCallback
  -> IO BootloaderInterfacePostBlsSyncFieldCallback)
 -> IO (Maybe BootloaderInterfacePostBlsSyncFieldCallback))
-> (FunPtr C_BootloaderInterfacePostBlsSyncFieldCallback
    -> IO BootloaderInterfacePostBlsSyncFieldCallback)
-> IO (Maybe BootloaderInterfacePostBlsSyncFieldCallback)
forall a b. (a -> b) -> a -> b
$ \FunPtr C_BootloaderInterfacePostBlsSyncFieldCallback
val' -> do
        let val'' :: BootloaderInterfacePostBlsSyncFieldCallback
val'' = FunPtr C_BootloaderInterfacePostBlsSyncFieldCallback
-> BootloaderInterfacePostBlsSyncFieldCallback
forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsCancellable a) =>
FunPtr C_BootloaderInterfacePostBlsSyncFieldCallback
-> Bootloader -> a -> m ()
OSTree.Callbacks.dynamic_BootloaderInterfacePostBlsSyncFieldCallback FunPtr C_BootloaderInterfacePostBlsSyncFieldCallback
val'
        BootloaderInterfacePostBlsSyncFieldCallback
-> IO BootloaderInterfacePostBlsSyncFieldCallback
forall (m :: * -> *) a. Monad m => a -> m a
return BootloaderInterfacePostBlsSyncFieldCallback
val''
    Maybe BootloaderInterfacePostBlsSyncFieldCallback
-> IO (Maybe BootloaderInterfacePostBlsSyncFieldCallback)
forall (m :: * -> *) a. Monad m => a -> m a
return Maybe BootloaderInterfacePostBlsSyncFieldCallback
result

-- | Set the value of the “@post_bls_sync@” field.
-- When <https://github.com/haskell-gi/haskell-gi/wiki/Overloading overloading> is enabled, this is equivalent to
-- 
-- @
-- 'Data.GI.Base.Attributes.set' bootloaderInterface [ #postBlsSync 'Data.GI.Base.Attributes.:=' value ]
-- @
setBootloaderInterfacePostBlsSync :: MonadIO m => BootloaderInterface -> FunPtr OSTree.Callbacks.C_BootloaderInterfacePostBlsSyncFieldCallback -> m ()
setBootloaderInterfacePostBlsSync :: BootloaderInterface
-> FunPtr C_BootloaderInterfacePostBlsSyncFieldCallback -> m ()
setBootloaderInterfacePostBlsSync BootloaderInterface
s FunPtr C_BootloaderInterfacePostBlsSyncFieldCallback
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 BootloaderInterface
ptr -> do
    Ptr (FunPtr C_BootloaderInterfacePostBlsSyncFieldCallback)
-> FunPtr C_BootloaderInterfacePostBlsSyncFieldCallback -> IO ()
forall a. Storable a => Ptr a -> a -> IO ()
poke (Ptr BootloaderInterface
ptr Ptr BootloaderInterface
-> Int
-> Ptr (FunPtr C_BootloaderInterfacePostBlsSyncFieldCallback)
forall a b. Ptr a -> Int -> Ptr b
`plusPtr` Int
40) (FunPtr C_BootloaderInterfacePostBlsSyncFieldCallback
val :: FunPtr OSTree.Callbacks.C_BootloaderInterfacePostBlsSyncFieldCallback)

-- | Set the value of the “@post_bls_sync@” 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' #postBlsSync
-- @
clearBootloaderInterfacePostBlsSync :: MonadIO m => BootloaderInterface -> m ()
clearBootloaderInterfacePostBlsSync :: BootloaderInterface -> m ()
clearBootloaderInterfacePostBlsSync 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 BootloaderInterface
ptr -> do
    Ptr (FunPtr C_BootloaderInterfacePostBlsSyncFieldCallback)
-> FunPtr C_BootloaderInterfacePostBlsSyncFieldCallback -> IO ()
forall a. Storable a => Ptr a -> a -> IO ()
poke (Ptr BootloaderInterface
ptr Ptr BootloaderInterface
-> Int
-> Ptr (FunPtr C_BootloaderInterfacePostBlsSyncFieldCallback)
forall a b. Ptr a -> Int -> Ptr b
`plusPtr` Int
40) (FunPtr C_BootloaderInterfacePostBlsSyncFieldCallback
forall a. FunPtr a
FP.nullFunPtr :: FunPtr OSTree.Callbacks.C_BootloaderInterfacePostBlsSyncFieldCallback)

#if defined(ENABLE_OVERLOADING)
data BootloaderInterfacePostBlsSyncFieldInfo
instance AttrInfo BootloaderInterfacePostBlsSyncFieldInfo where
    type AttrBaseTypeConstraint BootloaderInterfacePostBlsSyncFieldInfo = (~) BootloaderInterface
    type AttrAllowedOps BootloaderInterfacePostBlsSyncFieldInfo = '[ 'AttrSet, 'AttrGet, 'AttrClear]
    type AttrSetTypeConstraint BootloaderInterfacePostBlsSyncFieldInfo = (~) (FunPtr OSTree.Callbacks.C_BootloaderInterfacePostBlsSyncFieldCallback)
    type AttrTransferTypeConstraint BootloaderInterfacePostBlsSyncFieldInfo = (~)(FunPtr OSTree.Callbacks.C_BootloaderInterfacePostBlsSyncFieldCallback)
    type AttrTransferType BootloaderInterfacePostBlsSyncFieldInfo = (FunPtr OSTree.Callbacks.C_BootloaderInterfacePostBlsSyncFieldCallback)
    type AttrGetType BootloaderInterfacePostBlsSyncFieldInfo = Maybe OSTree.Callbacks.BootloaderInterfacePostBlsSyncFieldCallback
    type AttrLabel BootloaderInterfacePostBlsSyncFieldInfo = "post_bls_sync"
    type AttrOrigin BootloaderInterfacePostBlsSyncFieldInfo = BootloaderInterface
    attrGet = getBootloaderInterfacePostBlsSync
    attrSet = setBootloaderInterfacePostBlsSync
    attrConstruct = undefined
    attrClear = clearBootloaderInterfacePostBlsSync
    attrTransfer _ v = do
        return v

bootloaderInterface_postBlsSync :: AttrLabelProxy "postBlsSync"
bootloaderInterface_postBlsSync = 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 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 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` Int
48) :: 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
$ \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 BootloaderInterface
s 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 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` Int
48) (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 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 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` Int
48) (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), '("postBlsSync", BootloaderInterfacePostBlsSyncFieldInfo), '("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