Subversion Repositories configs

# perf bash and zsh completion

# Taken from git.git's completion script.

__my_reassemble_comp_words_by_ref()

{

	local exclude i j first

	# Which word separators to exclude?

	exclude="${1//[^$COMP_WORDBREAKS]}"

	cword_=$COMP_CWORD

	if [ -z "$exclude" ]; then

		words_=("${COMP_WORDS[@]}")

		return

	fi

	# List of word completion separators has shrunk;

	# re-assemble words to complete.

	for ((i=0, j=0; i < ${#COMP_WORDS[@]}; i++, j++)); do

		# Append each nonempty word consisting of just

		# word separator characters to the current word.

		first=t

		while

			[ $i -gt 0 ] &&

			[ -n "${COMP_WORDS[$i]}" ] &&

			# word consists of excluded word separators

			[ "${COMP_WORDS[$i]//[^$exclude]}" = "${COMP_WORDS[$i]}" ]

		do

			# Attach to the previous token,

			# unless the previous token is the command name.

			if [ $j -ge 2 ] && [ -n "$first" ]; then

				((j--))

			fi

			first=

			words_[$j]=${words_[j]}${COMP_WORDS[i]}

			if [ $i = $COMP_CWORD ]; then

				cword_=$j

			fi

			if (($i < ${#COMP_WORDS[@]} - 1)); then

				((i++))

			else

				# Done.

				return

			fi

		done

		words_[$j]=${words_[j]}${COMP_WORDS[i]}

		if [ $i = $COMP_CWORD ]; then

			cword_=$j

		fi

	done

}

type _get_comp_words_by_ref &>/dev/null ||

_get_comp_words_by_ref()

{

	local exclude cur_ words_ cword_

	if [ "$1" = "-n" ]; then

		exclude=$2

		shift 2

	fi

	__my_reassemble_comp_words_by_ref "$exclude"

	cur_=${words_[cword_]}

	while [ $# -gt 0 ]; do

		case "$1" in

		cur)

			cur=$cur_

			;;

		prev)

			prev=${words_[$cword_-1]}

			;;

		words)

			words=("${words_[@]}")

			;;

		cword)

			cword=$cword_

			;;

		esac

		shift

	done

}

type __ltrim_colon_completions &>/dev/null ||

__ltrim_colon_completions()

{

	if [[ "$1" == *:* && "$COMP_WORDBREAKS" == *:* ]]; then

		# Remove colon-word prefix from COMPREPLY items

		local colon_word=${1%"${1##*:}"}

		local i=${#COMPREPLY[*]}

		while [[ $((--i)) -ge 0 ]]; do

			COMPREPLY[$i]=${COMPREPLY[$i]#"$colon_word"}

		done

	fi

}

__perfcomp ()

{

	COMPREPLY=( $( compgen -W "$1" -- "$2" ) )

}

__perfcomp_colon ()

{

	__perfcomp "$1" "$2"

	__ltrim_colon_completions $cur

}

__perf_main ()

{

	local cmd

	cmd=${words[0]}

	COMPREPLY=()

	# List perf subcommands or long options

	if [ $cword -eq 1 ]; then

		if [[ $cur == --* ]]; then

			__perfcomp '--help --version \

			--exec-path --html-path --paginate --no-pager \

			--perf-dir --work-tree --debugfs-dir' -- "$cur"

		else

			cmds=$($cmd --list-cmds)

			__perfcomp "$cmds" "$cur"

		fi

	# List possible events for -e option

	elif [[ $prev == "-e" && "${words[1]}" == @(record|stat|top) ]]; then

		evts=$($cmd list --raw-dump)

		__perfcomp_colon "$evts" "$cur"

	# List subcommands for perf commands

	elif [[ $prev == @(kvm|kmem|mem|lock|sched) ]]; then

		subcmds=$($cmd $prev --list-cmds)

		__perfcomp_colon "$subcmds" "$cur"

	# List long option names

	elif [[ $cur == --* ]];  then

		subcmd=${words[1]}

		opts=$($cmd $subcmd --list-opts)

		__perfcomp "$opts" "$cur"

	fi

}

if [[ -n ${ZSH_VERSION-} ]]; then

	autoload -U +X compinit && compinit

	__perfcomp ()

	{

		emulate -L zsh

		local c IFS=$' \t\n'

		local -a array

		for c in ${=1}; do

			case $c in

			--*=*|*.) ;;

			*) c="$c " ;;

			esac

			array[${#array[@]}+1]="$c"

		done

		compset -P '*[=:]'

		compadd -Q -S '' -a -- array && _ret=0

	}

	__perfcomp_colon ()

	{

		emulate -L zsh

		local cur_="${2-$cur}"

		local c IFS=$' \t\n'

		local -a array

		if [[ "$cur_" == *:* ]]; then

			local colon_word=${cur_%"${cur_##*:}"}

		fi

		for c in ${=1}; do

			case $c in

			--*=*|*.) ;;

			*) c="$c " ;;

			esac

			array[$#array+1]=${c#"$colon_word"}

		done

		compset -P '*[=:]'

		compadd -Q -S '' -a -- array && _ret=0

	}

	_perf ()

	{

		local _ret=1 cur cword prev

		cur=${words[CURRENT]}

		prev=${words[CURRENT-1]}

		let cword=CURRENT-1

		emulate ksh -c __perf_main

		let _ret && _default && _ret=0

		return _ret

	}

	compdef _perf perf

	return

fi

type perf &>/dev/null &&

_perf()

{

	local cur words cword prev

	_get_comp_words_by_ref -n =: cur words cword prev

	__perf_main

} &&

complete -o bashdefault -o default -o nospace -F _perf perf 2>/dev/null \

	|| complete -o default -o nospace -F _perf perf