{-# LANGUAGE LambdaCase #-}
{-# LANGUAGE OverloadedStrings #-}
{-# OPTIONS_GHC -Wall -Werror #-}

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

import Amazonka.Core
import Amazonka.Data

-- | This account identifier used to be used when attaching a policy
-- to your S3 bucket, allowing Redshift to upload and write database
-- audit logs.
--
-- This function should no longer be used, because Redshift now uses
-- service-principal credentials to deliver logs to S3.
--
-- /See:/ <https://docs.aws.amazon.com/redshift/latest/mgmt/db-auditing.html#db-auditing-bucket-permissions Bucket permissions for Amazon Redshift audit logging>.
getAccountId :: Region -> Maybe Text
getAccountId :: Region -> Maybe Text
getAccountId = \case
  Region
NorthVirginia -> forall a. a -> Maybe a
Just Text
"193672423079"
  Region
Ohio -> forall a. a -> Maybe a
Just Text
"391106570357"
  Region
NorthCalifornia -> forall a. a -> Maybe a
Just Text
"262260360010"
  Region
Oregon -> forall a. a -> Maybe a
Just Text
"902366379725"
  Region
CapeTown -> forall a. a -> Maybe a
Just Text
"365689465814"
  Region
HongKong -> forall a. a -> Maybe a
Just Text
"313564881002"
  Region
Mumbai -> forall a. a -> Maybe a
Just Text
"865932855811"
  Region
Osaka -> forall a. a -> Maybe a
Just Text
"090321488786"
  Region
Seoul -> forall a. a -> Maybe a
Just Text
"760740231472"
  Region
Singapore -> forall a. a -> Maybe a
Just Text
"361669875840"
  Region
Sydney -> forall a. a -> Maybe a
Just Text
"762762565011"
  Region
Tokyo -> forall a. a -> Maybe a
Just Text
"404641285394"
  Region
Montreal -> forall a. a -> Maybe a
Just Text
"907379612154"
  Region
Frankfurt -> forall a. a -> Maybe a
Just Text
"053454850223"
  Region
Ireland -> forall a. a -> Maybe a
Just Text
"210876761215"
  Region
London -> forall a. a -> Maybe a
Just Text
"307160386991"
  Region
Milan -> forall a. a -> Maybe a
Just Text
"945612479654"
  Region
Paris -> forall a. a -> Maybe a
Just Text
"915173422425"
  Region
Stockholm -> forall a. a -> Maybe a
Just Text
"729911121831"
  Region
Bahrain -> forall a. a -> Maybe a
Just Text
"013126148197"
  Region
SaoPaulo -> forall a. a -> Maybe a
Just Text
"075028567923"
  Region' Text
_ -> forall a. Maybe a
Nothing
{-# DEPRECATED
  getAccountId
  "Redshift now delivers logs using service-principal credentials. \
  \See the haddocks for more information."
  #-}

-- | This account identifier is used when Redshift calls other AWS
-- services for you, and may appear in your CloudTrail logs.
--
-- /See:/ <https://docs.aws.amazon.com/redshift/latest/mgmt/logging-with-cloudtrail.html#cloudtrail-rs-acct-ids Amazon Redshift account IDs in AWS CloudTrail logs>
getCloudTrailAccountId :: Region -> Maybe Text
getCloudTrailAccountId :: Region -> Maybe Text
getCloudTrailAccountId = \case
  Region
NorthVirginia -> forall a. a -> Maybe a
Just Text
"368064434614"
  Region
Ohio -> forall a. a -> Maybe a
Just Text
"790247189693"
  Region
NorthCalifornia -> forall a. a -> Maybe a
Just Text
"703715109447"
  Region
Oregon -> forall a. a -> Maybe a
Just Text
"473191095985"
  Region
CapeTown -> forall a. a -> Maybe a
Just Text
"420376844563"
  Region
HongKong -> forall a. a -> Maybe a
Just Text
"651179539253"
  Region
Hyderabad -> forall a. a -> Maybe a
Just Text
"297058826802"
  Region
Jakarta -> forall a. a -> Maybe a
Just Text
"623197973179"
  Region
Melbourne -> forall a. a -> Maybe a
Just Text
"945512339897"
  Region
Mumbai -> forall a. a -> Maybe a
Just Text
"408097707231"
  Region
Osaka -> forall a. a -> Maybe a
Just Text
"398671365691"
  Region
Seoul -> forall a. a -> Maybe a
Just Text
"713597048934"
  Region
Singapore -> forall a. a -> Maybe a
Just Text
"960118270566"
  Region
Sydney -> forall a. a -> Maybe a
Just Text
"485979073181"
  Region
Tokyo -> forall a. a -> Maybe a
Just Text
"615915377779"
  Region
Montreal -> forall a. a -> Maybe a
Just Text
"764870610256"
  Region
Frankfurt -> forall a. a -> Maybe a
Just Text
"434091160558"
  Region
Ireland -> forall a. a -> Maybe a
Just Text
"246478207311"
  Region
London -> forall a. a -> Maybe a
Just Text
"885798887673"
  Region
Milan -> forall a. a -> Maybe a
Just Text
"041313461515"
  Region
Paris -> forall a. a -> Maybe a
Just Text
"694668203235"
  Region
Stockholm -> forall a. a -> Maybe a
Just Text
"553461782468"
  Region
Zurich -> forall a. a -> Maybe a
Just Text
"668912161003"
  Region
Spain -> forall a. a -> Maybe a
Just Text
"028811157404"
  Region
Bahrain -> forall a. a -> Maybe a
Just Text
"051362938876"
  Region
UAE -> forall a. a -> Maybe a
Just Text
"595013617770"
  Region
SaoPaulo -> forall a. a -> Maybe a
Just Text
"392442076723"
  Region' Text
_ -> forall a. Maybe a
Nothing