x3rd

#!/bin/bash
#   Copyright 2017 bin jin
#
#   Licensed under the Apache License, Version 2.0 (the "License");
#   you may not use this file except in compliance with the License.
#   You may obtain a copy of the License at
#
#       http://www.apache.org/licenses/LICENSE-2.0
#
#   Unless required by applicable law or agreed to in writing, software
#   distributed under the License is distributed on an "AS IS" BASIS,
#   WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
#   See the License for the specific language governing permissions and
#   limitations under the License.

# Resolve the real script directory, follow symlink
__script_dir () {
    [ "$__SELF_DIR" ] && { printf "%s" "$__SELF_DIR"; return; }
    local src=$0 dir;
    while [ -L "$src" ]; do
        dir=$(cd "$(dirname "$src")" && pwd);
        src=$(readlink "$src");
        case $src in /*) :;; *) src="$dir/$src";; esac
    done
    cd "$(dirname "$src")" && pwd
}
__SELF_DIR=$(__script_dir)

# Framework:
#
#     A function whose name conforms to the specification gets:
#         External invocation.
#         Error handling.
#         Help information.
#         The function list.
#         Shell completion.
#
#     The annotation is both the help text and the completion source; keep it next to the code:
#         A [###] at the line start is for the command; an indented [###] is for the case pattern below it.
#
#     For example:
#         ### [brief_introduction]
#         ### Usage: [function_name] [OPTION]... [OPERAND]...
#         [script_name]_[function_name](){
#             [function_body]
#             case $1 in
#                 ###   -o, --option=FILE   [description]
#                 --option|-o)
#                     [function_body]
#                 ;;
#                 ###   OPERAND=FILE   [description]
#                 *)
#                     [function_body]
#                 ;;
#             esac
#             # exit and display [error_description]
#             exit 1; # [error_description]
#         }
#
#     The metavariable names the completion source:
#         FILE IMAGE DIRECTORY DEVICE PATH SHELL KIND
#         {a|b} is an enumeration, e.g., {yes|no}
#     A platform tag at the end of an annotation line marks it as platform specific:
#         [macOS] or [Linux]; the tag is shown in help and skipped by completion
#         on the other platform.
#
#     [###] is reserved for annotation; any other comment must use [#]:
#         Use [comp --check] to check the annotations.

# # arguments
# for i in "$@"; do
#     case "$i" in
#         --arg.str=*)
#             printf ${i#*=}
#         ;;
#         --help | -h)
#             printf "HELP\n"
#         ;;
#         *)
#             printf "invalid option\n" >&2
#         ;;
#     esac;
# done

### Print version and exit
### Usage: version
_x3rd_version () {
    printf "0.26.9.26\n" >&2;
    return 0
}

### Manage the LAN interface
### Usage: lan [OPTION]... INTERFACE
_x3rd_lan () {
    local PATH="$PATH:/usr/bin:/usr/sbin:/sbin"; # For 'crontab'.
    case $1 in
        ###   -r, --restart=INTERFACE   restart INTERFACE; an optional -f or --force is accepted
        --restart|-r)
            [ "$2" ] || exit 1; # LAN name is empty.
            [[ $2 == *[a-zA-Z][0-9]* ]] || exit 1; # Not a LAN device.

            if [[ $OSTYPE == darwin* ]]; then
                [ "$3" == "--force" -o "$3" == "-f" ] || \
                    ifconfig $2 2>/dev/null | grep -q "status:.*inactive" || return 0;

                networksetup -setairportpower $2 off && \
                networksetup -setairportpower $2 on && return 0;

            fi
            return 1
        ;;
        *)
            exit 1; # Invalid option.
        ;;
    esac;
}

### Git tools
### Usage: git [OPTION]... [ARG]...
_x3rd_git () {
    case $1 in
        ###   -b, --backup   backup git repositories
        --backup|-b)
            which git >/dev/null 2>&1 || exit 1; # The git command was not found.
            local l o name tamp;

            while read l; do
                l=${l%/*};

                # Project name.
                name=${l/\/\.git/};
                name=${name/\.git/};
                name=${name##*/};

                tamp=`git --git-dir="$l" log -1 --all --pretty=format:%cd --date=format:%y%m%d%H%M`;

                [ "$tamp" ] || {
                    echo skip: $l;
                    continue
                };

                o="./${name}_$tamp.git";

                [ -f "$o" ] && {
                    echo exist: $o;
                    continue
                };

                echo create bundle: $name;
                # git --git-dir="$l" bundle create "$o" HEAD master;
                git --git-dir="$l" bundle create "$o" --all && git bundle verify "$o";
                git --git-dir="$l" gc;
                echo
            done < <(find . -type d -name "hooks")
        ;;
        ###   -r, --rbundle=PATH   transfer PATH as a git bundle
        --rbundle|-r)
            shift;
            [ "$1" ] || exit 1; # Target path is empty.
            [ "$2" ] || exit 1; # Source path is empty.
            local target_host target_dir source_host source_dir;

            target_dir="${1#*:}";
            [ "$target_dir" == "$1" ] || target_host=${1%%:*};

            source_dir="${2#*:}";
            [ "$source_dir" == "$2" ] || source_host=${2%%:*};

            function __rbundle () {
                printf %s 'git --git-dir="'"$2"'" bundle create - --all' | ssh $1 bash
            }

            function __rcatver () {
                ssh $1 'cat > "'"$2"'" && git bundle verify "'"$2"'"'
            }

            if [ "$target_host" -a "$source_host" ]; then
                # Both sides are remote.
                __rbundle $source_host $source_dir | __rcatver $target_host "$target_dir"
            elif [ "$target_host" ]; then
                # Local to remote.
                [ -d "$source_dir" ] || exit 1; # Path does not exist.
                git --git-dir="$source_dir" bundle create - --all | __rcatver $target_host "$target_dir"
            else
                # Remote to local.
                __rbundle $source_host $source_dir > "$target_dir";
                git bundle verify "$1";
            fi
            return 0
        ;;
        ###   -ua, --update-all   update all repositories
        --update-all|-ua)
            find . -iname ".git" | while read dir; do printf "[INFO] \e[32m%s\x1b[0m\n" "${dir%/.git}"; git --git-dir=$dir --work-tree=${dir%/.git} pull; done;
        ;;
        ###   -id, --install-doc   install the 'doc' alias to ~/.gitconfig
        --install-doc|-id)
            which git >/dev/null 2>&1 || exit 1; # The git command was not found.
            local config=$HOME/.gitconfig doc_current doc_block;
            [ -f "$config" ] || : > "$config";
            # Keep the repository documentation in a sibling git repository; the
            # paths come from [.docpathspec], or all '*.md' when it is missing.
            IFS= read -r -d '' doc_block <<'DOC'
    doc = "!f() { \
      root=\"$(git rev-parse --show-toplevel)\" || exit 1; repo=\"$(git rev-parse --show-superproject-working-tree 2>/dev/null)\"; \
      [ -n \"$repo\" ] && repo=\"$repo.${root##*/}\"; repo=\"${repo:-$root}.docs.git\"; spec=\"$root/.docpathspec\"; case $1 in \
      status|add) cmd=$1; shift; [ \"$1\" = -- ] && { shift; exec git --git-dir=\"$repo\" --work-tree=\"$root\" \"$cmd\" \"$@\"; }; \
      [ \"$cmd\" = status ] && opt='-uall --ignored=matching' || opt='-f'; \
      [ -f \"$spec\" ] || { git --git-dir=\"$repo\" --work-tree=\"$root\" \"$cmd\" $opt -- ':(glob)**/*.md'; return; }; \
      set -- --; while IFS= read -r line; do case \"$line\" in ''|'#'*) ;; *) set -- \"$@\" \"$line\";; esac; done < \"$spec\"; \
      [ \"$cmd\" = add ] && git --git-dir=\"$repo\" --work-tree=\"$root\" \"$cmd\" $opt -- ':(top).docpathspec'; \
      git --git-dir=\"$repo\" --work-tree=\"$root\" \"$cmd\" $opt \"$@\";; \
      clone) tmp=\"$(mktemp -d 2>/dev/null).$$.git\"; git clone --no-checkout --separate-git-dir=\"$repo\" \"$2\" \"$tmp\" || :; rm -fr \"$tmp\";; \
      *) git --git-dir=\"$repo\" --work-tree=\"$root\" \"$@\";; esac; \
    }; f"
