module Stratosphere.EC2.NetworkInsightsAccessScope.PacketHeaderStatementRequestProperty (
        PacketHeaderStatementRequestProperty(..),
        mkPacketHeaderStatementRequestProperty
    ) where
import qualified Data.Aeson as JSON
import qualified Stratosphere.Prelude as Prelude
import Stratosphere.Property
import Stratosphere.ResourceProperties
import Stratosphere.Value
data PacketHeaderStatementRequestProperty
  = -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-ec2-networkinsightsaccessscope-packetheaderstatementrequest.html>
    PacketHeaderStatementRequestProperty {PacketHeaderStatementRequestProperty -> ()
haddock_workaround_ :: (),
                                          -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-ec2-networkinsightsaccessscope-packetheaderstatementrequest.html#cfn-ec2-networkinsightsaccessscope-packetheaderstatementrequest-destinationaddresses>
                                          PacketHeaderStatementRequestProperty -> Maybe (ValueList Text)
destinationAddresses :: (Prelude.Maybe (ValueList Prelude.Text)),
                                          -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-ec2-networkinsightsaccessscope-packetheaderstatementrequest.html#cfn-ec2-networkinsightsaccessscope-packetheaderstatementrequest-destinationports>
                                          PacketHeaderStatementRequestProperty -> Maybe (ValueList Text)
destinationPorts :: (Prelude.Maybe (ValueList Prelude.Text)),
                                          -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-ec2-networkinsightsaccessscope-packetheaderstatementrequest.html#cfn-ec2-networkinsightsaccessscope-packetheaderstatementrequest-destinationprefixlists>
                                          PacketHeaderStatementRequestProperty -> Maybe (ValueList Text)
destinationPrefixLists :: (Prelude.Maybe (ValueList Prelude.Text)),
                                          -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-ec2-networkinsightsaccessscope-packetheaderstatementrequest.html#cfn-ec2-networkinsightsaccessscope-packetheaderstatementrequest-protocols>
                                          PacketHeaderStatementRequestProperty -> Maybe (ValueList Text)
protocols :: (Prelude.Maybe (ValueList Prelude.Text)),
                                          -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-ec2-networkinsightsaccessscope-packetheaderstatementrequest.html#cfn-ec2-networkinsightsaccessscope-packetheaderstatementrequest-sourceaddresses>
                                          PacketHeaderStatementRequestProperty -> Maybe (ValueList Text)
sourceAddresses :: (Prelude.Maybe (ValueList Prelude.Text)),
                                          -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-ec2-networkinsightsaccessscope-packetheaderstatementrequest.html#cfn-ec2-networkinsightsaccessscope-packetheaderstatementrequest-sourceports>
                                          PacketHeaderStatementRequestProperty -> Maybe (ValueList Text)
sourcePorts :: (Prelude.Maybe (ValueList Prelude.Text)),
                                          -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-ec2-networkinsightsaccessscope-packetheaderstatementrequest.html#cfn-ec2-networkinsightsaccessscope-packetheaderstatementrequest-sourceprefixlists>
                                          PacketHeaderStatementRequestProperty -> Maybe (ValueList Text)
sourcePrefixLists :: (Prelude.Maybe (ValueList Prelude.Text))}
  deriving stock (PacketHeaderStatementRequestProperty
-> PacketHeaderStatementRequestProperty -> Bool
(PacketHeaderStatementRequestProperty
 -> PacketHeaderStatementRequestProperty -> Bool)
-> (PacketHeaderStatementRequestProperty
    -> PacketHeaderStatementRequestProperty -> Bool)
-> Eq PacketHeaderStatementRequestProperty
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: PacketHeaderStatementRequestProperty
-> PacketHeaderStatementRequestProperty -> Bool
== :: PacketHeaderStatementRequestProperty
-> PacketHeaderStatementRequestProperty -> Bool
$c/= :: PacketHeaderStatementRequestProperty
-> PacketHeaderStatementRequestProperty -> Bool
/= :: PacketHeaderStatementRequestProperty
-> PacketHeaderStatementRequestProperty -> Bool
Prelude.Eq, Int -> PacketHeaderStatementRequestProperty -> ShowS
[PacketHeaderStatementRequestProperty] -> ShowS
PacketHeaderStatementRequestProperty -> String
(Int -> PacketHeaderStatementRequestProperty -> ShowS)
-> (PacketHeaderStatementRequestProperty -> String)
-> ([PacketHeaderStatementRequestProperty] -> ShowS)
-> Show PacketHeaderStatementRequestProperty
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
$cshowsPrec :: Int -> PacketHeaderStatementRequestProperty -> ShowS
showsPrec :: Int -> PacketHeaderStatementRequestProperty -> ShowS
$cshow :: PacketHeaderStatementRequestProperty -> String
show :: PacketHeaderStatementRequestProperty -> String
$cshowList :: [PacketHeaderStatementRequestProperty] -> ShowS
showList :: [PacketHeaderStatementRequestProperty] -> ShowS
Prelude.Show)
mkPacketHeaderStatementRequestProperty ::
  PacketHeaderStatementRequestProperty
