clone.sh

   1 #!/bin/bash
   2
   3 export PATH=/home/pasky/bin:$PATH
   4
   5 set -e
   6
   7 proj="$1"
   8
   9 clone_project() {
  10 log="$(mktemp -t repomgr-XXXXXX)"
  11 url="$(cat base_url)"
  12 mail="$(cat owner)"
  13
  14 bang() {
  15   if ! "$@" >>"$log" 2>&1; then
  16     {
  17     echo "$* failed with error code $?"
  18     echo "Log follows:"
  19     cat "$log"
  20     } | mail -s "[repo.or.cz] $proj clone failed" "$mail",pasky@ucw.cz
  21
  22     # This removes any remnants from /srv/git/$proj.git _and_ gets rid
  23     # of the group record.
  24     perl -I/home/repo/repomgr/cgi -MGit::RepoCGI -e 'Git::RepoCGI::Project->ghost('"$proj"')->delete;'
  25     cd .. && rm -r "$proj"
  26     rm "$log"
  27     exit 1
  28   fi
  29 }
  30
  31 ref=()
  32 if [ -s objects/info/alternates ]; then
  33         ref=(--reference "$(cat objects/info/alternates | sed 's/\.\.\/\.\.\/\.\./\/srv\/git/')")
  34 fi
  35 bang git clone "${ref[@]}" --bare "$url" repodir
  36 GIT_DIR=repodir bang git repack -a -d
  37 ! [ -d /srv/git/"$proj".git ]
  38 lproj="$(echo "$proj" | sed 's/^(.*\/)\(.*\)/\1/')"
  39 if [ z"$lproj" != z"$proj" ]; then
  40         bang mkdir -p /srv/git/"$lproj"
  41 fi
  42 bang mv repodir /srv/git/"$proj".git
  43 bang chmod g+w base_url owner description homepage README.html
  44 bang mv base_url owner description homepage README.html /srv/git/"$proj".git/
  45 bang mv objects/info/alternates /srv/git/"$proj".git/objects/info/alternates
  46 cd ..  && rm -r "$proj"
  47 # NO bang AT THIS POINT! rm -r depends on cwd.
  48 echo "Congratulations! You can adjust the project settings in the future at http://repo.or.cz/m/p/editproj.cgi." | mail -s "[repo.or.cz] $proj clone completed" "$mail",pasky@ucw.cz
  49 rm "$log"
  50 }
  51
  52 if [ -f base_url ]; then
  53         cd "$proj"
  54         clone_project
  55 else
  56         # a collection of subprojects
  57         find "$proj" -name base_url |
  58                 sed -e 's/\/base_url$//' |
  59                 while read proj; do
  60                         (cd "$proj" && clone_project) || :
  61                 done
  62 fi