#!/bin/csh
# Reads .cshrc in order to possibly find an alias for mv, e.g. 'mv -i'

set lastbasedest = ""

foreach i ($*)
  set basedest = `echo $i | tr 'A-Z' 'a-z' | awk -F. '{print $1 "." $2}'`
  set version = `echo $i | awk -F. '{print $3}'`
  # following line for uppercase names w/o version nums (not quite TOPS 20)
  if ("$version" == "") set version = 1
  set dest = $basedest.~$version~
  echo Moving $i to $dest.
  mv $i $dest
  if ("$basedest" != "$lastbasedest") then
    if ("$lastbasedest" != "") then
      echo Moving $lastbasedest.~$lowestver~ $lastbasedest
      mv $lastbasedest.~$lowestver~ $lastbasedest
    endif
    set lastbasedest = $basedest
    set lowestver = $version
  else
    if ($version < $lowestver) set lowestver = $version
  endif
end

if ("$lastbasedest" != "") then
  echo Moving $lastbasedest.~$lowestver~ $lastbasedest
  mv $lastbasedest.~$lowestver~ $lastbasedest
endif