PowerShellでダウンロードが失敗した場合再試行するスクリプトを試作する。

# 
# テキストファイルを読み込み先頭一行を取り出し保存し、ファイルが空になるまで繰り返す。
# 

function Get-TopRow
{
    param ([string]$list_file)

    $bak_file = "${list_file}.bak"
    Move-Item $list_file $bak_file -Force

    $row = ""
    $writer = New-Object System.IO.StreamWriter($list_file, $false, [System.Text.Encoding]::GetEncoding("utf-8"))
    $reader = New-Object System.IO.StreamReader($bak_file, [System.Text.Encoding]::GetEncoding("utf-8"))
    while (($line = $reader.ReadLine()) -ne $null)
    {
        if ($row -eq "") {
            $row = $line
        } else {
            $writer.WriteLine($line)
        }
    }
    $reader.Close()
    $writer.Close()
    
    Remove-Item $bak_file
    return $row
}

$list_file = ".\list.txt"
# ファイルが存在しない場合作成して終了
if (-not(Test-Path $list_file))
{
    New-Item $list_file
    Exit
}

# ファイルが空になるまで繰り返す
while ($row = Get-TopRow($list_file))
{
    # 何らかの処理（とりあえずコンソールに出力）
    Write-Host $row
}

# 
# 再実行処理の試作
# 

# 例外が発生する関数（ダウンロード処理など）
function TestFunc
{
    param([string]$row)

    # 乱数が3の場合わざと例外を発生させる
    $n = Get-Random -Maximum 3
    if ($n -eq 0)
    {
        throw $row
    }
}


# 処理対象のリスト
$listsStr = @"
a
b
c
d
e
"@
$list = ($listsStr -split "\r\n")

# エラーファイル
$errFile = ".\err.txt"

# エラーファイルがある場合レジューム
if (Test-Path $errFile)
{
    $reader = New-Object System.IO.StreamReader($errFile, [System.Text.Encoding]::GetEncoding("utf-8"))
    $line = $reader.ReadLine()
    $reader.Close()

    # 配列の再作成
    $i = [Array]::IndexOf($list, $line)
    if ($i -gt 0) {
        $list = $list[$i..($list.Count-1)]
    }
    Write-Host("前回失敗した${line}から再開")
}


# $listが空になるまで繰り返し
while ($list.Count -ge 1)
{
    # 0番目の項目を取り出し
    $row = $list[0]
    # 1番目以降をスライスで取得し配列を再作成
    if ($list.Count -eq 1)
    {
        # 長さ0の配列を強制
        $list = @()
    }
    else
    {
        $list = $list[1..($list.Count-1)]
    }

    # 確認のため出力
    Write-Host $row

    # 再試行カウント
    $rcnt = 0
    $rmax = 3
    while($rcnt -lt $rmax)
    {
        try {
            if ($rcnt -gt 0)
            {
                Write-Host "再試行${rcnt}回目"
            }
            TestFunc($row)
            $rcnt = $rmax + 99
        }
        catch {
            $rcnt += 1
            if ($rmax -le $rcnt)
            {
                # エラーファイルを書き出してスクリプトを終了
                $writer = New-Object System.IO.StreamWriter($errFile, $false, [System.Text.Encoding]::GetEncoding("utf-8"))
                $writer.WriteLine($row)
                $writer.Close()
                throw "再試行回数の限界突破"
            }
        }
        finally {
            Write-Host "finally"
        }
    }
}
# 正常終了の場合でエラーファイルがある場合削除
if (Test-Path $errFile) {
    Remove-Item $errFile
}

PS H:\ps1> .\retryprot.ps1
a
finally
再試行1回目
finally
再試行2回目
finally
b
finally
再試行1回目
finally
再試行2回目
finally
Exception: H:\ps1\retryprot.ps1:88:17
Line |
  88 |                  throw "再試行回数の限界突破"
     |                  ~~~~~~~~~~~~~~~~~~
     | 再試行回数の限界突破

PS H:\ps1> .\retryprot.ps1
前回失敗したbから再開
b
finally
c
finally
d
finally
再試行1回目
finally
e
finally