mkPacketHeaderStatementRequestProperty :: PacketHeaderStatementRequestProperty
mkPacketHeaderStatementRequestProperty
  = PacketHeaderStatementRequestProperty
      {haddock_workaround_ :: ()
haddock_workaround_ = (), destinationAddresses :: Maybe (ValueList Text)
destinationAddresses = Maybe (ValueList Text)
forall a. Maybe a
Prelude.Nothing,
       destinationPorts :: Maybe (ValueList Text)
destinationPorts = Maybe (ValueList Text)
forall a. Maybe a
Prelude.Nothing,
       destinationPrefixLists :: Maybe (ValueList Text)
destinationPrefixLists = Maybe (ValueList Text)
forall a. Maybe a
Prelude.Nothing,
       protocols :: Maybe (ValueList Text)
protocols = Maybe (ValueList Text)
forall a. Maybe a
Prelude.Nothing, sourceAddresses :: Maybe (ValueList Text)
sourceAddresses = Maybe (ValueList Text)
forall a. Maybe a
Prelude.Nothing,
       sourcePorts :: Maybe (ValueList Text)
sourcePorts = Maybe (ValueList Text)
forall a. Maybe a
Prelude.Nothing, sourcePrefixLists :: Maybe (ValueList Text)
sourcePrefixLists = Maybe (ValueList Text)
forall a. Maybe a
Prelude.Nothing}
instance ToResourceProperties PacketHeaderStatementRequestProperty where
  toResourceProperties :: PacketHeaderStatementRequestProperty -> ResourceProperties
