module Proto.POGOProtos.Networking.Responses.AttackGymResponse
where
import qualified Prelude
import qualified Data.ProtoLens
import qualified Data.ProtoLens.Message.Enum
import qualified Lens.Family2
import qualified Lens.Family2.Unchecked
import qualified Data.Default.Class
import qualified Data.Text
import qualified Data.Int
import qualified Data.Word
import qualified Data.Map
import qualified Data.ByteString
import qualified Proto.POGOProtos.Data.Battle.BattleLog
import qualified Proto.POGOProtos.Data.Battle.BattlePokemonInfo
data AttackGymResponse = AttackGymResponse{_AttackGymResponse'result
:: AttackGymResponse'Result,
_AttackGymResponse'battleLog ::
Prelude.Maybe
Proto.POGOProtos.Data.Battle.BattleLog.BattleLog,
_AttackGymResponse'battleId :: Data.Text.Text,
_AttackGymResponse'activeDefender ::
Prelude.Maybe
Proto.POGOProtos.Data.Battle.BattlePokemonInfo.BattlePokemonInfo,
_AttackGymResponse'activeAttacker ::
Prelude.Maybe
Proto.POGOProtos.Data.Battle.BattlePokemonInfo.BattlePokemonInfo}
deriving (Prelude.Show, Prelude.Eq)
type instance Data.ProtoLens.Field "result" AttackGymResponse =
AttackGymResponse'Result
instance Data.ProtoLens.HasField "result" AttackGymResponse
AttackGymResponse where
field _
= Lens.Family2.Unchecked.lens _AttackGymResponse'result
(\ x__ y__ -> x__{_AttackGymResponse'result = y__})
type instance Data.ProtoLens.Field "battleLog" AttackGymResponse =
Proto.POGOProtos.Data.Battle.BattleLog.BattleLog
instance Data.ProtoLens.HasField "battleLog" AttackGymResponse
AttackGymResponse where
field _
= (Prelude..) maybe'battleLog
(Data.ProtoLens.maybeLens Data.Default.Class.def)
type instance
Data.ProtoLens.Field "maybe'battleLog" AttackGymResponse =
Prelude.Maybe Proto.POGOProtos.Data.Battle.BattleLog.BattleLog
instance Data.ProtoLens.HasField "maybe'battleLog"
AttackGymResponse AttackGymResponse where
field _
= Lens.Family2.Unchecked.lens _AttackGymResponse'battleLog
(\ x__ y__ -> x__{_AttackGymResponse'battleLog = y__})
type instance Data.ProtoLens.Field "battleId" AttackGymResponse =
Data.Text.Text
instance Data.ProtoLens.HasField "battleId" AttackGymResponse
AttackGymResponse where
field _
= Lens.Family2.Unchecked.lens _AttackGymResponse'battleId
(\ x__ y__ -> x__{_AttackGymResponse'battleId = y__})
type instance
Data.ProtoLens.Field "activeDefender" AttackGymResponse =
Proto.POGOProtos.Data.Battle.BattlePokemonInfo.BattlePokemonInfo
instance Data.ProtoLens.HasField "activeDefender" AttackGymResponse
AttackGymResponse where
field _
= (Prelude..) maybe'activeDefender
(Data.ProtoLens.maybeLens Data.Default.Class.def)
type instance
Data.ProtoLens.Field "maybe'activeDefender" AttackGymResponse =
Prelude.Maybe
Proto.POGOProtos.Data.Battle.BattlePokemonInfo.BattlePokemonInfo
instance Data.ProtoLens.HasField "maybe'activeDefender"
AttackGymResponse AttackGymResponse where
field _
= Lens.Family2.Unchecked.lens _AttackGymResponse'activeDefender
(\ x__ y__ -> x__{_AttackGymResponse'activeDefender = y__})
type instance
Data.ProtoLens.Field "activeAttacker" AttackGymResponse =
Proto.POGOProtos.Data.Battle.BattlePokemonInfo.BattlePokemonInfo
instance Data.ProtoLens.HasField "activeAttacker" AttackGymResponse
AttackGymResponse where
field _
= (Prelude..) maybe'activeAttacker
(Data.ProtoLens.maybeLens Data.Default.Class.def)
type instance
Data.ProtoLens.Field "maybe'activeAttacker" AttackGymResponse =
Prelude.Maybe
Proto.POGOProtos.Data.Battle.BattlePokemonInfo.BattlePokemonInfo
instance Data.ProtoLens.HasField "maybe'activeAttacker"
AttackGymResponse AttackGymResponse where
field _
= Lens.Family2.Unchecked.lens _AttackGymResponse'activeAttacker
(\ x__ y__ -> x__{_AttackGymResponse'activeAttacker = y__})
instance Data.Default.Class.Default AttackGymResponse where
def
= AttackGymResponse{_AttackGymResponse'result =
Data.Default.Class.def,
_AttackGymResponse'battleLog = Prelude.Nothing,
_AttackGymResponse'battleId = Data.ProtoLens.fieldDefault,
_AttackGymResponse'activeDefender = Prelude.Nothing,
_AttackGymResponse'activeAttacker = Prelude.Nothing}
instance Data.ProtoLens.Message AttackGymResponse where
descriptor
= let result__field_descriptor
= Data.ProtoLens.FieldDescriptor "result"
(Data.ProtoLens.EnumField ::
Data.ProtoLens.FieldTypeDescriptor AttackGymResponse'Result)
(Data.ProtoLens.PlainField Data.ProtoLens.Optional result)
battleLog__field_descriptor
= Data.ProtoLens.FieldDescriptor "battle_log"
(Data.ProtoLens.MessageField ::
Data.ProtoLens.FieldTypeDescriptor
Proto.POGOProtos.Data.Battle.BattleLog.BattleLog)
(Data.ProtoLens.OptionalField maybe'battleLog)
battleId__field_descriptor
= Data.ProtoLens.FieldDescriptor "battle_id"
(Data.ProtoLens.StringField ::
Data.ProtoLens.FieldTypeDescriptor Data.Text.Text)
(Data.ProtoLens.PlainField Data.ProtoLens.Optional battleId)
activeDefender__field_descriptor
= Data.ProtoLens.FieldDescriptor "active_defender"
(Data.ProtoLens.MessageField ::
Data.ProtoLens.FieldTypeDescriptor
Proto.POGOProtos.Data.Battle.BattlePokemonInfo.BattlePokemonInfo)
(Data.ProtoLens.OptionalField maybe'activeDefender)
activeAttacker__field_descriptor
= Data.ProtoLens.FieldDescriptor "active_attacker"
(Data.ProtoLens.MessageField ::
Data.ProtoLens.FieldTypeDescriptor
Proto.POGOProtos.Data.Battle.BattlePokemonInfo.BattlePokemonInfo)
(Data.ProtoLens.OptionalField maybe'activeAttacker)
in
Data.ProtoLens.MessageDescriptor
(Data.Map.fromList
[(Data.ProtoLens.Tag 1, result__field_descriptor),
(Data.ProtoLens.Tag 2, battleLog__field_descriptor),
(Data.ProtoLens.Tag 3, battleId__field_descriptor),
(Data.ProtoLens.Tag 4, activeDefender__field_descriptor),
(Data.ProtoLens.Tag 5, activeAttacker__field_descriptor)])
(Data.Map.fromList
[("result", result__field_descriptor),
("battle_log", battleLog__field_descriptor),
("battle_id", battleId__field_descriptor),
("active_defender", activeDefender__field_descriptor),
("active_attacker", activeAttacker__field_descriptor)])
data AttackGymResponse'Result = AttackGymResponse'UNSET
| AttackGymResponse'SUCCESS
| AttackGymResponse'ERROR_INVALID_ATTACK_ACTIONS
| AttackGymResponse'ERROR_NOT_IN_RANGE
deriving (Prelude.Show, Prelude.Eq)
instance Data.Default.Class.Default AttackGymResponse'Result where
def = AttackGymResponse'UNSET
instance Data.ProtoLens.FieldDefault AttackGymResponse'Result where
fieldDefault = AttackGymResponse'UNSET
instance Data.ProtoLens.MessageEnum AttackGymResponse'Result where
maybeToEnum 0 = Prelude.Just AttackGymResponse'UNSET
maybeToEnum 1 = Prelude.Just AttackGymResponse'SUCCESS
maybeToEnum 2
= Prelude.Just AttackGymResponse'ERROR_INVALID_ATTACK_ACTIONS
maybeToEnum 3 = Prelude.Just AttackGymResponse'ERROR_NOT_IN_RANGE
maybeToEnum _ = Prelude.Nothing
showEnum AttackGymResponse'UNSET = "UNSET"
showEnum AttackGymResponse'SUCCESS = "SUCCESS"
showEnum AttackGymResponse'ERROR_INVALID_ATTACK_ACTIONS
= "ERROR_INVALID_ATTACK_ACTIONS"
showEnum AttackGymResponse'ERROR_NOT_IN_RANGE
= "ERROR_NOT_IN_RANGE"
readEnum "UNSET" = Prelude.Just AttackGymResponse'UNSET
readEnum "SUCCESS" = Prelude.Just AttackGymResponse'SUCCESS
readEnum "ERROR_INVALID_ATTACK_ACTIONS"
= Prelude.Just AttackGymResponse'ERROR_INVALID_ATTACK_ACTIONS
readEnum "ERROR_NOT_IN_RANGE"
= Prelude.Just AttackGymResponse'ERROR_NOT_IN_RANGE
readEnum _ = Prelude.Nothing
instance Prelude.Enum AttackGymResponse'Result where
toEnum k__
= Prelude.maybe
(Prelude.error
((Prelude.++) "toEnum: unknown value for enum Result: "
(Prelude.show k__)))
Prelude.id
(Data.ProtoLens.maybeToEnum k__)
fromEnum AttackGymResponse'UNSET = 0
fromEnum AttackGymResponse'SUCCESS = 1
fromEnum AttackGymResponse'ERROR_INVALID_ATTACK_ACTIONS = 2
fromEnum AttackGymResponse'ERROR_NOT_IN_RANGE = 3
succ AttackGymResponse'ERROR_NOT_IN_RANGE
= Prelude.error
"Ident \"AttackGymResponse'Result\".Ident \"succ\": bad argument Ident \"AttackGymResponse'ERROR_NOT_IN_RANGE\". This value would be out of bounds."
succ AttackGymResponse'UNSET = AttackGymResponse'SUCCESS
succ AttackGymResponse'SUCCESS
= AttackGymResponse'ERROR_INVALID_ATTACK_ACTIONS
succ AttackGymResponse'ERROR_INVALID_ATTACK_ACTIONS
= AttackGymResponse'ERROR_NOT_IN_RANGE
pred AttackGymResponse'UNSET
= Prelude.error
"Ident \"AttackGymResponse'Result\".Ident \"pred\": bad argument Ident \"AttackGymResponse'UNSET\". This value would be out of bounds."
pred AttackGymResponse'SUCCESS = AttackGymResponse'UNSET
pred AttackGymResponse'ERROR_INVALID_ATTACK_ACTIONS
= AttackGymResponse'SUCCESS
pred AttackGymResponse'ERROR_NOT_IN_RANGE
= AttackGymResponse'ERROR_INVALID_ATTACK_ACTIONS
enumFrom = Data.ProtoLens.Message.Enum.messageEnumFrom
enumFromTo = Data.ProtoLens.Message.Enum.messageEnumFromTo
enumFromThen = Data.ProtoLens.Message.Enum.messageEnumFromThen
enumFromThenTo = Data.ProtoLens.Message.Enum.messageEnumFromThenTo
instance Prelude.Bounded AttackGymResponse'Result where
minBound = AttackGymResponse'UNSET
maxBound = AttackGymResponse'ERROR_NOT_IN_RANGE
activeAttacker ::
forall msg msg' .
Data.ProtoLens.HasField "activeAttacker" msg msg' =>
Lens.Family2.Lens msg msg'
(Data.ProtoLens.Field "activeAttacker" msg)
(Data.ProtoLens.Field "activeAttacker" msg')
activeAttacker
= Data.ProtoLens.field
(Data.ProtoLens.ProxySym ::
Data.ProtoLens.ProxySym "activeAttacker")
activeDefender ::
forall msg msg' .
Data.ProtoLens.HasField "activeDefender" msg msg' =>
Lens.Family2.Lens msg msg'
(Data.ProtoLens.Field "activeDefender" msg)
(Data.ProtoLens.Field "activeDefender" msg')
activeDefender
= Data.ProtoLens.field
(Data.ProtoLens.ProxySym ::
Data.ProtoLens.ProxySym "activeDefender")
battleId ::
forall msg msg' . Data.ProtoLens.HasField "battleId" msg msg' =>
Lens.Family2.Lens msg msg' (Data.ProtoLens.Field "battleId" msg)
(Data.ProtoLens.Field "battleId" msg')
battleId
= Data.ProtoLens.field
(Data.ProtoLens.ProxySym :: Data.ProtoLens.ProxySym "battleId")
battleLog ::
forall msg msg' . Data.ProtoLens.HasField "battleLog" msg msg' =>
Lens.Family2.Lens msg msg' (Data.ProtoLens.Field "battleLog" msg)
(Data.ProtoLens.Field "battleLog" msg')
battleLog
= Data.ProtoLens.field
(Data.ProtoLens.ProxySym :: Data.ProtoLens.ProxySym "battleLog")
maybe'activeAttacker ::
forall msg msg' .
Data.ProtoLens.HasField "maybe'activeAttacker" msg msg' =>
Lens.Family2.Lens msg msg'
(Data.ProtoLens.Field "maybe'activeAttacker" msg)
(Data.ProtoLens.Field "maybe'activeAttacker" msg')
maybe'activeAttacker
= Data.ProtoLens.field
(Data.ProtoLens.ProxySym ::
Data.ProtoLens.ProxySym "maybe'activeAttacker")
maybe'activeDefender ::
forall msg msg' .
Data.ProtoLens.HasField "maybe'activeDefender" msg msg' =>
Lens.Family2.Lens msg msg'
(Data.ProtoLens.Field "maybe'activeDefender" msg)
(Data.ProtoLens.Field "maybe'activeDefender" msg')
maybe'activeDefender
= Data.ProtoLens.field
(Data.ProtoLens.ProxySym ::
Data.ProtoLens.ProxySym "maybe'activeDefender")
maybe'battleLog ::
forall msg msg' .
Data.ProtoLens.HasField "maybe'battleLog" msg msg' =>
Lens.Family2.Lens msg msg'
(Data.ProtoLens.Field "maybe'battleLog" msg)
(Data.ProtoLens.Field "maybe'battleLog" msg')
maybe'battleLog
= Data.ProtoLens.field
(Data.ProtoLens.ProxySym ::
Data.ProtoLens.ProxySym "maybe'battleLog")
result ::
forall msg msg' . Data.ProtoLens.HasField "result" msg msg' =>
Lens.Family2.Lens msg msg' (Data.ProtoLens.Field "result" msg)
(Data.ProtoLens.Field "result" msg')
result
= Data.ProtoLens.field
(Data.ProtoLens.ProxySym :: Data.ProtoLens.ProxySym "result")