DOC
            doc_block=${doc_block%$'\n'};
            doc_current=$(awk '/^[[:space:]]*doc[[:space:]]*=/{p=1} p{print; if ($0 !~ /\\$/) exit}' "$config");
            [ "$doc_current" == "$doc_block" ] && {
                printf "exist: alias.doc\n";
                return 0
            };
            __git_install_doc "$config" "$doc_block" || exit 1; # Failed to install the 'doc' alias.
            printf "install: alias.doc -> %s\n" "$config"
        ;;
        *)
            exit 1; # Invalid option.
        ;;
    esac;
}

# Replace the [doc] alias in the [alias] section of the git config with [block].
__git_install_doc () {
    local config=$1 block=$2 tmp="${1}.$$";
    BLOCK="$block" awk '
        # Drop the previous doc entry, including its continuation lines.
        skip { if ($0 ~ /\\$/) next; skip=0; next }
        /^[[:space:]]*doc[[:space:]]*=/ { if ($0 ~ /\\$/) skip=1; next }
        # Insert the block after the [alias] section header.
        /^[[:space:]]*\[alias\][[:space:]]*$/ { print; printf "%s\n", ENVIRON["BLOCK"]; seen=1; next }
        { print }
        END {
            if (!seen) {
                if (NR) printf "\n";
                printf "[alias]\n%s\n", ENVIRON["BLOCK"]
            }
        }
    ' "$config" > "$tmp" || {
        rm -f "$tmp";
        return 1
    };
    mv -f "$tmp" "$config" || {
        rm -f "$tmp";
        return 1
    };
    return 0
}

# ### VirtualBox Manage (Not complete) ##Usage: vbox [start|stop|stopall] ##
# _x3rd_vbox () {
#     [ -f /Applications/VirtualBox.app\Contents\MacOS\VBoxManage ] || exit 1; # need install VirtualBox
#     return 0
# }