toResourceProperties PacketHeaderStatementRequestProperty {Maybe (ValueList Text)
()
haddock_workaround_ :: PacketHeaderStatementRequestProperty -> ()
destinationAddresses :: PacketHeaderStatementRequestProperty -> Maybe (ValueList Text)
destinationPorts :: PacketHeaderStatementRequestProperty -> Maybe (ValueList Text)
destinationPrefixLists :: PacketHeaderStatementRequestProperty -> Maybe (ValueList Text)
protocols :: PacketHeaderStatementRequestProperty -> Maybe (ValueList Text)
sourceAddresses :: PacketHeaderStatementRequestProperty -> Maybe (ValueList Text)
sourcePorts :: PacketHeaderStatementRequestProperty -> Maybe (ValueList Text)
sourcePrefixLists :: PacketHeaderStatementRequestProperty -> Maybe (ValueList Text)
haddock_workaround_ :: ()
destinationAddresses :: Maybe (ValueList Text)
destinationPorts :: Maybe (ValueList Text)
destinationPrefixLists :: Maybe (ValueList Text)
protocols :: Maybe (ValueList Text)
sourceAddresses :: Maybe (ValueList Text)
sourcePorts :: Maybe (ValueList Text)
sourcePrefixLists :: Maybe (ValueList Text)
..}
    = ResourceProperties
        {awsType :: Text
awsType = Text
"AWS::EC2::NetworkInsightsAccessScope.PacketHeaderStatementRequest",
         supportsTags :: Bool
supportsTags = Bool
Prelude.False,
         properties :: Object
properties = [Item Object] -> Object
forall l. IsList l => [Item l] -> l
Prelude.fromList
                        ([Maybe (Key, Value)] -> [(Key, Value)]
forall a. [Maybe a] -> [a]
Prelude.catMaybes
                           [Key -> ValueList Text -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"DestinationAddresses" (ValueList Text -> (Key, Value))
-> Maybe (ValueList Text) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (ValueList Text)
destinationAddresses,
                            Key -> ValueList Text -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"DestinationPorts" (ValueList Text -> (Key, Value))
-> Maybe (ValueList Text) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (ValueList Text)
destinationPorts,
                            Key -> ValueList Text -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"DestinationPrefixLists"
                              (ValueList Text -> (Key, Value))
-> Maybe (ValueList Text) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (ValueList Text)
destinationPrefixLists,
                            Key -> ValueList Text -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"Protocols" (ValueList Text -> (Key, Value))
-> Maybe (ValueList Text) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (ValueList Text)
protocols,
                            Key -> ValueList Text -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"SourceAddresses" (ValueList Text -> (Key, Value))
-> Maybe (ValueList Text) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (ValueList Text)
sourceAddresses,
                            Key -> ValueList Text -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"SourcePorts" (ValueList Text -> (Key, Value))
-> Maybe (ValueList Text) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (ValueList Text)
sourcePorts,
                            Key -> ValueList Text -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"SourcePrefixLists" (ValueList Text -> (Key, Value))
-> Maybe (ValueList Text) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (ValueList Text)
sourcePrefixLists])}
instance JSON.ToJSON PacketHeaderStatementRequestProperty where
  toJSON :: PacketHeaderStatementRequestProperty -> Value
toJSON PacketHeaderStatementRequestProperty {Maybe (ValueList Text)
()
haddock_workaround_ :: PacketHeaderStatementRequestProperty -> ()
destinationAddresses :: PacketHeaderStatementRequestProperty -> Maybe (ValueList Text)
destinationPorts :: PacketHeaderStatementRequestProperty -> Maybe (ValueList Text)
destinationPrefixLists :: PacketHeaderStatementRequestProperty -> Maybe (ValueList Text)
protocols :: PacketHeaderStatementRequestProperty -> Maybe (ValueList Text)
sourceAddresses :: PacketHeaderStatementRequestProperty -> Maybe (ValueList Text)
sourcePorts :: PacketHeaderStatementRequestProperty -> Maybe (ValueList Text)
sourcePrefixLists :: PacketHeaderStatementRequestProperty -> Maybe (ValueList Text)
haddock_workaround_ :: ()
destinationAddresses :: Maybe (ValueList Text)
destinationPorts :: Maybe (ValueList Text)
destinationPrefixLists :: Maybe (ValueList Text)
protocols :: Maybe (ValueList Text)
sourceAddresses :: Maybe (ValueList Text)
sourcePorts :: Maybe (ValueList Text)
sourcePrefixLists :: Maybe (ValueList Text)
..}
    = [(Key, Value)] -> Value
JSON.object
        ([Item [(Key, Value)]] -> [(Key, Value)]
forall l. IsList l => [Item l] -> l
Prelude.fromList
           ([Maybe (Key, Value)] -> [(Key, Value)]
forall a. [Maybe a] -> [a]
Prelude.catMaybes
              [Key -> ValueList Text -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"DestinationAddresses" (ValueList Text -> (Key, Value))
-> Maybe (ValueList Text) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (ValueList Text)
destinationAddresses,
               Key -> ValueList Text -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"DestinationPorts" (ValueList Text -> (Key, Value))
-> Maybe (ValueList Text) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (ValueList Text)
destinationPorts,
               Key -> ValueList Text -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"DestinationPrefixLists"
                 (ValueList Text -> (Key, Value))
-> Maybe (ValueList Text) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (ValueList Text)
destinationPrefixLists,
               Key -> ValueList Text -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"Protocols" (ValueList Text -> (Key, Value))
-> Maybe (ValueList Text) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (ValueList Text)
protocols,
               Key -> ValueList Text -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"SourceAddresses" (ValueList Text -> (Key, Value))
-> Maybe (ValueList Text) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (ValueList Text)
sourceAddresses,
               Key -> ValueList Text -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"SourcePorts" (ValueList Text -> (Key, Value))
-> Maybe (ValueList Text) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (ValueList Text)
sourcePorts,
               Key -> ValueList Text -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"SourcePrefixLists" (ValueList Text -> (Key, Value))
-> Maybe (ValueList Text) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (ValueList Text)
sourcePrefixLists]))
instance Property "DestinationAddresses" PacketHeaderStatementRequestProperty where
  type PropertyType "DestinationAddresses" PacketHeaderStatementRequestProperty = ValueList Prelude.Text
  set :: PropertyType
  "DestinationAddresses" PacketHeaderStatementRequestProperty
