mirror of
https://github.com/fish-shell/fish-shell
synced 2024-11-15 01:17:45 +00:00
99e87dded3
This is to make pasting literals easier.
When a user pastes something, we normally take it as-is.
The exception is when a single-quote is open, e.g. the current token
is
foo'bar
When something is pasted here, we escape single-quotes (`'`) and
backslashes (`\\`), so typing a `'` after it will turn it into a
literal token.
Fixes #967.
60 lines
2.1 KiB
Fish
60 lines
2.1 KiB
Fish
function __fish_commandline_is_singlequoted --description "Return 0 if the current token has an open single-quote"
|
|
# Go through the token char-by-char in a state machine.
|
|
# The states are:
|
|
# - normal - no quoting is active (the starting state)
|
|
# - single - open single-quote
|
|
# - double - open double
|
|
# - escaped - open \\ - the next character is non-special
|
|
# - single-escaped - open \\ inside single-quotes
|
|
# - double-escaped - open \\ inside double-quotes
|
|
|
|
set -l state normal
|
|
for char in (commandline -ct | string split "")
|
|
switch $char
|
|
case "'" # single-quote
|
|
switch $state
|
|
case normal single-escaped
|
|
set state single
|
|
case single
|
|
set state normal
|
|
end
|
|
case '"' # double-quote
|
|
switch $state
|
|
case normal double-escaped
|
|
set state double
|
|
case double
|
|
set state normal
|
|
end
|
|
case \\ # backslash escapes the next character
|
|
switch $state
|
|
case double
|
|
set state double-escaped
|
|
case double-escaped
|
|
set state double
|
|
case single
|
|
set state single-escaped
|
|
case single-escaped
|
|
set state single
|
|
case normal
|
|
set state escaped
|
|
case escaped
|
|
set state normal
|
|
end
|
|
case "*" # Any other character
|
|
switch $state
|
|
case escaped
|
|
set state normal
|
|
case single-escaped
|
|
set state single
|
|
case double-escaped
|
|
set state double
|
|
end
|
|
end
|
|
end
|
|
# TODO: Should "single-escaped" also be a success?
|
|
if contains -- $state single single-escaped
|
|
return 0
|
|
else
|
|
return 1
|
|
end
|
|
end
|