Public/Export-SlackWebChannelHistory.ps1

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
function Export-SlackWebChannelHistory {
    Param (
        [Parameter(ParameterSetName = 'Name', Mandatory)]
        [string]$Name,
        [Parameter(ParameterSetName = 'ID', Mandatory)]
        [string[]]$ID,
        [Parameter(ParameterSetName = 'Name', Mandatory)]
        [Parameter(ParameterSetName = 'ID', Mandatory)]
        [ValidateScript({ Test-Path -Path $_ -PathType Container })]
        [string]$OutFolder,
        [Parameter(DontShow)]
        [int]$MessageRepliesRateLimitSeconds = $ModuleWideMessageRepliesRateLimitSeconds
    )

    if (-not $ID) {
        $ID = (Get-Channel -Name $Name).id
    }

    foreach ($ChannelID in $ID) {
        $Messages = Get-ChannelMessages -ChannelID $ChannelID

        foreach ($Message in $Messages) {
            if ($Message.reply_count) {
                Start-Sleep -Seconds $MessageRepliesRateLimitSeconds
                $Replies = Get-MessageReplies -ChannelID $ChannelID -ts $Message.thread_ts -latest $Message.latest_reply
                $RepliesProcessed = ($Replies | ConvertFrom-Json).messages | Where-Object -FilterScript { $_.client_msg_id -ne $Message.client_msg_id }
                Add-Member -InputObject $Message -Name 'replies' -Value $RepliesProcessed -MemberType NoteProperty
            }
            if ($Message.files) {
                foreach ($File in $Message.files) {
                    if ($File.mode -in ('hosted', 'snippet', 'email', 'space')) {
                        $FileName = $File.name
                        [System.IO.Path]::GetInvalidFileNameChars() | ForEach-Object -Process { $FileName = $FileName.replace($_, '_') }
                        $FullFileName = '{0}-{1}-{2}' -f $ChannelID, $File.id, $FileName
                        if ($File.mode -eq 'email') {
                            $FullFileName = '{0}.html' -f $FullFileName
                        }
                        try {
                            Invoke-CustomWebRequest -Uri $File.url_private_download -OutFile (Join-Path -Path $OutFolder -ChildPath $FullFileName) -ErrorAction Stop
                        }
                        catch {
                            Write-Error -Message ('Error while downloading file {0} ({1}).' -f $File.id, $File.url_private_download) -TargetObject $File -Exception $_.Exception
                        }
                    }
                    else {
                        Write-Error -Message ('File {0} of the type "{1}" is not supported yet.' -f $File.id, $File.mode) -TargetObject $File -Exception (New-Object -TypeName 'System.NotSupportedException')
                    }
                }
            }
        }

        $MessagesFileName = '{0}.json' -f $ChannelID
        $Messages | ConvertTo-Json -Depth 20 | Set-Content -Path (Join-Path -Path $OutFolder -ChildPath $MessagesFileName)
    }
}