{-# LANGUAGE DeriveAnyClass #-}

module Hercules.API.Accounts.CLIAuthorizationRequestStatus where

import Hercules.API.Prelude

data CLIAuthorization = CLIAuthorization
  { CLIAuthorization -> Text
token :: Text,
    CLIAuthorization -> [Text]
userIdentities :: [Text]
  }
  deriving (forall x. Rep CLIAuthorization x -> CLIAuthorization
forall x. CLIAuthorization -> Rep CLIAuthorization x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x. Rep CLIAuthorization x -> CLIAuthorization
$cfrom :: forall x. CLIAuthorization -> Rep CLIAuthorization x
Generic, Int -> CLIAuthorization -> ShowS
[CLIAuthorization] -> ShowS
CLIAuthorization -> String
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [CLIAuthorization] -> ShowS
$cshowList :: [CLIAuthorization] -> ShowS
show :: CLIAuthorization -> String
$cshow :: CLIAuthorization -> String
showsPrec :: Int -> CLIAuthorization -> ShowS
$cshowsPrec :: Int -> CLIAuthorization -> ShowS
Show, CLIAuthorization -> CLIAuthorization -> Bool
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: CLIAuthorization -> CLIAuthorization -> Bool
$c/= :: CLIAuthorization -> CLIAuthorization -> Bool
== :: CLIAuthorization -> CLIAuthorization -> Bool
$c== :: CLIAuthorization -> CLIAuthorization -> Bool
Eq, CLIAuthorization -> ()
forall a. (a -> ()) -> NFData a
rnf :: CLIAuthorization -> ()
$crnf :: CLIAuthorization -> ()
NFData, [CLIAuthorization] -> Encoding
[CLIAuthorization] -> Value
CLIAuthorization -> Encoding
CLIAuthorization -> Value
forall a.
(a -> Value)
-> (a -> Encoding)
-> ([a] -> Value)
-> ([a] -> Encoding)
-> ToJSON a
toEncodingList :: [CLIAuthorization] -> Encoding
$ctoEncodingList :: [CLIAuthorization] -> Encoding
toJSONList :: [CLIAuthorization] -> Value
$ctoJSONList :: [CLIAuthorization] -> Value
toEncoding :: CLIAuthorization -> Encoding
$ctoEncoding :: CLIAuthorization -> Encoding
toJSON :: CLIAuthorization -> Value
$ctoJSON :: CLIAuthorization -> Value
ToJSON, Value -> Parser [CLIAuthorization]
Value -> Parser CLIAuthorization
forall a.
(Value -> Parser a) -> (Value -> Parser [a]) -> FromJSON a
parseJSONList :: Value -> Parser [CLIAuthorization]
$cparseJSONList :: Value -> Parser [CLIAuthorization]
parseJSON :: Value -> Parser CLIAuthorization
$cparseJSON :: Value -> Parser CLIAuthorization
FromJSON, Proxy CLIAuthorization -> Declare (Definitions Schema) NamedSchema
forall a.
(Proxy a -> Declare (Definitions Schema) NamedSchema) -> ToSchema a
declareNamedSchema :: Proxy CLIAuthorization -> Declare (Definitions Schema) NamedSchema
$cdeclareNamedSchema :: Proxy CLIAuthorization -> Declare (Definitions Schema) NamedSchema
ToSchema)

data CLIAuthorizationStatus = Pending () | Granted CLIAuthorization
  deriving (forall x. Rep CLIAuthorizationStatus x -> CLIAuthorizationStatus
forall x. CLIAuthorizationStatus -> Rep CLIAuthorizationStatus x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x. Rep CLIAuthorizationStatus x -> CLIAuthorizationStatus
$cfrom :: forall x. CLIAuthorizationStatus -> Rep CLIAuthorizationStatus x
Generic, Int -> CLIAuthorizationStatus -> ShowS
[CLIAuthorizationStatus] -> ShowS
CLIAuthorizationStatus -> String
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [CLIAuthorizationStatus] -> ShowS
$cshowList :: [CLIAuthorizationStatus] -> ShowS
show :: CLIAuthorizationStatus -> String
$cshow :: CLIAuthorizationStatus -> String
showsPrec :: Int -> CLIAuthorizationStatus -> ShowS
$cshowsPrec :: Int -> CLIAuthorizationStatus -> ShowS
Show, CLIAuthorizationStatus -> CLIAuthorizationStatus -> Bool
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: CLIAuthorizationStatus -> CLIAuthorizationStatus -> Bool
$c/= :: CLIAuthorizationStatus -> CLIAuthorizationStatus -> Bool
== :: CLIAuthorizationStatus -> CLIAuthorizationStatus -> Bool
$c== :: CLIAuthorizationStatus -> CLIAuthorizationStatus -> Bool
Eq, CLIAuthorizationStatus -> ()
forall a. (a -> ()) -> NFData a
rnf :: CLIAuthorizationStatus -> ()
$crnf :: CLIAuthorizationStatus -> ()
NFData, [CLIAuthorizationStatus] -> Encoding
[CLIAuthorizationStatus] -> Value
CLIAuthorizationStatus -> Encoding
CLIAuthorizationStatus -> Value
forall a.
(a -> Value)
-> (a -> Encoding)
-> ([a] -> Value)
-> ([a] -> Encoding)
-> ToJSON a
toEncodingList :: [CLIAuthorizationStatus] -> Encoding
$ctoEncodingList :: [CLIAuthorizationStatus] -> Encoding
toJSONList :: [CLIAuthorizationStatus] -> Value
$ctoJSONList :: [CLIAuthorizationStatus] -> Value
toEncoding :: CLIAuthorizationStatus -> Encoding
$ctoEncoding :: CLIAuthorizationStatus -> Encoding
toJSON :: CLIAuthorizationStatus -> Value
$ctoJSON :: CLIAuthorizationStatus -> Value
ToJSON, Value -> Parser [CLIAuthorizationStatus]
Value -> Parser CLIAuthorizationStatus
forall a.
(Value -> Parser a) -> (Value -> Parser [a]) -> FromJSON a
parseJSONList :: Value -> Parser [CLIAuthorizationStatus]
$cparseJSONList :: Value -> Parser [CLIAuthorizationStatus]
parseJSON :: Value -> Parser CLIAuthorizationStatus
$cparseJSON :: Value -> Parser CLIAuthorizationStatus
FromJSON, Proxy CLIAuthorizationStatus
-> Declare (Definitions Schema) NamedSchema
forall a.
(Proxy a -> Declare (Definitions Schema) NamedSchema) -> ToSchema a
declareNamedSchema :: Proxy CLIAuthorizationStatus
-> Declare (Definitions Schema) NamedSchema
$cdeclareNamedSchema :: Proxy CLIAuthorizationStatus
-> Declare (Definitions Schema) NamedSchema
ToSchema)

data CLIAuthorizationRequestStatus = CLIAuthorizationRequestStatus
  { CLIAuthorizationRequestStatus -> CLIAuthorizationStatus
status :: CLIAuthorizationStatus
  }
  deriving (forall x.
Rep CLIAuthorizationRequestStatus x
-> CLIAuthorizationRequestStatus
forall x.
CLIAuthorizationRequestStatus
-> Rep CLIAuthorizationRequestStatus x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x.
Rep CLIAuthorizationRequestStatus x
-> CLIAuthorizationRequestStatus
$cfrom :: forall x.
CLIAuthorizationRequestStatus
-> Rep CLIAuthorizationRequestStatus x
Generic, Int -> CLIAuthorizationRequestStatus -> ShowS
[CLIAuthorizationRequestStatus] -> ShowS
CLIAuthorizationRequestStatus -> String
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [CLIAuthorizationRequestStatus] -> ShowS
$cshowList :: [CLIAuthorizationRequestStatus] -> ShowS
show :: CLIAuthorizationRequestStatus -> String
$cshow :: CLIAuthorizationRequestStatus -> String
showsPrec :: Int -> CLIAuthorizationRequestStatus -> ShowS
$cshowsPrec :: Int -> CLIAuthorizationRequestStatus -> ShowS
Show, CLIAuthorizationRequestStatus
-> CLIAuthorizationRequestStatus -> Bool
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: CLIAuthorizationRequestStatus
-> CLIAuthorizationRequestStatus -> Bool
$c/= :: CLIAuthorizationRequestStatus
-> CLIAuthorizationRequestStatus -> Bool
== :: CLIAuthorizationRequestStatus
-> CLIAuthorizationRequestStatus -> Bool
$c== :: CLIAuthorizationRequestStatus
-> CLIAuthorizationRequestStatus -> Bool
Eq, CLIAuthorizationRequestStatus -> ()
forall a. (a -> ()) -> NFData a
rnf :: CLIAuthorizationRequestStatus -> ()
$crnf :: CLIAuthorizationRequestStatus -> ()
NFData, [CLIAuthorizationRequestStatus] -> Encoding
[CLIAuthorizationRequestStatus] -> Value
CLIAuthorizationRequestStatus -> Encoding
CLIAuthorizationRequestStatus -> Value
forall a.
(a -> Value)
-> (a -> Encoding)
-> ([a] -> Value)
-> ([a] -> Encoding)
-> ToJSON a
toEncodingList :: [CLIAuthorizationRequestStatus] -> Encoding
$ctoEncodingList :: [CLIAuthorizationRequestStatus] -> Encoding
toJSONList :: [CLIAuthorizationRequestStatus] -> Value
$ctoJSONList :: [CLIAuthorizationRequestStatus] -> Value
toEncoding :: CLIAuthorizationRequestStatus -> Encoding
$ctoEncoding :: CLIAuthorizationRequestStatus -> Encoding
toJSON :: CLIAuthorizationRequestStatus -> Value
$ctoJSON :: CLIAuthorizationRequestStatus -> Value
ToJSON, Value -> Parser [CLIAuthorizationRequestStatus]
Value -> Parser CLIAuthorizationRequestStatus
forall a.
(Value -> Parser a) -> (Value -> Parser [a]) -> FromJSON a
parseJSONList :: Value -> Parser [CLIAuthorizationRequestStatus]
$cparseJSONList :: Value -> Parser [CLIAuthorizationRequestStatus]
parseJSON :: Value -> Parser CLIAuthorizationRequestStatus
$cparseJSON :: Value -> Parser CLIAuthorizationRequestStatus
FromJSON, Proxy CLIAuthorizationRequestStatus
-> Declare (Definitions Schema) NamedSchema
forall a.
(Proxy a -> Declare (Definitions Schema) NamedSchema) -> ToSchema a
declareNamedSchema :: Proxy CLIAuthorizationRequestStatus
-> Declare (Definitions Schema) NamedSchema
$cdeclareNamedSchema :: Proxy CLIAuthorizationRequestStatus
-> Declare (Definitions Schema) NamedSchema
ToSchema)