restore.sh 12.4 KB
Newer Older
Bruno Sutic's avatar
Bruno Sutic committed
1
2
3
4
#!/usr/bin/env bash

CURRENT_DIR="$( cd "$( dirname "${BASH_SOURCE[0]}" )" && pwd )"

Bruno Sutic's avatar
Bruno Sutic committed
5
source "$CURRENT_DIR/variables.sh"
Bruno Sutic's avatar
Bruno Sutic committed
6
source "$CURRENT_DIR/helpers.sh"
7
source "$CURRENT_DIR/process_restore_helpers.sh"
8
source "$CURRENT_DIR/spinner_helpers.sh"
Bruno Sutic's avatar
Bruno Sutic committed
9

10
11
12
# delimiter
d=$'\t'

13
# Global variable.
14
# Used during the restore: if a pane already exists from before, it is
15
16
17
18
# saved in the array in this variable. Later, process running in existing pane
# is also not restored. That makes the restoration process more idempotent.
EXISTING_PANES_VAR=""

19
20
RESTORING_FROM_SCRATCH="false"

21
22
RESTORE_PANE_CONTENTS="false"

23
24
25
26
27
28
29
is_line_type() {
	local line_type="$1"
	local line="$2"
	echo "$line" |
		\grep -q "^$line_type"
}

30
check_saved_session_exists() {
31
32
33
	local resurrect_file="$(last_resurrect_file)"
	if [ ! -f $resurrect_file ]; then
		display_message "Tmux resurrect file not found!"
34
		return 1
35
36
37
	fi
}

38
39
40
41
42
43
44
45
pane_exists() {
	local session_name="$1"
	local window_number="$2"
	local pane_index="$3"
	tmux list-panes -t "${session_name}:${window_number}" -F "#{pane_index}" 2>/dev/null |
		\grep -q "^$pane_index$"
}

46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
register_existing_pane() {
	local session_name="$1"
	local window_number="$2"
	local pane_index="$3"
	local pane_custom_id="${session_name}:${window_number}:${pane_index}"
	local delimiter=$'\t'
	EXISTING_PANES_VAR="${EXISTING_PANES_VAR}${delimiter}${pane_custom_id}"
}

is_pane_registered_as_existing() {
	local session_name="$1"
	local window_number="$2"
	local pane_index="$3"
	local pane_custom_id="${session_name}:${window_number}:${pane_index}"
	[[ "$EXISTING_PANES_VAR" =~ "$pane_custom_id" ]]
}

63
64
65
66
67
68
69
70
restore_from_scratch_true() {
	RESTORING_FROM_SCRATCH="true"
}

is_restoring_from_scratch() {
	[ "$RESTORING_FROM_SCRATCH" == "true" ]
}

71
72
73
74
75
76
77
78
restore_pane_contents_true() {
	RESTORE_PANE_CONTENTS="true"
}

is_restoring_pane_contents() {
	[ "$RESTORE_PANE_CONTENTS" == "true" ]
}

79
80
81
82
83
84
85
86
restored_session_0_true() {
	RESTORED_SESSION_0="true"
}

has_restored_session_0() {
	[ "$RESTORED_SESSION_0" == "true" ]
}

Bruno Sutic's avatar
Bruno Sutic committed
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
window_exists() {
	local session_name="$1"
	local window_number="$2"
	tmux list-windows -t "$session_name" -F "#{window_index}" 2>/dev/null |
		\grep -q "^$window_number$"
}

session_exists() {
	local session_name="$1"
	tmux has-session -t "$session_name" 2>/dev/null
}

first_window_num() {
	tmux show -gv base-index
}

tmux_socket() {
	echo $TMUX | cut -d',' -f1
}

107
108
109
110
# Tmux option stored in a global variable so that we don't have to "ask"
# tmux server each time.
cache_tmux_default_command() {
	local default_shell="$(get_tmux_option "default-shell" "")"
111
112
113
114
115
	local opt=""
	if [ "$(basename "$default_shell")" == "bash" ]; then
		opt="-l "
	fi
	export TMUX_DEFAULT_COMMAND="$(get_tmux_option "default-command" "$opt$default_shell")"
116
117
118
119
120
121
122
}

tmux_default_command() {
	echo "$TMUX_DEFAULT_COMMAND"
}

pane_creation_command() {
123
	echo "cat '$(pane_contents_file "restore" "${1}:${2}.${3}")'; exec $(tmux_default_command)"
124
125
}