-> PacketHeaderStatementRequestProperty
-> PacketHeaderStatementRequestProperty
set PropertyType
  "DestinationAddresses" PacketHeaderStatementRequestProperty
newValue PacketHeaderStatementRequestProperty {Maybe (ValueList Text)
()
haddock_workaround_ :: PacketHeaderStatementRequestProperty -> ()
destinationAddresses :: PacketHeaderStatementRequestProperty -> Maybe (ValueList Text)
destinationPorts :: PacketHeaderStatementRequestProperty -> Maybe (ValueList Text)
destinationPrefixLists :: PacketHeaderStatementRequestProperty -> Maybe (ValueList Text)
protocols :: PacketHeaderStatementRequestProperty -> Maybe (ValueList Text)
sourceAddresses :: PacketHeaderStatementRequestProperty -> Maybe (ValueList Text)
sourcePorts :: PacketHeaderStatementRequestProperty -> Maybe (ValueList Text)
sourcePrefixLists :: PacketHeaderStatementRequestProperty -> Maybe (ValueList Text)
haddock_workaround_ :: ()
destinationAddresses :: Maybe (ValueList Text)
destinationPorts :: Maybe (ValueList Text)
destinationPrefixLists :: Maybe (ValueList Text)
protocols :: Maybe (ValueList Text)
sourceAddresses :: Maybe (ValueList Text)
sourcePorts :: Maybe (ValueList Text)
sourcePrefixLists :: Maybe (ValueList Text)
..}
    = PacketHeaderStatementRequestProperty
        {destinationAddresses :: Maybe (ValueList Text)
destinationAddresses = ValueList Text -> Maybe (ValueList Text)
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType
  "DestinationAddresses" PacketHeaderStatementRequestProperty
ValueList Text
newValue, Maybe (ValueList Text)
()
haddock_workaround_ :: ()
destinationPorts :: Maybe (ValueList Text)
destinationPrefixLists :: Maybe (ValueList Text)
protocols :: Maybe (ValueList Text)
sourceAddresses :: Maybe (ValueList Text)
sourcePorts :: Maybe (ValueList Text)
sourcePrefixLists :: Maybe (ValueList Text)
haddock_workaround_ :: ()
destinationPorts :: Maybe (ValueList Text)
destinationPrefixLists :: Maybe (ValueList Text)
protocols :: Maybe (ValueList Text)
sourceAddresses :: Maybe (ValueList Text)
sourcePorts :: Maybe (ValueList Text)
sourcePrefixLists :: Maybe (ValueList Text)
..}
instance Property "DestinationPorts" PacketHeaderStatementRequestProperty where
  type PropertyType "DestinationPorts" PacketHeaderStatementRequestProperty = ValueList Prelude.Text
  set :: PropertyType
  "DestinationPorts" PacketHeaderStatementRequestProperty
-> PacketHeaderStatementRequestProperty
-> PacketHeaderStatementRequestProperty
set PropertyType
  "DestinationPorts" PacketHeaderStatementRequestProperty