### Docker batch command
### Usage: moby COMMAND
_x3rd_moby () {
    [ "$1" == "tags" ] || which docker >/dev/null 2>&1 || exit 1; # The docker client command was not found.
    case $1 in
        ###   start   start all exited containers
        start)
            docker ps --filter status=exited | awk 'NR>1 {print "docker start " $1 | "sh"}'
        ;;
        ###   stop   stop all running containers
        stop)
            docker ps | awk 'NR>1 {print "docker stop " $1 | "sh"}'
        ;;
        ###   tags=IMAGE   print the tags of IMAGE
        tags)
            shift;
            [ "$1" ] || exit 1; # Argument is empty.
            # curl --location --connect-timeout 30 --silent https://index.docker.io/v1/repositories/$2/tags 2>/dev/null | \
            #     awk -F '[{},]' -v tag="$2" '{for(i=1; i<NF; i++)if($i ~ /name/){gsub(/"/, "", $i); sub(/ name: /, tag ":" , $i); print $i}}' | sort --version-sort;

            # # https://www.docker.com/blog/docker-hub-v1-api-deprecation/
            # # https://docs.docker.com/docker-hub/api/deprecated/

            # https://hub.docker.com/v2/namespaces/(library|[namespace])/repositories/[name]/tags/?page_size=100&page=1
            # https://hub.docker.com/v2/repositories/(library|[namespace])/[name]/tags/?page_size=100&page=1

            [ "${1/\//}" == "$1" ] && set -- library/$1;
            __moby_tags "https://hub.docker.com/v2/repositories/$1/tags/?page=1&page_size=100" | \
                awk -v name=${1/library\//} '{gsub(/"/, ""); print name$0}' | \
                sort --version-sort;

        ;;
        ###   b, bridge   print container network info
        bridge|b)
            docker network inspect --format '{{range .Containers}}{{printf "%-18s %s  %s\n" .Name .MacAddress .IPv4Address}}{{end}}' bridge
        ;;
        ###   p, port   print container ports
        port|p)
            # docker inspect --format '{{range $key, $value := .HostConfig.PortBindings}}{{(index $value 0).HostPort}} -> {{$key}}{{"\n"}}{{end}}' $2
            docker inspect --format '{{range $key, $value := .HostConfig.PortBindings}}{{printf "%-15s -> %s\n" (index $value 0).HostPort $key}}{{end}}' $2
        ;;
        ###   m, mount   print container mounts
        mount|m)
            # docker inspect --format '{{range $i, $v := .Mounts}}{{printf "%-40s -> %s\n" $v.Source $v.Destination}}{{end}}' $2
            docker inspect --format '{{range $i, $v := .Mounts}}{{printf "%-40s -> %s %s\n" $v.Source $v.Destination $v.Mode}}{{end}}' $2
        ;;
        ###   run-com   run the docker compose command
        run-com)
            docker inspect --format '{{range $key, $value := .HostConfig.PortBindings}} --publish {{(index $value 0).HostPort}}:{{$key}} \{{"\n"}}{{end}}{{range $i, $v := .Mounts}} --volume {{$v.Source}}:{{$v.Destination}} {{$v.Mode}} \{{"\n"}}{{end}}{{range $key, $value := .Config.Env}} --env {{$value}} \{{"\n"}}{{end}}' $2
        ;;
        ###   https4nginx   print the HTTPS configuration for nginx
        https4nginx)
            shift;
            local host_name="$1" httpd_root_path="$2" nginx_ssl_path="$3" emails="$4" image_version=$(docker images | awk '/^certbot/{print $2}' | sort -rV | head -1);
            [ "$host_name" ] || exit 1; # Host name is empty.
            [ "$httpd_root_path" ] || exit 1; # HTTPD root path is empty.
            [ "$nginx_ssl_path" ] || exit 1; # Nginx SSL path is empty.
            [ "$emails" ] || exit 1; # Email is empty.
            : ${image_version:='latest'};
            docker run --rm \
                --volume $httpd_root_path:/www \
                --volume $nginx_ssl_path/letsencrypt:/etc/letsencrypt \
                certbot/certbot:$image_version \
                certonly \
                    --non-interactive \
                    --agree-tos \
                    --email $emails \
                    --webroot \
                    --webroot-path /www \
                    --domain $host_name
        ;;
        *)
            exit 1; # Invalid option.
        ;;
    esac;
    return 0
}

__moby_tags() {
    sleep 1.$(($RANDOM % 5 + 5));
    while read key value; do
        if [ "${key//\"/}" == "name" ]; then
            printf "%s\n" :$value
        elif [ "${key//\"/}" == "next" ]; then
            [ "$value" == "null" ] || eval __moby_tags $value
        fi
    done < <(
        curl --location --connect-timeout 30 --silent "$1" | \
            awk -F ',' '{for(i=1; i<=NF; i++) if($i ~ /"name":|"next":/) {sub(/:/," ",$i); sub(/[\\]?u0026/, "\\&", $i); print $i}}'
    )
}


# ### Camouflage to VDISK for boot2docker ##Usage: camvd [remote_login_info]
# _x3rd_camvd () {
#     ssh $@ <<-SH
# ver=\`uname -r\`;
# [ "\${ver#*-}" == "boot2docker" ] || exit;
# # sudo dd if=/dev/zero of=/dev/sda bs=1k count=256
# UNPARTITIONED_HD=\`fdisk -l | grep "doesn't contain a valid partition table" | head -n 1 | sed 's/Disk \(.*\) doesn.*/\1/'\`;
# DISK_VENDOR=\$(cat /sys/class/block/\$(basename \$UNPARTITIONED_HD /dev/)/device/vendor /sys/class/block/\$(basename \$UNPARTITIONED_HD /dev/)/device/model | tr -d "\n");
# sudo sed -i "s/VMware, VMware Virtual S/\$DISK_VENDOR/g;s/1000M/\`free -m | awk '/Mem/{print \$2}'\`M/g;s/ext4 -L/ext4 -i 8192 -L/g" /etc/rc.d/automount;
# sudo sh /etc/rc.d/automount;
# sudo reboot;
# SH

# }

