Exchange Reporter, DMARC Modul

Hi Franky,

ich hatte ja bereits den Verbesserungsvorschlag bzgl. dem Hinzufügen der Ergebnisse der DKIM- bzw. SPF-Prüfungen aus den XML-Dateien gemacht.

Der nächste Verbesserungsvorschlag:

Offensichtlich übermitteln nicht alle Mailserver DMARC-Reports mit Anhängen im ZIP-Format. Einige übermitteln GZ-Format. Ich habe das Modul um die Funktionalität diese Anhänge auch zu beachten erweitert.

Dazu eine Zeile anpassen:

if ($attach.name -match "zip"<#new#> -or $attach.name -match "gz"<#/new#>) 

Und folgenden Code unterhalb vom Abschnitt #Extract ZIP Files einfügen:

 <#new#>

#Extract GZ Files




Function DeGZip-File{

    Param(

        $infile,

        $outfile       

        )




    $input = New-Object System.IO.FileStream $inFile, ([IO.FileMode]::Open), ([IO.FileAccess]::Read), ([IO.FileShare]::Read)

    $output = New-Object System.IO.FileStream $outFile, ([IO.FileMode]::Create), ([IO.FileAccess]::Write), ([IO.FileShare]::None)

    $gzipStream = New-Object System.IO.Compression.GzipStream $input, ([IO.Compression.CompressionMode]::Decompress)




    $buffer = New-Object byte[](1024)

    while($true){

        $read = $gzipstream.Read($buffer, 0, 1024)

        if ($read -le 0){break}

        $output.Write($buffer, 0, $read)

        }




    $gzipStream.Close()

    $output.Close()

    $input.Close()

}




$gzfiles =  Get-ChildItem "$Installpath\Temp\*.gz" -Recurse | Where {-NOT $_.PSIsContainer} | foreach {$_.fullname}

foreach ($gzfile in $gzfiles)

{

        $gzoutfile = $gzfile -replace '.gz',''

DeGZip-File $gzfile $gzoutfile

}

<#/new#>

Ich würde mich freuen den Teil in der nächsten Version zu sehen. Die Funktion zum Entpacken von GZ habe ich hier abgeschaut:

https://stackoverflow.com/questions/27971191/unzip-gzip-file-and-accept-the-name-of-the-file-that-is-included-in-the-actual-z

LG

Timbo