Bruno Sutic's avatar
Bruno Sutic committed
126
127
128
new_window() {
	local session_name="$1"
	local window_number="$2"
129
130
	local dir="$3"
	local pane_index="$4"
131
	local pane_id="${session_name}:${window_number}.${pane_index}"
132
	dir="${dir/#\~/$HOME}"
133
	if is_restoring_pane_contents && pane_contents_file_exists "$pane_id"; then
134
		local pane_creation_command="$(pane_creation_command "$session_name" "$window_number" "$pane_index")"
135
		tmux new-window -d -t "${session_name}:${window_number}" -c "$dir" "$pane_creation_command"
136
	else
137
		tmux new-window -d -t "${session_name}:${window_number}" -c "$dir"
138
	fi
Bruno Sutic's avatar
Bruno Sutic committed
139
140
141
142
143
}

new_session() {
	local session_name="$1"
	local window_number="$2"
144
145
	local dir="$3"
	local pane_index="$4"
146
147
	local pane_id="${session_name}:${window_number}.${pane_index}"
	if is_restoring_pane_contents && pane_contents_file_exists "$pane_id"; then
148
		local pane_creation_command="$(pane_creation_command "$session_name" "$window_number" "$pane_index")"
149
		TMUX="" tmux -S "$(tmux_socket)" new-session -d -s "$session_name" -c "$dir" "$pane_creation_command"
150
	else
151
		TMUX="" tmux -S "$(tmux_socket)" new-session -d -s "$session_name" -c "$dir"
152
	fi
Bruno Sutic's avatar
Bruno Sutic committed
153
154
155
156
157
158
159
160
161
162
	# change first window number if necessary
	local created_window_num="$(first_window_num)"
	if [ $created_window_num -ne $window_number ]; then
		tmux move-window -s "${session_name}:${created_window_num}" -t "${session_name}:${window_number}"
	fi
}

new_pane() {
	local session_name="$1"
	local window_number="$2"
163
164
	local dir="$3"
	local pane_index="$4"
165
166
	local pane_id="${session_name}:${window_number}.${pane_index}"
	if is_restoring_pane_contents && pane_contents_file_exists "$pane_id"; then
167
168
169
170
171
		local pane_creation_command="$(pane_creation_command "$session_name" "$window_number" "$pane_index")"
		tmux split-window -t "${session_name}:${window_number}" -c "$dir" "$pane_creation_command"
	else
		tmux split-window -t "${session_name}:${window_number}" -c "$dir"
	fi
172
173
	# minimize window so more panes can fit
	tmux resize-pane  -t "${session_name}:${window_number}" -U "999"
Bruno Sutic's avatar
Bruno Sutic committed
174
175
176
177
}

restore_pane() {
	local pane="$1"
178
	while IFS=$d read line_type session_name window_number window_active window_flags pane_index dir pane_active pane_command pane_full_command; do
179
		dir="$(remove_first_char "$dir")"
Bruno Sutic's avatar
Bruno Sutic committed
180
		pane_full_command="$(remove_first_char "$pane_full_command")"
181
182
183
		if [ "$session_name" == "0" ]; then
			restored_session_0_true
		fi
184
		if pane_exists "$session_name" "$window_number" "$pane_index"; then
185
186
187
188
			if is_restoring_from_scratch; then
				# overwrite the pane
				# happens only for the first pane if it's the only registered pane for the whole tmux server
				local pane_id="$(tmux display-message -p -F "#{pane_id}" -t "$session_name:$window_number")"
189
				new_pane "$session_name" "$window_number" "$dir" "$pane_index"
190
191
192
193
194
195
				tmux kill-pane -t "$pane_id"
			else
				# Pane exists, no need to create it!
				# Pane existence is registered. Later, its process also won't be restored.
				register_existing_pane "$session_name" "$window_number" "$pane_index"
			fi
196
		elif window_exists "$session_name" "$window_number"; then
197
			new_pane "$session_name" "$window_number" "$dir" "$pane_index"
Bruno Sutic's avatar
Bruno Sutic committed
198
		elif session_exists "$session_name"; then
199
			new_window "$session_name" "$window_number" "$dir" "$pane_index"
Bruno Sutic's avatar
Bruno Sutic committed
200
		else
201
			new_session "$session_name" "$window_number" "$dir" "$pane_index"
Bruno Sutic's avatar
Bruno Sutic committed
202
		fi
203
	done < <(echo "$pane")
Bruno Sutic's avatar
Bruno Sutic committed
204
205
}

206
207
208
restore_state() {
	local state="$1"
	echo "$state" |
209
	while IFS=$d read line_type client_session client_last_session; do
210
211
212
213
214
		tmux switch-client -t "$client_last_session"
		tmux switch-client -t "$client_session"
	done
}

