blob: b563eecd9481fd6632b31491ad35d6e370a8bc33 (
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
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
|
#!/bin/bash
# Copyright (c) 2006 Mauro Carvalho Chehab (mchehab@infradead.org)
# This code is placed under the terms of the GNU General Public License
#
#This script is capable to mass import patches on a mbox file, test for it, allow
#comment editing and applying it.
#
#This script requires:
#1) git, since it uses gitimport to break a mbox into patches;
#2) hg mailqueue. It is easier to manage patches using mq, allowing to work with
# the patches before applying to the tree.
#uncomment to use mq
#usemq=1
#uncomment to stop at the first error while testing a patch with --dry-run
#exitonerror=1
head=v4l/scripts/hghead.pl
if [ "$1" == "" ]; then
echo "Usage: $0 <mbox>"
exit
fi
MBOX=$1
if [ "$TMPDIR" == "" ]; then
TMPDIR=/tmp
fi
DIR=$TMPDIR/mailimport$$
mkdir $DIR
if [ "$?" != "0" ]; then
echo "*** Error at mkdir $DIR"
exit;
fi
trap "rm -rf $DIR" EXIT
TMP2=$DIR/patchheader
apply_patch () {
next=$1
pdir=linux
echo patch -s -t -p1 --dry-run -l -N -d $pdir -i $next
patch -s -t -p1 --dry-run -l -N -d $pdir -i $next
if [ "$?" != "0" ]; then
pdir=.
echo patch -s -t -p1 --dry-run -l -N -d $pdir -i $next
patch -s -t -p1 --dry-run -l -N -d $pdir -i $next
if [ "$?" != "0" ]; then
$head $next
echo "*** ERROR: Patch didn't applied well"
if [ "$exitonerror" != "" ]; then
exit
else
return
fi
fi
fi
nano $next
unset cont
until [ "$cont" == "0" ]; do
cont=0
$head $next >$TMP2
if [ "`grep '^Bad:' $TMP2`" != "" ]; then
echo "*** ERROR: Patch bad formed. Please fix."
sleep 1
nano $next
cont=1
fi
done
make whitespace
committer=`grep "Committer:" $TMP2|sed s/"#Committer: "//`
if [ "$usemq" != "" ]; then
name=`cat $next | perl -ne '
if (s/Subject:\s+(.*)/$1/) {
m/\s*(.*)\s*\n/;
$_="$1";
tr/[A-Z]/[a-z]/;
s/[^a-z0-9]/_/g;
s/_+$//;
s/_+/_/g;
s/^v4l_dvb_\d+[a-z]*_//g;
printf "%s.patch",$_;
exit;
}'`
cat $next| grep -v "^#" >$TMPDIR/$name
echo hg -m "`cat $TMP2|grep -v "^#"`" qnew $name
hg qnew -m "`cat $TMP2|grep -v "^#"`" $name
hg qrefresh
else
patch -s -t -p1 -l -N -d $pdir -i $next
if [ "$?" != "0" ]; then
echo "*** ERROR at: patch -s -t -p1 -l -N -d $pdir -i $next"
exit
fi
cur=`pwd`
cd $pdir
hg addremove `diffstat -p1 -l $next`
if [ "$?" != "0" ]; then
echo "*** ERROR at hg addremove"
exit
fi
# Commit the changed files
hg commit -u "$committer" -m "`cat $TMP2|grep -v "^#"`" `diffstat -p1 -l $next`
if [ "$?" != "0" ]; then
echo "*** ERROR at hg commit"
cd $cur
exit
fi
cd $cur
fi
}
echo git-mailsplit $MBOX $DIR
echo -n "Number of patches at file: "
git-mailsplit $MBOX $DIR
echo
for i in $DIR/*; do
cat $i| git-mailinfo $DIR/msg $DIR/patch>$DIR/author
cat $DIR/msg|grep -vi ^CC: >$DIR/msg2
cat $DIR/author|perl -ne "if (m/Author[:]\\s*(.*)\\n/) { \$auth=\$1; } else \
{ if (m/Email[:]\\s*(.*)\\n/) { print \"From: \$auth \<\$1\>\n\"; } else \
{ if (m/Subject[:]\\s*(.*)\\n/) { \
\$sub=\$1; \
\$sub=~ s;^(media|dvb|v4l|video|drivers|[-_/: \\t])*(.*);\$2;; \
print \"Subject: \$sub\\n\"; \
} else \
{ print; } } \
}" >$DIR/author2
out=$DIR/patch.diff
cat $DIR/author2
echo "Signed-off-by: $CHANGE_LOG_NAME <$CHANGE_LOG_EMAIL_ADDRESS>" >>$DIR/msg2
echo "cat $DIR/author2 $DIR/msg2 $DIR/patch >$out"
cat $DIR/author2 $DIR/msg2 $DIR/patch >$out
apply_patch $out
done
|
