Andrew's git - gitweb.git/blob

   1#!/bin/sh
   2#
   3# Copyright (c) 2005 Linus Torvalds
   4#
   5
   6USAGE='[-a] [-d] [-f] [-l] [-n] [-q] [--max-pack-size=N] [--window=N] [--depth=N]'
   7SUBDIRECTORY_OK='Yes'
   8. git-sh-setup
   9
  10no_update_info= all_into_one= remove_redundant=
  11local= quiet= no_reuse= extra=
  12while case "$#" in 0) break ;; esac
  13do
  14        case "$1" in
  15        -n)     no_update_info=t ;;
  16        -a)     all_into_one=t ;;
  17        -d)     remove_redundant=t ;;
  18        -q)     quiet=-q ;;
  19        -f)     no_reuse=--no-reuse-object ;;
  20        -l)     local=--local ;;
  21        --max-pack-size=*) extra="$extra $1" ;;
  22        --window=*) extra="$extra $1" ;;
  23        --depth=*) extra="$extra $1" ;;
  24        *)      usage ;;
  25        esac
  26        shift
  27done
  28
  29# Later we will default repack.UseDeltaBaseOffset to true
  30default_dbo=false
  31
  32case "`git config --bool repack.usedeltabaseoffset ||
  33       echo $default_dbo`" in
  34true)
  35        extra="$extra --delta-base-offset" ;;
  36esac
  37
  38PACKDIR="$GIT_OBJECT_DIRECTORY/pack"
  39PACKTMP="$GIT_OBJECT_DIRECTORY/.tmp-$$-pack"
  40rm -f "$PACKTMP"-*
  41trap 'rm -f "$PACKTMP"-*' 0 1 2 3 15
  42
  43# There will be more repacking strategies to come...
  44case ",$all_into_one," in
  45,,)
  46        args='--unpacked --incremental'
  47        ;;
  48,t,)
  49        if [ -d "$PACKDIR" ]; then
  50                for e in `cd "$PACKDIR" && find . -type f -name '*.pack' \
  51                        | sed -e 's/^\.\///' -e 's/\.pack$//'`
  52                do
  53                        if [ -e "$PACKDIR/$e.keep" ]; then
  54                                : keep
  55                        else
  56                                args="$args --unpacked=$e.pack"
  57                                existing="$existing $e"
  58                        fi
  59                done
  60        fi
  61        [ -z "$args" ] && args='--unpacked --incremental'
  62        ;;
  63esac
  64
  65args="$args $local $quiet $no_reuse$extra"
  66names=$(git pack-objects --non-empty --all --reflog $args </dev/null "$PACKTMP") ||
  67        exit 1
  68if [ -z "$names" ]; then
  69        if test -z "$quiet"; then
  70                echo Nothing new to pack.
  71        fi
  72fi
  73for name in $names ; do
  74        fullbases="$fullbases pack-$name"
  75        chmod a-w "$PACKTMP-$name.pack"
  76        chmod a-w "$PACKTMP-$name.idx"
  77        if test "$quiet" != '-q'; then
  78            echo "Pack pack-$name created."
  79        fi
  80        mkdir -p "$PACKDIR" || exit
  81
  82        for sfx in pack idx
  83        do
  84                if test -f "$PACKDIR/pack-$name.$sfx"
  85                then
  86                        mv -f "$PACKDIR/pack-$name.$sfx" \
  87                                "$PACKDIR/old-pack-$name.$sfx"
  88                fi
  89        done &&
  90        mv -f "$PACKTMP-$name.pack" "$PACKDIR/pack-$name.pack" &&
  91        mv -f "$PACKTMP-$name.idx"  "$PACKDIR/pack-$name.idx" &&
  92        test -f "$PACKDIR/pack-$name.pack" &&
  93        test -f "$PACKDIR/pack-$name.idx" || {
  94                echo >&2 "Couldn't replace the existing pack with updated one."
  95                echo >&2 "The original set of packs have been saved as"
  96                echo >&2 "old-pack-$name.{pack,idx} in $PACKDIR."
  97                exit 1
  98        }
  99        rm -f "$PACKDIR/old-pack-$name.pack" "$PACKDIR/old-pack-$name.idx"
 100done
 101
 102if test "$remove_redundant" = t
 103then
 104        # We know $existing are all redundant.
 105        if [ -n "$existing" ]
 106        then
 107                sync
 108                ( cd "$PACKDIR" &&
 109                  for e in $existing
 110                  do
 111                        case " $fullbases " in
 112                        *" $e "*) ;;
 113                        *)      rm -f "$e.pack" "$e.idx" "$e.keep" ;;
 114                        esac
 115                  done
 116                )
 117        fi
 118        git prune-packed $quiet
 119fi
 120
 121case "$no_update_info" in
 122t) : ;;
 123*) git-update-server-info ;;
 124esac