### Convert audio files to FLAC
### Usage: 2flac
### Run cflac in the working directory
_x3rd_2flac () {
    local regex='alac|ape|m4a|tta|tak|wav';
    which ffmpeg >/dev/null 2>&1 || exit 1; # The ffmpeg command was not found.
    [[ $OSTYPE == darwin* ]] && {
        find -E -type f -iregex '.*\.('$regex')$' -exec ffmpeg -hide_banner -i {} -acodec flac {}.flac \; || :
    } || {
        find -type f -iregex '.*\.\('${regex//\|/\\|}'\)$' -exec ffmpeg -hide_banner -i {} -acodec flac {}.flac \; || :
    }
    return 0
}

### Play all media in a directory
### Usage: play [OPTION]... [DIRECTORY]...
### Environment: PLAY_VOLUME, PLAY_SCALE, PLAY_OPTS
_x3rd_play () {
    which ffplay >/dev/null 2>&1 || exit 1; # The ffplay command was not found.
    which xlib >/dev/null 2>&1 || exit 1; # The xlib command was not found.

    local file_list media=() maxdepth stream_specifier skip=0 ext regex;

    # Arguments.
    while [ $# -gt 0 ]; do
        case "$1" in
            ###   -d, --maxdepth=NUMBER   set the find depth, default is the maximum
            -*maxdepth | -d)
                xlib inum $2 && {
                    maxdepth="-maxdepth $2";
                    shift
                } || exit 1; # The maximum depth must be a number.
            ;;
            ###   -r, --random   play in random order
            -*random | -r)
                file_list=1;
            ;;
            ###   -a, --ast=NUMBER   select the desired audio stream
            -*ast | -a)
                # -ast stream_specifier  select the desired audio stream.
                xlib inum $2 && {
                    stream_specifier="-ast $2";
                    shift
                } || exit 1; # The audio specifier must be a number.
            ;;
            ###   -j, --skip=NUMBER   skip NUMBER files
            -*skip | -j)
                xlib inum $2 && {
                    skip=$2;
                    shift
                } || exit 1; # The skip count must be a number.
            ;;
            *)
                if [ -f "$1" -o -d "$1" ]; then
                    media[${#media[@]}]="$1"
                else
                    exit 1; # Not a path.
                fi
            ;;
        esac
        shift
    done

    [ ${#media[@]} == 0 ] && exit 1; # No media file found.

    regex='avi|divx|flv|mkv|mp4|mpg|rm|rmvb|vob|wmv|alac|ape|flac|m4a|mp3|ogg|tta|tak|wav|wma';

    [[ $OSTYPE == darwin* ]] && {
        ext='-E';
        regex='.*\.('$regex')$'
    } || regex='.*\.\('${regex//\|/\\|}'\)$'

    mkdir -p "$HOME/.playlist";

    function __playlist_index () {
        local index;
        read index < "$1.index";
        : ${index:=0};
        [ $index == $(cat "$1"[+-] | grep -c '\.') ] && {
            printf $index;
            return 0
        };
        return 1
    } 2>/dev/null;

    function __sort_play () {
        # __playlist_index "$2" || exit 1; # playlist error
        __play_ff "$1" && {
            printf "%s\n" "$1" >> "$2+";
            :
        } || printf "%s\n" "$1" >> "$2-"
    };

    function __play_title () {
        printf "\n\nProgress $1";
        shift;
        [ "$1" ] && {
            sleep 0.5;
            printf "%s\n" "Next track '$*'"
        } &
    };

    function __play_ff () {
        [ -f "$1" ] || exit 1; # File does not exist.
        case "`xlib str --lower ${1##*.}`" in
            avi|divx|flv|mkv|m2ts|mp4|mpg|rm|rmvb|vob|wmv)
                # -ch_layout stereo #ED..A... set number of audio channels (from 0 to INT_MAX) (default 0) #Convert the 5.1 track to stereo
                # -sn #disable subtitling
                ffplay -hide_banner $PLAY_OPTS $stream_specifier -ch_layout stereo -sn -vf "scale=${PLAY_SCALE:-'-1:-1'}" -autoexit -af "volume=${PLAY_VOLUME:-0.85}" "$1" || return 1
            ;;
            alac|ape|flac|m4a|mp3|ogg|tta|tak|wav|webm|wma)
                ffplay -hide_banner $PLAY_OPTS -nodisp -autoexit -af "volume=${PLAY_VOLUME:-0.15}" "$1" || return 1
            ;;
            *)
                exit 1; # Unknown suffix.
            ;;
        esac
        return 0
    };

    local i line path last_index playlist cache_line line_count;

    for path in "${media[@]}"; do
        if [ -d "$path" ]; then

            # Full path.
            play_list="$HOME/.playlist/`openssl sha256 <<< "$(cd "$path"; pwd)"`.list";

            # Random playlist.
            if [ "$file_list" ]; then
                file_list=();
                if [ -s "$play_list" ]; then
                    # Line number.
                    line_count=`grep -c '\.' "$play_list"`;
                    last_index=`__playlist_index "$play_list"` || {
                        rm -f "$play_list"[+-];
                        last_index=0
                    };
                else
                    # Random list.
                    local len cols sub ran;
                    printf '\033[?25l'; # Hide the cursor.
                    trap 'printf "\033[?25h"; exit' INT; # Show the cursor after Ctrl-C.
                    while read line; do
                        sub="${line#$path}";
                        sub="${sub#/}";
                        # `tput lines` `tput cols` = `stty size` = $LINES $COLUMNS
                        cols=${COLUMNS:-`tput cols`}; # May change during execution.
                        len=0;
                        for ((i=0; i<${#sub}; i++)); do
                            [ $((++len)) -ge $cols ] && break;
                            # [^0-z!\"#$%&\'()*+,-.\/{|\}~]
                            [[ ${sub:$i:1} == [^0-z!\"\#$%\&\'\(\)*+,-.\/{\|\}~] ]] && ((++len))
                        done
                        printf "%*s\r${sub:0:$i}\r" $cols;
                        i=${#file_list[@]};
                        [ $i -gt 1 ] && {
                            ran=$((RANDOM % $i));
                            file_list[$i]=${file_list[$ran]};
                            file_list[$ran]="$line"
                        } || file_list[$i]="$line"
                    done < <(find $ext "$path" $maxdepth -type f -iregex $regex);
                    printf '%*s\r\033[?25h' $cols;

                    [ ${#file_list[@]} == 0 ] && exit 1; # No media file found.

                    for i in `seq 0 $i`; do
                        printf "%s\n" "${file_list[$i]}"
                    done > "$play_list";

                    line_count=${#file_list[@]} last_index=0;
                    > "$play_list.index";
                fi

                i=0;
                while read line; do
                    [ $((i++)) -lt $last_index ] && continue;
                    if [ -f "$cache_line" ]; then
                        __play_title "#$((i - 1)) / $line_count, RANDOM" $line;
                        __sort_play "$cache_line" "$play_list";
                        printf "%s" $((i - 1)) > "$play_list.index";
                    fi
                    cache_line="$line"
                done < "$play_list";
                __sort_play "$cache_line" "$play_list"

                # TODO

            else
                file_list=();
                while read line; do
                    file_list[${#file_list[@]}]="$line"
                done < <(find $ext "$path" $maxdepth -type f -iregex $regex | sort);

                [ ${#file_list[@]} == 0 ] && exit 1; # No media file found.

                i=$((${#file_list[@]} - 1));
                [ $skip -gt $i ] && exit 1; # Skip is out of bounds.
                for i in `seq $skip $i`; do
                    __play_title "#$((i + 1)) / ${#file_list[@]} " "${file_list[$((i + 1))]}";
                    __play_ff "${file_list[$i]}"
                done
            fi
        elif [ -f "$path" ]; then
            __play_ff "$path"
        else
            exit 1; # Target does not exist.
        fi
    done
}

### Camera tools
### Usage: cam [OPTION]... [ARG]...
_x3rd_cam () {
    case $1 in
        ###   -l, --list   list camera devices
        --list|-l)
            which ffmpeg >/dev/null 2>&1 || exit 1; # The ffmpeg command was not found.
            local dev
            if [[ $OSTYPE == darwin* ]]; then
                [ "$2" == "-f" ] && sudo killall VDCAssistant; # Kill AppleCameraAssistant.
                dev=avfoundation
            else
                dev=x11grab
            fi
            ffmpeg -hide_banner -f $dev -list_devices true -i "" 2>&1 | grep \]
        ;;
        ###   -s, --show=ID   display the target camera
        --show|-s)
            shift;
            which ffplay >/dev/null 2>&1 || exit 1; # The ffplay command was not found.
            which xlib >/dev/null 2>&1 || exit 1; # The xlib command was not found.
            xlib inum $1 || exit 1; # Invalid first argument.
            local device_index fmt framerate video_size
            shift
            while [ "$1" ]; do
                case $1 in
                    [0-9]|[1-9][0-9])
                        device_index=$1;
                        shift
                    ;;
                    *[0-9]x[1-9]*)
                        video_size="-video_size $1";
                        shift
                    ;;
                    [1-9][0-9]*fps)
                        framerate="-framerate ${1%%[^0-9]*}";
                        shift
                    ;;
                    *)
                        exit 1; # Invalid option.
                    ;;
                esac
            done
            [[ $OSTYPE == darwin* ]] && fmt=avfoundation || fmt=x11grab;

            # Supported pixel formats:
            #     uyvy422
            #     yuyv422
            #     nv12
            #     0rgb
            #     bgr0

            # -probesize 32
            # -tune zerolatency
            # -fflags nobuffer

            ffplay -hide_banner -f $fmt $video_size $framerate -fflags nobuffer -pixel_format bgr0 -i $device_index 2>&1
            # ffplay -f avfoundation $video_size -framerate 29 -pixel_format 0rgb -i "XI100DUSB-HDMI":"XI100DUSB-HDMI Audio" 2>&1
        ;;
        *)
            exit 1; # Invalid option.
        ;;
    esac
}

### Print download URLs
### Usage: urls [OPTION]...
_x3rd_urls () {
    # https://github.com/google/omaha/blob/master/doc/ServerProtocol.md
    # https://github.com/google/omaha/blob/master/doc/ServerProtocolV3.md
    # https://chromium.googlesource.com/chromium/src.git/+/master/docs/updater/protocol_3_1.md
    case $1 in
        ###   -c, --chrome={mac-arm|mac-intel|win64|win32}   print the Chrome URL for PLATFORM
        --chrome|-c)
            local i platform version arch appid ap;
            shift;
            for i in "$@"; do
                case $i in
                    mac-arm)
                        platform='mac';
                        version='10.16';
                        arch='arm64';
                        appid='com.google.Chrome';
                        ap=''
                    ;;
                    mac-intel)
                        # https://dl.google.com/chrome/mac/stable/GGRO/googlechrome.dmg
                        platform='mac';
                        version='10.15';
                        arch='x64';
                        appid='com.google.Chrome';
                        ap=''
                    ;;
                    win64)
                        # https://www.google.cn/chrome/thank-you.html?standalone=1&platform=win64&installdataindex=empty
                        platform='win';
                        version='10.0';
                        arch='x64';
                        appid='{8A69D345-D564-463C-AFF1-A69D9E530F96}';
                        ap='x64-stable-multi-chrome'
                    ;;
                    win32)
                        platform='win';
                        version='10.0';
                        arch='x86';
                        appid='{8A69D345-D564-463C-AFF1-A69D9E530F96}';
                        ap='-multi-chrome'
                    ;;
                    *)
                        exit 1; # Unsupported argument; use 'mac-intel|mac-arm|win64|win32'.
                    ;;
                esac

                local codebase hash_sha256 name;
                eval "$(
                    curl --connect-timeout 30 --silent --request POST --data \
                        '<?xml version="1.0" encoding="UTF-8"?>
                        <request protocol="3.1" ismachine="0" updaterchannel="stable">
                            <os platform="'$platform'" version="'$version'" arch="'$arch'"/>
                            <app appid="'$appid'" release_channel="stable" ap="'$ap'">
                                <updatecheck/>
                            </app>
                        </request>' \
                        https://tools.google.com/service/update2 | \
                    awk -F '[[:blank:]]|\/>' '{for(i=1; i<=NF; i++) if($i ~ /codebase.*dl\.|^name|hash_sha256/){print $i}}' 2>/dev/null
                )"

                [ "$codebase" ] && printf "sha256: %s *%-41s %s\n" "$hash_sha256" "$name" "$codebase$name"
            done
        ;;
        ###   -j, --jetbrains   print the JetBrains URL
        --jetbrains|-j)
            # curl -L 'https://data.services.jetbrains.com/products?code=IIC,RR&release.type=eap,rc,release,preview&fields=distributions,link,name,releases'
            # curl -L 'https://data.services.jetbrains.com/products?fields=code,intellijProductCode,alternativeCodes,name,releases.date,releases.type,releases.version,releases.majorVersion,releases.build'
            curl --location --connect-timeout 20 \
                "https://data.services.jetbrains.com/products/releases?code=$(
                    curl --location 'https://data.services.jetbrains.com/products?fields=code,categories' 2>/dev/null | \
                        awk -F \" '{for(i=1; i<=NF; i++) {if($i == "code" && $(i+6) == "IDE") { printf "%s,", $(i + 2); }}}' | \
                        sed 's/CPPP//g'
                )&type=release&latest=true" 2>/dev/null | \
                    awk -F \" '{for(i=1; i<=NF; i++) {if($i == "thirdPartyLibrariesJson") { i += 9; }; if(($i == "link" || $i == "checksumLink") && $(i + 2) !~ /-patch-/) { print $(i + 2); }}}' | \
                    sort -V | uniq
        ;;
        ###   -e, --eclipse   print the Eclipse URL
        --eclipse|-e)
            # 1       https://download.eclipse.org
            # 1093    https://mirrors.ustc.edu.cn/eclipse
            # 1275    https://mirrors.tuna.tsinghua.edu.cn/eclipse
            # 1142    https://mirrors.neusoft.edu.cn/eclipse
            # 1290    https://mirrors.nju.edu.cn/eclipse
            # curl -L https://www.eclipse.org/downloads/packages/ 2>/dev/null | \
            #     awk '/>Eclipse IDE [^<>]+ Packages</{gsub(/.*IDE | Pack.*/, ""); system("curl -L \"https://www.eclipse.org/downloads/packages/admin/release_tracker/json/" $0 "/macosx\" 2>/dev/null")}' | \
            #     awk -F \" '{for(i=1; i<=NF; i++) if($i ~ /download.php/) {gsub(/\\/, "", $i); system("curl -L \"" $i "&mirror_id=1093\" 2>/dev/null" )}}' | \
            #     awk -F \" '/click here/{for(i=1; i<=NF; i++) if($i ~ /^http/) print $i}'
            curl -L https://www.eclipse.org/downloads/packages/ 2>/dev/null | \
                awk '/>Eclipse IDE [^<>]+ Packages</{gsub(/.*IDE | Pack.*/, ""); system("curl -L \"https://www.eclipse.org/downloads/packages/admin/release_tracker/json/" $0 "/macosx\" 2>/dev/null")}' | \
                awk -F \" '{for(i=1; i<=NF; i++) if($i ~ /download.php/) {gsub(/\\/, "", $i); sub(/.*=/, "", $i); a[j++]=$i; print "https:\/\/mirrors.ustc.edu.cn\/eclipse" $i}};END{for(i in a)system("curl -L \"https://www.eclipse.org/downloads/sums.php?file=" a[i] "&type=sha1\"; echo");}'

        ;;
        ###   -f, --firefox   print the Firefox URL
        --firefox|-f)
            printf 'wget --no-clobber --content-disposition \\\n';
            printf "'https://download.mozilla.org/?product=firefox-latest&os=%s&lang=%s' \\\\\n" \
                win64 zh-CN osx zh-CN linux64 zh-CN
        ;;
        *)
            exit 1; # Unsupported argument.
        ;;
    esac
}