newValue PacketHeaderStatementRequestProperty {Maybe (ValueList Text)
()
haddock_workaround_ :: PacketHeaderStatementRequestProperty -> ()
destinationAddresses :: PacketHeaderStatementRequestProperty -> Maybe (ValueList Text)
destinationPorts :: PacketHeaderStatementRequestProperty -> Maybe (ValueList Text)
destinationPrefixLists :: PacketHeaderStatementRequestProperty -> Maybe (ValueList Text)
protocols :: PacketHeaderStatementRequestProperty -> Maybe (ValueList Text)
sourceAddresses :: PacketHeaderStatementRequestProperty -> Maybe (ValueList Text)
sourcePorts :: PacketHeaderStatementRequestProperty -> Maybe (ValueList Text)
sourcePrefixLists :: PacketHeaderStatementRequestProperty -> Maybe (ValueList Text)
haddock_workaround_ :: ()
destinationAddresses :: Maybe (ValueList Text)
destinationPorts :: Maybe (ValueList Text)
destinationPrefixLists :: Maybe (ValueList Text)
protocols :: Maybe (ValueList Text)
sourceAddresses :: Maybe (ValueList Text)
sourcePorts :: Maybe (ValueList Text)
sourcePrefixLists :: Maybe (ValueList Text)
..}
    = PacketHeaderStatementRequestProperty
        {destinationPorts :: Maybe (ValueList Text)
destinationPorts = ValueList Text -> Maybe (ValueList Text)
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType
  "DestinationPorts" PacketHeaderStatementRequestProperty
ValueList Text
newValue, Maybe (ValueList Text)
()
haddock_workaround_ :: ()
destinationAddresses :: Maybe (ValueList Text)
destinationPrefixLists :: Maybe (ValueList Text)
protocols :: Maybe (ValueList Text)
sourceAddresses :: Maybe (ValueList Text)
sourcePorts :: Maybe (ValueList Text)
sourcePrefixLists :: Maybe (ValueList Text)
haddock_workaround_ :: ()
destinationAddresses :: Maybe (ValueList Text)
destinationPrefixLists :: Maybe (ValueList Text)
protocols :: Maybe (ValueList Text)
sourceAddresses :: Maybe (ValueList Text)
sourcePorts :: Maybe (ValueList Text)
sourcePrefixLists :: Maybe (ValueList Text)
..}
instance Property "DestinationPrefixLists" PacketHeaderStatementRequestProperty where
  type PropertyType "DestinationPrefixLists" PacketHeaderStatementRequestProperty = ValueList Prelude.Text
  set :: PropertyType
  "DestinationPrefixLists" PacketHeaderStatementRequestProperty
-> PacketHeaderStatementRequestProperty
-> PacketHeaderStatementRequestProperty
set PropertyType
  "DestinationPrefixLists" PacketHeaderStatementRequestProperty
newValue PacketHeaderStatementRequestProperty {Maybe (ValueList Text)
()
haddock_workaround_ :: PacketHeaderStatementRequestProperty -> ()
destinationAddresses :: PacketHeaderStatementRequestProperty -> Maybe (ValueList Text)
destinationPorts :: PacketHeaderStatementRequestProperty -> Maybe (ValueList Text)
destinationPrefixLists :: PacketHeaderStatementRequestProperty -> Maybe (ValueList Text)
protocols :: PacketHeaderStatementRequestProperty -> Maybe (ValueList Text)
sourceAddresses :: PacketHeaderStatementRequestProperty -> Maybe (ValueList Text)
sourcePorts :: PacketHeaderStatementRequestProperty -> Maybe (ValueList Text)
sourcePrefixLists :: PacketHeaderStatementRequestProperty -> Maybe (ValueList Text)
haddock_workaround_ :: ()
destinationAddresses :: Maybe (ValueList Text)
destinationPorts :: Maybe (ValueList Text)
destinationPrefixLists :: Maybe (ValueList Text)
protocols :: Maybe (ValueList Text)
sourceAddresses :: Maybe (ValueList Text)
sourcePorts :: Maybe (ValueList Text)
sourcePrefixLists :: Maybe (ValueList Text)
..}
    = PacketHeaderStatementRequestProperty
        {destinationPrefixLists :: Maybe (ValueList Text)
destinationPrefixLists = ValueList Text -> Maybe (ValueList Text)
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType
  "DestinationPrefixLists" PacketHeaderStatementRequestProperty
ValueList Text
newValue, Maybe (ValueList Text)
()
haddock_workaround_ :: ()
destinationAddresses :: Maybe (ValueList Text)
destinationPorts :: Maybe (ValueList Text)
protocols :: Maybe (ValueList Text)
sourceAddresses :: Maybe (ValueList Text)
sourcePorts :: Maybe (ValueList Text)
sourcePrefixLists :: Maybe (ValueList Text)
haddock_workaround_ :: ()
destinationAddresses :: Maybe (ValueList Text)
destinationPorts :: Maybe (ValueList Text)
protocols :: Maybe (ValueList Text)
sourceAddresses :: Maybe (ValueList Text)
sourcePorts :: Maybe (ValueList Text)
sourcePrefixLists :: Maybe (ValueList Text)
..}
instance Property "Protocols" PacketHeaderStatementRequestProperty where
  type PropertyType "Protocols" PacketHeaderStatementRequestProperty = ValueList Prelude.Text
  set :: PropertyType "Protocols" PacketHeaderStatementRequestProperty
