mirror of
https://github.com/ghndrx/prowler.git
synced 2026-02-10 23:05:05 +00:00
44 lines
2.0 KiB
Bash
44 lines
2.0 KiB
Bash
#!/usr/bin/env bash
|
|
|
|
# Prowler - the handy cloud security tool (copyright 2018) 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_extra727="7.27"
|
|
CHECK_TITLE_extra727="[extra727] Check if SQS queues have policy set as Public (Not Scored) (Not part of CIS benchmark)"
|
|
CHECK_SCORED_extra727="NOT_SCORED"
|
|
CHECK_TYPE_extra727="EXTRA"
|
|
CHECK_ALTERNATE_check727="extra727"
|
|
|
|
extra727(){
|
|
for regx in $REGIONS; do
|
|
LIST_SQS=$($AWSCLI sqs list-queues $PROFILE_OPT --region $regx --query QueueUrls --output text |grep -v ^None)
|
|
if [[ $LIST_SQS ]]; then
|
|
for queue in $LIST_SQS; do
|
|
# check if the policy has Principal as *
|
|
SQS_TO_CHECK=$($AWSCLI sqs get-queue-attributes --queue-url $queue $PROFILE_OPT --region $regx --attribute-names All --query Attributes.Policy --output text | awk -v k="text" '{n=split($0,a,","); for (i=1; i<=n; i++) print a[i]}' | awk '/Principal/ || /Condition/ && !skip { print } { skip = /Deny/} ')
|
|
PUBLIC_SQS_WCONDITION=$(echo $SQS_TO_CHECK|grep Condition)
|
|
if [[ $PUBLIC_SQS_WCONDITION ]]; then
|
|
textInfo "$regx: SQS queue $queue has a Condition" "$regx"
|
|
else
|
|
PUBLIC_SQS=$(echo $SQS_TO_CHECK|grep \"Principal|grep \*)
|
|
if [[ $PUBLIC_SQS ]]; then
|
|
textFail "$regx: SQS queue $queue seems to be public (Principal: \"*\")" "$regx"
|
|
else
|
|
textInfo "$regx: SQS queue $queue seems correct" "$regx"
|
|
fi
|
|
fi
|
|
done
|
|
else
|
|
textInfo "$regx: No SQS queues found" "$regx"
|
|
fi
|
|
done
|
|
}
|