2007-09-22 19:30:55 +00:00
|
|
|
|
function eval -S -d "Evaluate parameters as a command"
|
2015-01-14 17:58:07 +00:00
|
|
|
|
# keep a copy of the previous $status and use restore_status
|
|
|
|
|
# to preserve the status in case the block that is evaluated
|
|
|
|
|
# does not modify the status itself.
|
|
|
|
|
set -l status_copy $status
|
2015-01-17 23:24:47 +00:00
|
|
|
|
function __fish_restore_status
|
|
|
|
|
return $argv[1]
|
2015-01-14 17:58:07 +00:00
|
|
|
|
end
|
|
|
|
|
|
2014-10-10 01:07:57 +00:00
|
|
|
|
if not set -q argv[2]
|
|
|
|
|
# like most builtins, we only check for -h/--help
|
|
|
|
|
# if we only have a single argument
|
|
|
|
|
switch "$argv[1]"
|
|
|
|
|
case -h --help
|
|
|
|
|
__fish_print_help eval
|
|
|
|
|
return 0
|
|
|
|
|
end
|
|
|
|
|
end
|
2007-10-06 10:23:26 +00:00
|
|
|
|
|
|
|
|
|
# If we are in an interactive shell, eval should enable full
|
|
|
|
|
# job control since it should behave like the real code was
|
|
|
|
|
# executed. If we don't do this, commands that expect to be
|
|
|
|
|
# used interactively, like less, wont work using eval.
|
|
|
|
|
|
|
|
|
|
set -l mode
|
|
|
|
|
if status --is-interactive-job-control
|
|
|
|
|
set mode interactive
|
|
|
|
|
else
|
|
|
|
|
if status --is-full-job-control
|
|
|
|
|
set mode full
|
|
|
|
|
else
|
|
|
|
|
set mode none
|
|
|
|
|
end
|
|
|
|
|
end
|
|
|
|
|
if status --is-interactive
|
|
|
|
|
status --job-control full
|
|
|
|
|
end
|
2015-01-17 23:24:47 +00:00
|
|
|
|
__fish_restore_status $status_copy
|
2007-10-06 10:23:26 +00:00
|
|
|
|
|
2015-01-17 23:24:47 +00:00
|
|
|
|
# To eval 'foo', we construct a block "begin ; foo; end <&3 3<&-"
|
|
|
|
|
# Note the redirections are also within the quotes.
|
|
|
|
|
#
|
|
|
|
|
# We then pipe this to 'source 3<&0’.
|
|
|
|
|
#
|
|
|
|
|
# You might expect that the dup2(3, stdin) should overwrite stdin,
|
|
|
|
|
# and therefore prevent 'source' from reading the piped-in block. This doesn't happen
|
|
|
|
|
# because when you pipe to a builtin, we don't overwrite stdin with the read end
|
|
|
|
|
# of the block; instead we set a separate fd in a variable 'builtin_stdin', which is
|
|
|
|
|
# what it reads from. So builtins are magic in that, in pipes, their stdin
|
|
|
|
|
# is not fd 0.
|
|
|
|
|
#
|
|
|
|
|
# ‘source’ does not apply the redirections to itself. Instead it saves them and passes
|
|
|
|
|
# them as block-level redirections to parser.eval(). Ultimately the eval’d code sees
|
|
|
|
|
# the following redirections (in the following order):
|
|
|
|
|
# dup2 0 -> 3
|
|
|
|
|
# dup2 pipe -> 0
|
|
|
|
|
# dup2 3 -> 0
|
|
|
|
|
# where the pipe is the pipe we get from piping ‘echo’ to ‘source’. Thus the redirection
|
|
|
|
|
# effectively makes stdin fd0, instead of the thing that was piped to ‘source’
|
|
|
|
|
echo "begin; $argv "\n" ;end <&3 3<&-" | source 3<&0
|
2010-11-22 11:36:42 +00:00
|
|
|
|
set -l res $status
|
2007-10-06 10:23:26 +00:00
|
|
|
|
|
|
|
|
|
status --job-control $mode
|
2010-11-22 11:36:42 +00:00
|
|
|
|
return $res
|
2007-04-22 22:18:06 +00:00
|
|
|
|
end
|