blob: 78549f3bc9318bbfc58dad8e2f500c294deefb51 (
plain)
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
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
|
# GNU and BSD mktemp differ in their handling of arguments
# Let's expose a simplified common interface
function mktemp
# usage: mktemp [-d] [-t] [template]
#
# If the -d flag is given, create a directory.
#
# If the -t flag is given, treat the template as a filename relative
# to the temporary directory. The template may contain slashes but only
# the final path component is created by mktemp. The template must not be
# absolute
#
# If no template is given, assume tmp.XXXXXXXXXX and -t.
set -l opts
while set -q argv[1]
switch $argv[1]
case -d
set opts $opts d
case -t
set opts $opts t
case --
set -e argv[1]
break
case '-*'
echo "mktemp: unknown flag $argv[1]" >&2
_mktemp_help >&2
exit 2
case '*'
break
end
set -e argv[1]
end
set -l template
if set -q argv[1]
set template $argv[1]
else
set template 'tmp.XXXXXXXXXX'
set opts $opts t
end
if set -q argv[2]
echo 'mktemp: too many templates' >&2
_mktemp_help >&2
exit 1
end
# GNU sed treats the final occurrence of a sequence of X's as the template token.
# BSD sed only treats X's as the template token if they suffix the string.
# So let's outlaw them anywhere besides the end.
# Similarly GNU sed requires at least 3 X's, BSD sed requires none. Let's require 3.
begin
set -l IFS
printf '%s' "$template" | read -la chars
set -l found_x
for c in $chars
if test $c = X
set found_x $found_x X
else if set -q found_x[1]
echo 'mktemp: X\'s may only occur at the end of the template' >&2
_mktemp_help >&2
exit 1
end
end
if test (count $found_x) -lt 3
echo "mktemp: too few X's in template '$template'" >&2
_mktemp_usage >&2
exit 1
end
end
set -l args
if contains d $opts
set args $args -d
end
if contains t $opts
switch $template
case '/*'
echo "mktemp: invalid template '$template' with -t, template must not be absolute" >&2
_mktemp_help >&2
exit 1
end
switch "$TMPDIR"
case ''
set template /tmp/$template
case '*/'
set template $TMPDIR$template
case '*'
set template $TMPDIR/$template
end
end
set args $args $template
command mktemp $args
end
function _mktemp_help
echo 'usage: mktemp [-d] [-t] [template]'
echo 'note: mktemp is a test function, see tests/test_functions/mktemp.fish'
end
|
