#compdef supervisorctl
# ------------------------------------------------------------------------------
# Copyright (c) 2015 Github zsh-users - https://github.com/zsh-users
# All rights reserved.
#
# Redistribution and use in source and binary forms, with or without
# modification, are permitted provided that the following conditions are met:
#     * Redistributions of source code must retain the above copyright
#       notice, this list of conditions and the following disclaimer.
#     * Redistributions in binary form must reproduce the above copyright
#       notice, this list of conditions and the following disclaimer in the
#       documentation and/or other materials provided with the distribution.
#     * Neither the name of the zsh-users nor the
#       names of its contributors may be used to endorse or promote products
#       derived from this software without specific prior written permission.
#
# THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS" AND
# ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED
# WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE
# DISCLAIMED. IN NO EVENT SHALL ZSH-USERS BE LIABLE FOR ANY
# DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES
# (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES;
# LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND
# ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
# (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS
# SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
# ------------------------------------------------------------------------------
# Description
# -----------
#
#  Completion script for supervisorctl from Supervisord (http://supervisord.org)
#
#  Sources:
#  https://github.com/ohmyzsh/ohmyzsh/tree/master/plugins/supervisor
#  https://github.com/zsh-users/zsh-completions/blob/master/src/_brew
#
# ------------------------------------------------------------------------------
# Authors
# -------
#
#  * Matt Black (https://github.com/mafrosis)
#  * dongweiming (https://github.com/dongweiming)
#
# ------------------------------------------------------------------------------


_supervisorctl_list_procs() {
  procs=(${(f)"$(_call_program supervisor_procs supervisorctl avail | awk '{print $1}')"})
}
_supervisorctl_list_groups() {
  groups=(${(f)"$(_call_program supervisor_procs supervisorctl avail | awk '$1 ~ /:/ { print substr($1,1,index($1,":")) }' | uniq)"})
}

_supervisorctl_list_procs_stopped() {
  procs=(${(f)"$(_call_program supervisor_procs supervisorctl status | awk '/STOPPED/ {print $1}')"})
}
_supervisorctl_list_groups_stopped() {
  groups=(${(f)"$(_call_program supervisor_procs supervisorctl status | awk '$1$2 ~ /:(.*)STOPPED/ { print substr($1,1,index($1,":")) }' | uniq)"})
}

_supervisorctl_list_procs_running() {
  procs=(${(f)"$(_call_program supervisor_procs supervisorctl status | awk '/RUNNING/ {print $1}')"})
}
_supervisorctl_list_groups_running() {
  groups=(${(f)"$(_call_program supervisor_procs supervisorctl status | awk '$1$2 ~ /:(.*)RUNNING/ { print substr($1,1,index($1,":")) }' | uniq)"})
}

local -a _1st_arguments
_1st_arguments=(
  'add:Activates any updates in config for process/group'
  'avail:Display all configured processes'
  'clear:Clear single/multiple/all process log files'
  'exit:Exit the supervisor shell'
  'fg:Connect to a process in foreground mode'
  'maintail:tail of supervisor main log file'
  'open:Connect to a remote supervisord process. (for UNIX domain socket, use unix:///socket/path)'
  'pid:Get the PID of process/supervisord'
  'quit:Exit the supervisor shell'
  'reload:Restart the remote supervisord'
  'remove:Removes process/group from active config'
  "reread:Reload the daemon's configuration files"
  'restart:Restart process, group or all'
  'shutdown:Shut the remote supervisord down'
  'start:Start process, group or all'
  'status:Get process/group status info'
  'stop:Stop process, group or all'
  'tail:tail of process stdout'
  'update:Reload config and add/remove as necessary'
  'version:Show the version of the remote supervisord process'
  'help:Show help'
)

local expl
local -a procs

_arguments \
  {--configuration,-c}='[configuration file path (default /etc/supervisor.conf)]:filename:_files' \
  {--help,-h}'[print usage message and exit]:' \
  {--interactive,-i}'[start an interactive shell after executing commands]' \
  {--serverurl,-s}='[URL on which supervisord server is listening (default "http://localhost:9001")]' \
  {--username,-u}='[username to use for authentication with server]:username:_users' \
  {--password,-p}='[password to use for authentication with server]:password:' \
  {--history-file,-r}'[keep a readline history (if readline is available)]:filename:_files' \
  '*:: :->subcmds' && return 0

if (( CURRENT == 1 )); then
  _describe -t commands 'supervisorctl subcommand' _1st_arguments
  return
fi

case "$words[1]" in
  help)
    tasks=(add avail clear exit fg maintail open pid quit reload remove \
           reread restart shutdown start status stop tail update version)

    _wanted tasks expl 'help' compadd $tasks ;;

  add|fg|remove)
    # commands that only operate on processes
    _supervisorctl_list_procs
    _wanted procs expl 'process' compadd -a procs ;;

  clear|pid)
    # commands that operate on processes and "all"
    _supervisorctl_list_procs
    procs+=('all')
    _wanted procs expl 'process' compadd -a procs ;;

  status|update)
    # commands that operate on processes, groups & "all"
    _supervisorctl_list_procs
    procs+=('all')
    _wanted procs expl 'process' compadd -a procs

    _supervisorctl_list_groups
    _wanted groups expl 'group' compadd -a groups ;;

  stop)
    # commands that operate on RUNNING processes, groups & "all"
    _supervisorctl_list_procs_running
    procs+=('all')
    _wanted procs expl 'process' compadd -a procs

    _supervisorctl_list_groups_running
    _wanted groups expl 'group' compadd -a groups ;;

  restart|start)
    # commands that operate on STOPPED processes, groups & "all"
    _supervisorctl_list_procs_stopped
    procs+=('all')
    _wanted procs expl 'process' compadd -a procs

    _supervisorctl_list_groups_stopped
    _wanted groups expl 'group' compadd -a groups ;;

  tail|maintail)
    _arguments \
      '-f[Continuous tail of named process stdout]' \
      '-[last N *bytes* of process stdout]:number' \
      '1: :->forms' && return 0

      if [[ $state == forms ]]; then
        _supervisorctl_list_procs
        _wanted procs expl 'processes' compadd -a procs
      fi ;;
esac

# Local Variables:
# mode: Shell-Script
# sh-indentation: 2
# indent-tabs-mode: nil
# sh-basic-offset: 2
# End:
# vim: ft=zsh sw=2 ts=2 et
