58 lines
2.2 KiB
Fish
58 lines
2.2 KiB
Fish
function tsudope -d "Quickly toggle tsudo prefix"
|
|
|
|
source (status filename | command xargs dirname)/../dependency.fish -n tsu
|
|
or return 1
|
|
|
|
# Save the current command line and cursor position.
|
|
set -l command_buffer (commandline)
|
|
set -l cursor_position (commandline -C)
|
|
|
|
# If the command line is empty, pull the last command from history.
|
|
if test -z "$command_buffer"
|
|
set command_buffer $history[1]
|
|
end
|
|
|
|
# Parse the command line (first line only).
|
|
set -l command_parts (string match -ir '^(\s*)(tsudo(\s+|$))?(.*)' $command_buffer[1])
|
|
|
|
# Handle multiline commands with extra care.
|
|
set -l command_lines_count (count $command_buffer)
|
|
test $command_lines_count -gt 1
|
|
and set -l command_rest $command_buffer[2..$command_lines_count]
|
|
|
|
switch (count $command_parts)
|
|
case 3
|
|
# No "tsudo".
|
|
|
|
# Add "tsudo" to the beginning of the command, after any leading whitespace (if present).
|
|
commandline -r (string join \n (string join '' $command_parts[2] 'tsudo ' $command_parts[3]) $command_rest)
|
|
|
|
# Push the cursor position ahead if necessary (+5 for 'tsudo ').
|
|
test $cursor_position -ge (string length -- "$command_parts[2]")
|
|
and set cursor_position (math $cursor_position+6)
|
|
|
|
# Place the cursor where it was (or where it should be).
|
|
commandline -C $cursor_position
|
|
|
|
case 5
|
|
# "tsudo" is present in the beginning of the command.
|
|
|
|
# Remove "tsudo", leave any leading whitespace (if present).
|
|
commandline -r (string join \n (string join '' $command_parts[2 5]) $command_rest)
|
|
|
|
# Push the cursor position back if appropriate ('tsudo' and whitespace).
|
|
set -l lead_length (string length -- "$command_parts[2]")
|
|
set -l tsudo_length (string length -- "$command_parts[3]")
|
|
if test $cursor_position -ge (math $lead_length+$tsudo_length)
|
|
# The cursor was after "tsudo".
|
|
set cursor_position (math $cursor_position-$tsudo_length)
|
|
else if test $cursor_position -ge $lead_length
|
|
# The cursor was somewhere on "tsudo".
|
|
set cursor_position $lead_length
|
|
end
|
|
|
|
# Place the cursor where it was (or where it should be).
|
|
commandline -C -- $cursor_position
|
|
end
|
|
end
|