215
216
217
218
219
220
221
222
223
224
225
226
227
228
229
230
231
232
233
234
235
236
237
restore_grouped_session() {
	local grouped_session="$1"
	echo "$grouped_session" |
	while IFS=$d read line_type grouped_session original_session alternate_window active_window; do
		TMUX="" tmux -S "$(tmux_socket)" new-session -d -s "$grouped_session" -t "$original_session"
	done
}

restore_active_and_alternate_windows_for_grouped_sessions() {
	local grouped_session="$1"
	echo "$grouped_session" |
	while IFS=$d read line_type grouped_session original_session alternate_window_index active_window_index; do
		alternate_window_index="$(remove_first_char "$alternate_window_index")"
		active_window_index="$(remove_first_char "$active_window_index")"
		if [ -n "$alternate_window_index" ]; then
			tmux switch-client -t "${grouped_session}:${alternate_window_index}"
		fi
		if [ -n "$active_window_index" ]; then
			tmux switch-client -t "${grouped_session}:${active_window_index}"
		fi
	done
}

238
239
240
241
242
243
244
245
246
247
248
249
250
251
252
never_ever_overwrite() {
	local overwrite_option_value="$(get_tmux_option "$overwrite_option" "")"
	[ -n "$overwrite_option_value" ]
}

detect_if_restoring_from_scratch() {
	if never_ever_overwrite; then
		return
	fi
	local total_number_of_panes="$(tmux list-panes -a | wc -l | sed 's/ //g')"
	if [ "$total_number_of_panes" -eq 1 ]; then
		restore_from_scratch_true
	fi
}

253
254
255
256
257
258
259
detect_if_restoring_pane_contents() {
	if capture_pane_contents_option_on; then
		cache_tmux_default_command
		restore_pane_contents_true
	fi
}

260
261
# functions called from main (ordered)

