scripts/rev_control/version_control.sh

   1 #!/bin/bash
   2
   3 # these are helper functions for doing localized revision control.
   4 # this script should be sourced into other scripts that use it.
   5
   6 # Author: Chris Koeritz
   7 # Author: Kevin Wentworth
   8
   9 source "$FEISTY_MEOW_SCRIPTS/core/launch_feisty_meow.sh"
  10 source "$FEISTY_MEOW_SCRIPTS/tty/terminal_titler.sh"
  11
  12 #hmmm: we need to dump all the outputs in this script into splitter
  13
  14 ##############
  15
  16 # the maximum depth that the recursive functions will try to go below the starting directory.
  17 export MAX_DEPTH=5
  18
  19 # use our splitter tool for lengthy output if it's available.
  20 if [ ! -z "$(which splitter)" ]; then
  21   TO_SPLITTER="$(which splitter)"
  22 else
  23   TO_SPLITTER=cat
  24 fi
  25
  26 ##############
  27
  28 # one unpleasantry to take care of first; cygwin barfs aggressively if the TMP directory
  29 # is a DOS path, but we need it to be a DOS path for our GFFS testing, so that blows.
  30 # to get past this, TMP gets changed below to a hopefully generic and safe place.
  31 if [[ "$TMP" =~ .:.* ]]; then
  32   echo "making weirdo temporary directory for PCDOS-style path."
  33   export TMP=/tmp/rev_control_$USER
  34 fi
  35 if [ ! -d "$TMP" ]; then
  36   mkdir -p $TMP
  37 fi
  38 if [ ! -d "$TMP" ]; then
  39   echo "could not create the temporary directory TMP in: $TMP"
  40   echo "this script will not work properly without an existing TMP directory."
  41 fi
  42
  43 ##############
  44
  45 # checks the directory provided into the revision control system repository it belongs to.
  46 function do_checkin()
  47 {
  48   local directory="$1"; shift
  49
  50   save_terminal_title
  51
  52   # make a nice echoer since we want to use it inside conditions below.
  53   local nicedir="$directory"
  54   if [ $nicedir == "." ]; then
  55     nicedir=$(\pwd)
  56   fi
  57   local blatt="echo checking in '$nicedir'..."
  58
  59   do_update "$directory"
  60   test_or_die "repository update--this should be fixed before check-in."
  61
  62   pushd "$directory" &>/dev/null
  63   if [ -f ".no-checkin" ]; then
  64     echo "skipping check-in due to presence of .no-checkin sentinel file."
  65   elif [ -d "CVS" ]; then
  66     if test_writeable "CVS"; then
  67       $blatt
  68       cvs ci .
  69       test_or_die "cvs checkin"
  70     fi
  71   elif [ -d ".svn" ]; then
  72     if test_writeable ".svn"; then
  73       $blatt
  74       svn ci .
  75       test_or_die "svn checkin"
  76     fi
  77   elif [ -d ".git" ]; then
  78     if test_writeable ".git"; then
  79       $blatt
  80
  81 # classic implementation, but only works with one master branch.
  82 # fixes will be forthcoming from development branch.
  83
  84       # snag all new files.  not to everyone's liking.
  85       git add --all .
  86       test_or_die "git add all new files"
  87
  88       # see if there are any changes in the local repository.
  89       if ! git diff-index --quiet HEAD --; then
  90         # tell git about all the files and get a check-in comment.
  91         git commit .
  92         test_or_die "git commit"
  93       fi
  94 #      # upload the files to the server so others can see them.
  95 #      git push 2>&1 | grep -v "X11 forwarding request failed"
  96 #      if [ ${PIPESTATUS[0]} -ne 0 ]; then false; fi
  97 #      test_or_die "git push"
  98
  99       # catch if the diff-index failed somehow.
 100       test_or_die "git diff-index"
 101
 102       # we continue on to the push, even if there were no changes this time, because
 103       # there could already be committed changes that haven't been pushed yet.
 104
 105       local myself="$(my_branch_name)"
 106       local parent="$(parent_branch_name)"
 107
 108       # upload any changes to the upstream repo so others can see them.
 109       if [ "$myself" != "$parent" ]; then
 110         git push origin "$(myself)" 2>&1 | grep -v "X11 forwarding request failed" | $TO_SPLITTER
 111         test_or_die "git push to origin: $myself"
 112       else
 113         # this branch is the same as the parent, so just push.
 114         git push 2>&1 | grep -v "X11 forwarding request failed" | $TO_SPLITTER
 115         test_or_die "normal git push"
 116       fi
 117
 118     fi
 119   else
 120     # nothing there.  it's not an error though.
 121     echo no repository in $directory
 122   fi
 123   popd &>/dev/null
 124
 125   restore_terminal_title
 126
 127   true;
 128 }
 129
 130 # shows the local changes in a repository.
 131 function do_diff
 132 {
 133   local directory="$1"; shift
 134
 135   save_terminal_title
 136
 137   pushd "$directory" &>/dev/null
 138
 139   # only update if we see a repository living there.
 140   if [ -d ".svn" ]; then
 141     svn diff .
 142     test_or_die "subversion diff"
 143   elif [ -d ".git" ]; then
 144     git diff
 145     test_or_die "git diff"
 146   elif [ -d "CVS" ]; then
 147     cvs diff .
 148     test_or_die "cvs diff"
 149   fi
 150
 151   popd &>/dev/null
 152
 153   restore_terminal_title
 154
 155   true;
 156 }
 157
 158 # reports any files that are not already known to the upstream repository.
 159 function do_report_new
 160 {
 161   local directory="$1"; shift
 162
 163   save_terminal_title
 164
 165   pushd "$directory" &>/dev/null
 166
 167   # only update if we see a repository living there.
 168   if [ -f ".no-checkin" ]; then
 169     echo "skipping reporting due to presence of .no-checkin sentinel file."
 170   elif [ -d ".svn" ]; then
 171     # this action so far only makes sense and is needed for svn.
 172     bash $FEISTY_MEOW_SCRIPTS/rev_control/svnapply.sh \? echo
 173     test_or_die "svn diff"
 174   elif [ -d ".git" ]; then
 175     git status -u
 176     test_or_die "git status -u"
 177   fi
 178
 179   popd &>/dev/null
 180
 181   restore_terminal_title
 182
 183   true
 184 }
 185
 186 # checks in all the folders in a specified list.
 187 function checkin_list()
 188 {
 189   # make the list of directories unique.
 190   local list="$(uniquify $*)"
 191
 192   save_terminal_title
 193
 194   # turn repo list back into an array.
 195   eval "repository_list=( ${REPOSITORY_LIST[*]} )"
 196
 197   local outer inner
 198
 199   for outer in "${repository_list[@]}"; do
 200     # check the repository first, since it might be an absolute path.
 201     if [[ $outer =~ /.* ]]; then
 202       # yep, this path is absolute.  just handle it directly.
 203       if [ ! -d "$outer" ]; then continue; fi
 204       do_checkin $outer
 205       test_or_die "running check-in (absolute) on path: $outer"
 206       sep 28
 207     else
 208       for inner in $list; do
 209         # add in the directory component to see if we can find the folder.
 210         local path="$inner/$outer"
 211         if [ ! -d "$path" ]; then continue; fi
 212         do_checkin $path
 213         test_or_die "running check-in (relative) on path: $path"
 214         sep 28
 215       done
 216     fi
 217   done
 218
 219   restore_terminal_title
 220 }
 221
 222 # takes out the first few carriage returns that are in the input.
 223 function squash_first_few_crs()
 224 {
 225   i=0
 226   while read input_text; do
 227     i=$((i+1))
 228     if [ $i -le 5 ]; then
 229       echo -n "$input_text  "
 230     else
 231       echo $input_text
 232     fi
 233   done
 234   if [ $i -le 3 ]; then
 235     # if we're still squashing eols, make sure we don't leave them hanging.
 236     echo
 237   fi
 238 }
 239
 240 # a helpful method that reports the git branch for the current directory's
 241 # git repository.
 242 function my_branch_name()
 243 {
 244   echo "$(git branch | grep \* | cut -d ' ' -f2)"
 245 }
 246
 247 # this reports the upstream branch for the current repo.
 248 function parent_branch_name()
 249 {
 250   echo "$(git branch -vv | grep \* | cut -d ' ' -f2)"
 251 }
 252
 253 # gets the latest versions of the assets from the upstream repository.
 254 function do_update()
 255 {
 256   directory="$1"; shift
 257
 258   save_terminal_title
 259
 260   # make a nice echoer since we want to use it inside conditions below.
 261   local nicedir="$directory"
 262   if [ $nicedir == "." ]; then
 263     nicedir=$(\pwd)
 264   fi
 265   local blatt="echo retrieving '$nicedir'..."
 266
 267   pushd "$directory" &>/dev/null
 268   if [ -d "CVS" ]; then
 269     if test_writeable "CVS"; then
 270       $blatt
 271       cvs update . | $TO_SPLITTER
 272       test_or_die "cvs update"
 273     fi
 274   elif [ -d ".svn" ]; then
 275     if test_writeable ".svn"; then
 276       $blatt
 277       svn update . | $TO_SPLITTER
 278       test_or_die "svn update"
 279     fi
 280   elif [ -d ".git" ]; then
 281     if test_writeable ".git"; then
 282       $blatt
 283
 284 # classic implementation, but only works with one master branch.
 285 # fixes will be forthcoming from development branch.
 286
 287 #      git pull 2>&1 | grep -v "X11 forwarding request failed" | $TO_SPLITTER
 288 #      if [ ${PIPESTATUS[0]} -ne 0 ]; then false; fi
 289 #      test_or_die "git pull"
 290
 291
 292 #let's start over clean here...
 293
 294       git remote update
 295       test_or_die "git remote update"
 296
 297 # from: https://stackoverflow.com/questions/3258243/check-if-pull-needed-in-git
 298 UPSTREAM=$(parent_branch_name)
 299 #argh: original UPSTREAM='${1:-'\''@{u}'\''}'
 300 LOCAL=$(git rev-parse @)
 301 REMOTE=$(git rev-parse "$UPSTREAM")
 302 BASE=$(git merge-base @ "$UPSTREAM")
 303 var UPSTREAM LOCAL REMOTE BASE
 304
 305 if [ "$LOCAL" == "$REMOTE" ]; then
 306     echo "Up-to-date"
 307 elif [ "$LOCAL" == "$BASE" ]; then
 308     echo "Need to pull"
 309 elif [ "$REMOTE" == "$BASE" ]; then
 310     echo "Need to push"
 311 else
 312     echo "Diverged"
 313 fi
 314
 315 echo The rest of pull is not being done yet.
 316 return 1
 317
 318       git pull --no-ff origin
 319       test_or_die "git fetch origin"
 320
 321
 322 #      reslog=$(git log HEAD..origin/master --oneline)
 323 #      if [[ "${reslog}" != "" ]] ; then
 324 #        git merge origin/master
 325
 326
 327
 328 #      # from very helpful page:
 329 #      # https://stackoverflow.com/questions/10312521/how-to-fetch-all-git-branches
 330 #      for remote in $( git branch -r | grep -v -- '->' ); do
 331 #        git branch --track ${remote#origin/} $remote 2>/dev/null
 332 ##hmmm: ignoring errors from these, since they are continual.
 333 ##hmmm: if we could find a way to not try to track with a local branch when there's already one present, that would be swell.  it's probably simple.
 334 #      done
 335 #
 336 ##hmmm: well, one time it failed without the fetch.  i hope that's because the fetch is actually needed and not because the whole approach is fubar.
 337 #      git fetch --all 2>&1 | grep -v "X11 forwarding request failed" | $TO_SPLITTER
 338 #      test_or_die "git fetch"
 339 #
 340 #      git pull --all 2>&1 | grep -v "X11 forwarding request failed" | $TO_SPLITTER
 341 #      test_or_die "git pull"
 342     fi
 343   else
 344     # this is not an error necessarily; we'll just pretend they planned this.
 345     echo no repository in $directory
 346   fi
 347   popd &>/dev/null
 348
 349   restore_terminal_title
 350
 351   true
 352 }
 353
 354 # gets all the updates for a list of folders under revision control.
 355 function checkout_list()
 356 {
 357   local list="$(uniquify $*)"
 358
 359   save_terminal_title
 360
 361   # turn repo list back into an array.
 362   eval "repository_list=( ${REPOSITORY_LIST[*]} )"
 363
 364   local outer inner
 365
 366   for outer in "${repository_list[@]}"; do
 367     # check the repository first, since it might be an absolute path.
 368     if [[ $outer =~ /.* ]]; then
 369       # yep, this path is absolute.  just handle it directly.
 370       if [ ! -d "$outer" ]; then continue; fi
 371       do_update $outer
 372       test_or_die "running update on: $path"
 373       sep 28
 374     else
 375       for inner in $list; do
 376         # add in the directory component to see if we can find the folder.
 377         local path="$inner/$outer"
 378         if [ ! -d "$path" ]; then continue; fi
 379         do_update $path
 380         test_or_die "running update on: $path"
 381         sep 28
 382       done
 383     fi
 384   done
 385
 386   restore_terminal_title
 387 }
 388
 389 # provides a list of absolute paths of revision control directories
 390 # that are located under the directory passed as the first parameter.
 391 function generate_rev_ctrl_filelist()
 392 {
 393   local dir="$1"; shift
 394   pushd "$dir" &>/dev/null
 395   local dirhere="$( \cd "$(\dirname "$dir")" && /bin/pwd )"
 396   local tempfile=$(mktemp /tmp/zz_checkins.XXXXXX)
 397   echo >$tempfile
 398   local additional_filter
 399   find $dirhere -follow -maxdepth $MAX_DEPTH -type d -iname ".svn" -exec echo {}/.. ';' >>$tempfile 2>/dev/null
 400   find $dirhere -follow -maxdepth $MAX_DEPTH -type d -iname ".git" -exec echo {}/.. ';' >>$tempfile 2>/dev/null
 401   # CVS is not well behaved like git and (now) svn, and we seldom use it anymore.
 402   popd &>/dev/null
 403
 404   # see if they've warned us not to try checking in within vendor hierarchies.
 405   if [ ! -z "NO_CHECKIN_VENDOR" ]; then
 406     sed -i -e '/.*\/vendor\/.*/d' "$tempfile"
 407   fi
 408
 409   local sortfile=$(mktemp /tmp/zz_checkin_sort.XXXXXX)
 410   sort <"$tempfile" >"$sortfile"
 411   \rm "$tempfile"
 412   echo "$sortfile"
 413 }
 414
 415 # iterates across a list of directories contained in a file (first parameter).
 416 # on each directory name, it performs the action (second parameter) provided.
 417 function perform_revctrl_action_on_file()
 418 {
 419   local tempfile="$1"; shift
 420   local action="$1"; shift
 421
 422   save_terminal_title
 423
 424   while read -u 3 dirname; do
 425     if [ -z "$dirname" ]; then continue; fi
 426     pushd "$dirname" &>/dev/null
 427     echo "[$(pwd)]"
 428     $action .
 429     test_or_die "performing action $action on: $(pwd)"
 430     sep 28
 431     popd &>/dev/null
 432   done 3<"$tempfile"
 433
 434   restore_terminal_title
 435
 436   rm $tempfile
 437 }
 438