Scripts/GFK.Image.digiKam.psm1
|
#Requires -PSEdition Core #Requires -Module GFK.Image Set-StrictMode -Version Latest function Install-PSDigiKam { <# .SYNOPSIS Add the PowerShell injection to digiKam .NOTES digiKam is expected to be installed for this command to work #> [CmdletBinding(SupportsShouldProcess)] Param([switch]$Force) Test-IsAdministrator $sourcePath = Join-Path (Split-Path $PSScriptRoot) cmd cmd.exe Copy-Item $sourcePath (Get-DigiKamPath) -Force:$Force } function Uninstall-PSDigiKam { <# .SYNOPSIS Removes the PowerShell injection from digiKam .NOTES digiKam is expected to be installed for this command to work #> [CmdletBinding(SupportsShouldProcess)] Param([switch]$Force) Test-IsAdministrator $path = Join-Path (Get-DigiKamPath) cmd.exe if (Test-Path $path) { Remove-Item $path -Force:$Force } } function New-PSDigiKamDrive { <# .SYNOPSIS Creates a Tags drive from digiKam tags .DESCRIPTION Hierarchized tags passed by digiKam are in a single string where ';' is the tag separator and '/' is the path separator This will load these tags in a new PowerShell drive to enable exploring them .NOTES Backslashes (\) will be replaced by carets (-) in tag values due to a limitation in PowerShell support #> [CmdletBinding(SupportsShouldProcess, PositionalBinding = $false)] Param ( [Parameter(ValueFromPipelineByPropertyName)] [string] $Name = 'Tags', [Parameter(Mandatory, ValueFromPipelineByPropertyName)] [string] $Tags ) Process { $root = "${Name}:" New-PSDrive -Name $Name -PSProvider Tags -Root $root -Scope Global | Out-Null $Tags -split ';' | Foreach-Object { $filePath = "${root}/$_" if ($PSCmdlet.ShouldProcess($filePath, "Create tag")) { New-Item $filePath | Out-Null } } } } #region Private functions function Test-IsAdministrator { $identity = [Security.Principal.WindowsIdentity]::GetCurrent() $principal = New-Object Security.Principal.WindowsPrincipal $identity if (-not $principal.IsInRole([Security.Principal.WindowsBuiltinRole]::Administrator)) { throw 'This command must run in an elevated shell' } } function Get-DigiKamPath { [OutputType([string])] param() if ($env:OS -ne 'Windows_NT' -or $env:PROCESSOR_ARCHITECTURE -ne 'AMD64') { throw 'This command is only compatible with win64 systems' } $digiKamRegistryKey = Get-Item HKLM:\SOFTWARE\Wow6432Node\Microsoft\Windows\CurrentVersion\Uninstall\digiKam -ErrorAction SilentlyContinue if (-not$digiKamRegistryKey) { throw 'digiKam does not appear to be installed' } return $digiKamRegistryKey.GetValue('InstallLocation') } #endregion |