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
| | # This function takes as an argument a filename of a patch and sets $REPLY to
# a single-line "subject", or unsets it if no subject could be extracted.
{
integer i
integer -r LIMIT=10
local -a lines
local needle
if [[ -f "$1" ]]; then
# Extract the first LIMIT lines, or up to the first empty line or the start of the unidiffs,
# whichever comes first.
while (( i++ < LIMIT )); do
IFS= read -r "lines[$i]"
if [[ -z ${lines[$i]} ]] || [[ ${lines[$i]} == (#b)(---|Index:)* ]]; then
lines[$i]=()
break
fi
done < "$1"
if needle=${lines[(i)Subject:*]}; (( needle <= $#lines )); then
# "Subject: foo" line, plus rfc822 whitespace unfolding.
#
# Example: 'git format-patch' patches.
REPLY=${lines[needle]}
REPLY=${REPLY#*: }
REPLY=${REPLY#\[PATCH\] }
while [[ ${${lines[++needle]}[1]} == ' ' ]]; do
REPLY+=${lines[needle]}
done
elif needle=${lines[(r)Description:*]}; [[ -n $needle ]]; then
# "Description: foo" line.
#
# Example: DEP-3 patches.
REPLY=${needle#*: }
elif [[ ${lines[1]} == '# HG changeset patch' ]] && { needle=${${lines:#([#]*)}[1]}; [[ -n $needle ]] }; then
# Mercurial patch
REPLY=$needle
elif (( ${+lines[1]} )); then
# The first line of the file is not part of the diff.
REPLY=${lines[1]}
else
# The patch has no subject.
unset REPLY
return 0
fi
else
# The patch cannot be examined, or invalid arguments.
unset REPLY
return 1
fi
}
|