2014-08-27 14:15:07 +00:00
|
|
|
restore_pane_processes_enabled() {
|
|
|
|
local restore_processes="$(get_tmux_option "$restore_processes_option" "$restore_processes")"
|
2014-08-27 22:43:31 +00:00
|
|
|
if [ "$restore_processes" == "false" ]; then
|
2014-08-27 14:15:07 +00:00
|
|
|
return 1
|
|
|
|
else
|
|
|
|
return 0
|
|
|
|
fi
|
|
|
|
}
|
|
|
|
|
|
|
|
restore_pane_process() {
|
|
|
|
local pane_full_command="$1"
|
|
|
|
local session_name="$2"
|
|
|
|
local window_number="$3"
|
|
|
|
local pane_index="$4"
|
2014-08-27 22:43:31 +00:00
|
|
|
local dir="$5"
|
2014-08-29 11:42:48 +00:00
|
|
|
if _process_should_be_restored "$pane_full_command" "$session_name" "$window_number" "$pane_index"; then
|
2014-08-27 14:15:07 +00:00
|
|
|
tmux switch-client -t "${session_name}:${window_number}"
|
|
|
|
tmux select-pane -t "$pane_index"
|
2014-08-27 22:43:31 +00:00
|
|
|
|
2014-09-01 17:41:33 +00:00
|
|
|
local inline_strategy="$(_get_inline_strategy "$pane_full_command")" # might not be defined
|
|
|
|
if [ -n "$inline_strategy" ]; then
|
|
|
|
# inline strategy exists
|
2015-06-10 21:33:52 +00:00
|
|
|
# check for additional "expansion" of inline strategy, e.g. `vim` to `vim -S`
|
|
|
|
if _strategy_exists "$inline_strategy"; then
|
|
|
|
local strategy_file="$(_get_strategy_file "$inline_strategy")"
|
|
|
|
local inline_strategy="$($strategy_file "$pane_full_command" "$dir")"
|
|
|
|
fi
|
2014-09-01 17:41:33 +00:00
|
|
|
tmux send-keys "$inline_strategy" "C-m"
|
|
|
|
elif _strategy_exists "$pane_full_command"; then
|
2014-08-27 22:43:31 +00:00
|
|
|
local strategy_file="$(_get_strategy_file "$pane_full_command")"
|
|
|
|
local strategy_command="$($strategy_file "$pane_full_command" "$dir")"
|
|
|
|
tmux send-keys "$strategy_command" "C-m"
|
|
|
|
else
|
|
|
|
# just invoke the command
|
|
|
|
tmux send-keys "$pane_full_command" "C-m"
|
|
|
|
fi
|
2014-08-27 14:15:07 +00:00
|
|
|
fi
|
|
|
|
}
|
|
|
|
|
2014-08-27 22:43:31 +00:00
|
|
|
# private functions below
|
|
|
|
|
2014-08-27 14:15:07 +00:00
|
|
|
_process_should_be_restored() {
|
|
|
|
local pane_full_command="$1"
|
2014-08-29 11:42:48 +00:00
|
|
|
local session_name="$2"
|
|
|
|
local window_number="$3"
|
|
|
|
local pane_index="$4"
|
|
|
|
if is_pane_registered_as_existing "$session_name" "$window_number" "$pane_index"; then
|
|
|
|
# Scenario where pane existed before restoration, so we're not
|
|
|
|
# restoring the proces either.
|
|
|
|
return 1
|
2014-09-02 20:47:38 +00:00
|
|
|
elif ! pane_exists "$session_name" "$window_number" "$pane_index"; then
|
|
|
|
# pane number limit exceeded, pane does not exist
|
|
|
|
return 1
|
2014-08-29 11:42:48 +00:00
|
|
|
elif _restore_all_processes; then
|
2014-08-27 14:15:07 +00:00
|
|
|
return 0
|
|
|
|
elif _process_on_the_restore_list "$pane_full_command"; then
|
|
|
|
return 0
|
|
|
|
else
|
|
|
|
return 1
|
|
|
|
fi
|
|
|
|
}
|
|
|
|
|
|
|
|
_restore_all_processes() {
|
|
|
|
local restore_processes="$(get_tmux_option "$restore_processes_option" "$restore_processes")"
|
2014-09-24 12:23:03 +00:00
|
|
|
if [ "$restore_processes" == ":all:" ]; then
|
2014-08-27 14:15:07 +00:00
|
|
|
return 0
|
|
|
|
else
|
|
|
|
return 1
|
|
|
|
fi
|
|
|
|
}
|
|
|
|
|
|
|
|
_process_on_the_restore_list() {
|
|
|
|
local pane_full_command="$1"
|
2014-08-28 21:39:53 +00:00
|
|
|
# TODO: make this work without eval
|
|
|
|
eval set $(_restore_list)
|
2014-08-27 14:15:07 +00:00
|
|
|
local proc
|
2014-09-01 17:41:33 +00:00
|
|
|
local match
|
2014-08-28 21:39:53 +00:00
|
|
|
for proc in "$@"; do
|
2014-09-01 17:41:33 +00:00
|
|
|
match="$(_get_proc_match_element "$proc")"
|
|
|
|
if _proc_matches_full_command "$pane_full_command" "$match"; then
|
|
|
|
return 0
|
2014-08-27 14:15:07 +00:00
|
|
|
fi
|
|
|
|
done
|
|
|
|
return 1
|
|
|
|
}
|
|
|
|
|
2014-09-01 17:41:33 +00:00
|
|
|
_proc_matches_full_command() {
|
|
|
|
local pane_full_command="$1"
|
|
|
|
local match="$2"
|
|
|
|
if _proc_starts_with_tildae "$match"; then
|
|
|
|
match="$(remove_first_char "$match")"
|
|
|
|
# regex matching the command makes sure `$match` string is somewhere in the command string
|
|
|
|
if [[ "$pane_full_command" =~ ($match) ]]; then
|
|
|
|
return 0
|
|
|
|
fi
|
|
|
|
else
|
|
|
|
# regex matching the command makes sure process is a "word"
|
|
|
|
if [[ "$pane_full_command" =~ (^${match} ) ]] || [[ "$pane_full_command" =~ (^${match}$) ]]; then
|
|
|
|
return 0
|
|
|
|
fi
|
|
|
|
fi
|
|
|
|
return 1
|
|
|
|
}
|
|
|
|
|
|
|
|
_get_proc_match_element() {
|
|
|
|
echo "$1" | sed "s/${inline_strategy_token}.*//"
|
|
|
|
}
|
|
|
|
|
|
|
|
_get_proc_restore_element() {
|
|
|
|
echo "$1" | sed "s/.*${inline_strategy_token}//"
|
|
|
|
}
|
|
|
|
|
2014-08-27 14:15:07 +00:00
|
|
|
_restore_list() {
|
|
|
|
local user_processes="$(get_tmux_option "$restore_processes_option" "$restore_processes")"
|
|
|
|
local default_processes="$(get_tmux_option "$default_proc_list_option" "$default_proc_list")"
|
2014-09-24 12:23:03 +00:00
|
|
|
if [ -z "$user_processes" ]; then
|
2014-08-27 14:15:07 +00:00
|
|
|
# user didn't define any processes
|
|
|
|
echo "$default_processes"
|
|
|
|
else
|
|
|
|
echo "$default_processes $user_processes"
|
|
|
|
fi
|
|
|
|
}
|
2014-08-27 22:43:31 +00:00
|
|
|
|
2014-08-28 21:39:53 +00:00
|
|
|
_proc_starts_with_tildae() {
|
|
|
|
[[ "$1" =~ (^~) ]]
|
|
|
|
}
|
|
|
|
|
2014-09-01 17:41:33 +00:00
|
|
|
_get_inline_strategy() {
|
|
|
|
local pane_full_command="$1"
|
|
|
|
# TODO: make this work without eval
|
|
|
|
eval set $(_restore_list)
|
|
|
|
local proc
|
|
|
|
local match
|
|
|
|
for proc in "$@"; do
|
|
|
|
if [[ "$proc" =~ "$inline_strategy_token" ]]; then
|
|
|
|
match="$(_get_proc_match_element "$proc")"
|
|
|
|
if _proc_matches_full_command "$pane_full_command" "$match"; then
|
|
|
|
echo "$(_get_proc_restore_element "$proc")"
|
|
|
|
fi
|
|
|
|
fi
|
|
|
|
done
|
|
|
|
}
|
|
|
|
|
2014-08-27 22:43:31 +00:00
|
|
|
_strategy_exists() {
|
|
|
|
local pane_full_command="$1"
|
|
|
|
local strategy="$(_get_command_strategy "$pane_full_command")"
|
|
|
|
if [ -n "$strategy" ]; then # strategy set?
|
|
|
|
local strategy_file="$(_get_strategy_file "$pane_full_command")"
|
|
|
|
[ -e "$strategy_file" ] # strategy file exists?
|
|
|
|
else
|
|
|
|
return 1
|
|
|
|
fi
|
|
|
|
}
|
|
|
|
|
|
|
|
_get_command_strategy() {
|
|
|
|
local pane_full_command="$1"
|
|
|
|
local command="$(_just_command "$pane_full_command")"
|
|
|
|
get_tmux_option "${restore_process_strategy_option}${command}" ""
|
|
|
|
}
|
|
|
|
|
|
|
|
_just_command() {
|
|
|
|
echo "$1" | cut -d' ' -f1
|
|
|
|
}
|
|
|
|
|
|
|
|
_get_strategy_file() {
|
|
|
|
local pane_full_command="$1"
|
|
|
|
local strategy="$(_get_command_strategy "$pane_full_command")"
|
|
|
|
local command="$(_just_command "$pane_full_command")"
|
|
|
|
echo "$CURRENT_DIR/../strategies/${command}_${strategy}.sh"
|
|
|
|
}
|