module GI.Gio.Enums
(
catchTlsError ,
handleTlsError ,
catchResourceError ,
handleResourceError ,
catchResolverError ,
handleResolverError ,
catchIOErrorEnum ,
handleIOErrorEnum ,
catchDBusError ,
handleDBusError ,
ZlibCompressorFormat(..) ,
UnixSocketAddressType(..) ,
TlsRehandshakeMode(..) ,
TlsInteractionResult(..) ,
TlsError(..) ,
TlsDatabaseLookupFlags(..) ,
TlsCertificateRequestFlags(..) ,
TlsAuthenticationMode(..) ,
SocketType(..) ,
SocketProtocol(..) ,
SocketFamily(..) ,
SocketClientEvent(..) ,
ResourceError(..) ,
ResolverRecordType(..) ,
ResolverError(..) ,
PasswordSave(..) ,
NotificationPriority(..) ,
NetworkConnectivity(..) ,
MountOperationResult(..) ,
IOModuleScopeFlags(..) ,
IOErrorEnum(..) ,
FilesystemPreviewType(..) ,
FileType(..) ,
FileMonitorEvent(..) ,
FileAttributeType(..) ,
FileAttributeStatus(..) ,
EmblemOrigin(..) ,
DriveStartStopType(..) ,
DataStreamNewlineType(..) ,
DataStreamByteOrder(..) ,
DBusMessageType(..) ,
DBusMessageHeaderField(..) ,
DBusMessageByteOrder(..) ,
DBusError(..) ,
CredentialsType(..) ,
ConverterResult(..) ,
BusType(..) ,
) where
import Prelude ()
import Data.GI.Base.ShortPrelude
import qualified Data.Text as T
import qualified Data.ByteString.Char8 as B
import qualified Data.Map as Map
data ZlibCompressorFormat =
ZlibCompressorFormatZlib
| ZlibCompressorFormatGzip
| ZlibCompressorFormatRaw
| AnotherZlibCompressorFormat Int
deriving (Show, Eq)
instance Enum ZlibCompressorFormat where
fromEnum ZlibCompressorFormatZlib = 0
fromEnum ZlibCompressorFormatGzip = 1
fromEnum ZlibCompressorFormatRaw = 2
fromEnum (AnotherZlibCompressorFormat k) = k
toEnum 0 = ZlibCompressorFormatZlib
toEnum 1 = ZlibCompressorFormatGzip
toEnum 2 = ZlibCompressorFormatRaw
toEnum k = AnotherZlibCompressorFormat k
foreign import ccall "g_zlib_compressor_format_get_type" c_g_zlib_compressor_format_get_type ::
IO GType
instance BoxedEnum ZlibCompressorFormat where
boxedEnumType _ = c_g_zlib_compressor_format_get_type
data UnixSocketAddressType =
UnixSocketAddressTypeInvalid
| UnixSocketAddressTypeAnonymous
| UnixSocketAddressTypePath
| UnixSocketAddressTypeAbstract
| UnixSocketAddressTypeAbstractPadded
| AnotherUnixSocketAddressType Int
deriving (Show, Eq)
instance Enum UnixSocketAddressType where
fromEnum UnixSocketAddressTypeInvalid = 0
fromEnum UnixSocketAddressTypeAnonymous = 1
fromEnum UnixSocketAddressTypePath = 2
fromEnum UnixSocketAddressTypeAbstract = 3
fromEnum UnixSocketAddressTypeAbstractPadded = 4
fromEnum (AnotherUnixSocketAddressType k) = k
toEnum 0 = UnixSocketAddressTypeInvalid
toEnum 1 = UnixSocketAddressTypeAnonymous
toEnum 2 = UnixSocketAddressTypePath
toEnum 3 = UnixSocketAddressTypeAbstract
toEnum 4 = UnixSocketAddressTypeAbstractPadded
toEnum k = AnotherUnixSocketAddressType k
foreign import ccall "g_unix_socket_address_type_get_type" c_g_unix_socket_address_type_get_type ::
IO GType
instance BoxedEnum UnixSocketAddressType where
boxedEnumType _ = c_g_unix_socket_address_type_get_type
data TlsRehandshakeMode =
TlsRehandshakeModeNever
| TlsRehandshakeModeSafely
| TlsRehandshakeModeUnsafely
| AnotherTlsRehandshakeMode Int
deriving (Show, Eq)
instance Enum TlsRehandshakeMode where
fromEnum TlsRehandshakeModeNever = 0
fromEnum TlsRehandshakeModeSafely = 1
fromEnum TlsRehandshakeModeUnsafely = 2
fromEnum (AnotherTlsRehandshakeMode k) = k
toEnum 0 = TlsRehandshakeModeNever
toEnum 1 = TlsRehandshakeModeSafely
toEnum 2 = TlsRehandshakeModeUnsafely
toEnum k = AnotherTlsRehandshakeMode k
foreign import ccall "g_tls_rehandshake_mode_get_type" c_g_tls_rehandshake_mode_get_type ::
IO GType
instance BoxedEnum TlsRehandshakeMode where
boxedEnumType _ = c_g_tls_rehandshake_mode_get_type
data TlsInteractionResult =
TlsInteractionResultUnhandled
| TlsInteractionResultHandled
| TlsInteractionResultFailed
| AnotherTlsInteractionResult Int
deriving (Show, Eq)
instance Enum TlsInteractionResult where
fromEnum TlsInteractionResultUnhandled = 0
fromEnum TlsInteractionResultHandled = 1
fromEnum TlsInteractionResultFailed = 2
fromEnum (AnotherTlsInteractionResult k) = k
toEnum 0 = TlsInteractionResultUnhandled
toEnum 1 = TlsInteractionResultHandled
toEnum 2 = TlsInteractionResultFailed
toEnum k = AnotherTlsInteractionResult k
foreign import ccall "g_tls_interaction_result_get_type" c_g_tls_interaction_result_get_type ::
IO GType
instance BoxedEnum TlsInteractionResult where
boxedEnumType _ = c_g_tls_interaction_result_get_type
data TlsError =
TlsErrorUnavailable
| TlsErrorMisc
| TlsErrorBadCertificate
| TlsErrorNotTls
| TlsErrorHandshake
| TlsErrorCertificateRequired
| TlsErrorEof
| AnotherTlsError Int
deriving (Show, Eq)
instance Enum TlsError where
fromEnum TlsErrorUnavailable = 0
fromEnum TlsErrorMisc = 1
fromEnum TlsErrorBadCertificate = 2
fromEnum TlsErrorNotTls = 3
fromEnum TlsErrorHandshake = 4
fromEnum TlsErrorCertificateRequired = 5
fromEnum TlsErrorEof = 6
fromEnum (AnotherTlsError k) = k
toEnum 0 = TlsErrorUnavailable
toEnum 1 = TlsErrorMisc
toEnum 2 = TlsErrorBadCertificate
toEnum 3 = TlsErrorNotTls
toEnum 4 = TlsErrorHandshake
toEnum 5 = TlsErrorCertificateRequired
toEnum 6 = TlsErrorEof
toEnum k = AnotherTlsError k
instance GErrorClass TlsError where
gerrorClassDomain _ = "g-tls-error-quark"
catchTlsError ::
IO a ->
(TlsError -> GErrorMessage -> IO a) ->
IO a
catchTlsError = catchGErrorJustDomain
handleTlsError ::
(TlsError -> GErrorMessage -> IO a) ->
IO a ->
IO a
handleTlsError = handleGErrorJustDomain
foreign import ccall "g_tls_error_get_type" c_g_tls_error_get_type ::
IO GType
instance BoxedEnum TlsError where
boxedEnumType _ = c_g_tls_error_get_type
data TlsDatabaseLookupFlags =
TlsDatabaseLookupFlagsNone
| TlsDatabaseLookupFlagsKeypair
| AnotherTlsDatabaseLookupFlags Int
deriving (Show, Eq)
instance Enum TlsDatabaseLookupFlags where
fromEnum TlsDatabaseLookupFlagsNone = 0
fromEnum TlsDatabaseLookupFlagsKeypair = 1
fromEnum (AnotherTlsDatabaseLookupFlags k) = k
toEnum 0 = TlsDatabaseLookupFlagsNone
toEnum 1 = TlsDatabaseLookupFlagsKeypair
toEnum k = AnotherTlsDatabaseLookupFlags k
foreign import ccall "g_tls_database_lookup_flags_get_type" c_g_tls_database_lookup_flags_get_type ::
IO GType
instance BoxedEnum TlsDatabaseLookupFlags where
boxedEnumType _ = c_g_tls_database_lookup_flags_get_type
data TlsCertificateRequestFlags =
TlsCertificateRequestFlagsNone
| AnotherTlsCertificateRequestFlags Int
deriving (Show, Eq)
instance Enum TlsCertificateRequestFlags where
fromEnum TlsCertificateRequestFlagsNone = 0
fromEnum (AnotherTlsCertificateRequestFlags k) = k
toEnum 0 = TlsCertificateRequestFlagsNone
toEnum k = AnotherTlsCertificateRequestFlags k
foreign import ccall "g_tls_certificate_request_flags_get_type" c_g_tls_certificate_request_flags_get_type ::
IO GType
instance BoxedEnum TlsCertificateRequestFlags where
boxedEnumType _ = c_g_tls_certificate_request_flags_get_type
data TlsAuthenticationMode =
TlsAuthenticationModeNone
| TlsAuthenticationModeRequested
| TlsAuthenticationModeRequired
| AnotherTlsAuthenticationMode Int
deriving (Show, Eq)
instance Enum TlsAuthenticationMode where
fromEnum TlsAuthenticationModeNone = 0
fromEnum TlsAuthenticationModeRequested = 1
fromEnum TlsAuthenticationModeRequired = 2
fromEnum (AnotherTlsAuthenticationMode k) = k
toEnum 0 = TlsAuthenticationModeNone
toEnum 1 = TlsAuthenticationModeRequested
toEnum 2 = TlsAuthenticationModeRequired
toEnum k = AnotherTlsAuthenticationMode k
foreign import ccall "g_tls_authentication_mode_get_type" c_g_tls_authentication_mode_get_type ::
IO GType
instance BoxedEnum TlsAuthenticationMode where
boxedEnumType _ = c_g_tls_authentication_mode_get_type
data SocketType =
SocketTypeInvalid
| SocketTypeStream
| SocketTypeDatagram
| SocketTypeSeqpacket
| AnotherSocketType Int
deriving (Show, Eq)
instance Enum SocketType where
fromEnum SocketTypeInvalid = 0
fromEnum SocketTypeStream = 1
fromEnum SocketTypeDatagram = 2
fromEnum SocketTypeSeqpacket = 3
fromEnum (AnotherSocketType k) = k
toEnum 0 = SocketTypeInvalid
toEnum 1 = SocketTypeStream
toEnum 2 = SocketTypeDatagram
toEnum 3 = SocketTypeSeqpacket
toEnum k = AnotherSocketType k
foreign import ccall "g_socket_type_get_type" c_g_socket_type_get_type ::
IO GType
instance BoxedEnum SocketType where
boxedEnumType _ = c_g_socket_type_get_type
data SocketProtocol =
SocketProtocolUnknown
| SocketProtocolDefault
| SocketProtocolTcp
| SocketProtocolUdp
| SocketProtocolSctp
| AnotherSocketProtocol Int
deriving (Show, Eq)
instance Enum SocketProtocol where
fromEnum SocketProtocolUnknown = 1
fromEnum SocketProtocolDefault = 0
fromEnum SocketProtocolTcp = 6
fromEnum SocketProtocolUdp = 17
fromEnum SocketProtocolSctp = 132
fromEnum (AnotherSocketProtocol k) = k
toEnum 1 = SocketProtocolUnknown
toEnum 0 = SocketProtocolDefault
toEnum 6 = SocketProtocolTcp
toEnum 17 = SocketProtocolUdp
toEnum 132 = SocketProtocolSctp
toEnum k = AnotherSocketProtocol k
foreign import ccall "g_socket_protocol_get_type" c_g_socket_protocol_get_type ::
IO GType
instance BoxedEnum SocketProtocol where
boxedEnumType _ = c_g_socket_protocol_get_type
data SocketFamily =
SocketFamilyInvalid
| SocketFamilyUnix
| SocketFamilyIpv4
| SocketFamilyIpv6
| AnotherSocketFamily Int
deriving (Show, Eq)
instance Enum SocketFamily where
fromEnum SocketFamilyInvalid = 0
fromEnum SocketFamilyUnix = 1
fromEnum SocketFamilyIpv4 = 2
fromEnum SocketFamilyIpv6 = 10
fromEnum (AnotherSocketFamily k) = k
toEnum 0 = SocketFamilyInvalid
toEnum 1 = SocketFamilyUnix
toEnum 2 = SocketFamilyIpv4
toEnum 10 = SocketFamilyIpv6
toEnum k = AnotherSocketFamily k
foreign import ccall "g_socket_family_get_type" c_g_socket_family_get_type ::
IO GType
instance BoxedEnum SocketFamily where
boxedEnumType _ = c_g_socket_family_get_type
data SocketClientEvent =
SocketClientEventResolving
| SocketClientEventResolved
| SocketClientEventConnecting
| SocketClientEventConnected
| SocketClientEventProxyNegotiating
| SocketClientEventProxyNegotiated
| SocketClientEventTlsHandshaking
| SocketClientEventTlsHandshaked
| SocketClientEventComplete
| AnotherSocketClientEvent Int
deriving (Show, Eq)
instance Enum SocketClientEvent where
fromEnum SocketClientEventResolving = 0
fromEnum SocketClientEventResolved = 1
fromEnum SocketClientEventConnecting = 2
fromEnum SocketClientEventConnected = 3
fromEnum SocketClientEventProxyNegotiating = 4
fromEnum SocketClientEventProxyNegotiated = 5
fromEnum SocketClientEventTlsHandshaking = 6
fromEnum SocketClientEventTlsHandshaked = 7
fromEnum SocketClientEventComplete = 8
fromEnum (AnotherSocketClientEvent k) = k
toEnum 0 = SocketClientEventResolving
toEnum 1 = SocketClientEventResolved
toEnum 2 = SocketClientEventConnecting
toEnum 3 = SocketClientEventConnected
toEnum 4 = SocketClientEventProxyNegotiating
toEnum 5 = SocketClientEventProxyNegotiated
toEnum 6 = SocketClientEventTlsHandshaking
toEnum 7 = SocketClientEventTlsHandshaked
toEnum 8 = SocketClientEventComplete
toEnum k = AnotherSocketClientEvent k
foreign import ccall "g_socket_client_event_get_type" c_g_socket_client_event_get_type ::
IO GType
instance BoxedEnum SocketClientEvent where
boxedEnumType _ = c_g_socket_client_event_get_type
data ResourceError =
ResourceErrorNotFound
| ResourceErrorInternal
| AnotherResourceError Int
deriving (Show, Eq)
instance Enum ResourceError where
fromEnum ResourceErrorNotFound = 0
fromEnum ResourceErrorInternal = 1
fromEnum (AnotherResourceError k) = k
toEnum 0 = ResourceErrorNotFound
toEnum 1 = ResourceErrorInternal
toEnum k = AnotherResourceError k
instance GErrorClass ResourceError where
gerrorClassDomain _ = "g-resource-error-quark"
catchResourceError ::
IO a ->
(ResourceError -> GErrorMessage -> IO a) ->
IO a
catchResourceError = catchGErrorJustDomain
handleResourceError ::
(ResourceError -> GErrorMessage -> IO a) ->
IO a ->
IO a
handleResourceError = handleGErrorJustDomain
foreign import ccall "g_resource_error_get_type" c_g_resource_error_get_type ::
IO GType
instance BoxedEnum ResourceError where
boxedEnumType _ = c_g_resource_error_get_type
data ResolverRecordType =
ResolverRecordTypeSrv
| ResolverRecordTypeMx
| ResolverRecordTypeTxt
| ResolverRecordTypeSoa
| ResolverRecordTypeNs
| AnotherResolverRecordType Int
deriving (Show, Eq)
instance Enum ResolverRecordType where
fromEnum ResolverRecordTypeSrv = 1
fromEnum ResolverRecordTypeMx = 2
fromEnum ResolverRecordTypeTxt = 3
fromEnum ResolverRecordTypeSoa = 4
fromEnum ResolverRecordTypeNs = 5
fromEnum (AnotherResolverRecordType k) = k
toEnum 1 = ResolverRecordTypeSrv
toEnum 2 = ResolverRecordTypeMx
toEnum 3 = ResolverRecordTypeTxt
toEnum 4 = ResolverRecordTypeSoa
toEnum 5 = ResolverRecordTypeNs
toEnum k = AnotherResolverRecordType k
foreign import ccall "g_resolver_record_type_get_type" c_g_resolver_record_type_get_type ::
IO GType
instance BoxedEnum ResolverRecordType where
boxedEnumType _ = c_g_resolver_record_type_get_type
data ResolverError =
ResolverErrorNotFound
| ResolverErrorTemporaryFailure
| ResolverErrorInternal
| AnotherResolverError Int
deriving (Show, Eq)
instance Enum ResolverError where
fromEnum ResolverErrorNotFound = 0
fromEnum ResolverErrorTemporaryFailure = 1
fromEnum ResolverErrorInternal = 2
fromEnum (AnotherResolverError k) = k
toEnum 0 = ResolverErrorNotFound
toEnum 1 = ResolverErrorTemporaryFailure
toEnum 2 = ResolverErrorInternal
toEnum k = AnotherResolverError k
instance GErrorClass ResolverError where
gerrorClassDomain _ = "g-resolver-error-quark"
catchResolverError ::
IO a ->
(ResolverError -> GErrorMessage -> IO a) ->
IO a
catchResolverError = catchGErrorJustDomain
handleResolverError ::
(ResolverError -> GErrorMessage -> IO a) ->
IO a ->
IO a
handleResolverError = handleGErrorJustDomain
foreign import ccall "g_resolver_error_get_type" c_g_resolver_error_get_type ::
IO GType
instance BoxedEnum ResolverError where
boxedEnumType _ = c_g_resolver_error_get_type
data PasswordSave =
PasswordSaveNever
| PasswordSaveForSession
| PasswordSavePermanently
| AnotherPasswordSave Int
deriving (Show, Eq)
instance Enum PasswordSave where
fromEnum PasswordSaveNever = 0
fromEnum PasswordSaveForSession = 1
fromEnum PasswordSavePermanently = 2
fromEnum (AnotherPasswordSave k) = k
toEnum 0 = PasswordSaveNever
toEnum 1 = PasswordSaveForSession
toEnum 2 = PasswordSavePermanently
toEnum k = AnotherPasswordSave k
foreign import ccall "g_password_save_get_type" c_g_password_save_get_type ::
IO GType
instance BoxedEnum PasswordSave where
boxedEnumType _ = c_g_password_save_get_type
data NotificationPriority =
NotificationPriorityNormal
| NotificationPriorityLow
| NotificationPriorityHigh
| NotificationPriorityUrgent
| AnotherNotificationPriority Int
deriving (Show, Eq)
instance Enum NotificationPriority where
fromEnum NotificationPriorityNormal = 0
fromEnum NotificationPriorityLow = 1
fromEnum NotificationPriorityHigh = 2
fromEnum NotificationPriorityUrgent = 3
fromEnum (AnotherNotificationPriority k) = k
toEnum 0 = NotificationPriorityNormal
toEnum 1 = NotificationPriorityLow
toEnum 2 = NotificationPriorityHigh
toEnum 3 = NotificationPriorityUrgent
toEnum k = AnotherNotificationPriority k
foreign import ccall "g_notification_priority_get_type" c_g_notification_priority_get_type ::
IO GType
instance BoxedEnum NotificationPriority where
boxedEnumType _ = c_g_notification_priority_get_type
data NetworkConnectivity =
NetworkConnectivityLocal
| NetworkConnectivityLimited
| NetworkConnectivityPortal
| NetworkConnectivityFull
| AnotherNetworkConnectivity Int
deriving (Show, Eq)
instance Enum NetworkConnectivity where
fromEnum NetworkConnectivityLocal = 1
fromEnum NetworkConnectivityLimited = 2
fromEnum NetworkConnectivityPortal = 3
fromEnum NetworkConnectivityFull = 4
fromEnum (AnotherNetworkConnectivity k) = k
toEnum 1 = NetworkConnectivityLocal
toEnum 2 = NetworkConnectivityLimited
toEnum 3 = NetworkConnectivityPortal
toEnum 4 = NetworkConnectivityFull
toEnum k = AnotherNetworkConnectivity k
foreign import ccall "g_network_connectivity_get_type" c_g_network_connectivity_get_type ::
IO GType
instance BoxedEnum NetworkConnectivity where
boxedEnumType _ = c_g_network_connectivity_get_type
data MountOperationResult =
MountOperationResultHandled
| MountOperationResultAborted
| MountOperationResultUnhandled
| AnotherMountOperationResult Int
deriving (Show, Eq)
instance Enum MountOperationResult where
fromEnum MountOperationResultHandled = 0
fromEnum MountOperationResultAborted = 1
fromEnum MountOperationResultUnhandled = 2
fromEnum (AnotherMountOperationResult k) = k
toEnum 0 = MountOperationResultHandled
toEnum 1 = MountOperationResultAborted
toEnum 2 = MountOperationResultUnhandled
toEnum k = AnotherMountOperationResult k
foreign import ccall "g_mount_operation_result_get_type" c_g_mount_operation_result_get_type ::
IO GType
instance BoxedEnum MountOperationResult where
boxedEnumType _ = c_g_mount_operation_result_get_type
data IOModuleScopeFlags =
IOModuleScopeFlagsNone
| IOModuleScopeFlagsBlockDuplicates
| AnotherIOModuleScopeFlags Int
deriving (Show, Eq)
instance Enum IOModuleScopeFlags where
fromEnum IOModuleScopeFlagsNone = 0
fromEnum IOModuleScopeFlagsBlockDuplicates = 1
fromEnum (AnotherIOModuleScopeFlags k) = k
toEnum 0 = IOModuleScopeFlagsNone
toEnum 1 = IOModuleScopeFlagsBlockDuplicates
toEnum k = AnotherIOModuleScopeFlags k
foreign import ccall "g_io_module_scope_flags_get_type" c_g_io_module_scope_flags_get_type ::
IO GType
instance BoxedEnum IOModuleScopeFlags where
boxedEnumType _ = c_g_io_module_scope_flags_get_type
data IOErrorEnum =
IOErrorEnumFailed
| IOErrorEnumNotFound
| IOErrorEnumExists
| IOErrorEnumIsDirectory
| IOErrorEnumNotDirectory
| IOErrorEnumNotEmpty
| IOErrorEnumNotRegularFile
| IOErrorEnumNotSymbolicLink
| IOErrorEnumNotMountableFile
| IOErrorEnumFilenameTooLong
| IOErrorEnumInvalidFilename
| IOErrorEnumTooManyLinks
| IOErrorEnumNoSpace
| IOErrorEnumInvalidArgument
| IOErrorEnumPermissionDenied
| IOErrorEnumNotSupported
| IOErrorEnumNotMounted
| IOErrorEnumAlreadyMounted
| IOErrorEnumClosed
| IOErrorEnumCancelled
| IOErrorEnumPending
| IOErrorEnumReadOnly
| IOErrorEnumCantCreateBackup
| IOErrorEnumWrongEtag
| IOErrorEnumTimedOut
| IOErrorEnumWouldRecurse
| IOErrorEnumBusy
| IOErrorEnumWouldBlock
| IOErrorEnumHostNotFound
| IOErrorEnumWouldMerge
| IOErrorEnumFailedHandled
| IOErrorEnumTooManyOpenFiles
| IOErrorEnumNotInitialized
| IOErrorEnumAddressInUse
| IOErrorEnumPartialInput
| IOErrorEnumInvalidData
| IOErrorEnumDbusError
| IOErrorEnumHostUnreachable
| IOErrorEnumNetworkUnreachable
| IOErrorEnumConnectionRefused
| IOErrorEnumProxyFailed
| IOErrorEnumProxyAuthFailed
| IOErrorEnumProxyNeedAuth
| IOErrorEnumProxyNotAllowed
| IOErrorEnumBrokenPipe
| IOErrorEnumConnectionClosed
| IOErrorEnumNotConnected
| AnotherIOErrorEnum Int
deriving (Show, Eq)
instance Enum IOErrorEnum where
fromEnum IOErrorEnumFailed = 0
fromEnum IOErrorEnumNotFound = 1
fromEnum IOErrorEnumExists = 2
fromEnum IOErrorEnumIsDirectory = 3
fromEnum IOErrorEnumNotDirectory = 4
fromEnum IOErrorEnumNotEmpty = 5
fromEnum IOErrorEnumNotRegularFile = 6
fromEnum IOErrorEnumNotSymbolicLink = 7
fromEnum IOErrorEnumNotMountableFile = 8
fromEnum IOErrorEnumFilenameTooLong = 9
fromEnum IOErrorEnumInvalidFilename = 10
fromEnum IOErrorEnumTooManyLinks = 11
fromEnum IOErrorEnumNoSpace = 12
fromEnum IOErrorEnumInvalidArgument = 13
fromEnum IOErrorEnumPermissionDenied = 14
fromEnum IOErrorEnumNotSupported = 15
fromEnum IOErrorEnumNotMounted = 16
fromEnum IOErrorEnumAlreadyMounted = 17
fromEnum IOErrorEnumClosed = 18
fromEnum IOErrorEnumCancelled = 19
fromEnum IOErrorEnumPending = 20
fromEnum IOErrorEnumReadOnly = 21
fromEnum IOErrorEnumCantCreateBackup = 22
fromEnum IOErrorEnumWrongEtag = 23
fromEnum IOErrorEnumTimedOut = 24
fromEnum IOErrorEnumWouldRecurse = 25
fromEnum IOErrorEnumBusy = 26
fromEnum IOErrorEnumWouldBlock = 27
fromEnum IOErrorEnumHostNotFound = 28
fromEnum IOErrorEnumWouldMerge = 29
fromEnum IOErrorEnumFailedHandled = 30
fromEnum IOErrorEnumTooManyOpenFiles = 31
fromEnum IOErrorEnumNotInitialized = 32
fromEnum IOErrorEnumAddressInUse = 33
fromEnum IOErrorEnumPartialInput = 34
fromEnum IOErrorEnumInvalidData = 35
fromEnum IOErrorEnumDbusError = 36
fromEnum IOErrorEnumHostUnreachable = 37
fromEnum IOErrorEnumNetworkUnreachable = 38
fromEnum IOErrorEnumConnectionRefused = 39
fromEnum IOErrorEnumProxyFailed = 40
fromEnum IOErrorEnumProxyAuthFailed = 41
fromEnum IOErrorEnumProxyNeedAuth = 42
fromEnum IOErrorEnumProxyNotAllowed = 43
fromEnum IOErrorEnumBrokenPipe = 44
fromEnum IOErrorEnumConnectionClosed = 44
fromEnum IOErrorEnumNotConnected = 45
fromEnum (AnotherIOErrorEnum k) = k
toEnum 0 = IOErrorEnumFailed
toEnum 1 = IOErrorEnumNotFound
toEnum 2 = IOErrorEnumExists
toEnum 3 = IOErrorEnumIsDirectory
toEnum 4 = IOErrorEnumNotDirectory
toEnum 5 = IOErrorEnumNotEmpty
toEnum 6 = IOErrorEnumNotRegularFile
toEnum 7 = IOErrorEnumNotSymbolicLink
toEnum 8 = IOErrorEnumNotMountableFile
toEnum 9 = IOErrorEnumFilenameTooLong
toEnum 10 = IOErrorEnumInvalidFilename
toEnum 11 = IOErrorEnumTooManyLinks
toEnum 12 = IOErrorEnumNoSpace
toEnum 13 = IOErrorEnumInvalidArgument
toEnum 14 = IOErrorEnumPermissionDenied
toEnum 15 = IOErrorEnumNotSupported
toEnum 16 = IOErrorEnumNotMounted
toEnum 17 = IOErrorEnumAlreadyMounted
toEnum 18 = IOErrorEnumClosed
toEnum 19 = IOErrorEnumCancelled
toEnum 20 = IOErrorEnumPending
toEnum 21 = IOErrorEnumReadOnly
toEnum 22 = IOErrorEnumCantCreateBackup
toEnum 23 = IOErrorEnumWrongEtag
toEnum 24 = IOErrorEnumTimedOut
toEnum 25 = IOErrorEnumWouldRecurse
toEnum 26 = IOErrorEnumBusy
toEnum 27 = IOErrorEnumWouldBlock
toEnum 28 = IOErrorEnumHostNotFound
toEnum 29 = IOErrorEnumWouldMerge
toEnum 30 = IOErrorEnumFailedHandled
toEnum 31 = IOErrorEnumTooManyOpenFiles
toEnum 32 = IOErrorEnumNotInitialized
toEnum 33 = IOErrorEnumAddressInUse
toEnum 34 = IOErrorEnumPartialInput
toEnum 35 = IOErrorEnumInvalidData
toEnum 36 = IOErrorEnumDbusError
toEnum 37 = IOErrorEnumHostUnreachable
toEnum 38 = IOErrorEnumNetworkUnreachable
toEnum 39 = IOErrorEnumConnectionRefused
toEnum 40 = IOErrorEnumProxyFailed
toEnum 41 = IOErrorEnumProxyAuthFailed
toEnum 42 = IOErrorEnumProxyNeedAuth
toEnum 43 = IOErrorEnumProxyNotAllowed
toEnum 44 = IOErrorEnumBrokenPipe
toEnum 45 = IOErrorEnumNotConnected
toEnum k = AnotherIOErrorEnum k
instance GErrorClass IOErrorEnum where
gerrorClassDomain _ = "g-io-error-quark"
catchIOErrorEnum ::
IO a ->
(IOErrorEnum -> GErrorMessage -> IO a) ->
IO a
catchIOErrorEnum = catchGErrorJustDomain
handleIOErrorEnum ::
(IOErrorEnum -> GErrorMessage -> IO a) ->
IO a ->
IO a
handleIOErrorEnum = handleGErrorJustDomain
foreign import ccall "g_io_error_enum_get_type" c_g_io_error_enum_get_type ::
IO GType
instance BoxedEnum IOErrorEnum where
boxedEnumType _ = c_g_io_error_enum_get_type
data FilesystemPreviewType =
FilesystemPreviewTypeIfAlways
| FilesystemPreviewTypeIfLocal
| FilesystemPreviewTypeNever
| AnotherFilesystemPreviewType Int
deriving (Show, Eq)
instance Enum FilesystemPreviewType where
fromEnum FilesystemPreviewTypeIfAlways = 0
fromEnum FilesystemPreviewTypeIfLocal = 1
fromEnum FilesystemPreviewTypeNever = 2
fromEnum (AnotherFilesystemPreviewType k) = k
toEnum 0 = FilesystemPreviewTypeIfAlways
toEnum 1 = FilesystemPreviewTypeIfLocal
toEnum 2 = FilesystemPreviewTypeNever
toEnum k = AnotherFilesystemPreviewType k
foreign import ccall "g_filesystem_preview_type_get_type" c_g_filesystem_preview_type_get_type ::
IO GType
instance BoxedEnum FilesystemPreviewType where
boxedEnumType _ = c_g_filesystem_preview_type_get_type
data FileType =
FileTypeUnknown
| FileTypeRegular
| FileTypeDirectory
| FileTypeSymbolicLink
| FileTypeSpecial
| FileTypeShortcut
| FileTypeMountable
| AnotherFileType Int
deriving (Show, Eq)
instance Enum FileType where
fromEnum FileTypeUnknown = 0
fromEnum FileTypeRegular = 1
fromEnum FileTypeDirectory = 2
fromEnum FileTypeSymbolicLink = 3
fromEnum FileTypeSpecial = 4
fromEnum FileTypeShortcut = 5
fromEnum FileTypeMountable = 6
fromEnum (AnotherFileType k) = k
toEnum 0 = FileTypeUnknown
toEnum 1 = FileTypeRegular
toEnum 2 = FileTypeDirectory
toEnum 3 = FileTypeSymbolicLink
toEnum 4 = FileTypeSpecial
toEnum 5 = FileTypeShortcut
toEnum 6 = FileTypeMountable
toEnum k = AnotherFileType k
foreign import ccall "g_file_type_get_type" c_g_file_type_get_type ::
IO GType
instance BoxedEnum FileType where
boxedEnumType _ = c_g_file_type_get_type
data FileMonitorEvent =
FileMonitorEventChanged
| FileMonitorEventChangesDoneHint
| FileMonitorEventDeleted
| FileMonitorEventCreated
| FileMonitorEventAttributeChanged
| FileMonitorEventPreUnmount
| FileMonitorEventUnmounted
| FileMonitorEventMoved
| AnotherFileMonitorEvent Int
deriving (Show, Eq)
instance Enum FileMonitorEvent where
fromEnum FileMonitorEventChanged = 0
fromEnum FileMonitorEventChangesDoneHint = 1
fromEnum FileMonitorEventDeleted = 2
fromEnum FileMonitorEventCreated = 3
fromEnum FileMonitorEventAttributeChanged = 4
fromEnum FileMonitorEventPreUnmount = 5
fromEnum FileMonitorEventUnmounted = 6
fromEnum FileMonitorEventMoved = 7
fromEnum (AnotherFileMonitorEvent k) = k
toEnum 0 = FileMonitorEventChanged
toEnum 1 = FileMonitorEventChangesDoneHint
toEnum 2 = FileMonitorEventDeleted
toEnum 3 = FileMonitorEventCreated
toEnum 4 = FileMonitorEventAttributeChanged
toEnum 5 = FileMonitorEventPreUnmount
toEnum 6 = FileMonitorEventUnmounted
toEnum 7 = FileMonitorEventMoved
toEnum k = AnotherFileMonitorEvent k
foreign import ccall "g_file_monitor_event_get_type" c_g_file_monitor_event_get_type ::
IO GType
instance BoxedEnum FileMonitorEvent where
boxedEnumType _ = c_g_file_monitor_event_get_type
data FileAttributeType =
FileAttributeTypeInvalid
| FileAttributeTypeString
| FileAttributeTypeByteString
| FileAttributeTypeBoolean
| FileAttributeTypeUint32
| FileAttributeTypeInt32
| FileAttributeTypeUint64
| FileAttributeTypeInt64
| FileAttributeTypeObject
| FileAttributeTypeStringv
| AnotherFileAttributeType Int
deriving (Show, Eq)
instance Enum FileAttributeType where
fromEnum FileAttributeTypeInvalid = 0
fromEnum FileAttributeTypeString = 1
fromEnum FileAttributeTypeByteString = 2
fromEnum FileAttributeTypeBoolean = 3
fromEnum FileAttributeTypeUint32 = 4
fromEnum FileAttributeTypeInt32 = 5
fromEnum FileAttributeTypeUint64 = 6
fromEnum FileAttributeTypeInt64 = 7
fromEnum FileAttributeTypeObject = 8
fromEnum FileAttributeTypeStringv = 9
fromEnum (AnotherFileAttributeType k) = k
toEnum 0 = FileAttributeTypeInvalid
toEnum 1 = FileAttributeTypeString
toEnum 2 = FileAttributeTypeByteString
toEnum 3 = FileAttributeTypeBoolean
toEnum 4 = FileAttributeTypeUint32
toEnum 5 = FileAttributeTypeInt32
toEnum 6 = FileAttributeTypeUint64
toEnum 7 = FileAttributeTypeInt64
toEnum 8 = FileAttributeTypeObject
toEnum 9 = FileAttributeTypeStringv
toEnum k = AnotherFileAttributeType k
foreign import ccall "g_file_attribute_type_get_type" c_g_file_attribute_type_get_type ::
IO GType
instance BoxedEnum FileAttributeType where
boxedEnumType _ = c_g_file_attribute_type_get_type
data FileAttributeStatus =
FileAttributeStatusUnset
| FileAttributeStatusSet
| FileAttributeStatusErrorSetting
| AnotherFileAttributeStatus Int
deriving (Show, Eq)
instance Enum FileAttributeStatus where
fromEnum FileAttributeStatusUnset = 0
fromEnum FileAttributeStatusSet = 1
fromEnum FileAttributeStatusErrorSetting = 2
fromEnum (AnotherFileAttributeStatus k) = k
toEnum 0 = FileAttributeStatusUnset
toEnum 1 = FileAttributeStatusSet
toEnum 2 = FileAttributeStatusErrorSetting
toEnum k = AnotherFileAttributeStatus k
foreign import ccall "g_file_attribute_status_get_type" c_g_file_attribute_status_get_type ::
IO GType
instance BoxedEnum FileAttributeStatus where
boxedEnumType _ = c_g_file_attribute_status_get_type
data EmblemOrigin =
EmblemOriginUnknown
| EmblemOriginDevice
| EmblemOriginLivemetadata
| EmblemOriginTag
| AnotherEmblemOrigin Int
deriving (Show, Eq)
instance Enum EmblemOrigin where
fromEnum EmblemOriginUnknown = 0
fromEnum EmblemOriginDevice = 1
fromEnum EmblemOriginLivemetadata = 2
fromEnum EmblemOriginTag = 3
fromEnum (AnotherEmblemOrigin k) = k
toEnum 0 = EmblemOriginUnknown
toEnum 1 = EmblemOriginDevice
toEnum 2 = EmblemOriginLivemetadata
toEnum 3 = EmblemOriginTag
toEnum k = AnotherEmblemOrigin k
foreign import ccall "g_emblem_origin_get_type" c_g_emblem_origin_get_type ::
IO GType
instance BoxedEnum EmblemOrigin where
boxedEnumType _ = c_g_emblem_origin_get_type
data DriveStartStopType =
DriveStartStopTypeUnknown
| DriveStartStopTypeShutdown
| DriveStartStopTypeNetwork
| DriveStartStopTypeMultidisk
| DriveStartStopTypePassword
| AnotherDriveStartStopType Int
deriving (Show, Eq)
instance Enum DriveStartStopType where
fromEnum DriveStartStopTypeUnknown = 0
fromEnum DriveStartStopTypeShutdown = 1
fromEnum DriveStartStopTypeNetwork = 2
fromEnum DriveStartStopTypeMultidisk = 3
fromEnum DriveStartStopTypePassword = 4
fromEnum (AnotherDriveStartStopType k) = k
toEnum 0 = DriveStartStopTypeUnknown
toEnum 1 = DriveStartStopTypeShutdown
toEnum 2 = DriveStartStopTypeNetwork
toEnum 3 = DriveStartStopTypeMultidisk
toEnum 4 = DriveStartStopTypePassword
toEnum k = AnotherDriveStartStopType k
foreign import ccall "g_drive_start_stop_type_get_type" c_g_drive_start_stop_type_get_type ::
IO GType
instance BoxedEnum DriveStartStopType where
boxedEnumType _ = c_g_drive_start_stop_type_get_type
data DataStreamNewlineType =
DataStreamNewlineTypeLf
| DataStreamNewlineTypeCr
| DataStreamNewlineTypeCrLf
| DataStreamNewlineTypeAny
| AnotherDataStreamNewlineType Int
deriving (Show, Eq)
instance Enum DataStreamNewlineType where
fromEnum DataStreamNewlineTypeLf = 0
fromEnum DataStreamNewlineTypeCr = 1
fromEnum DataStreamNewlineTypeCrLf = 2
fromEnum DataStreamNewlineTypeAny = 3
fromEnum (AnotherDataStreamNewlineType k) = k
toEnum 0 = DataStreamNewlineTypeLf
toEnum 1 = DataStreamNewlineTypeCr
toEnum 2 = DataStreamNewlineTypeCrLf
toEnum 3 = DataStreamNewlineTypeAny
toEnum k = AnotherDataStreamNewlineType k
foreign import ccall "g_data_stream_newline_type_get_type" c_g_data_stream_newline_type_get_type ::
IO GType
instance BoxedEnum DataStreamNewlineType where
boxedEnumType _ = c_g_data_stream_newline_type_get_type
data DataStreamByteOrder =
DataStreamByteOrderBigEndian
| DataStreamByteOrderLittleEndian
| DataStreamByteOrderHostEndian
| AnotherDataStreamByteOrder Int
deriving (Show, Eq)
instance Enum DataStreamByteOrder where
fromEnum DataStreamByteOrderBigEndian = 0
fromEnum DataStreamByteOrderLittleEndian = 1
fromEnum DataStreamByteOrderHostEndian = 2
fromEnum (AnotherDataStreamByteOrder k) = k
toEnum 0 = DataStreamByteOrderBigEndian
toEnum 1 = DataStreamByteOrderLittleEndian
toEnum 2 = DataStreamByteOrderHostEndian
toEnum k = AnotherDataStreamByteOrder k
foreign import ccall "g_data_stream_byte_order_get_type" c_g_data_stream_byte_order_get_type ::
IO GType
instance BoxedEnum DataStreamByteOrder where
boxedEnumType _ = c_g_data_stream_byte_order_get_type
data DBusMessageType =
DBusMessageTypeInvalid
| DBusMessageTypeMethodCall
| DBusMessageTypeMethodReturn
| DBusMessageTypeError
| DBusMessageTypeSignal
| AnotherDBusMessageType Int
deriving (Show, Eq)
instance Enum DBusMessageType where
fromEnum DBusMessageTypeInvalid = 0
fromEnum DBusMessageTypeMethodCall = 1
fromEnum DBusMessageTypeMethodReturn = 2
fromEnum DBusMessageTypeError = 3
fromEnum DBusMessageTypeSignal = 4
fromEnum (AnotherDBusMessageType k) = k
toEnum 0 = DBusMessageTypeInvalid
toEnum 1 = DBusMessageTypeMethodCall
toEnum 2 = DBusMessageTypeMethodReturn
toEnum 3 = DBusMessageTypeError
toEnum 4 = DBusMessageTypeSignal
toEnum k = AnotherDBusMessageType k
foreign import ccall "g_dbus_message_type_get_type" c_g_dbus_message_type_get_type ::
IO GType
instance BoxedEnum DBusMessageType where
boxedEnumType _ = c_g_dbus_message_type_get_type
data DBusMessageHeaderField =
DBusMessageHeaderFieldInvalid
| DBusMessageHeaderFieldPath
| DBusMessageHeaderFieldInterface
| DBusMessageHeaderFieldMember
| DBusMessageHeaderFieldErrorName
| DBusMessageHeaderFieldReplySerial
| DBusMessageHeaderFieldDestination
| DBusMessageHeaderFieldSender
| DBusMessageHeaderFieldSignature
| DBusMessageHeaderFieldNumUnixFds
| AnotherDBusMessageHeaderField Int
deriving (Show, Eq)
instance Enum DBusMessageHeaderField where
fromEnum DBusMessageHeaderFieldInvalid = 0
fromEnum DBusMessageHeaderFieldPath = 1
fromEnum DBusMessageHeaderFieldInterface = 2
fromEnum DBusMessageHeaderFieldMember = 3
fromEnum DBusMessageHeaderFieldErrorName = 4
fromEnum DBusMessageHeaderFieldReplySerial = 5
fromEnum DBusMessageHeaderFieldDestination = 6
fromEnum DBusMessageHeaderFieldSender = 7
fromEnum DBusMessageHeaderFieldSignature = 8
fromEnum DBusMessageHeaderFieldNumUnixFds = 9
fromEnum (AnotherDBusMessageHeaderField k) = k
toEnum 0 = DBusMessageHeaderFieldInvalid
toEnum 1 = DBusMessageHeaderFieldPath
toEnum 2 = DBusMessageHeaderFieldInterface
toEnum 3 = DBusMessageHeaderFieldMember
toEnum 4 = DBusMessageHeaderFieldErrorName
toEnum 5 = DBusMessageHeaderFieldReplySerial
toEnum 6 = DBusMessageHeaderFieldDestination
toEnum 7 = DBusMessageHeaderFieldSender
toEnum 8 = DBusMessageHeaderFieldSignature
toEnum 9 = DBusMessageHeaderFieldNumUnixFds
toEnum k = AnotherDBusMessageHeaderField k
foreign import ccall "g_dbus_message_header_field_get_type" c_g_dbus_message_header_field_get_type ::
IO GType
instance BoxedEnum DBusMessageHeaderField where
boxedEnumType _ = c_g_dbus_message_header_field_get_type
data DBusMessageByteOrder =
DBusMessageByteOrderBigEndian
| DBusMessageByteOrderLittleEndian
| AnotherDBusMessageByteOrder Int
deriving (Show, Eq)
instance Enum DBusMessageByteOrder where
fromEnum DBusMessageByteOrderBigEndian = 66
fromEnum DBusMessageByteOrderLittleEndian = 108
fromEnum (AnotherDBusMessageByteOrder k) = k
toEnum 66 = DBusMessageByteOrderBigEndian
toEnum 108 = DBusMessageByteOrderLittleEndian
toEnum k = AnotherDBusMessageByteOrder k
foreign import ccall "g_dbus_message_byte_order_get_type" c_g_dbus_message_byte_order_get_type ::
IO GType
instance BoxedEnum DBusMessageByteOrder where
boxedEnumType _ = c_g_dbus_message_byte_order_get_type
data DBusError =
DBusErrorFailed
| DBusErrorNoMemory
| DBusErrorServiceUnknown
| DBusErrorNameHasNoOwner
| DBusErrorNoReply
| DBusErrorIoError
| DBusErrorBadAddress
| DBusErrorNotSupported
| DBusErrorLimitsExceeded
| DBusErrorAccessDenied
| DBusErrorAuthFailed
| DBusErrorNoServer
| DBusErrorTimeout
| DBusErrorNoNetwork
| DBusErrorAddressInUse
| DBusErrorDisconnected
| DBusErrorInvalidArgs
| DBusErrorFileNotFound
| DBusErrorFileExists
| DBusErrorUnknownMethod
| DBusErrorTimedOut
| DBusErrorMatchRuleNotFound
| DBusErrorMatchRuleInvalid
| DBusErrorSpawnExecFailed
| DBusErrorSpawnForkFailed
| DBusErrorSpawnChildExited
| DBusErrorSpawnChildSignaled
| DBusErrorSpawnFailed
| DBusErrorSpawnSetupFailed
| DBusErrorSpawnConfigInvalid
| DBusErrorSpawnServiceInvalid
| DBusErrorSpawnServiceNotFound
| DBusErrorSpawnPermissionsInvalid
| DBusErrorSpawnFileInvalid
| DBusErrorSpawnNoMemory
| DBusErrorUnixProcessIdUnknown
| DBusErrorInvalidSignature
| DBusErrorInvalidFileContent
| DBusErrorSelinuxSecurityContextUnknown
| DBusErrorAdtAuditDataUnknown
| DBusErrorObjectPathInUse
| DBusErrorUnknownObject
| DBusErrorUnknownInterface
| DBusErrorUnknownProperty
| DBusErrorPropertyReadOnly
| AnotherDBusError Int
deriving (Show, Eq)
instance Enum DBusError where
fromEnum DBusErrorFailed = 0
fromEnum DBusErrorNoMemory = 1
fromEnum DBusErrorServiceUnknown = 2
fromEnum DBusErrorNameHasNoOwner = 3
fromEnum DBusErrorNoReply = 4
fromEnum DBusErrorIoError = 5
fromEnum DBusErrorBadAddress = 6
fromEnum DBusErrorNotSupported = 7
fromEnum DBusErrorLimitsExceeded = 8
fromEnum DBusErrorAccessDenied = 9
fromEnum DBusErrorAuthFailed = 10
fromEnum DBusErrorNoServer = 11
fromEnum DBusErrorTimeout = 12
fromEnum DBusErrorNoNetwork = 13
fromEnum DBusErrorAddressInUse = 14
fromEnum DBusErrorDisconnected = 15
fromEnum DBusErrorInvalidArgs = 16
fromEnum DBusErrorFileNotFound = 17
fromEnum DBusErrorFileExists = 18
fromEnum DBusErrorUnknownMethod = 19
fromEnum DBusErrorTimedOut = 20
fromEnum DBusErrorMatchRuleNotFound = 21
fromEnum DBusErrorMatchRuleInvalid = 22
fromEnum DBusErrorSpawnExecFailed = 23
fromEnum DBusErrorSpawnForkFailed = 24
fromEnum DBusErrorSpawnChildExited = 25
fromEnum DBusErrorSpawnChildSignaled = 26
fromEnum DBusErrorSpawnFailed = 27
fromEnum DBusErrorSpawnSetupFailed = 28
fromEnum DBusErrorSpawnConfigInvalid = 29
fromEnum DBusErrorSpawnServiceInvalid = 30
fromEnum DBusErrorSpawnServiceNotFound = 31
fromEnum DBusErrorSpawnPermissionsInvalid = 32
fromEnum DBusErrorSpawnFileInvalid = 33
fromEnum DBusErrorSpawnNoMemory = 34
fromEnum DBusErrorUnixProcessIdUnknown = 35
fromEnum DBusErrorInvalidSignature = 36
fromEnum DBusErrorInvalidFileContent = 37
fromEnum DBusErrorSelinuxSecurityContextUnknown = 38
fromEnum DBusErrorAdtAuditDataUnknown = 39
fromEnum DBusErrorObjectPathInUse = 40
fromEnum DBusErrorUnknownObject = 41
fromEnum DBusErrorUnknownInterface = 42
fromEnum DBusErrorUnknownProperty = 43
fromEnum DBusErrorPropertyReadOnly = 44
fromEnum (AnotherDBusError k) = k
toEnum 0 = DBusErrorFailed
toEnum 1 = DBusErrorNoMemory
toEnum 2 = DBusErrorServiceUnknown
toEnum 3 = DBusErrorNameHasNoOwner
toEnum 4 = DBusErrorNoReply
toEnum 5 = DBusErrorIoError
toEnum 6 = DBusErrorBadAddress
toEnum 7 = DBusErrorNotSupported
toEnum 8 = DBusErrorLimitsExceeded
toEnum 9 = DBusErrorAccessDenied
toEnum 10 = DBusErrorAuthFailed
toEnum 11 = DBusErrorNoServer
toEnum 12 = DBusErrorTimeout
toEnum 13 = DBusErrorNoNetwork
toEnum 14 = DBusErrorAddressInUse
toEnum 15 = DBusErrorDisconnected
toEnum 16 = DBusErrorInvalidArgs
toEnum 17 = DBusErrorFileNotFound
toEnum 18 = DBusErrorFileExists
toEnum 19 = DBusErrorUnknownMethod
toEnum 20 = DBusErrorTimedOut
toEnum 21 = DBusErrorMatchRuleNotFound
toEnum 22 = DBusErrorMatchRuleInvalid
toEnum 23 = DBusErrorSpawnExecFailed
toEnum 24 = DBusErrorSpawnForkFailed
toEnum 25 = DBusErrorSpawnChildExited
toEnum 26 = DBusErrorSpawnChildSignaled
toEnum 27 = DBusErrorSpawnFailed
toEnum 28 = DBusErrorSpawnSetupFailed
toEnum 29 = DBusErrorSpawnConfigInvalid
toEnum 30 = DBusErrorSpawnServiceInvalid
toEnum 31 = DBusErrorSpawnServiceNotFound
toEnum 32 = DBusErrorSpawnPermissionsInvalid
toEnum 33 = DBusErrorSpawnFileInvalid
toEnum 34 = DBusErrorSpawnNoMemory
toEnum 35 = DBusErrorUnixProcessIdUnknown
toEnum 36 = DBusErrorInvalidSignature
toEnum 37 = DBusErrorInvalidFileContent
toEnum 38 = DBusErrorSelinuxSecurityContextUnknown
toEnum 39 = DBusErrorAdtAuditDataUnknown
toEnum 40 = DBusErrorObjectPathInUse
toEnum 41 = DBusErrorUnknownObject
toEnum 42 = DBusErrorUnknownInterface
toEnum 43 = DBusErrorUnknownProperty
toEnum 44 = DBusErrorPropertyReadOnly
toEnum k = AnotherDBusError k
instance GErrorClass DBusError where
gerrorClassDomain _ = "g-dbus-error-quark"
catchDBusError ::
IO a ->
(DBusError -> GErrorMessage -> IO a) ->
IO a
catchDBusError = catchGErrorJustDomain
handleDBusError ::
(DBusError -> GErrorMessage -> IO a) ->
IO a ->
IO a
handleDBusError = handleGErrorJustDomain
foreign import ccall "g_dbus_error_get_type" c_g_dbus_error_get_type ::
IO GType
instance BoxedEnum DBusError where
boxedEnumType _ = c_g_dbus_error_get_type
data CredentialsType =
CredentialsTypeInvalid
| CredentialsTypeLinuxUcred
| CredentialsTypeFreebsdCmsgcred
| CredentialsTypeOpenbsdSockpeercred
| CredentialsTypeSolarisUcred
| CredentialsTypeNetbsdUnpcbid
| AnotherCredentialsType Int
deriving (Show, Eq)
instance Enum CredentialsType where
fromEnum CredentialsTypeInvalid = 0
fromEnum CredentialsTypeLinuxUcred = 1
fromEnum CredentialsTypeFreebsdCmsgcred = 2
fromEnum CredentialsTypeOpenbsdSockpeercred = 3
fromEnum CredentialsTypeSolarisUcred = 4
fromEnum CredentialsTypeNetbsdUnpcbid = 5
fromEnum (AnotherCredentialsType k) = k
toEnum 0 = CredentialsTypeInvalid
toEnum 1 = CredentialsTypeLinuxUcred
toEnum 2 = CredentialsTypeFreebsdCmsgcred
toEnum 3 = CredentialsTypeOpenbsdSockpeercred
toEnum 4 = CredentialsTypeSolarisUcred
toEnum 5 = CredentialsTypeNetbsdUnpcbid
toEnum k = AnotherCredentialsType k
foreign import ccall "g_credentials_type_get_type" c_g_credentials_type_get_type ::
IO GType
instance BoxedEnum CredentialsType where
boxedEnumType _ = c_g_credentials_type_get_type
data ConverterResult =
ConverterResultError
| ConverterResultConverted
| ConverterResultFinished
| ConverterResultFlushed
| AnotherConverterResult Int
deriving (Show, Eq)
instance Enum ConverterResult where
fromEnum ConverterResultError = 0
fromEnum ConverterResultConverted = 1
fromEnum ConverterResultFinished = 2
fromEnum ConverterResultFlushed = 3
fromEnum (AnotherConverterResult k) = k
toEnum 0 = ConverterResultError
toEnum 1 = ConverterResultConverted
toEnum 2 = ConverterResultFinished
toEnum 3 = ConverterResultFlushed
toEnum k = AnotherConverterResult k
foreign import ccall "g_converter_result_get_type" c_g_converter_result_get_type ::
IO GType
instance BoxedEnum ConverterResult where
boxedEnumType _ = c_g_converter_result_get_type
data BusType =
BusTypeStarter
| BusTypeNone
| BusTypeSystem
| BusTypeSession
| AnotherBusType Int
deriving (Show, Eq)
instance Enum BusType where
fromEnum BusTypeStarter = 1
fromEnum BusTypeNone = 0
fromEnum BusTypeSystem = 1
fromEnum BusTypeSession = 2
fromEnum (AnotherBusType k) = k
toEnum 1 = BusTypeStarter
toEnum 0 = BusTypeNone
toEnum 1 = BusTypeSystem
toEnum 2 = BusTypeSession
toEnum k = AnotherBusType k
foreign import ccall "g_bus_type_get_type" c_g_bus_type_get_type ::
IO GType
instance BoxedEnum BusType where
boxedEnumType _ = c_g_bus_type_get_type