#!/usr/bin/env bash

# The - 5*60*10,000,000  allows 5 minutes overlap to allow for
# the time it takes this to run.

[ -d $HOME/cis/work ] || mkdir -p $HOME/cis/work
retval=0

OUTFILE=$HOME/cis/work/dr.csv
rm -f $OUTFILE
twwrap query --csv --file=$OUTFILE "
    SEARCH DiscoveredCloudAPIResultList
    WHERE request_time > currentTime() - 7 * 24*3600*10000000 - 5*60*10000000
    AND method_failure defined
    AND NOT discovery_method matches '^AWS[.]Organizations[.]'
    SHOW discovery_method, failure_reason,
    method_success,
    #DiscoveryResult:Metadata:Detail:CommandFailure.status as 'Command exit status',
    #DiscoveryResult:Metadata:Detail:CommandFailure.command_name as 'Command name',
    #DiscoveryResult:Metadata:Detail:CommandFailure.error as 'Command message',
    #DiscoveryResult:Metadata:Detail:ScriptFailure.message as 'Script Message'
"
[ -s $OUTFILE ] && {
    retval=1
    perl -pe 's/\r//g;' $OUTFILE
}

exit $retval