{-# LANGUAGE DeriveDataTypeable #-}
{-# LANGUAGE DeriveGeneric #-}
{-# LANGUAGE LambdaCase #-}
{-# LANGUAGE NoImplicitPrelude #-}
{-# LANGUAGE OverloadedStrings #-}
{-# OPTIONS_GHC -fno-warn-unused-imports #-}
module Network.Google.FireStore.Types.Sum where
import Network.Google.Prelude hiding (Bytes)
data GoogleFirestoreAdminV1IndexFieldOrder
= OrderUnspecified
| Ascending
| Descending
deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)
instance Hashable GoogleFirestoreAdminV1IndexFieldOrder
instance FromHttpApiData GoogleFirestoreAdminV1IndexFieldOrder where
parseQueryParam = \case
"ORDER_UNSPECIFIED" -> Right OrderUnspecified
"ASCENDING" -> Right Ascending
"DESCENDING" -> Right Descending
x -> Left ("Unable to parse GoogleFirestoreAdminV1IndexFieldOrder from: " <> x)
instance ToHttpApiData GoogleFirestoreAdminV1IndexFieldOrder where
toQueryParam = \case
OrderUnspecified -> "ORDER_UNSPECIFIED"
Ascending -> "ASCENDING"
Descending -> "DESCENDING"
instance FromJSON GoogleFirestoreAdminV1IndexFieldOrder where
parseJSON = parseJSONText "GoogleFirestoreAdminV1IndexFieldOrder"
instance ToJSON GoogleFirestoreAdminV1IndexFieldOrder where
toJSON = toJSONText
data GoogleFirestoreAdminV1IndexConfigDeltaChangeType
= ChangeTypeUnspecified
| Add
| Remove
deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)
instance Hashable GoogleFirestoreAdminV1IndexConfigDeltaChangeType
instance FromHttpApiData GoogleFirestoreAdminV1IndexConfigDeltaChangeType where
parseQueryParam = \case
"CHANGE_TYPE_UNSPECIFIED" -> Right ChangeTypeUnspecified
"ADD" -> Right Add
"REMOVE" -> Right Remove
x -> Left ("Unable to parse GoogleFirestoreAdminV1IndexConfigDeltaChangeType from: " <> x)
instance ToHttpApiData GoogleFirestoreAdminV1IndexConfigDeltaChangeType where
toQueryParam = \case
ChangeTypeUnspecified -> "CHANGE_TYPE_UNSPECIFIED"
Add -> "ADD"
Remove -> "REMOVE"
instance FromJSON GoogleFirestoreAdminV1IndexConfigDeltaChangeType where
parseJSON = parseJSONText "GoogleFirestoreAdminV1IndexConfigDeltaChangeType"
instance ToJSON GoogleFirestoreAdminV1IndexConfigDeltaChangeType where
toJSON = toJSONText
data GoogleFirestoreAdminV1IndexState
= StateUnspecified
| Creating
| Ready
| NeedsRepair
deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)
instance Hashable GoogleFirestoreAdminV1IndexState
instance FromHttpApiData GoogleFirestoreAdminV1IndexState where
parseQueryParam = \case
"STATE_UNSPECIFIED" -> Right StateUnspecified
"CREATING" -> Right Creating
"READY" -> Right Ready
"NEEDS_REPAIR" -> Right NeedsRepair
x -> Left ("Unable to parse GoogleFirestoreAdminV1IndexState from: " <> x)
instance ToHttpApiData GoogleFirestoreAdminV1IndexState where
toQueryParam = \case
StateUnspecified -> "STATE_UNSPECIFIED"
Creating -> "CREATING"
Ready -> "READY"
NeedsRepair -> "NEEDS_REPAIR"
instance FromJSON GoogleFirestoreAdminV1IndexState where
parseJSON = parseJSONText "GoogleFirestoreAdminV1IndexState"
instance ToJSON GoogleFirestoreAdminV1IndexState where
toJSON = toJSONText
data CompositeFilterOp
= OperatorUnspecified
| And
deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)
instance Hashable CompositeFilterOp
instance FromHttpApiData CompositeFilterOp where
parseQueryParam = \case
"OPERATOR_UNSPECIFIED" -> Right OperatorUnspecified
"AND" -> Right And
x -> Left ("Unable to parse CompositeFilterOp from: " <> x)
instance ToHttpApiData CompositeFilterOp where
toQueryParam = \case
OperatorUnspecified -> "OPERATOR_UNSPECIFIED"
And -> "AND"
instance FromJSON CompositeFilterOp where
parseJSON = parseJSONText "CompositeFilterOp"
instance ToJSON CompositeFilterOp where
toJSON = toJSONText
data GoogleFirestoreAdminV1IndexQueryScope
= QueryScopeUnspecified
| Collection
deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)
instance Hashable GoogleFirestoreAdminV1IndexQueryScope
instance FromHttpApiData GoogleFirestoreAdminV1IndexQueryScope where
parseQueryParam = \case
"QUERY_SCOPE_UNSPECIFIED" -> Right QueryScopeUnspecified
"COLLECTION" -> Right Collection
x -> Left ("Unable to parse GoogleFirestoreAdminV1IndexQueryScope from: " <> x)
instance ToHttpApiData GoogleFirestoreAdminV1IndexQueryScope where
toQueryParam = \case
QueryScopeUnspecified -> "QUERY_SCOPE_UNSPECIFIED"
Collection -> "COLLECTION"
instance FromJSON GoogleFirestoreAdminV1IndexQueryScope where
parseJSON = parseJSONText "GoogleFirestoreAdminV1IndexQueryScope"
instance ToJSON GoogleFirestoreAdminV1IndexQueryScope where
toJSON = toJSONText
data OrderDirection
= ODDirectionUnspecified
| ODAscending
| ODDescending
deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)
instance Hashable OrderDirection
instance FromHttpApiData OrderDirection where
parseQueryParam = \case
"DIRECTION_UNSPECIFIED" -> Right ODDirectionUnspecified
"ASCENDING" -> Right ODAscending
"DESCENDING" -> Right ODDescending
x -> Left ("Unable to parse OrderDirection from: " <> x)
instance ToHttpApiData OrderDirection where
toQueryParam = \case
ODDirectionUnspecified -> "DIRECTION_UNSPECIFIED"
ODAscending -> "ASCENDING"
ODDescending -> "DESCENDING"
instance FromJSON OrderDirection where
parseJSON = parseJSONText "OrderDirection"
instance ToJSON OrderDirection where
toJSON = toJSONText
data ValueNullValue
= NullValue
deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)
instance Hashable ValueNullValue
instance FromHttpApiData ValueNullValue where
parseQueryParam = \case
"NULL_VALUE" -> Right NullValue
x -> Left ("Unable to parse ValueNullValue from: " <> x)
instance ToHttpApiData ValueNullValue where
toQueryParam = \case
NullValue -> "NULL_VALUE"
instance FromJSON ValueNullValue where
parseJSON = parseJSONText "ValueNullValue"
instance ToJSON ValueNullValue where
toJSON = toJSONText
data UnaryFilterOp
= UFOOperatorUnspecified
| UFOIsNan
| UFOIsNull
deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)
instance Hashable UnaryFilterOp
instance FromHttpApiData UnaryFilterOp where
parseQueryParam = \case
"OPERATOR_UNSPECIFIED" -> Right UFOOperatorUnspecified
"IS_NAN" -> Right UFOIsNan
"IS_NULL" -> Right UFOIsNull
x -> Left ("Unable to parse UnaryFilterOp from: " <> x)
instance ToHttpApiData UnaryFilterOp where
toQueryParam = \case
UFOOperatorUnspecified -> "OPERATOR_UNSPECIFIED"
UFOIsNan -> "IS_NAN"
UFOIsNull -> "IS_NULL"
instance FromJSON UnaryFilterOp where
parseJSON = parseJSONText "UnaryFilterOp"
instance ToJSON UnaryFilterOp where
toJSON = toJSONText
data GoogleFirestoreAdminV1IndexFieldArrayConfig
= ArrayConfigUnspecified
| Contains
deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)
instance Hashable GoogleFirestoreAdminV1IndexFieldArrayConfig
instance FromHttpApiData GoogleFirestoreAdminV1IndexFieldArrayConfig where
parseQueryParam = \case
"ARRAY_CONFIG_UNSPECIFIED" -> Right ArrayConfigUnspecified
"CONTAINS" -> Right Contains
x -> Left ("Unable to parse GoogleFirestoreAdminV1IndexFieldArrayConfig from: " <> x)
instance ToHttpApiData GoogleFirestoreAdminV1IndexFieldArrayConfig where
toQueryParam = \case
ArrayConfigUnspecified -> "ARRAY_CONFIG_UNSPECIFIED"
Contains -> "CONTAINS"
instance FromJSON GoogleFirestoreAdminV1IndexFieldArrayConfig where
parseJSON = parseJSONText "GoogleFirestoreAdminV1IndexFieldArrayConfig"
instance ToJSON GoogleFirestoreAdminV1IndexFieldArrayConfig where
toJSON = toJSONText
data GoogleFirestoreAdminV1IndexOperationMetadataState
= OperationStateUnspecified
| Initializing
| Processing
| Cancelling
| Finalizing
| Successful
| Failed
| Cancelled
deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)
instance Hashable GoogleFirestoreAdminV1IndexOperationMetadataState
instance FromHttpApiData GoogleFirestoreAdminV1IndexOperationMetadataState where
parseQueryParam = \case
"OPERATION_STATE_UNSPECIFIED" -> Right OperationStateUnspecified
"INITIALIZING" -> Right Initializing
"PROCESSING" -> Right Processing
"CANCELLING" -> Right Cancelling
"FINALIZING" -> Right Finalizing
"SUCCESSFUL" -> Right Successful
"FAILED" -> Right Failed
"CANCELLED" -> Right Cancelled
x -> Left ("Unable to parse GoogleFirestoreAdminV1IndexOperationMetadataState from: " <> x)
instance ToHttpApiData GoogleFirestoreAdminV1IndexOperationMetadataState where
toQueryParam = \case
OperationStateUnspecified -> "OPERATION_STATE_UNSPECIFIED"
Initializing -> "INITIALIZING"
Processing -> "PROCESSING"
Cancelling -> "CANCELLING"
Finalizing -> "FINALIZING"
Successful -> "SUCCESSFUL"
Failed -> "FAILED"
Cancelled -> "CANCELLED"
instance FromJSON GoogleFirestoreAdminV1IndexOperationMetadataState where
parseJSON = parseJSONText "GoogleFirestoreAdminV1IndexOperationMetadataState"
instance ToJSON GoogleFirestoreAdminV1IndexOperationMetadataState where
toJSON = toJSONText
data Xgafv
= X1
| X2
deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)
instance Hashable Xgafv
instance FromHttpApiData Xgafv where
parseQueryParam = \case
"1" -> Right X1
"2" -> Right X2
x -> Left ("Unable to parse Xgafv from: " <> x)
instance ToHttpApiData Xgafv where
toQueryParam = \case
X1 -> "1"
X2 -> "2"
instance FromJSON Xgafv where
parseJSON = parseJSONText "Xgafv"
instance ToJSON Xgafv where
toJSON = toJSONText
data FieldFilterOp
= FFOOperatorUnspecified
| FFOLessThan
| FFOLessThanOrEqual
| FFOGreaterThan
| FFOGreaterThanOrEqual
| FFOEqual
| FFOArrayContains
deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)
instance Hashable FieldFilterOp
instance FromHttpApiData FieldFilterOp where
parseQueryParam = \case
"OPERATOR_UNSPECIFIED" -> Right FFOOperatorUnspecified
"LESS_THAN" -> Right FFOLessThan
"LESS_THAN_OR_EQUAL" -> Right FFOLessThanOrEqual
"GREATER_THAN" -> Right FFOGreaterThan
"GREATER_THAN_OR_EQUAL" -> Right FFOGreaterThanOrEqual
"EQUAL" -> Right FFOEqual
"ARRAY_CONTAINS" -> Right FFOArrayContains
x -> Left ("Unable to parse FieldFilterOp from: " <> x)
instance ToHttpApiData FieldFilterOp where
toQueryParam = \case
FFOOperatorUnspecified -> "OPERATOR_UNSPECIFIED"
FFOLessThan -> "LESS_THAN"
FFOLessThanOrEqual -> "LESS_THAN_OR_EQUAL"
FFOGreaterThan -> "GREATER_THAN"
FFOGreaterThanOrEqual -> "GREATER_THAN_OR_EQUAL"
FFOEqual -> "EQUAL"
FFOArrayContains -> "ARRAY_CONTAINS"
instance FromJSON FieldFilterOp where
parseJSON = parseJSONText "FieldFilterOp"
instance ToJSON FieldFilterOp where
toJSON = toJSONText
data TargetChangeTargetChangeType
= TCTCTNoChange
| TCTCTAdd
| TCTCTRemove
| TCTCTCurrent
| TCTCTReset
deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)
instance Hashable TargetChangeTargetChangeType
instance FromHttpApiData TargetChangeTargetChangeType where
parseQueryParam = \case
"NO_CHANGE" -> Right TCTCTNoChange
"ADD" -> Right TCTCTAdd
"REMOVE" -> Right TCTCTRemove
"CURRENT" -> Right TCTCTCurrent
"RESET" -> Right TCTCTReset
x -> Left ("Unable to parse TargetChangeTargetChangeType from: " <> x)
instance ToHttpApiData TargetChangeTargetChangeType where
toQueryParam = \case
TCTCTNoChange -> "NO_CHANGE"
TCTCTAdd -> "ADD"
TCTCTRemove -> "REMOVE"
TCTCTCurrent -> "CURRENT"
TCTCTReset -> "RESET"
instance FromJSON TargetChangeTargetChangeType where
parseJSON = parseJSONText "TargetChangeTargetChangeType"
instance ToJSON TargetChangeTargetChangeType where
toJSON = toJSONText
data GoogleFirestoreAdminV1ImportDocumentsMetadataOperationState
= GFAVIDMOSOperationStateUnspecified
| GFAVIDMOSInitializing
| GFAVIDMOSProcessing
| GFAVIDMOSCancelling
| GFAVIDMOSFinalizing
| GFAVIDMOSSuccessful
| GFAVIDMOSFailed
| GFAVIDMOSCancelled
deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)
instance Hashable GoogleFirestoreAdminV1ImportDocumentsMetadataOperationState
instance FromHttpApiData GoogleFirestoreAdminV1ImportDocumentsMetadataOperationState where
parseQueryParam = \case
"OPERATION_STATE_UNSPECIFIED" -> Right GFAVIDMOSOperationStateUnspecified
"INITIALIZING" -> Right GFAVIDMOSInitializing
"PROCESSING" -> Right GFAVIDMOSProcessing
"CANCELLING" -> Right GFAVIDMOSCancelling
"FINALIZING" -> Right GFAVIDMOSFinalizing
"SUCCESSFUL" -> Right GFAVIDMOSSuccessful
"FAILED" -> Right GFAVIDMOSFailed
"CANCELLED" -> Right GFAVIDMOSCancelled
x -> Left ("Unable to parse GoogleFirestoreAdminV1ImportDocumentsMetadataOperationState from: " <> x)
instance ToHttpApiData GoogleFirestoreAdminV1ImportDocumentsMetadataOperationState where
toQueryParam = \case
GFAVIDMOSOperationStateUnspecified -> "OPERATION_STATE_UNSPECIFIED"
GFAVIDMOSInitializing -> "INITIALIZING"
GFAVIDMOSProcessing -> "PROCESSING"
GFAVIDMOSCancelling -> "CANCELLING"
GFAVIDMOSFinalizing -> "FINALIZING"
GFAVIDMOSSuccessful -> "SUCCESSFUL"
GFAVIDMOSFailed -> "FAILED"
GFAVIDMOSCancelled -> "CANCELLED"
instance FromJSON GoogleFirestoreAdminV1ImportDocumentsMetadataOperationState where
parseJSON = parseJSONText "GoogleFirestoreAdminV1ImportDocumentsMetadataOperationState"
instance ToJSON GoogleFirestoreAdminV1ImportDocumentsMetadataOperationState where
toJSON = toJSONText
data GoogleFirestoreAdminV1FieldOperationMetadataState
= GFAVFOMSOperationStateUnspecified
| GFAVFOMSInitializing
| GFAVFOMSProcessing
| GFAVFOMSCancelling
| GFAVFOMSFinalizing
| GFAVFOMSSuccessful
| GFAVFOMSFailed
| GFAVFOMSCancelled
deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)
instance Hashable GoogleFirestoreAdminV1FieldOperationMetadataState
instance FromHttpApiData GoogleFirestoreAdminV1FieldOperationMetadataState where
parseQueryParam = \case
"OPERATION_STATE_UNSPECIFIED" -> Right GFAVFOMSOperationStateUnspecified
"INITIALIZING" -> Right GFAVFOMSInitializing
"PROCESSING" -> Right GFAVFOMSProcessing
"CANCELLING" -> Right GFAVFOMSCancelling
"FINALIZING" -> Right GFAVFOMSFinalizing
"SUCCESSFUL" -> Right GFAVFOMSSuccessful
"FAILED" -> Right GFAVFOMSFailed
"CANCELLED" -> Right GFAVFOMSCancelled
x -> Left ("Unable to parse GoogleFirestoreAdminV1FieldOperationMetadataState from: " <> x)
instance ToHttpApiData GoogleFirestoreAdminV1FieldOperationMetadataState where
toQueryParam = \case
GFAVFOMSOperationStateUnspecified -> "OPERATION_STATE_UNSPECIFIED"
GFAVFOMSInitializing -> "INITIALIZING"
GFAVFOMSProcessing -> "PROCESSING"
GFAVFOMSCancelling -> "CANCELLING"
GFAVFOMSFinalizing -> "FINALIZING"
GFAVFOMSSuccessful -> "SUCCESSFUL"
GFAVFOMSFailed -> "FAILED"
GFAVFOMSCancelled -> "CANCELLED"
instance FromJSON GoogleFirestoreAdminV1FieldOperationMetadataState where
parseJSON = parseJSONText "GoogleFirestoreAdminV1FieldOperationMetadataState"
instance ToJSON GoogleFirestoreAdminV1FieldOperationMetadataState where
toJSON = toJSONText
data FieldTransformSetToServerValue
= ServerValueUnspecified
| RequestTime
deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)
instance Hashable FieldTransformSetToServerValue
instance FromHttpApiData FieldTransformSetToServerValue where
parseQueryParam = \case
"SERVER_VALUE_UNSPECIFIED" -> Right ServerValueUnspecified
"REQUEST_TIME" -> Right RequestTime
x -> Left ("Unable to parse FieldTransformSetToServerValue from: " <> x)
instance ToHttpApiData FieldTransformSetToServerValue where
toQueryParam = \case
ServerValueUnspecified -> "SERVER_VALUE_UNSPECIFIED"
RequestTime -> "REQUEST_TIME"
instance FromJSON FieldTransformSetToServerValue where
parseJSON = parseJSONText "FieldTransformSetToServerValue"
instance ToJSON FieldTransformSetToServerValue where
toJSON = toJSONText
data GoogleFirestoreAdminV1ExportDocumentsMetadataOperationState
= GFAVEDMOSOperationStateUnspecified
| GFAVEDMOSInitializing
| GFAVEDMOSProcessing
| GFAVEDMOSCancelling
| GFAVEDMOSFinalizing
| GFAVEDMOSSuccessful
| GFAVEDMOSFailed
| GFAVEDMOSCancelled
deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)
instance Hashable GoogleFirestoreAdminV1ExportDocumentsMetadataOperationState
instance FromHttpApiData GoogleFirestoreAdminV1ExportDocumentsMetadataOperationState where
parseQueryParam = \case
"OPERATION_STATE_UNSPECIFIED" -> Right GFAVEDMOSOperationStateUnspecified
"INITIALIZING" -> Right GFAVEDMOSInitializing
"PROCESSING" -> Right GFAVEDMOSProcessing
"CANCELLING" -> Right GFAVEDMOSCancelling
"FINALIZING" -> Right GFAVEDMOSFinalizing
"SUCCESSFUL" -> Right GFAVEDMOSSuccessful
"FAILED" -> Right GFAVEDMOSFailed
"CANCELLED" -> Right GFAVEDMOSCancelled
x -> Left ("Unable to parse GoogleFirestoreAdminV1ExportDocumentsMetadataOperationState from: " <> x)
instance ToHttpApiData GoogleFirestoreAdminV1ExportDocumentsMetadataOperationState where
toQueryParam = \case
GFAVEDMOSOperationStateUnspecified -> "OPERATION_STATE_UNSPECIFIED"
GFAVEDMOSInitializing -> "INITIALIZING"
GFAVEDMOSProcessing -> "PROCESSING"
GFAVEDMOSCancelling -> "CANCELLING"
GFAVEDMOSFinalizing -> "FINALIZING"
GFAVEDMOSSuccessful -> "SUCCESSFUL"
GFAVEDMOSFailed -> "FAILED"
GFAVEDMOSCancelled -> "CANCELLED"
instance FromJSON GoogleFirestoreAdminV1ExportDocumentsMetadataOperationState where
parseJSON = parseJSONText "GoogleFirestoreAdminV1ExportDocumentsMetadataOperationState"
instance ToJSON GoogleFirestoreAdminV1ExportDocumentsMetadataOperationState where
toJSON = toJSONText