### Maven repository tools
### Usage: m2 [OPTION]...
_x3rd_m2 () {
    case $1 in
        ###   -d, --download=ARTIFACT   download ARTIFACT to the local maven repository
        --download|-d)
            shift;
            _m2_download "$@"
        ;;
        ###   -c, --trim[=PATH]   print broken files in the local maven repository
        --trim|-c)
            local _lu=0 line _hash _h;
            while read line; do
                unset _hash _h;
                case ${line##*.} in
                    lastUpdated)
                        ((_lu++));
                        rm -f "$line"
                    ;;
                    sha1|md5)
                        read -d , _hash < $line;
                        _hash=$(tr "[:upper:]" "[:lower:]" <<< "${_hash%% *}");
                        _hash=${_hash//[^0-9A-Fa-f]/};
                        _h=$(openssl ${line##*.} "${line%.*}" | awk '{for(i=1; i<=NF; i++)if($i ~ /^[0-9A-Fa-f]+$/)printf $i}' | tr "[:upper:]" "[:lower:]");
                        [ "$_hash" == "$_h" ] || \
                            printf "rm -fv ${line%.*}* # ${line##*.} $_hash, $_h\n"
                    ;;
                    *)
                        :
                    ;;
                esac
            done < <(
                find ${2:-$HOME/.m2} -type f -iname "*.lastUpdated" -o -iname "*.sha1" -o -iname "*.md5"
            )

            printf "# lastUpdated: $_lu\n"
        ;;
        *)
            exit 1; # Invalid option.
        ;;
    esac
}

