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        echo Nothing new to pack.
  70fi
  71for name in $names ; do
  72        fullbases="$fullbases pack-$name"
  73        chmod a-w "$PACKTMP-$name.pack"
  74        chmod a-w "$PACKTMP-$name.idx"
  75        if test "$quiet" != '-q'; then
  76            echo "Pack pack-$name created."
  77        fi
  78        mkdir -p "$PACKDIR" || exit
  79
  80        for sfx in pack idx
  81        do
  82                if test -f "$PACKDIR/pack-$name.$sfx"
  83                then
  84                        mv -f "$PACKDIR/pack-$name.$sfx" \
  85                                "$PACKDIR/old-pack-$name.$sfx"
  86                fi
  87        done &&
  88        mv -f "$PACKTMP-$name.pack" "$PACKDIR/pack-$name.pack" &&
  89        mv -f "$PACKTMP-$name.idx"  "$PACKDIR/pack-$name.idx" &&
  90        test -f "$PACKDIR/pack-$name.pack" &&
  91        test -f "$PACKDIR/pack-$name.idx" || {
  92                echo >&2 "Couldn't replace the existing pack with updated one."
  93                echo >&2 "The original set of packs have been saved as"
  94                echo >&2 "old-pack-$name.{pack,idx} in $PACKDIR."
  95                exit 1
  96        }
  97        rm -f "$PACKDIR/old-pack-$name.pack" "$PACKDIR/old-pack-$name.idx"
  98done
  99
 100if test "$remove_redundant" = t
 101then
 102        # We know $existing are all redundant.
 103        if [ -n "$existing" ]
 104        then
 105                sync
 106                ( cd "$PACKDIR" &&
 107                  for e in $existing
 108                  do
 109                        case " $fullbases " in
 110                        *" $e "*) ;;
 111                        *)      rm -f "$e.pack" "$e.idx" "$e.keep" ;;
 112                        esac
 113                  done
 114                )
 115        fi
 116        git-prune-packed $quiet
 117fi
 118
 119case "$no_update_info" in
 120t) : ;;
 121*) git-update-server-info ;;
 122esac