-> PacketHeaderStatementRequestProperty
-> PacketHeaderStatementRequestProperty
set PropertyType "Protocols" PacketHeaderStatementRequestProperty
newValue PacketHeaderStatementRequestProperty {Maybe (ValueList Text)
()
haddock_workaround_ :: PacketHeaderStatementRequestProperty -> ()
destinationAddresses :: PacketHeaderStatementRequestProperty -> Maybe (ValueList Text)
destinationPorts :: PacketHeaderStatementRequestProperty -> Maybe (ValueList Text)
destinationPrefixLists :: PacketHeaderStatementRequestProperty -> Maybe (ValueList Text)
protocols :: PacketHeaderStatementRequestProperty -> Maybe (ValueList Text)
sourceAddresses :: PacketHeaderStatementRequestProperty -> Maybe (ValueList Text)
sourcePorts :: PacketHeaderStatementRequestProperty -> Maybe (ValueList Text)
sourcePrefixLists :: PacketHeaderStatementRequestProperty -> Maybe (ValueList Text)
haddock_workaround_ :: ()
destinationAddresses :: Maybe (ValueList Text)
destinationPorts :: Maybe (ValueList Text)
destinationPrefixLists :: Maybe (ValueList Text)
protocols :: Maybe (ValueList Text)
sourceAddresses :: Maybe (ValueList Text)
sourcePorts :: Maybe (ValueList Text)
sourcePrefixLists :: Maybe (ValueList Text)
..}
    = PacketHeaderStatementRequestProperty
        {protocols :: Maybe (ValueList Text)
protocols = ValueList Text -> Maybe (ValueList Text)
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "Protocols" PacketHeaderStatementRequestProperty
ValueList Text
newValue, Maybe (ValueList Text)
()
haddock_workaround_ :: ()
destinationAddresses :: Maybe (ValueList Text)
destinationPorts :: Maybe (ValueList Text)
destinationPrefixLists :: Maybe (ValueList Text)
sourceAddresses :: Maybe (ValueList Text)
sourcePorts :: Maybe (ValueList Text)
sourcePrefixLists :: Maybe (ValueList Text)
haddock_workaround_ :: ()
destinationAddresses :: Maybe (ValueList Text)
destinationPorts :: Maybe (ValueList Text)
destinationPrefixLists :: Maybe (ValueList Text)
sourceAddresses :: Maybe (ValueList Text)
sourcePorts :: Maybe (ValueList Text)
sourcePrefixLists :: Maybe (ValueList Text)
..}
instance Property "SourceAddresses" PacketHeaderStatementRequestProperty where
  type PropertyType "SourceAddresses" PacketHeaderStatementRequestProperty = ValueList Prelude.Text
  set :: PropertyType "SourceAddresses" PacketHeaderStatementRequestProperty
