ディレクトリのアクセス権限を取得、インポートするスクリプトについて

Question

前提・実現したいこと

PowerShell初心者です。
初めての質問であり、質問内のわかりづらい部分等、拙い記載がありましたら申し訳ございません。
PowerShellにて、ディレクトリのアクセス権限を取得するスクリプトおよび、取得したデータをインポートするシェルを作成中です。
具体的には正サーバからアクセス権限をcsvに出力し、災対用サーバにて、csvからデータを読み取り、
正サーバと同様の設定を行いたいと考えております。

疑問点

・csvからデータを読み取る為の書き方が理解できていません。
・csvに出力する際にキーに対して値が複数ある際に、キー,値,値となってしまいます。
実現したい出力は
キー,値
キー,値　となりますが、出力方法が分かりません。

該当のソースコード

■アクセス権出力用(dir-csv.ps1)
$target = "c:\temp"
foreach (FolderList in Get-ChildItem | where-object { $_.PSIsContainer })
{
$shareacl = (Get-ACL $FolderList).Access | Select IdentityReference | Select-String -Pattern 'domainname' | Select-String -Pattern 'user[0-9][0-9][0-9]'
Write-Host "FolderList","shareacl"
}

■csv出力用
$outfile = "c:\userlist.csv"

Powershell -NoProfile -File ".\dir-csv.ps1" > $outfile

#######出力後成型
$data = Get-Content $outfile | Foreach-Object { $_ -replace "{IdentityReference=","" }
$data | Out-File $outfile
$data = Get-Content $outfile | Foreach-Object { $_ -replace "}","" }
$data | Out-File $outfile
$data = Get-Content $outfile | Foreach-Object { $_ -replace " ","," }
$data | Out-File $outfile

試したこと

・csvからデータを読み取る方法
ヘッダーを付ける

$outfile = "c:\userlist.csv"
$target = "c:\temp"

$csv_content = Get-Content -Path "$outfile" -Encoding String
$csv_content = $csv_content | ConvertFromCsv -Header "dir","user1","user2"...

補足情報

具体的に実現したいことは以下です。

■csvを下記のようにしたい
test1,user001
test2,user001,user002
↓
test1,user001
test2,user001
test2,user002

■csvからディレクトリ名、ユーザ名を抽出しアクセス権限をループして与える
$target = "c:\temp"

cd $target
$User_or_Group_name = 'ここにcsvから抽出したユーザ名を入れたい'
$Folder_Path = "ここにvsvから抽出したディレクトリ名を入れたい($target+抽出したディレクトリ名)"
$acl = Get-ACL $FolderPath
$Permission = ("$User_or_Group_name","FullControl","ContainerInherit","None","Allow")
$AccessRule = New-Object System.Security.AccessControl.FileSystemAccessRule $Permission
$acl.SetAccessRule($AccessRule)
$acl | Set-ACL $FolderPath

上記をループさせたい。

以上となります。よろしくお願いいたします。

Answer 1

csvからディレクトリ名、ユーザー名を抽出
キー,値,値,値,値,値,値,値,値,値,値,値,値,値,値,値
↓
キー,値

#
# csvからディレクトリ名、ユーザー名を抽出
#
# ■注意事項■
# csvファイルは「ヘッダなし」にしてください。

<#
■使用したサンプルデータ
test1,user001
test2,user001,user002
test3,user001,user002,user003,user004,user005,user006,user007,user008,user009,user010,user011,user012,user013,user014,user015
test4,user001
test5,user001,user002
test6

test7,user001
test8,user001,user002

■実行結果
c:\temp\test1 user001
c:\temp\test2 user001
c:\temp\test2 user002
c:\temp\test3 user001
c:\temp\test3 user002
c:\temp\test3 user003
c:\temp\test3 user004
c:\temp\test3 user005
c:\temp\test3 user006
c:\temp\test3 user007
c:\temp\test3 user008
c:\temp\test3 user009
c:\temp\test3 user010
c:\temp\test3 user011
c:\temp\test3 user012
c:\temp\test3 user013
c:\temp\test3 user014
c:\temp\test3 user015
c:\temp\test4 user001
c:\temp\test5 user001
c:\temp\test5 user002
c:\temp\test7 user001
c:\temp\test8 user001
c:\temp\test8 user002

