From b8c79154cbc173878127dfa974a75b666c225a5d Mon Sep 17 00:00:00 2001
From: Toni de la Fuente <toni.delafuente@alfresco.com>
Date: Thu, 16 May 2019 15:41:29 -0400
Subject: [PATCH] Added check extra756 Redshift cluster public

---
 checks/check_extra756 | 35 +++++++++++++++++++++++++++++++++++
 1 file changed, 35 insertions(+)
 create mode 100644 checks/check_extra756

diff --git a/checks/check_extra756 b/checks/check_extra756
new file mode 100644
index 00000000..506ebd4d
--- /dev/null
+++ b/checks/check_extra756
@@ -0,0 +1,35 @@
+#!/usr/bin/env bash
+
+# Prowler - the handy cloud security tool (copyright 2019) by Toni de la Fuente
+#
+# Licensed under the Apache License, Version 2.0 (the "License"); you may not
+# use this file except in compliance with the License. You may obtain a copy
+# of the License at http://www.apache.org/licenses/LICENSE-2.0
+#
+# Unless required by applicable law or agreed to in writing, software distributed
+# under the License is distributed on an "AS IS" BASIS, WITHOUT WARRANTIES OR
+# CONDITIONS OF ANY KIND, either express or implied. See the License for the
+# specific language governing permissions and limitations under the License.
+CHECK_ID_extra756="7.56"
+CHECK_TITLE_extra756="[extra756] Check if Redshift cluster is Public Accessible (Not Scored) (Not part of CIS benchmark)"
+CHECK_SCORED_extra756="NOT_SCORED"
+CHECK_TYPE_extra756="EXTRA"
+CHECK_ALTERNATE_check756="extra756"
+
+extra756(){
+  for regx in $REGIONS; do
+    LIST_OF_RS_CLUSTERS=$($AWSCLI $PROFILE_OPT --region $regx redshift describe-clusters --query Clusters[*].ClusterIdentifier --output text)
+    if [[ $LIST_OF_RS_CLUSTERS ]];then
+      for cluster in $LIST_OF_RS_CLUSTERS; do
+        IS_PUBLICLY_ACCESSIBLE=$($AWSCLI $PROFILE_OPT --region $regx redshift describe-clusters --cluster-identifier $cluster --query Clusters[*].PubliclyAccessible --output text|grep True)
+        if [[ $IS_PUBLICLY_ACCESSIBLE ]]; then 
+           textFail "$regx: Redshift cluster $cluster is publicly accessible" "$regx"
+        else
+           textPass "$regx: Redshift cluster $cluster is not publicly accessible" "$regx"
+        fi
+      done
+    else
+      textInfo "$regx: Redshift clusters found" "$regx"
+    fi
+  done
+}