Azure ポイント対サイトVPN(S2P)の設計

# Azureへの認証
Write-Host "Azureにサインインしています..."
Connect-AzAccount

# 対話式でリソース名とプレフィックスを確認
function Get-Input {
    param (
        [string]$promptMessage,
        [string]$defaultValue
    )
    $input = Read-Host -Prompt "$promptMessage [$defaultValue]"
    if ([string]::IsNullOrEmpty($input)) {
        return $defaultValue
    } else {
        return $input
    }
}

# 初期入力
$resourceGroupName = Get-Input -promptMessage "リソースグループ名を入力してください" -defaultValue "default-rg"
$region = Get-Input -promptMessage "リージョンを入力してください (例: JapanEast)" -defaultValue "JapanEast"
$virtualNetworkName = Get-Input -promptMessage "仮想ネットワーク名を入力してください" -defaultValue "default-vnet"
$subnetName = Get-Input -promptMessage "サブネット名を入力してください" -defaultValue "default-subnet"
$gatewaySubnetName = Get-Input -promptMessage "ゲートウェイサブネット名を入力してください" -defaultValue "GatewaySubnet"
$publicIpName = Get-Input -promptMessage "パブリックIPアドレスの名前を入力してください" -defaultValue "default-publicip"
$vpnGwName = Get-Input -promptMessage "VPNゲートウェイ名を入力してください" -defaultValue "default-vpngw"
$addressPrefix = Get-Input -promptMessage "アドレスプレフィックス (例: 10.0.0.0/16) を入力してください" -defaultValue "10.0.0.0/16"
$subnetPrefix = Get-Input -promptMessage "サブネットプレフィックス (例: 10.0.0.0/24) を入力してください" -defaultValue "10.0.0.0/24"
$gatewaySubnetPrefix = Get-Input -promptMessage "ゲートウェイサブネットプレフィックス (例: 10.0.254.0/24) を入力してください" -defaultValue "10.0.254.0/24"

# 入力内容を確認
do {
    Write-Host "以下の設定を確認してください:"
    Write-Host "1. リソースグループ名: $resourceGroupName"
    Write-Host "2. リージョン: $region"
    Write-Host "3. 仮想ネットワーク名: $virtualNetworkName"
    Write-Host "4. サブネット名: $subnetName"
    Write-Host "5. ゲートウェイサブネット名: $gatewaySubnetName"
    Write-Host "6. パブリックIPアドレス名: $publicIpName"
    Write-Host "7. VPNゲートウェイ名: $vpnGwName"
    Write-Host "8. アドレスプレフィックス: $addressPrefix"
    Write-Host "9. サブネットプレフィックス: $subnetPrefix"
    Write-Host "10. ゲートウェイサブネットプレフィックス: $gatewaySubnetPrefix"

    $modify = Read-Host "変更したい項目番号があれば入力してください (終了するには Enter を押してください)"
    
    switch ($modify) {
        "1" { $resourceGroupName = Get-Input -promptMessage "リソースグループ名を入力してください" -defaultValue $resourceGroupName }
        "2" { $region = Get-Input -promptMessage "リージョンを入力してください (例: JapanEast)" -defaultValue $region }
        "3" { $virtualNetworkName = Get-Input -promptMessage "仮想ネットワーク名を入力してください" -defaultValue $virtualNetworkName }
        "4" { $subnetName = Get-Input -promptMessage "サブネット名を入力してください" -defaultValue $subnetName }
        "5" { $gatewaySubnetName = Get-Input -promptMessage "ゲートウェイサブネット名を入力してください" -defaultValue $gatewaySubnetName }
        "6" { $publicIpName = Get-Input -promptMessage "パブリックIPアドレスの名前を入力してください" -defaultValue $publicIpName }
        "7" { $vpnGwName = Get-Input -promptMessage "VPNゲートウェイ名を入力してください" -defaultValue $vpnGwName }
        "8" { $addressPrefix = Get-Input -promptMessage "アドレスプレフィックス (例: 10.0.0.0/16) を入力してください" -defaultValue $addressPrefix }
        "9" { $subnetPrefix = Get-Input -promptMessage "サブネットプレフィックス (例: 10.0.0.0/24) を入力してください" -defaultValue $subnetPrefix }
        "10" { $gatewaySubnetPrefix = Get-Input -promptMessage "ゲートウェイサブネットプレフィックス (例: 10.0.254.0/24) を入力してください" -defaultValue $gatewaySubnetPrefix }
    }
} while ($modify -ne "")

# ユーザーに最終確認
$confirmation = Read-Host "上記の設定で作成しますか？(Y/N)"
if ($confirmation -ne "Y") {
    Write-Host "作成を中止しました。"
    exit
}

# リソースグループの存在確認と作成
$resourceGroup = Get-AzResourceGroup -Name $resourceGroupName -ErrorAction SilentlyContinue
if (-not $resourceGroup) {
    Write-Host "リソースグループ '$resourceGroupName' が存在しません。作成します。"
    New-AzResourceGroup -Name $resourceGroupName -Location $region
} else {
    Write-Host "リソースグループ '$resourceGroupName' は既に存在します。"
}