ご迷惑をお掛け致しまして、誠に申し訳ございませんでした。
#>


#
# キー,値,値,値,値,値,値,値,値,値,値,値,値,値,値,値 を変更します。
# ↓
# キー,値
#


$inputfile = "c:\userlist.csv"                   # ← Cドライブに「ヘッダなし」のcsvファイルを置きます。
$aaaa  = @()  # 配列
$Datas = @(Get-Content -LiteralPath $inputfile)  # Datas ← 最後の s は気にしないで。
foreach ( $Data in $Datas ){
    if ( $Data -ne '' ){
        $K_Count = ($Data.Split(",").count - 1)
        if ( $K_Count -ne 0 ){
            for ( $N=0 ; $N -lt $K_Count ; $N++ ){
                [String]$D_Name = $Data.Split(",")[0]
                [String]$U_Name = $Data.Split(",")[($N+1)]
                [String]$Merge  = $D_Name + "," + $U_Name
                $aaaa += $Merge
            }
        }
    }
}


#
# キー,値 を分解します。
# test1,user001 → user001
# test1,user001 → test1
#

foreach ( $bbbb in $aaaa ){
    $target             = "c:\temp"              # c:\temp        ターゲット
    $Right              = $bbbb.Split(",")[1]    # user001        カンマを中心にして分解 test1,user001 → user001 右辺を取得
    $Left               = $bbbb.Split(",")[0]    # test1          カンマを中心にして分解 test1,user001 → test1   左辺を取得
    $User_or_Group_name = $Right                 # user001        ユーザー名
    $Folder_Path        = $target+ '\' + $Left   # c:\temp\test1  target+ディレクトリ名
    # -----

    Write-host $Folder_Path $User_or_Group_name  # 確認の為、表示させています ← c:\temp\test1 user001 ← この内容で正しいかどうか確認してください。確認後は削除できます。

    # -----
    #
    # ↓ここから先は、自己責任になります。ご利用に際し如何なる損失や損害が発生しても、一切の責任を負いかねます。
    #
    # cd $target
    # $acl = Get-ACL $Folder_Path                # ファイル名を修正しました FolderPath → Folder_Path
    # $Permission = ("$User_or_Group_name","FullControl","ContainerInherit","None","Allow")
    # $AccessRule = New-Object System.Security.AccessControl.FileSystemAccessRule $Permission
    # $acl.SetAccessRule($AccessRule)
    # $acl | Set-ACL $Folder_Path                # ファイル名を修正しました FolderPath → Folder_Path
}

Answer 2

私のミスで質問者様の文章を読み間違えました。
取消して撤回致します。
誠に申し訳ございませんでした。
心からお詫び申し上げます。

Comments

[Zuishin]

> $out = $Data -replace '^(.*),(.*),(.*)$','$1,$2'

これ試しましたか？
低評価しておきます。

[spline]

ccc-　様
お返事が遅れて申し訳ありません。
非常に丁寧なご回答ありがとうございます。
本日サーバにて確認したところ、要件に沿った出力にできたのですが、
値が2つないディレクトリには同一ユーザが2つ表示されてしまいます。

また、値が3個以上の場合、何かいい方法はありませんでしょうか。
ディレクトリによりユーザ数が異なりますが、最大で15ユーザほど登録されているディレクトリが存在します。
聞いてばかりで申し訳ありませんが、よろしくお願いいたします。

[Zuishin]

私が書いたところに原因があります。

[spline]

Zuishin 様
私がプログラミングについて無知すぎるあまり、お目汚しして申し訳ありません。
ccc- 様の回答を拝見しながら理解を進めようとしているのですが、時間がかかってしまい…
色々と購入した参考書等とも見合わせているのですが、理解が及んでいません。
どうか、温かく見守っていただけると幸甚です。

[ccc-]

ご迷惑をお掛け致しまして、誠に申し訳ございませんでした。
もう１つアップします。
複数の値に対応致しました。
お手数ですが、ご確認ください。

[spline]

ccc- 様
早急なご対応ありがとうございます。
また、動作正常確認できました。
こんなに良いものを作っていただきなんとお礼したらいいか…
後学の為に、中身も勉強させていただきます。
この度はお力添えいただき本当にありがとうございました。