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
|
#!/bin/bash
#
# This script applies the pull request <PR number> to the Subversion working
# copy of the trunk. It requires that is executed in the root of the working
# copy. Apart from applying the patch it also and creates a possible commit
# message in a file named clog.
# Requires curl, svn and jq be on the PATH.
if [ "$#" -lt 1 ] ; then
echo "usage: $(basename $0) <PR number>"
exit
fi
if [ ! -d .svn ] ; then
echo "No Subversion working copy"
exit
fi
PR=$1
DIFF_URL="https://github.com/apache/spamassassin/pull/$PR.diff"
TRUNK="https://svn.apache.org/repos/asf/spamassassin/trunk"
if curl -s -v -L -o /dev/null ${DIFF_URL} 2>&1 | grep -q "HTTP/1.1 404 Not Found" ; then
echo "Pull request $PR not found."
exit
fi
if ! curl -s -L ${DIFF_URL} | patch -p1 ; then
echo "Patching failed."
exit
fi
curl -s https://api.github.com/repos/apache/spamassassin/pulls/${PR}/commits | jq '.[].commit.message' | perl -pe 's/^"//; s/"$//; s/\\n/\n/g; ' > clog
echo >> clog
AUTHORS=`curl -s https://api.github.com/repos/apache/spamassassin/pulls/${PR}/commits | jq '.[].commit.author|.name,.email' | perl -e 'while (<>) { s/^"//; s/"$//; chomp $_; if (defined($a)) { $b{"$a <$_>\n"} = 1; $a = undef; } else { $a = $_; }} print join(",", map { chomp $_; $_ } sort keys(%b)); '`
echo "Submitted by: $AUTHORS" >> clog
echo >> clog
echo "Github: closes #${PR}" >> clog
echo "Github commit message can be found on \"clog\" file"
|
