Замечание: оболочка Korn /bin/ksh устанавливается инсталляцией pdksh*.rpm с компакт-диска дистрибутива Linux
Сохраните этот файл как текст и выполните для него "chmod a+rx".
#!/bin/ksh
# CVS-программа scommit
# Программа для фиксации изменений и загрузки файла в CVS
# Имя каждого файла составляется из 3 частей -- домашнего каталога,
# подкаталога и имени файла. Полный путь -- $HOME/$subdir/$fname
# В CVS сохраняется такая же структура каталогов (с помощью переменной
# $subdir), поэтому в CVS мы будем иметь $CVSROOT/$subdir/$fname
# В данной программе эти 4 переменные $HOME, $CVSROOT, $subdir и $fname
# играют важную роль. Примеры их значений:
# HOME=/home/aldev, subdir=myproject/src CVSROOT=/home/cvsroot
# и fname=foo.cpp
# Предупреждение: заключите значения переменных, содержащих пробелы
# в двойные кавычки: "$HOME/$subdir", если subdir равен "some foo.cpp"
cmdname=`basename $0`
Usage()
{
print "\nВызов: $cmdname [-r номер_редакции] <файл>"
print "Опции -r необязательны "
print "Например: "
print " $cmdname -r 1.1 foo.cpp"
print " $cmdname foo.cpp "
print " "
}
# Каманда getopt не будет поддерживаться в следующей версии.
# Вместо нее используем getopts.
while getopts r: ii
do
case $ii in
r) FLAG1=$ii; OARG1="$OPTARG";;
?) Usage; exit 2;;
esac
done
shift ` expr $OPTIND - 1 `
#echo FLAG1 = $FLAG1 , OARG1 = $OARG1
if [ $# -lt 1 ]; then
Usage
exit 2
fi
if [ -d $1 ]; then
Usage
exit 2
fi
homedir=` echo $HOME | cut -f1 -d' ' `
if [ "$homedir" = "" ]; then
print "\nОшибка: \$HOME не установлен!!\n"
exit
fi
# Определить подкаталог
cur_dir=`pwd`
#echo $cur_dir
len=${#homedir}
len=$(($len + 2))
#echo $len
subdir=` echo $cur_dir | cut -b $len-2000 `
tmpaa=`dirname $1`
if [ "$tmpaa" = "." ]; then
fname=$1
if [ "$subdir" = "" ]; then
subdir=$tmpaa
fi
else
fname=`basename $1`
if [ "$subdir" = "" ]; then
subdir=$tmpaa
else
subdir="$subdir/$tmpaa"
fi
fi
# echo "subdir is : " $subdir
# echo "fname is : " $fname
# Если файл уже извлечен другим разработчиком...
cvs_root=` echo $CVSROOT | cut -f1 -d' ' `
if [ "$cvs_root" = "" ]; then
print "\nОшибка: \$CVSROOT не установлен!!\n"
exit
fi
mkdir -p "$CVSROOT/$subdir/Locks" 2>/dev/null
# Для всех команд требуется каталог CVS в Вашем локальном каталоге...
if [ ! -d "$homedir/$subdir/CVS" ]; then
tmpaa=` (cd "$CVSROOT/$subdir"; find * -prune -type f -print | head -1 ) `
tmpbb=`basename $tmpaa | cut -d',' -f1 `
if [ "$tmpaa" = "" -o ! -f "$CVSROOT/$subdir/$tmpbb,v" ]; then
print "\nКаталог $homedir/$subdir/CVS не существует"
print "Вы должны выполнить sget в каталоге `basename $subdir`. Наберите"
print " cd $homedir/`dirname $subdir` "
print " sget `basename $subdir` "
exit
else
# Теперь попытка создать CVS в локальном каталоге с помощью sget
(
cd "$homedir"
if [ "$subdir" = "." ]; then # не использовать точку -- это смешает CVS
cvs -r checkout -A $tmpbb
else
cvs -r checkout -A "$subdir/$tmpbb"
fi
)
fi
fi
# Получение рабочего номера версии файла...
# Используем временный файл tmpfile, так как аргумент не может быть задан
# внутри дочерней оболочки
tmpfile=$homedir/sedit-lock.tmp
\rm -f $tmpfile 2>/dev/null
if [ "$FLAG1" = "" ]; then
(
cd $homedir
if [ "$subdir" = "." ]; then # не использовать точку -- это смешает CVS
cvs status $fname 2>/dev/null | grep "Рабочая версия:" | awk '{print $3}' >$tmpfile
else
cvs status "$subdir/$fname" 2>/dev/null | grep "Рабочая версия:" | awk '{print $3}' >$tmpfile
fi
)
OARG1=`cat $tmpfile`
\rm -f $tmpfile 2>/dev/null
fi
if [ "$OARG1" = "" ]; then
print "Файл $subdir/$fname НОВЫЙ, его нет в CVS-репозитории"
else
lockfile="$CVSROOT/$subdir/Locks/$fname-$OARG1"
if [ -e $lockfile ]; then
# Проверка владеете ли Вы редакцией...
aa=` ls -l $lockfile | awk '{print $3}' `
userid=`id | cut -d'(' -f2 | cut -d')' -f1 `
if [ "$aa" != "$userid" ]; then
print " "
print "Файл $subdir/$fname заблокирован не Вами!!"
print "А пользователем с именем Unix-бюджета $aa; Ваше имя входа -- $userid"
# print "Если Вы работаете одновременно с другим разработчиком"
# print "и воспользовались опцией -F команды sedit."
print "Необходимо подождать до выполнения другим разработчиком"
print "команды scommit или sunlock"
print "Завершение $cmdname ...."
print " "
exit 2
fi
else
# Файл должен существовать в CVS
if [ -f "$CVSROOT/$subdir/$fname,v" ]; then
print "Вы не заблокировали файл $subdir/$fname с помощью sedit!!"
print "Завершение $cmdname ...."
exit 2
else
print "\nФайл $subdir/$fname еще не существует CVS-репозитории!!"
print "Следует выполнить sadd для $subdir/$fname ...."
exit 2
fi
fi
fi
# Действуем внутри дочерней оболочки и из корневого каталога
(
cd $homedir
# Не позволять фиксацию каталогов с этого момента...
#if [ -d "$subdir/$fname" ]; then
# cvs commit "$subdir/$fname"
#fi
if [ "$subdir" = "." ]; then # не использовать точку -- это смешает CVS
cvs commit $fname
else
cvs commit "$subdir/$fname"
fi
exit_status=$?
if [ $exit_status -eq 0 ]; then
lockfile="$CVSROOT/$subdir/Locks/$fname-$OARG1"
if [ -e $lockfile ]; then
\rm -f $lockfile
fi
# В случае отсутствия изменений в файле, нужно
# изменить права доступа к файлу
chmod a-w "$HOME/$subdir/$fname"
print "\n$cmdname удачно выполнен."
#print "\nTip (Usage): $cmdname <filename/directory name>\n"
fi
) |