1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
|
# localization: skip(uses-apropos)
# Provide a minimalist realpath implementation to help deal with platforms that may not provide it
# as a command. If an external realpath or grealpath command is available simply pass all arguments
# thru to it. If not fallback to our builtin.
# The following is slightly subtle. We have to define a realpath function even if there is an
# external command by that name. That's because if we don't the parser will select our builtin.
# However, we only want our builtin if there is no external realpath command.
if command -sq realpath
function realpath
command realpath $argv
end
exit 0
end
# If there is a HomeBrew installed version of GNU realpath named grealpath use that.
if command -sq grealpath
function realpath
command grealpath $argv
end
exit 0
end
function realpath -d "return an absolute path without symlinks"
set -l options h/help q/quiet V-version s/no-symlinks N-strip z/zero
set -a options e/canonicalize-existing m/canonicalize-missing L/logical P/physical
set -a options 'R-relative-to=' 'B-relative-base='
argparse -n realpath $options -- $argv
or return
if set -q _flag_help
__fish_print_help realpath
return 0
end
set -l supported_flags
if set -el _flag_no_symlinks
set -el _flag_s
set -a supported_flags --no-symlinks
end
# We don't implement any of the other flags so if any are set it's an error.
if string match -q '_flag_*' -- (set -l)
set -l flags (set -l | string replace --filter --regex '_flag_\w+\s*' '' | sort -u)
printf "realpath: These flags are not allowed by fish realpath: '%s'" "$flags" >&2
echo >&2
__fish_print_help realpath
return 1
end
if not set -q argv[1]
printf "realpath: Expected at least %d args, got only %d\n" 1 0 >&2
return 1
end
for path in $argv
builtin realpath $supported_flags $path
end
end
|
