guilt-graph

   1 #!/bin/sh
   2 #
   3 # Copyright (c) Josef "Jeff" Sipek, 2007-2013
   4 #
   5
   6 USAGE="[<patchname>]"
   7 if [ -z "$GUILT_VERSION" ]; then
   8         echo "Invoking `basename "$0"` directly is no longer supported." >&2
   9         exit 1
  10 fi
  11
  12 _main() {
  13
  14 if [ $# -gt 1 ]; then
  15         usage
  16 fi
  17
  18 patchname="$1"
  19
  20 bottom=`git rev-parse refs/patches/$branch/$(head_n 1 < "$applied")`
  21 base=`git rev-parse $bottom^`
  22
  23 if [ -z "$patchname" ]; then
  24         top=`git rev-parse HEAD`
  25 else
  26         top=`grep "^$patchname$" "$applied"`
  27         if [ -z "$top" ]; then
  28                 die "Cannot find patch '$patchname'. Is it applied?"
  29         fi
  30 fi
  31
  32 getfiles()
  33 {
  34         git diff-tree -r "$1^" "$1" | tr '\t' ' ' | cut -d' ' -f6
  35 }
  36
  37 cache="$GUILT_DIR/$branch/.graphcache.$$"
  38 mkdir "$cache"
  39 trap "rm -rf \"$cache\"" 0
  40
  41 disp "digraph G {"
  42
  43 current="$top"
  44
  45 safebranch=`echo "$branch"|sed 's%/%\\\\/%g'`
  46 while [ "$current" != "$base" ]; do
  47         pname=`git show-ref | sed -n -e "
  48 /^$current refs\/patches\/$safebranch/ {
  49         s,^$current refs/patches/$branch/,,
  50         p
  51         q
  52 }"`
  53         [ -z "$pname" ] && pname="?"
  54
  55         disp "# checking rev $current"
  56         disp "  \"$current\" [label=\"$pname\"]"
  57
  58         # new "hash table"
  59         rm -f "$cache/dep"
  60         touch "$cache/dep"
  61
  62         getfiles $current | while read f; do
  63                 # hash the filename
  64                 fh=`echo "$f" | sha1 | cut -d' ' -f1`
  65                 if [ -e "$cache/$fh" ]; then
  66                         # ok, something already touched this file before us
  67                         cat "$cache/$fh" >> "$cache/dep"
  68                 fi
  69                 echo "$current" > "$cache/$fh"
  70         done
  71
  72         sort -u "$cache/dep" | while read h; do
  73                 disp "  \"$h\" -> \"$current\"; // ?"
  74         done
  75
  76         current=`git rev-parse $current^`
  77 done
  78
  79 disp "}"
  80
  81 }