_m2_download () {
    local i _ver _m2=$@;

    [ "http" != "${_m2:0:4}" -a "${_m2}" -a "${_m2/\//}" != "${_m2}" ] || exit 1; # Invalid arguments.

    # Support -np.
    while [ "/" == "${_m2:0-1}" ]; do
        # Trim: # linux:${_m2:0:-1} -> darwin:${_m2:0:${#_m2}-1}
        _m2=${_m2:0:${#_m2}-1};
    done;

    _ver=${_m2##*/};
    _m2=${_m2%/*};
    # Replace the period with '/'.
    _m2=${_m2//\./\/}/${_ver};

    # Link the target to $HOME/.m2/repository.
    ln -s $HOME/.m2/repository /tmp/maven2 2>/dev/null || {
        ps -ef | awk '/repo1.maven.org\/maven2/' >/dev/null && exit 1 # The m2 command is already running.
    };

    function __m2_get () {
        local url;
        while read url; do
            [ "/" == "${url:0-1}" ] && {
                # Is a directory.
                mkdir /tmp/maven2/${1:30}$url;
                __m2_get ${1}$url || :;
            } || {
                let ++i; # Count the downloaded files.
                printf "\nSaving to: /tmp/maven2/${1:30}$url -- ${1}$url\n\n";
                # Not a directory.
                curl ${1}$url -o /tmp/maven2/${1:30}$url
            };
        done < <(curl ${1}index.html | awk -F "a href=\"" '{printf "%s\n",$2}' | awk -F "\"" '{printf "%s\n",$1}' | grep -vE "^$|^\?|^http:\/\/")
    };

    which wget >/dev/null 2>&1 && {
        # Drop the -m and -k arguments.
        wget -r -np -nc -nH -R html -e robots=off -P /tmp \
        -U 'Mozilla/5.0 (X11; Linux x86_64; rv:31.0) Gecko/20100101 Firefox/31.0' \
        http://repo1.maven.org/maven2/${_m2}/ || :
    } || {
        which curl >/dev/null 2>&1 && {
            # Creating a directory is not supported.
            mkdir -p /tmp/maven2/${_m2};
            __m2_get http://repo1.maven.org/maven2/${_m2}/;
            printf "\nDownloaded: $i files\n"
        } || exit 1; # Neither wget nor curl was found.
    };

    # Drop the link.
    rm -f /tmp/maven2;

    return 0
}

### Virtual machine controller [macOS]
### Usage: vm {list|start}
_x3rd_vm () {
    [[ $OSTYPE == darwin* ]] || exit 1; # Only macOS (OS X) is supported.
    case $1 in
        ###   list   list virtual machines
        ""|list)
            for vn in ~/Virtual\ Machines.localized/*.vmwarevm/*.vmx; do
                [ -f "$vn" ] || continue;
                vn="${vn##*/}";
                printf "%s\n" "${vn%.*}";
            done
        ;;
        ###   start   start a virtual machine
        start)
            shift;
            [ -f "$HOME/Virtual Machines.localized/"$1".vmwarevm/"$1".vmx" ] || exit 1; # The virtual machine does not exist.
            vmrun -T fusion start ~/Virtual\ Machines.localized/"$1".vmwarevm/"$1".vmx nogui
        ;;
        *)
            exit 1; # Invalid option.
        ;;
    esac
}


### Compress PNG images
### Usage: png [DIRECTORY] [DIRECTORY]
### Only ASCII file names are supported
_x3rd_png () {
    which pngquant >/dev/null 2>&1 || exit 1; # The pngquant command was not found.
    [ -d "$1" ] || exit 1; # Source path does not exist.
    [ "$2" ] || exit 1; # Output path not set.
    local line src="${1%/}" out="${2%/}" tag;
    while read line; do
        tag="$out/${line#$src/}";
        [ -d "${tag%/*}" ] || mkdir -p "${tag%/*}";
        pngquant --quality 70-90 --speed 1 --strip --verbose --output "$tag" "$line"
    done < <(
        find "$src" -type f -iname "*.png"
    )
}

### Convert PNG images to PDF
### Usage: pdf [DIRECTORY]...
_x3rd_pdf () {
    which convert >/dev/null 2>&1 || exit 1; # The convert command was not found.
    local i OLDPWD="$PWD";
    for i in "$@"; do
        [ -d "$i" ] || {
            printf "%s\n" "$i not a dir" >&2;
            continue
        };
        # http://www.imagemagick.org/Usage/blur/
        # http://www.imagemagick.org/Usage/resize/#resize_unsharp
        # http://www.imagemagick.org/Usage/convolve/#unsharpen

        # convert -sharpen 0x3.3 *.png -resize 48% zongzhi-3.3.pdf
        # convert *.png -filter spline -resize 48% -unsharp 0x1 zongzhi+.pdf
        cd "$i" && convert *.png -resize 620x-1 -define convolve:scale=-100,200% -morphology Convolve 'Gaussian:0x2' ../"${PWD##*/}".pdf

    done
    cd "$OLDPWD";

}

### Shell completion, auto-generated from annotations
### Usage: comp [OPTION]...
_x3rd_comp () {
    source "$(__script_dir)/comp.xlib";
    case $1 in
        ###   -b, --bash   print the bash completion script
        --bash|-b)
            shift;
            __comp_bash "$@"
        ;;
        ###   -z, --zsh   print the zsh completion script
        --zsh|-z)
            shift;
            __comp_zsh "$@"
        ;;
        ###   -f, --fish   print the fish completion script
        --fish|-f)
            shift;
            __comp_fish "$@"
        ;;
        ###   -i, --install[=SHELL]   install completion to HOME, default is the current shell
        --install|-i)
            shift;
            __comp_install "$@" || exit 1; # Completion installation failed.
        ;;
        ###   -v, --value=KIND   print the candidates of KIND
        --value|-v)
            shift;
            __comp_value "$@"
        ;;
        ###   -l, --list[={macos|linux|all}]   print the parsed completion metadata
        --list|-l)
            shift;
            __comp_scan "${1:-}" | tr ';' '\t'
        ;;
        ###   -c, --check   check annotation and print warnings
        --check|-c)
            shift;
            __comp_check || exit 1 # Annotation warning found.
        ;;
        *)
            exit 1; # Invalid option.
        ;;
    esac
}

