using namespace System.Management.Automation
using namespace System.Management.Automation.Language

Register-ArgumentCompleter -Native -CommandName 'rm' -ScriptBlock {
    param($wordToComplete, $commandAst, $cursorPosition)

    $commandElements = $commandAst.CommandElements
    $command = @(
        'rm'
        for ($i = 1; $i -lt $commandElements.Count; $i++) {
            $element = $commandElements[$i]
            if ($element -isnot [StringConstantExpressionAst] -or
                $element.StringConstantType -ne [StringConstantType]::BareWord -or
                $element.Value.StartsWith('-') -or
                $element.Value -eq $wordToComplete) {
                break
        }
        $element.Value
    }) -join ';'

    $completions = @(switch ($command) {
        'rm' {
            [CompletionResult]::new('--interactive', 'interactive', [CompletionResultType]::ParameterName, 'when to prompt')
            [CompletionResult]::new('-i', 'i', [CompletionResultType]::ParameterName, 'prompt before every removal')
            [CompletionResult]::new('-I', 'I', [CompletionResultType]::ParameterName, 'prompt once before removing more than three files, or when removing recursively;
less  intrusive than -i, while still giving protection against most mistakes')
            [CompletionResult]::new('-f', 'f', [CompletionResultType]::ParameterName, 'ignore nonexistent files and arguments, never prompt')
            [CompletionResult]::new('--force', 'force', [CompletionResultType]::ParameterName, 'ignore nonexistent files and arguments, never prompt')
            [CompletionResult]::new('-R', 'R', [CompletionResultType]::ParameterName, 'operate on files and directories recursively')
            [CompletionResult]::new('--recursive', 'recursive', [CompletionResultType]::ParameterName, 'operate on files and directories recursively')
            [CompletionResult]::new('-v', 'v', [CompletionResultType]::ParameterName, 'output a diagnostic for every file processed')
            [CompletionResult]::new('--verbose', 'verbose', [CompletionResultType]::ParameterName, 'output a diagnostic for every file processed')
            [CompletionResult]::new('-h', 'h', [CompletionResultType]::ParameterName, 'Print help')
            [CompletionResult]::new('--help', 'help', [CompletionResultType]::ParameterName, 'Print help')
            [CompletionResult]::new('-V', 'V', [CompletionResultType]::ParameterName, 'Print version')
            [CompletionResult]::new('--version', 'version', [CompletionResultType]::ParameterName, 'Print version')
            break
        }
    })

    $completions.Where{ $_.CompletionText -like "$wordToComplete*" } |
        Sort-Object -Property ListItemText
}