# 仮想ネットワークの存在確認と作成
$virtualNetwork = Get-AzVirtualNetwork -ResourceGroupName $resourceGroupName -Name $virtualNetworkName -ErrorAction SilentlyContinue
if (-not $virtualNetwork) {
    Write-Host "仮想ネットワーク '$virtualNetworkName' が存在しません。作成します。"
    $virtualNetwork = New-AzVirtualNetwork -ResourceGroupName $resourceGroupName -Location $region -Name $virtualNetworkName -AddressPrefix $addressPrefix
    $subnetConfig = Add-AzVirtualNetworkSubnetConfig -Name $subnetName -AddressPrefix $subnetPrefix -VirtualNetwork $virtualNetwork
    $virtualNetwork | Set-AzVirtualNetwork
} else {
    Write-Host "仮想ネットワーク '$virtualNetworkName' は既に存在します。"
}

# ゲートウェイサブネットの存在確認と作成
$vnet = Get-AzVirtualNetwork -ResourceGroupName $resourceGroupName -Name $virtualNetworkName
$gatewaySubnet = Get-AzVirtualNetworkSubnetConfig -Name $gatewaySubnetName -VirtualNetwork $vnet -ErrorAction SilentlyContinue
if (-not $gatewaySubnet) {
    Write-Host "ゲートウェイサブネット '$gatewaySubnetName' が存在しません。作成します。"
    Add-AzVirtualNetworkSubnetConfig -Name $gatewaySubnetName -AddressPrefix $gatewaySubnetPrefix -VirtualNetwork $vnet
    $vnet | Set-AzVirtualNetwork
} else {
    Write-Host "ゲートウェイサブネット '$gatewaySubnetName' は既に存在します。"
}

# パブリックIPアドレスの存在確認と作成
$gwpip = Get-AzPublicIpAddress -ResourceGroupName $resourceGroupName -Name $publicIpName -ErrorAction SilentlyContinue
if (-not $gwpip) {
    Write-Host "パブリックIPアドレス '$publicIpName' が存在しません。作成します。"
    $gwpip = New-AzPublicIpAddress -Name $publicIpName -ResourceGroupName $resourceGroupName -Location $region -AllocationMethod Dynamic -Sku "Basic"
} else {
    Write-Host "パブリックIPアドレス '$publicIpName' は既に存在します。"
}

# VPNゲートウェイの存在確認と作成
$vpnGateway = Get-AzVirtualNetworkGateway -ResourceGroupName $resourceGroupName -Name $vpnGwName -ErrorAction SilentlyContinue
if (-not $vpnGateway) {
    Write-Host "VPNゲートウェイ '$vpnGwName' が存在しません。作成します。"

    # ゲートウェイサブネットが作成された後、$subnet.Idがnullでないことを確認するループ
    $subnet = $null
    while (-not $subnet -or -not $subnet.Id) {
        Write-Host "ゲートウェイサブネットの構成を取得中..."
        $vnet = Get-AzVirtualNetwork -ResourceGroupName $resourceGroupName -Name $virtualNetworkName
        $subnet = Get-AzVirtualNetworkSubnetConfig -Name $gatewaySubnetName -VirtualNetwork $vnet
        if ($subnet.Id) {
            Write-Host "ゲートウェイサブネットが正常に取得されました。"
        } else {
            Write-Host "ゲートウェイサブネットがまだ準備中です。5秒後に再試行します..."
            Start-Sleep -Seconds 5
        }
    }

    $gwipconfig = New-AzVirtualNetworkGatewayIpConfig -Name "$vpnGwName-ipconfig" -SubnetId $subnet.Id -PublicIpAddressId $gwpip.Id

    # VPNゲートウェイ作成
    Write-Host "VPNゲートウェイ作成中（数十分かかります）"
    New-AzVirtualNetworkGateway -Name $vpnGwName -ResourceGroupName $resourceGroupName -Location $region -IpConfigurations $gwipconfig -GatewayType "Vpn" -VpnType "RouteBased" -GatewaySku "Basic" -VpnGatewayGeneration "Generation1"
} else {
    Write-Host "VPNゲートウェイ '$vpnGwName' は既に存在します。"
}

# VPNゲートウェイ表示
Get-AzVirtualNetworkGateway -Name $vpnGwName -ResourceGroup $resourceGroupName

# パブリックIPアドレス表示
Get-AzPublicIpAddress -Name $publicIpName -ResourceGroupName $resourceGroupName

$cert = New-SelfSignedCertificate -Type Custom -KeySpec Signature `<br>-Subject “CN=RootCertSATORI” -KeyExportPolicy Exportable `<br>-HashAlgorithm sha256 -KeyLength 2048 `<br>-CertStoreLocation “Cert:\CurrentUser\My” -KeyUsageProperty Sign -KeyUsage CertSign<br>

New-SelfSignedCertificate -Type Custom -DnsName P2SChildCert -KeySpec Signature `
-Subject “CN=SATORIClient” -KeyExportPolicy Exportable `
-HashAlgorithm sha256 -KeyLength 2048 `
-CertStoreLocation “Cert:\CurrentUser\My” `
-Signer $cert -TextExtension @(“2.5.29.37={text}1.3.6.1.5.5.7.3.2”)