-> PacketHeaderStatementRequestProperty
-> PacketHeaderStatementRequestProperty
set PropertyType "SourceAddresses" PacketHeaderStatementRequestProperty
newValue PacketHeaderStatementRequestProperty {Maybe (ValueList Text)
()
haddock_workaround_ :: PacketHeaderStatementRequestProperty -> ()
destinationAddresses :: PacketHeaderStatementRequestProperty -> Maybe (ValueList Text)
destinationPorts :: PacketHeaderStatementRequestProperty -> Maybe (ValueList Text)
destinationPrefixLists :: PacketHeaderStatementRequestProperty -> Maybe (ValueList Text)
protocols :: PacketHeaderStatementRequestProperty -> Maybe (ValueList Text)
sourceAddresses :: PacketHeaderStatementRequestProperty -> Maybe (ValueList Text)
sourcePorts :: PacketHeaderStatementRequestProperty -> Maybe (ValueList Text)
sourcePrefixLists :: PacketHeaderStatementRequestProperty -> Maybe (ValueList Text)
haddock_workaround_ :: ()
destinationAddresses :: Maybe (ValueList Text)
destinationPorts :: Maybe (ValueList Text)
destinationPrefixLists :: Maybe (ValueList Text)
protocols :: Maybe (ValueList Text)
sourceAddresses :: Maybe (ValueList Text)
sourcePorts :: Maybe (ValueList Text)
sourcePrefixLists :: Maybe (ValueList Text)
..}
    = PacketHeaderStatementRequestProperty
        {sourceAddresses :: Maybe (ValueList Text)
sourceAddresses = ValueList Text -> Maybe (ValueList Text)
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "SourceAddresses" PacketHeaderStatementRequestProperty
ValueList Text
newValue, Maybe (ValueList Text)
()
haddock_workaround_ :: ()
destinationAddresses :: Maybe (ValueList Text)
destinationPorts :: Maybe (ValueList Text)
destinationPrefixLists :: Maybe (ValueList Text)
protocols :: Maybe (ValueList Text)
sourcePorts :: Maybe (ValueList Text)
sourcePrefixLists :: Maybe (ValueList Text)
haddock_workaround_ :: ()
destinationAddresses :: Maybe (ValueList Text)
destinationPorts :: Maybe (ValueList Text)
destinationPrefixLists :: Maybe (ValueList Text)
protocols :: Maybe (ValueList Text)
sourcePorts :: Maybe (ValueList Text)
sourcePrefixLists :: Maybe (ValueList Text)
..}
instance Property "SourcePorts" PacketHeaderStatementRequestProperty where
  type PropertyType "SourcePorts" PacketHeaderStatementRequestProperty = ValueList Prelude.Text
  set :: PropertyType "SourcePorts" PacketHeaderStatementRequestProperty