# Replace the brew source.
# _x3rd_brewurl () {
#     [ "$1" ] || exit 1; # First argument is empty.
#     grep -r \'$1\' /usr/local/Library/Formula/* 2>/dev/null;
#     echo -e "\nNeed replace like file:///Volume/Data/$1";
#     return 0
# }

#################################################
#                   Framework                   #
# # # # # # # # # # # # # # # # # # # # # # # # #

# Print error info.
_func_err () {
    [[ "$4$6" == exit_${0##*/}* ]] && {
        # local err=`awk 'NR=='$2'{print}' "$0"`;
        local err=`sed -n $2p "$0"`
        # Print the line text after '#'.
        printf "\033[31mError:${err##*#} \033[33m($0:$2)\033[0m\n" >&2;
        exit $(($5 % 256))
    };

    # WARNING: 0 <= $? <= 255; return 256 gives $? = 0.
    [ "$4" == "return" ] && exit $(($5 % 256));

    # A command was not found: the dispatch of an unknown command, or a missing
    # external command.
    [ $1 == 127 ] && {
        [[ $4 == *'${0##*/}'* ]] && { printf "\033[31mError: No function found \033[0m\n" >&2; exit 1; };
        printf "\033[31mError: Command not found: %s \033[33m($0:$2)\033[0m\n" "$4" >&2; exit 127
    };

    exit 0
}

# Show the function info.
_func_annotation () {
    source "$(__script_dir)/comp.xlib";
    local kind cmd key text last= found=;
    local -a cmd_lines=() opt_lines=();
    if [ "$1" ]; then
        # Show one command.
        while IFS=$'\t' read -r kind cmd key text; do
            [ "$cmd" == "$1" ] || continue;
            found=true;
            case $kind in
                O) opt_lines[${#opt_lines[@]}]="$text";;
                P|Q) :;;
                *) cmd_lines[${#cmd_lines[@]}]="$text";;
            esac
        done < <(__annot_scan);
        [ "$found" ] || return 1;
        # split the command annotation around the Usage line
        local -a pre_usage=() post_usage=();
        local usage_line= seen_usage=;
        for text in "${cmd_lines[@]}"; do
            case $text in
                Usage:*)
                    seen_usage=true;
                    usage_line=$text
                ;;
                *)
                    if [ "$seen_usage" ]; then
                        post_usage[${#post_usage[@]}]="$text"
                    else
                        pre_usage[${#pre_usage[@]}]="$text"
                    fi
                ;;
            esac
        done
        [ ${#pre_usage[@]} -gt 0 ] && printf "%s\n" "${pre_usage[@]}";
        [ "$seen_usage" ] && printf "\n%s\n\n" "$usage_line";
        [ ${#post_usage[@]} -gt 0 ] && printf "%s\n" "${post_usage[@]}";
        [ ${#opt_lines[@]} -gt 0 ] && {
            [ ${#post_usage[@]} -gt 0 ] && printf "\n";
            __annot_print "${opt_lines[@]}"
        };
        if [ ${#post_usage[@]} -gt 0 ] || [ ${#opt_lines[@]} -gt 0 ] || [ ! "$seen_usage" ]; then
            printf "\n";
        fi
        return 0

    else
        # Show all commands; the first line of each command annotation is the
        # brief, with its [macOS] / [Linux] tag kept at the end of the line.
        while IFS=$'\t' read -r kind cmd key text; do
            [ "$kind" == "C" ] || continue;
            [ "$cmd" == "$last" ] && continue;
            last=$cmd;
            # Left aligned at 15 characters.
            printf "%-15s%s\n" "$cmd" "$text";
        done < <(__annot_scan)
    fi

}

# Cache and exit.
# bash >= 4.1 resets $LINENO to 1 inside an EXIT trap, so track the real line with
# a DEBUG trap there; older bash (the 3.2 shipped with macOS) reports it directly.
[ "${BASH_VERSINFO[0]}" -gt 4 -o "${BASH_VERSINFO[0]}" -eq 4 -a "${BASH_VERSINFO[1]}" -ge 1 ] && {
    set -T;
    trap 'case $LINENO in 1|"") :;; *) __err_line=$LINENO;; esac' DEBUG
};
trap '_func_err $? "${__err_line:-$LINENO}" $BASH_LINENO $BASH_COMMAND ${FUNCNAME[@]}' EXIT

# # # # # # # # # # # # # # # # # # # # # # # # #
#                   Framework                   #
#################################################

# Test for a help option.
[[ ! "$1" || "$1" == "-h" || "$1" == "--help" ]] && {
    _func_annotation | sort;
    exit 0
} || [[ "$2" == "-h" || "$2" == "--help" ]] && {
    # Test for a help option.
    _func_annotation $1 || printf "\033[31mError: No function found \033[0m\n" >&2;
    exit $?
};

# Normalize [--option=value] into [--option] [value]
args=();
for i in "$@"; do
    case $i in
        -*=*) args[${#args[@]}]="${i%%=*}"; args[${#args[@]}]="${i#*=}";;
        *)    args[${#args[@]}]="$i";;
    esac
done

# main
_${0##*/}_"${args[@]}"