user-tools/movesymlinks

   1 #!/bin/bash
   2
   3 true <<END
   4 =pod
   5
   6 =head1 NAME
   7
   8 movesymlinks - Rename file and correct its symlinks to keep point to it.
   9
  10 =head1 SYNOPSIS
  11
  12 movesymlinks I<OLDNAME> I<NEWNAME> [I<DIR> [I<DIR> [...]]]
  13
  14 Rename file I<OLDNAME> to I<NEWNAME> and search I<DIR> directories for symlinks
  15 pointing to I<OLDNAME> and change them to point to I<NEWNAME>.
  16
  17 =cut
  18
  19 END
  20
  21 if [ $# = 0 -o "$1" = --help ]
  22 then
  23         pod2text < "$0"
  24         if [ $# = 0 ]
  25         then
  26                 exit -1
  27         fi
  28         exit 0
  29 fi
  30
  31 set -e -o pipefail
  32 set -u
  33
  34 oldname=$1
  35 shift
  36 newname=$1
  37 shift
  38
  39 mv -v -n "$oldname" "$newname"
  40
  41 find "$@" -maxdepth 1 -type l -printf '%f       %l\n' |\
  42 while IFS=$'\t' read -r symlinkfile target
  43 do
  44         if [ "$target" = "$oldname" ]
  45         then
  46                 ln -v -snf "$newname" "$symlinkfile"
  47         fi
  48 done