mirror of
https://github.com/ghndrx/prowler.git
synced 2026-02-10 23:05:05 +00:00
83 lines
4.2 KiB
Bash
83 lines
4.2 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
|
|
SQS_POLICY=$($AWSCLI sqs get-queue-attributes --queue-url $queue $PROFILE_OPT --region $regx --attribute-names All --query Attributes.Policy --output text)
|
|
if [[ "$SQS_POLICY" != "None" ]]; then
|
|
SQS_POLICY_ALLOW_ALL=$($AWSCLI sqs get-queue-attributes --queue-url $queue $PROFILE_OPT --region $regx --attribute-names All --query Attributes \
|
|
| jq '.Policy | fromjson' | jq '.Statement[] | select(.Effect=="Allow") | select(.Principal=="*" or .Principal.AWS=="*" or .Principal.CanonicalUser=="*")')
|
|
if [[ $SQS_POLICY_ALLOW_ALL ]]; then
|
|
SQS_POLICY_ALLOW_ALL_WITHOUT_CONDITION=$($AWSCLI sqs get-queue-attributes --queue-url $queue $PROFILE_OPT --region $regx --attribute-names All --query Attributes \
|
|
| jq '.Policy | fromjson' | jq '.Statement[] | select(.Effect=="Allow") | select(.Principal=="*" or .Principal.AWS=="*" or .Principal.CanonicalUser=="*") | select(has("Condition") | not)')
|
|
if [[ $SQS_POLICY_ALLOW_ALL_WITHOUT_CONDITION ]]; then
|
|
SQS_POLICY_ALLOW_ALL_WITHOUT_CONDITION_DETAILS=$($AWSCLI sqs get-queue-attributes --queue-url $queue $PROFILE_OPT --region $regx --attribute-names All --query Attributes \
|
|
| jq '.Policy | fromjson' | jq '.Statement[] | select(.Effect=="Allow") | select(.Principal=="*" or .Principal.AWS=="*" or .Principal.CanonicalUser=="*") | select(has("Condition") | not)' | jq '"[Principal: " + (.Principal|tostring) + " Action: " + .Action + "]"' )
|
|
textFail "$regx: SQS $queue queue policy with public access: $SQS_POLICY_ALLOW_ALL_WITHOUT_CONDITION_DETAILS" "$regx"
|
|
else
|
|
textInfo "$regx: SQS $queue queue policy with public access but has a Condition" "$regx"
|
|
fi
|
|
else
|
|
textPass "$regx: SQS $queue queue without public access" "$regx"
|
|
fi
|
|
else
|
|
textPass "$regx: SQS $queue queue without policy" "$regx"
|
|
fi
|
|
done
|
|
else
|
|
textInfo "$regx: No SQS queues found" "$regx"
|
|
fi
|
|
done
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
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
|
|
textPass "$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
|
|
textPass "$regx: SQS queue $queue seems correct" "$regx"
|
|
fi
|
|
fi
|
|
done
|
|
else
|
|
textInfo "$regx: No SQS queues found" "$regx"
|
|
fi
|
|
done
|
|
}
|