#compdef rm grm zf_rm

declare -a opts args
args=(
  '(-f --force)'{-f,--force}'[ignore nonexistent files, never prompt]'
  '(-I --interactive)-i[prompt before every removal]'
  '(-r -R --recursive)'{-r,-R,--recursive}'[remove directories and their contents recursively]'
  '*:: :->file'
)
if _pick_variant gnu=gnu unix --help; then
  opts+=(-S)
  args+=(
    '(-i --interactive)-I[prompt when removing many files]'
    '(-i -I)--interactive=-[prompt under given condition (defaulting to always)]::when:((once\:"prompt when removing many files"
                                                                                         always\:"prompt before every removal"))'
    '--one-file-system[stay within filesystems of files given as arguments]'
    '(                   --preserve-root)--no-preserve-root[do not treat / specially]'
    '(--no-preserve-root                )--preserve-root[do not remove / (default)]'
    '(-d --dir)'{-d,--dir}'[remove directories as well]'
    '(-v --verbose)'{-v,--verbose}'[explain what is being done]'
    '(- *)--help[display help message and exit]'
    '(- *)--version[output version information and exit]'
  )
else
  args=(${args:#*)--*\[*})
  case $OSTYPE in
    darwin*|dragonfly*|freebsd*|netbsd*|openbsd*)
      args+=(
        '-d[remove directories as well]'
        '-P[overwrite files before deleting them]'
        '-v[explain what is being done]'
      )
    ;|
    darwin*|dragonfly*|freebsd*|netbsd*)
      args+=(
        '-W[attempt to undelete named files]'
      )
    ;|
    dragonfly*|freebsd*|netbsd*)
      args+=(
        "-x[don't cross file systems when removing a hierarchy]"
      )
    ;|
    dragonfly*|freebsd*)
      args+=(
        '(-i)-I[prompt when removing many files]'
      )
    ;;
  esac
fi

local curcontext=$curcontext state line ret=1
declare -A opt_args

_arguments -C -s $opts \
  $args && ret=0

case $state in
  (file)
    line[CURRENT]=()
    line=( ${line//(#m)[\[\]()\\*?#<>~\^\|]/\\$MATCH} )
    _files -F line && ret=0
    ;;
esac

return $ret