-> PacketHeaderStatementRequestProperty
-> PacketHeaderStatementRequestProperty
set PropertyType "SourcePorts" PacketHeaderStatementRequestProperty
newValue PacketHeaderStatementRequestProperty {Maybe (ValueList Text)
()
haddock_workaround_ :: PacketHeaderStatementRequestProperty -> ()
destinationAddresses :: PacketHeaderStatementRequestProperty -> Maybe (ValueList Text)
destinationPorts :: PacketHeaderStatementRequestProperty -> Maybe (ValueList Text)
destinationPrefixLists :: PacketHeaderStatementRequestProperty -> Maybe (ValueList Text)
protocols :: PacketHeaderStatementRequestProperty -> Maybe (ValueList Text)
sourceAddresses :: PacketHeaderStatementRequestProperty -> Maybe (ValueList Text)
sourcePorts :: PacketHeaderStatementRequestProperty -> Maybe (ValueList Text)
sourcePrefixLists :: PacketHeaderStatementRequestProperty -> Maybe (ValueList Text)
haddock_workaround_ :: ()
destinationAddresses :: Maybe (ValueList Text)
destinationPorts :: Maybe (ValueList Text)
destinationPrefixLists :: Maybe (ValueList Text)
protocols :: Maybe (ValueList Text)
sourceAddresses :: Maybe (ValueList Text)
sourcePorts :: Maybe (ValueList Text)
sourcePrefixLists :: Maybe (ValueList Text)
..}
    = PacketHeaderStatementRequestProperty
        {sourcePorts :: Maybe (ValueList Text)
sourcePorts = ValueList Text -> Maybe (ValueList Text)
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "SourcePorts" PacketHeaderStatementRequestProperty
ValueList Text
newValue, Maybe (ValueList Text)
()
haddock_workaround_ :: ()
destinationAddresses :: Maybe (ValueList Text)
destinationPorts :: Maybe (ValueList Text)
destinationPrefixLists :: Maybe (ValueList Text)
protocols :: Maybe (ValueList Text)
sourceAddresses :: Maybe (ValueList Text)
sourcePrefixLists :: Maybe (ValueList Text)
haddock_workaround_ :: ()
destinationAddresses :: Maybe (ValueList Text)
destinationPorts :: Maybe (ValueList Text)
destinationPrefixLists :: Maybe (ValueList Text)
protocols :: Maybe (ValueList Text)
sourceAddresses :: Maybe (ValueList Text)
sourcePrefixLists :: Maybe (ValueList Text)
..}
instance Property "SourcePrefixLists" PacketHeaderStatementRequestProperty where
  type PropertyType "SourcePrefixLists" PacketHeaderStatementRequestProperty = ValueList Prelude.Text
  set :: PropertyType
  "SourcePrefixLists" PacketHeaderStatementRequestProperty
-> PacketHeaderStatementRequestProperty
-> PacketHeaderStatementRequestProperty
set PropertyType
  "SourcePrefixLists" PacketHeaderStatementRequestProperty
newValue PacketHeaderStatementRequestProperty {Maybe (ValueList Text)
()
haddock_workaround_ :: PacketHeaderStatementRequestProperty -> ()
destinationAddresses :: PacketHeaderStatementRequestProperty -> Maybe (ValueList Text)
destinationPorts :: PacketHeaderStatementRequestProperty -> Maybe (ValueList Text)
destinationPrefixLists :: PacketHeaderStatementRequestProperty -> Maybe (ValueList Text)
protocols :: PacketHeaderStatementRequestProperty -> Maybe (ValueList Text)
sourceAddresses :: PacketHeaderStatementRequestProperty -> Maybe (ValueList Text)
sourcePorts :: PacketHeaderStatementRequestProperty -> Maybe (ValueList Text)
sourcePrefixLists :: PacketHeaderStatementRequestProperty -> Maybe (ValueList Text)
haddock_workaround_ :: ()
destinationAddresses :: Maybe (ValueList Text)
destinationPorts :: Maybe (ValueList Text)
destinationPrefixLists :: Maybe (ValueList Text)
protocols :: Maybe (ValueList Text)
sourceAddresses :: Maybe (ValueList Text)
sourcePorts :: Maybe (ValueList Text)
sourcePrefixLists :: Maybe (ValueList Text)
..}
    = PacketHeaderStatementRequestProperty
        {sourcePrefixLists :: Maybe (ValueList Text)
sourcePrefixLists = ValueList Text -> Maybe (ValueList Text)
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType
  "SourcePrefixLists" PacketHeaderStatementRequestProperty
ValueList Text
newValue, Maybe (ValueList Text)
()
haddock_workaround_ :: ()
destinationAddresses :: Maybe (ValueList Text)
destinationPorts :: Maybe (ValueList Text)
destinationPrefixLists :: Maybe (ValueList Text)
protocols :: Maybe (ValueList Text)
sourceAddresses :: Maybe (ValueList Text)
sourcePorts :: Maybe (ValueList Text)
haddock_workaround_ :: ()
destinationAddresses :: Maybe (ValueList Text)
destinationPorts :: Maybe (ValueList Text)
destinationPrefixLists :: Maybe (ValueList Text)
protocols :: Maybe (ValueList Text)
sourceAddresses :: Maybe (ValueList Text)
sourcePorts :: Maybe (ValueList Text)
..}