guilt-pop

   1 #!/bin/bash
   2 #
   3 # Copyright (c) Josef "Jeff" Sipek, 2006, 2007
   4 #
   5
   6 USAGE="[-a | --all | <patchname>]"
   7 . guilt
   8
   9 if [ $# -gt 1 ]; then
  10         usage
  11 fi
  12
  13 patch="$1"
  14
  15 if [ "$patch" = "--all" -o "$patch" = "-a" ]; then
  16         # we are supposed to pop all patches
  17
  18         sidx=`wc -l < $applied`
  19         eidx=0
  20 elif [ -z "$patch" ]; then
  21         # we are supposed to pop only the current patch on the stack
  22
  23         sidx=`wc -l < $applied`
  24         eidx=`expr $sidx - 1`
  25 else
  26         # we're supposed to pop only up to a patch, make sure the patch is
  27         # in the series
  28
  29         eidx=`cat $applied | grep -ne "^[0-9a-f]\{40\}:$patch\$" | cut -d: -f 1`
  30         if [ -z "$eidx" ]; then
  31                 die "Patch $patch is not in the series/is not applied"
  32         fi
  33
  34         eidx=`expr $eidx - 1`
  35         sidx=`wc -l < $applied`
  36 fi
  37
  38 # make sure that there are no unapplied changes
  39 if ! must_commit_first; then
  40         die "Uncommited changes detected. Refresh first."
  41 fi
  42
  43 l=`awk "BEGIN{n=0}(n==$eidx){print \\$0; exit}{n=n+1}END{}" < $applied`
  44
  45 pop_many_patches `echo $l | cut -d: -f1`^ `expr $sidx - $eidx`
  46
  47 p=`get_top`
  48 [ ! -z "$p" ] && echo "Now at $p." || echo "All patches popped."
  49