{-# OPTIONS_GHC -fno-warn-missing-signatures #-}
module FoundationDB.Options.DatabaseOption where
import Data.ByteString.Char8 (ByteString)
data DatabaseOption
= DatabaseOptionString Int String
| DatabaseOptionInt Int Int
| DatabaseOptionBytes Int ByteString
| DatabaseOptionFlag Int
deriving (Int -> DatabaseOption -> ShowS
[DatabaseOption] -> ShowS
DatabaseOption -> String
(Int -> DatabaseOption -> ShowS)
-> (DatabaseOption -> String)
-> ([DatabaseOption] -> ShowS)
-> Show DatabaseOption
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [DatabaseOption] -> ShowS
$cshowList :: [DatabaseOption] -> ShowS
show :: DatabaseOption -> String
$cshow :: DatabaseOption -> String
showsPrec :: Int -> DatabaseOption -> ShowS
$cshowsPrec :: Int -> DatabaseOption -> ShowS
Show, ReadPrec [DatabaseOption]
ReadPrec DatabaseOption
Int -> ReadS DatabaseOption
ReadS [DatabaseOption]
(Int -> ReadS DatabaseOption)
-> ReadS [DatabaseOption]
-> ReadPrec DatabaseOption
-> ReadPrec [DatabaseOption]
-> Read DatabaseOption
forall a.
(Int -> ReadS a)
-> ReadS [a] -> ReadPrec a -> ReadPrec [a] -> Read a
readListPrec :: ReadPrec [DatabaseOption]
$creadListPrec :: ReadPrec [DatabaseOption]
readPrec :: ReadPrec DatabaseOption
$creadPrec :: ReadPrec DatabaseOption
readList :: ReadS [DatabaseOption]
$creadList :: ReadS [DatabaseOption]
readsPrec :: Int -> ReadS DatabaseOption
$creadsPrec :: Int -> ReadS DatabaseOption
Read, DatabaseOption -> DatabaseOption -> Bool
(DatabaseOption -> DatabaseOption -> Bool)
-> (DatabaseOption -> DatabaseOption -> Bool) -> Eq DatabaseOption
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: DatabaseOption -> DatabaseOption -> Bool
$c/= :: DatabaseOption -> DatabaseOption -> Bool
== :: DatabaseOption -> DatabaseOption -> Bool
$c== :: DatabaseOption -> DatabaseOption -> Bool
Eq, Eq DatabaseOption
Eq DatabaseOption
-> (DatabaseOption -> DatabaseOption -> Ordering)
-> (DatabaseOption -> DatabaseOption -> Bool)
-> (DatabaseOption -> DatabaseOption -> Bool)
-> (DatabaseOption -> DatabaseOption -> Bool)
-> (DatabaseOption -> DatabaseOption -> Bool)
-> (DatabaseOption -> DatabaseOption -> DatabaseOption)
-> (DatabaseOption -> DatabaseOption -> DatabaseOption)
-> Ord DatabaseOption
DatabaseOption -> DatabaseOption -> Bool
DatabaseOption -> DatabaseOption -> Ordering
DatabaseOption -> DatabaseOption -> DatabaseOption
forall a.
Eq a
-> (a -> a -> Ordering)
-> (a -> a -> Bool)
-> (a -> a -> Bool)
-> (a -> a -> Bool)
-> (a -> a -> Bool)
-> (a -> a -> a)
-> (a -> a -> a)
-> Ord a
min :: DatabaseOption -> DatabaseOption -> DatabaseOption
$cmin :: DatabaseOption -> DatabaseOption -> DatabaseOption
max :: DatabaseOption -> DatabaseOption -> DatabaseOption
$cmax :: DatabaseOption -> DatabaseOption -> DatabaseOption
>= :: DatabaseOption -> DatabaseOption -> Bool
$c>= :: DatabaseOption -> DatabaseOption -> Bool
> :: DatabaseOption -> DatabaseOption -> Bool
$c> :: DatabaseOption -> DatabaseOption -> Bool
<= :: DatabaseOption -> DatabaseOption -> Bool
$c<= :: DatabaseOption -> DatabaseOption -> Bool
< :: DatabaseOption -> DatabaseOption -> Bool
$c< :: DatabaseOption -> DatabaseOption -> Bool
compare :: DatabaseOption -> DatabaseOption -> Ordering
$ccompare :: DatabaseOption -> DatabaseOption -> Ordering
$cp1Ord :: Eq DatabaseOption
Ord)
locationCacheSize :: Int -> DatabaseOption
locationCacheSize Int
i = Int -> Int -> DatabaseOption
DatabaseOptionInt (Int
10) Int
i
maxWatches :: Int -> DatabaseOption
maxWatches Int
i = Int -> Int -> DatabaseOption
DatabaseOptionInt (Int
20) Int
i
machineId :: String -> DatabaseOption
machineId String
str = Int -> String -> DatabaseOption
DatabaseOptionString (Int
21) String
str
datacenterId :: String -> DatabaseOption
datacenterId String
str = Int -> String -> DatabaseOption
DatabaseOptionString (Int
22) String
str
snapshotRywEnable :: DatabaseOption
snapshotRywEnable = Int -> DatabaseOption
DatabaseOptionFlag (Int
26)
snapshotRywDisable :: DatabaseOption
snapshotRywDisable = Int -> DatabaseOption
DatabaseOptionFlag (Int
27)
transactionLoggingMaxFieldLength :: Int -> DatabaseOption
transactionLoggingMaxFieldLength Int
i = Int -> Int -> DatabaseOption
DatabaseOptionInt (Int
405) Int
i
transactionTimeout :: Int -> DatabaseOption
transactionTimeout Int
i = Int -> Int -> DatabaseOption
DatabaseOptionInt (Int
500) Int
i
transactionRetryLimit :: Int -> DatabaseOption
transactionRetryLimit Int
i = Int -> Int -> DatabaseOption
DatabaseOptionInt (Int
501) Int
i
transactionMaxRetryDelay :: Int -> DatabaseOption
transactionMaxRetryDelay Int
i = Int -> Int -> DatabaseOption
DatabaseOptionInt (Int
502) Int
i
transactionSizeLimit :: Int -> DatabaseOption
transactionSizeLimit Int
i = Int -> Int -> DatabaseOption
DatabaseOptionInt (Int
503) Int
i
transactionCausalReadRisky :: DatabaseOption
transactionCausalReadRisky = Int -> DatabaseOption
DatabaseOptionFlag (Int
504)
transactionIncludePortInAddress :: DatabaseOption
transactionIncludePortInAddress = Int -> DatabaseOption
DatabaseOptionFlag (Int
505)
transactionBypassUnreadable :: DatabaseOption
transactionBypassUnreadable = Int -> DatabaseOption
DatabaseOptionFlag (Int
700)
useConfigDatabase :: DatabaseOption
useConfigDatabase = Int -> DatabaseOption
DatabaseOptionFlag (Int
800)
testCausalReadRisky :: DatabaseOption
testCausalReadRisky = Int -> DatabaseOption
DatabaseOptionFlag (Int
900)