Query: vpc_network_acl_restrict_ingress_rdp_all

with ingress_rdp_rules as (
  select
    crn,
    count(id) as num_rdp_rules
  from
    ibm_is_network_acl,
    jsonb_array_elements(rules) as rule
  where
    rule ->> 'direction' = 'inbound'
    and rule ->> 'source' = '0.0.0.0/0'
    and rule ->> 'action' = 'allow'
    and (
      rule ->> 'protocol' = 'all'
      or (
        (rule ->> 'source_port_min') :: integer <= 3389
        and (rule ->> 'source_port_max') :: integer >= 3389
      )
    )
  group by
    crn
)
select
  acl.crn as resource,
  case
    when r.crn is null then 'ok'
    else 'alarm'
  end as status,
  case
    when r.crn is null then acl.title || ' ingress restricted for RDP from 0.0.0.0/0.'
    else acl.title || ' contains ' || r.num_rdp_rules || ' ingress rule(s) allowing RDP from 0.0.0.0/0.'
  end as reason,
  acl.region,
  acl.account_id
from
  ibm_is_network_acl as acl
  left join ingress_rdp_rules as r on r.crn = acl.crn;