{-# LANGUAGE LambdaCase        #-}
{-# LANGUAGE OverloadedStrings #-}

{-# OPTIONS_GHC -Wall -Werror #-}

-- |
-- Module      : Amazonka.ELB.Internal
-- Copyright   : (c) 2013-2021 Brendan Hay
-- License     : Mozilla Public License, v. 2.0.
-- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com>
-- Stability   : experimental
-- Portability : non-portable (GHC extensions)
--
module Amazonka.ELB.Internal
    ( getAccountId
    ) where

import Amazonka.Core

-- | This account identifier is used when attaching a policy to your S3 bucket
-- allowing ELB to upload and write access logs.
--
-- /See:/ <http://docs.aws.amazon.com/elasticloadbalancing/latest/classic/enable-access-logs.html#attach-bucket-policy Attach a Policy to Your S3 Bucket>.
getAccountId :: Region -> Maybe Text
getAccountId :: Region -> Maybe Text
getAccountId = \case
    Region
NorthVirginia   -> Text -> Maybe Text
forall a. a -> Maybe a
Just Text
"127311923021"
    Region
Ohio            -> Text -> Maybe Text
forall a. a -> Maybe a
Just Text
"033677994240"
    Region
NorthCalifornia -> Text -> Maybe Text
forall a. a -> Maybe a
Just Text
"027434742980"
    Region
Oregon          -> Text -> Maybe Text
forall a. a -> Maybe a
Just Text
"797873946194"
    Region
CapeTown        -> Text -> Maybe Text
forall a. a -> Maybe a
Just Text
"098369216593"
    Region
Montreal        -> Text -> Maybe Text
forall a. a -> Maybe a
Just Text
"985666609251"
    Region
Frankfurt       -> Text -> Maybe Text
forall a. a -> Maybe a
Just Text
"054676820928"
    Region
Ireland         -> Text -> Maybe Text
forall a. a -> Maybe a
Just Text
"156460612806"
    Region
London          -> Text -> Maybe Text
forall a. a -> Maybe a
Just Text
"652711504416"
    Region
Milan           -> Text -> Maybe Text
forall a. a -> Maybe a
Just Text
"635631232127"
    Region
Paris           -> Text -> Maybe Text
forall a. a -> Maybe a
Just Text
"009996457667"
    Region
Stockholm       -> Text -> Maybe Text
forall a. a -> Maybe a
Just Text
"897822967062"
    Region
HongKong        -> Text -> Maybe Text
forall a. a -> Maybe a
Just Text
"754344448648"
    Region
Tokyo           -> Text -> Maybe Text
forall a. a -> Maybe a
Just Text
"582318560864"
    Region
Seoul           -> Text -> Maybe Text
forall a. a -> Maybe a
Just Text
"600734575887"
    Region
Osaka           -> Text -> Maybe Text
forall a. a -> Maybe a
Just Text
"383597477331"
    Region
Singapore       -> Text -> Maybe Text
forall a. a -> Maybe a
Just Text
"114774131450"
    Region
Sydney          -> Text -> Maybe Text
forall a. a -> Maybe a
Just Text
"783225319266"
    Region
Mumbai          -> Text -> Maybe Text
forall a. a -> Maybe a
Just Text
"718504428378"
    Region
Bahrain         -> Text -> Maybe Text
forall a. a -> Maybe a
Just Text
"076674570225"
    Region
SaoPaulo        -> Text -> Maybe Text
forall a. a -> Maybe a
Just Text
"507241528517"
    Region
GovCloudWest    -> Text -> Maybe Text
forall a. a -> Maybe a
Just Text
"048591011584"
    Region
GovCloudEast    -> Text -> Maybe Text
forall a. a -> Maybe a
Just Text
"190560391635"
    Region
Beijing         -> Text -> Maybe Text
forall a. a -> Maybe a
Just Text
"638102146993"
    Region
Ningxia         -> Text -> Maybe Text
forall a. a -> Maybe a
Just Text
"037604701340"
    Region
_other          -> Maybe Text
forall a. Maybe a
Nothing