chiark / gitweb /
Merge commit 'refs/top-bases/fixes/tg--r-require-arg' into fixes/tg--r-require-arg
[topgit.git] / tg-export.sh
1 #!/bin/sh
2 # TopGit - A different patch queue manager
3 # (c) Petr Baudis <pasky@suse.cz>  2008
4 # GPLv2
5
6 name=
7 branches=
8 output=
9 driver=collapse
10 flatten=false
11 numbered=false
12
13
14 ## Parse options
15
16 while [ -n "$1" ]; do
17         arg="$1"; shift
18         case "$arg" in
19         -b)
20                 branches="$1"; shift;;
21         --flatten)
22                 flatten=true;;
23         --numbered)
24                 flatten=true;
25                 numbered=true;;
26         --quilt)
27                 driver=quilt;;
28         --collapse)
29                 driver=collapse;;
30         --linearize)
31                 driver=linearize;;
32         -*)
33                 echo "Usage: tg [...] export ([--collapse] NEWBRANCH | [-b BRANCH1,BRANCH2...] --quilt DIRECTORY | --linearize NEWBRANCH)" >&2
34                 exit 1;;
35         *)
36                 [ -z "$output" ] || die "output already specified ($output)"
37                 output="$arg";;
38         esac
39 done
40
41
42
43 [ -z "$branches" -o "$driver" = "quilt" ] ||
44         die "-b works only with the quilt driver"
45
46 [ "$driver" = "quilt" ] || ! "$numbered" ||
47         die "--numbered works only with the quilt driver";
48
49 [ "$driver" = "quilt" ] || ! "$flatten" ||
50         die "--flatten works only with the quilt driver"
51
52 if [ -z "$branches" ]; then
53         # this check is only needed when no branches have been passed
54         name="$(git symbolic-ref HEAD | sed 's#^refs/heads/##')"
55         base_rev="$(git rev-parse --short --verify "refs/top-bases/$name" 2>/dev/null)" ||
56                 die "not on a TopGit-controlled branch"
57 fi
58
59
60 playground="$(mktemp -d -t tg-export.XXXXXX)"
61 trap 'rm -rf "$playground"' EXIT
62
63
64 ## Collapse driver
65
66 # pretty_tree NAME
67 # Output tree ID of a cleaned-up tree without tg's artifacts.
68 pretty_tree()
69 {
70         (export GIT_INDEX_FILE="$playground/^index"
71          git read-tree "$1"
72          git update-index --force-remove ".topmsg" ".topdeps"
73          git write-tree)
74 }
75
76 create_tg_commit()
77 {
78         name="$1"
79         tree="$2"
80         parent="$3"
81
82         # Get commit message and authorship information
83         git cat-file blob "$name:.topmsg" | git mailinfo "$playground/^msg" /dev/null > "$playground/^info"
84
85         GIT_AUTHOR_NAME="$(sed -n '/^Author/ s/Author: //p' "$playground/^info")"
86         GIT_AUTHOR_EMAIL="$(sed -n '/^Email/ s/Email: //p' "$playground/^info")"
87         GIT_AUTHOR_DATE="$(sed -n '/^Date/ s/Date: //p' "$playground/^info")"
88         SUBJECT="$(sed -n '/^Subject/ s/Subject: //p' "$playground/^info")"
89
90         test -n "$GIT_AUTHOR_NAME" && export GIT_AUTHOR_NAME
91         test -n "$GIT_AUTHOR_EMAIL" && export GIT_AUTHOR_EMAIL
92         test -n "$GIT_AUTHOR_DATE" && export GIT_AUTHOR_DATE
93
94         (printf '%s\n\n' "$SUBJECT"; cat "$playground/^msg") |
95         git stripspace |
96         git commit-tree "$tree" -p "$parent"
97 }
98
99 # collapsed_commit NAME
100 # Produce a collapsed commit of branch NAME.
101 collapsed_commit()
102 {
103         name="$1"
104
105         rm -f "$playground/^pre" "$playground/^post"
106         >"$playground/^body"
107
108         # Determine parent
109         parent="$(cut -f 1 "$playground/$name^parents")"
110         if [ "$(cat "$playground/$name^parents" | wc -l)" -gt 1 ]; then
111                 # Produce a merge commit first
112                 parent="$({
113                         echo "TopGit-driven merge of branches:"
114                         echo
115                         cut -f 2 "$playground/$name^parents"
116                 } | git commit-tree "$(pretty_tree "refs/top-bases/$name")" \
117                         $(for p in $parent; do echo -p $p; done))"
118         fi
119
120         if branch_empty "$name"; then
121                 echo "$parent";
122         else
123                 create_tg_commit "$name" "$(pretty_tree $name)" "$parent"
124         fi;
125
126         echo "$name" >>"$playground/^ticker"
127 }
128
129 # collapse
130 # This will collapse a single branch, using information about
131 # previously collapsed branches stored in $playground.
132 collapse()
133 {
134         if [ -s "$playground/$_dep" ]; then
135                 # We've already seen this dep
136                 commit="$(cat "$playground/$_dep")"
137
138         elif [ -z "$_dep_is_tgish" ]; then
139                 # This dep is not for rewrite
140                 commit="$(git rev-parse --verify "$_dep")"
141
142         else
143                 # First time hitting this dep; the common case
144                 echo "Collapsing $_dep"
145                 commit="$(collapsed_commit "$_dep")"
146                 mkdir -p "$playground/$(dirname "$_dep")"
147                 echo "$commit" >"$playground/$_dep"
148         fi
149
150         # Propagate our work through the dependency chain
151         mkdir -p "$playground/$(dirname "$_name")"
152         echo "$commit   $_dep" >>"$playground/$_name^parents"
153 }
154
155
156 ## Quilt driver
157
158 quilt()
159 {
160         if [ -z "$_dep_is_tgish" ]; then
161                 # This dep is not for rewrite
162                 return
163         fi
164
165         if "$flatten"; then
166                 bn="$(echo "$_dep.diff" | sed -e 's#_#__#g' -e 's#/#_#g')";
167                 dn="";
168         else
169                 bn="$(basename "$_dep.diff")";
170                 dn="$(dirname "$_dep.diff")/";
171                 if [ "x$dn" = "x./" ]; then
172                         dn="";
173                 fi;
174         fi;
175
176         if [ -e "$playground/$_dep" ]; then
177                 # We've already seen this dep
178                 return
179         fi
180
181         mkdir -p "$playground/$(dirname "$_dep")";
182         touch "$playground/$_dep";
183
184         if branch_empty "$_dep"; then
185                 echo "Skip empty patch $_dep";
186         else
187                 if "$numbered"; then
188                         number="$(printf "%04u" $(($(cat "$playground/^number" 2>/dev/null) + 1)))";
189                         bn="$number-$bn";
190                         echo "$number" >"$playground/^number";
191                 fi;
192
193                 echo "Exporting $_dep"
194                 mkdir -p "$output/$dn";
195                 $tg patch "$_dep" >"$output/$dn$bn"
196                 echo "$dn$bn -p1" >>"$output/series"
197         fi
198 }
199
200 linearize()
201 {
202         if test ! -f "$playground/^BASE"; then
203                 head="$(git rev-parse --verify "$_dep")"
204                 echo "$head" > "$playground/^BASE"
205                 git checkout -q "$head"
206                 return;
207         fi;
208
209         head=$(git rev-parse --verify HEAD)
210
211         if [ -z "$_dep_is_tgish" ]; then
212                 # merge in $_dep unless already included
213                 rev="$(git rev-parse --verify "$_dep")";
214                 common="$(git merge-base --all HEAD "$_dep")";
215                 if test "$rev" = "$common"; then
216                         # already included, just skip
217                         :;
218                 else
219                         git merge -s recursive "$_dep";
220                         retmerge="$?";
221                         if test "x$retmerge" != "x0"; then
222                                 echo fix up the merge, commit and then exit;
223                                 #todo error handling
224                                 sh -i
225                         fi;
226                 fi;
227         else
228                 git merge-recursive "$(pretty_tree "refs/top-bases/$_dep")" -- HEAD "$(pretty_tree "refs/heads/$_dep")";
229                 retmerge="$?";
230
231                 if test "x$retmerge" != "x0"; then
232                         echo "fix up the merge and update the index.  Don't commit!"
233                         #todo error handling
234                         sh -i
235                 fi
236
237                 result_tree=$(git write-tree)
238                 # testing branch_empty might not always give the right answer.
239                 # It can happen that the patch is non-empty but still after
240                 # linearizing there is no change.  So compare the trees.
241                 if test "x$result_tree" = "x$(git rev-parse $head^{tree})"; then
242                         echo "skip empty commit $_dep";
243                 else
244                         newcommit=$(create_tg_commit "$_dep" "$result_tree" HEAD)
245                         git update-ref HEAD $newcommit $head
246                         echo "exported commit $_dep";
247                 fi
248         fi
249 }
250
251 ## Machinery
252
253 if [ "$driver" = "collapse" ] || [ "$driver" = "linearize" ]; then
254         [ -n "$output" ] ||
255                 die "no target branch specified"
256         ! ref_exists "$output"  ||
257                 die "target branch '$output' already exists; first run: git branch -D $output"
258
259 elif [ "$driver" = "quilt" ]; then
260         [ -n "$output" ] ||
261                 die "no target directory specified"
262         [ ! -e "$output" ] ||
263                 die "target directory already exists: $output"
264
265         mkdir -p "$output"
266 fi
267
268
269 driver()
270 {
271         case $_dep in refs/remotes/*) return;; esac
272         branch_needs_update >/dev/null
273         [ "$_ret" -eq 0 ] ||
274                 die "cancelling export of $_dep (-> $_name): branch not up-to-date"
275
276         $driver
277 }
278
279 # Call driver on all the branches - this will happen
280 # in topological order.
281 if [ -z "$branches" ]; then
282         recurse_deps driver "$name"
283         (_ret=0; _dep="$name"; _name=""; _dep_is_tgish=1; driver)
284 else
285         echo "$branches" | tr ',' '\n' | while read _dep; do
286                 _dep_is_tgish=1
287                 $driver
288         done
289         name="$(echo "$branches" | sed 's/.*,//')"
290 fi
291
292
293 if [ "$driver" = "collapse" ]; then
294         git update-ref "refs/heads/$output" "$(cat "$playground/$name")" ""
295
296         depcount="$(cat "$playground/^ticker" | wc -l)"
297         echo "Exported topic branch $name (total $depcount topics) to branch $output"
298
299 elif [ "$driver" = "quilt" ]; then
300         depcount="$(cat "$output/series" | wc -l)"
301         echo "Exported topic branch $name (total $depcount topics) to directory $output"
302
303 elif [ "$driver" = "linearize" ]; then
304         git checkout -q -b $output
305
306         echo $name
307         if test $(git rev-parse "$(pretty_tree $name)^{tree}") != $(git rev-parse "HEAD^{tree}"); then
308                 echo "Warning: Exported result doesn't match";
309                 echo "tg-head=$(git rev-parse "$name"), exported=$(git rev-parse "HEAD")";
310                 #git diff $head HEAD;
311         fi;
312
313 fi
314
315 # vim:noet