Andrew's git - gitweb.git/blob

   1#!/bin/sh
   2#
   3# Copyright (c) 2005 Linus Torvalds
   4#
   5
   6. git-sh-setup || die "Not a git archive"
   7        
   8no_update_info= all_into_one= remove_redundant= local=
   9while case "$#" in 0) break ;; esac
  10do
  11        case "$1" in
  12        -n)     no_update_info=t ;;
  13        -a)     all_into_one=t ;;
  14        -d)     remove_redundant=t ;;
  15        -l)     local=t ;;
  16        *)      break ;;
  17        esac
  18        shift
  19done
  20
  21rm -f .tmp-pack-*
  22PACKDIR="$GIT_OBJECT_DIRECTORY/pack"
  23
  24# There will be more repacking strategies to come...
  25case ",$all_into_one," in
  26,,)
  27        rev_list='--unpacked'
  28        rev_parse='--all'
  29        pack_objects='--incremental'
  30        ;;
  31,t,)
  32        rev_list=
  33        rev_parse='--all'
  34        pack_objects=
  35
  36        # Redundancy check in all-into-one case is trivial.
  37        existing=`cd "$PACKDIR" && \
  38            find . -type f \( -name '*.pack' -o -name '*.idx' \) -print`
  39        ;;
  40esac
  41if [ "$local" ]; then
  42        pack_objects="$pack_objects --local"
  43fi
  44name=$(git-rev-list --objects $rev_list $(git-rev-parse $rev_parse) 2>&1 |
  45        git-pack-objects --non-empty $pack_objects .tmp-pack) ||
  46        exit 1
  47if [ -z "$name" ]; then
  48        echo Nothing new to pack.
  49        exit 0
  50fi
  51echo "Pack pack-$name created."
  52
  53mkdir -p "$PACKDIR" || exit
  54
  55mv .tmp-pack-$name.pack "$PACKDIR/pack-$name.pack" &&
  56mv .tmp-pack-$name.idx  "$PACKDIR/pack-$name.idx" ||
  57exit
  58
  59if test "$remove_redundant" = t
  60then
  61        # We know $existing are all redundant only when
  62        # all-into-one is used.
  63        if test "$all_into_one" != '' && test "$existing" != ''
  64        then
  65                sync
  66                ( cd "$PACKDIR" &&
  67                  for e in $existing
  68                  do
  69                        case "$e" in
  70                        ./pack-$name.pack | ./pack-$name.idx) ;;
  71                        *)      rm -f $e ;;
  72                        esac
  73                  done
  74                )
  75        fi
  76fi
  77
  78case "$no_update_info" in
  79t) : ;;
  80*) git-update-server-info ;;
  81esac