262
restore_all_panes() {
263
264
	detect_if_restoring_from_scratch   # sets a global variable
	detect_if_restoring_pane_contents  # sets a global variable
265
266
267
	if is_restoring_pane_contents; then
		pane_content_files_restore_from_archive
	fi
Bruno Sutic's avatar
Bruno Sutic committed
268
	while read line; do
269
270
		if is_line_type "pane" "$line"; then
			restore_pane "$line"
Bruno Sutic's avatar
Bruno Sutic committed
271
		fi
272
	done < $(last_resurrect_file)
273
	if is_restoring_pane_contents; then
274
		rm "$(pane_contents_dir "restore")"/*
275
	fi
Bruno Sutic's avatar
Bruno Sutic committed
276
277
}

278
279
280
281
282
283
284
285
286
287
handle_session_0() {
	if is_restoring_from_scratch && ! has_restored_session_0; then
		local current_session="$(tmux display -p "#{client_session}")"
		if [ "$current_session" == "0" ]; then
			tmux switch-client -n
		fi
		tmux kill-session -t "0"
	fi
}

288
restore_window_properties() {
289
	local window_name
290
	\grep '^window' $(last_resurrect_file) |
291
292
293
		while IFS=$d read line_type session_name window_number window_name window_active window_flags window_layout automatic_rename; do
			window_name="$(remove_first_char "$window_name")"
			tmux rename-window -t "${session_name}:${window_number}" "$window_name"
294
			tmux select-layout -t "${session_name}:${window_number}" "$window_layout"
295
296
297
298
299
			if [ "${automatic_rename}" = ":" ]; then
				tmux set-option -u -t "${session_name}:${window_number}" automatic-rename
			else
				tmux set-option -t "${session_name}:${window_number}" automatic-rename "$automatic_rename"
			fi
300
301
302
		done
}

303
restore_shell_history() {
304
	awk 'BEGIN { FS="\t"; OFS="\t" } /^pane/ { print $2, $3, $6, $9; }' $(last_resurrect_file) |
305
		while IFS=$d read session_name window_number pane_index pane_command; do
quentin's avatar
quentin committed
306
			if ! is_pane_registered_as_existing "$session_name" "$window_number" "$pane_index"; then
307
308
309
310
311
				local pane_id="$session_name:$window_number.$pane_index"
				local history_file="$(resurrect_history_file "$pane_id" "$pane_command")"

				if [ "$pane_command" = "bash" ]; then
					local read_command="history -r '$history_file'"
312
					tmux send-keys -t "$pane_id" "$read_command" C-m
313
314
315
316
				elif [ "$pane_command" = "zsh" ]; then
					local accept_line="$(expr "$(zsh -i -c bindkey | grep -m1 '\saccept-line$')" : '^"\(.*\)".*')"
					local read_command="fc -R '$history_file'; clear"
					tmux send-keys -t "$pane_id" "$read_command" "$accept_line"
317
318
319
320
321
				fi
			fi
		done
}

Bruno Sutic's avatar
Bruno Sutic committed
322
restore_all_pane_processes() {
323
324
	if restore_pane_processes_enabled; then
		local pane_full_command
325
		awk 'BEGIN { FS="\t"; OFS="\t" } /^pane/ && $10 !~ "^:$" { print $2, $3, $6, $7, $10; }' $(last_resurrect_file) |
326
			while IFS=$d read -r session_name window_number pane_index dir pane_full_command; do
327
				dir="$(remove_first_char "$dir")"
328
				pane_full_command="$(remove_first_char "$pane_full_command")"
329
				restore_pane_process "$pane_full_command" "$session_name" "$window_number" "$pane_index" "$dir"
330
331
			done
	fi
Bruno Sutic's avatar
Bruno Sutic committed
332
333
}

Bruno Sutic's avatar
Bruno Sutic committed
334
restore_active_pane_for_each_window() {
335
	awk 'BEGIN { FS="\t"; OFS="\t" } /^pane/ && $8 == 1 { print $2, $3, $6; }' $(last_resurrect_file) |
336
		while IFS=$d read session_name window_number active_pane; do
Bruno Sutic's avatar
Bruno Sutic committed
337
338
339
340
341
			tmux switch-client -t "${session_name}:${window_number}"
			tmux select-pane -t "$active_pane"
		done
}

342
restore_zoomed_windows() {
343
	awk 'BEGIN { FS="\t"; OFS="\t" } /^pane/ && $5 ~ /Z/ && $8 == 1 { print $2, $3; }' $(last_resurrect_file) |
344
345
346
347
348
		while IFS=$d read session_name window_number; do
			tmux resize-pane -t "${session_name}:${window_number}" -Z
		done
}

Bruno Sutic's avatar
Bruno Sutic committed
349
350
351
352
restore_grouped_sessions() {
	while read line; do
		if is_line_type "grouped_session" "$line"; then
			restore_grouped_session "$line"
353
			restore_active_and_alternate_windows_for_grouped_sessions "$line"
Bruno Sutic's avatar
Bruno Sutic committed
354
355
356
357
		fi
	done < $(last_resurrect_file)
}

358
restore_active_and_alternate_windows() {
359
	awk 'BEGIN { FS="\t"; OFS="\t" } /^window/ && $6 ~ /[*-]/ { print $2, $4, $3; }' $(last_resurrect_file) |
360
		sort -u |
361
		while IFS=$d read session_name active_window window_number; do
362
363
364
365
			tmux switch-client -t "${session_name}:${window_number}"
		done
}

Bruno Sutic's avatar
Bruno Sutic committed
366
367
368
restore_active_and_alternate_sessions() {
	while read line; do
		if is_line_type "state" "$line"; then
369
370
			restore_state "$line"
		fi
371
	done < $(last_resurrect_file)
Bruno Sutic's avatar
Bruno Sutic committed
372
373
374
}

main() {
375
	if supported_tmux_version_ok && check_saved_session_exists; then
376
		start_spinner "Restoring..." "Tmux restore complete!"
Ash Berlin-Taylor's avatar
Ash Berlin-Taylor committed
377
		execute_hook "pre-restore-all"
378
		restore_all_panes
379
		handle_session_0
380
		restore_window_properties >/dev/null 2>&1
Ash Berlin-Taylor's avatar
Ash Berlin-Taylor committed
381
		execute_hook "pre-restore-history"
382
		if save_shell_history_option_on; then
383
384
			restore_shell_history
		fi
Ash Berlin-Taylor's avatar
Ash Berlin-Taylor committed
385
		execute_hook "pre-restore-pane-processes"
386
		restore_all_pane_processes
Bruno Sutic's avatar
Bruno Sutic committed
387
		# below functions restore exact cursor positions
Bruno Sutic's avatar
Bruno Sutic committed
388
		restore_active_pane_for_each_window
Bruno Sutic's avatar
Bruno Sutic committed
389
		restore_zoomed_windows
390
		restore_grouped_sessions  # also restores active and alt windows for grouped sessions
391
		restore_active_and_alternate_windows
Bruno Sutic's avatar
Bruno Sutic committed
392
		restore_active_and_alternate_sessions
Ash Berlin-Taylor's avatar
Ash Berlin-Taylor committed
393
		execute_hook "post-restore-all"
394
		stop_spinner
395
		display_message "Tmux restore complete!"
396
	fi
Bruno Sutic's avatar
Bruno Sutic committed
397
398
}
main