[PowerShell] Windows のイベントログを7zで圧縮してローテーションする方法

## ファイルを移動した後、圧縮を実施する。
## 圧縮後のファイルのうち30日より古いファイルについては削除を行う。

# 入力元フォルダ、出力先フォルダを変更できるように関数にする。
function ZipAndMoveLogFiles(
    # デフォルトのパラメータの設定

    # 7zipのモジュールのパスを指定
    $SZpath = "C:\batch\7z-extra\x64\7za.exe",
    # 入力元フォルダのパスを指定
    $SourceFolder   = "C:\Windows\System32\winevt\Logs",
    # 作業用フォルダのパスを指定
    $CopyTempFolder = "C:\batch\tmp",
    # 出力先フォルダのパスを指定
    $DestinationFolder = "C:\EventLogArchive",
    $DestinationFolderBackup  = $DestinationFolder + "\Backup",
    $DestinationFolderArchive = $DestinationFolder + "\Archive",
    # トランスクリプトの出力先フォルダのパスを指定
    $TranscriptFolder = "C:\batch\log\Transcript", 
    # 入力元フォルダから作業用フォルダにファイルを移動する際のフィルタの有効性の指定
    $MoveFilter = $true
){

    # 入力元フォルダ、出力先フォルダ等が存在しない場合は処理を中止する。
    if(Test-Path $SZpath){}else{$SZpath + "が存在しません。処理を終了します。" ; exit} 
    if(Test-Path $SourceFolder){}else{$SourceFolder + "が存在しません。処理を終了します。" ; exit} 
    if(Test-Path $CopyTempFolder){}else{$CopyTempFolder + "が存在しません。処理を終了します。" ; exit} 
    if(Test-Path $DestinationFolder){}else{$DestinationFolder + "が存在しません。処理を終了します。" ; exit} 
    if(Test-Path $DestinationFolderBackup){}else{$DestinationFolderBackup + "が存在しません。処理を終了します。" ; exit} 
    if(Test-Path $DestinationFolderArchive){}else{$DestinationFolderArchive + "が存在しません。処理を終了します。" ; exit} 
    if(Test-Path $TranscriptFolder){}else{$TranscriptFolder + "が存在しません。処理を終了します。" ; exit} 

    # トランスクリプト用の時刻データ取得
    $DateTime = Get-Date -Format "yyyyMMdd-HHmmss"
    $TranscriptFileName = $TranscriptFolder + "\ts-" + $DateTime + ".txt"
    # トランスクリプトの取得開始
    Start-Transcript -Path $TranscriptFileName

    # 7zipのパスをエイリアスとして設定
    Set-Alias sz $SZpath

    # 入力元フォルダから作業用フォルダにファイルを移動する。
    # フィルターが有効な場合はアーカイブされたイベントログ（セキュリティ）ファイルのみを移動する。
    if($MoveFilter){
        Get-ChildItem -Path $SourceFolder | Where-Object {$_.Name -like "Archive-Security-*"} | Move-Item -Destination $CopyTempFolder
    }else{
        Get-ChildItem -Path $SourceFolder | Where-Object {$_.LastWriteTime -lt (Get-Date).AddDays(-7)} | Move-Item -Destination $CopyTempFolder
    }
    
    # 作業用フォルダのファイル一覧を取得
    $ItemsList = Get-ChildItem -Path $CopyTempFolder



    # 作業用フォルダのファイルに対して圧縮処理の実行する
    foreach ($EachItem in $ItemsList){
    
        # 圧縮後のファイル名を設定（.7zを付加）
        $Source = $EachItem.FullName
        $Target = $EachItem.FullName + ".7z"

        # 7zipにて圧縮を実行する。
        $ZipResult = sz a -t7z -mx=9 $Target $Source | Out-String
        $ZipResult

        # 7zipのログを確認して、正常終了の場合はファイルを移動する。
        if($ZipResult -match "Everything is Ok"){
            Write-Output "$EachItem.FullName の圧縮は正常に完了しました。"
            Move-Item -Path $Source -Destination $DestinationFolderBackup 
            Move-Item -Path $Target -Destination $DestinationFolderArchive
            Get-Item  -Path ($DestinationFolderBackup + "\" + $EachItem.Name)
            Get-Item  -Path ($DestinationFolderArchive + "\" + $EachItem.Name + ".7z")
        }else{
            "$EachItem.FullName の圧縮は失敗しました。"
        }

    }



    # 古いファイルの削除
    # 30日より古いファイルを削除
    $FilesToBeRemoved = Get-ChildItem -Path $DestinationFolderBackup | Where-Object {$_.LastWriteTime -lt (Get-Date).AddDays(-30)}
    # 削除対象ファイルの出力
    Write-Output "削除対象ファイル"
    $FilesToBeRemoved
    # 対象ファイルの削除
    $FilesToBeRemoved | Remove-Item 


    # トランスクリプトの取得終了
    Stop-Transcript

}

ZipAndMoveLogFiles