1
1

* extfs/uar.in: Implement "copyin" and "rm" commands.

Этот коммит содержится в:
Pavel Roskin 2002-12-07 00:02:12 +00:00
родитель 4925d2cdd5
Коммит fd44d72c55
2 изменённых файлов: 22 добавлений и 6 удалений

Просмотреть файл

@ -1,3 +1,7 @@
2002-12-06 Pavel Roskin <proski@gnu.org>
* extfs/uar.in: Implement "copyin" and "rm" commands.
2002-12-06 Andrew V. Samoilov <sav@bcs.zp.ua> 2002-12-06 Andrew V. Samoilov <sav@bcs.zp.ua>
* extfs.c: Don't include ../src/profile.h. * extfs.c: Don't include ../src/profile.h.

Просмотреть файл

@ -8,7 +8,6 @@
# #
# #
XAR=ar XAR=ar
XUNAR=ar
XARINFO="ar tv" XARINFO="ar tv"
AWK=awk AWK=awk
@ -32,7 +31,17 @@ mcarfs_list ()
mcarfs_copyout () mcarfs_copyout ()
{ {
$XUNAR p $1 $2 > $3 $XAR p $1 $2 > $3
}
mcarfs_copyin ()
{
$XAR r $1 $2 > $3
}
mcarfs_rm ()
{
$XAR d $1 $2
} }
# override any locale for dates # override any locale for dates
@ -41,8 +50,11 @@ export LC_ALL
umask 077 umask 077
case "$1" in case "$1" in
list) mcarfs_list $2; exit 0;; list) mcarfs_list $2 ;;
copyout) shift; mcarfs_copyout $*; exit 0;; copyout) shift; mcarfs_copyout "$@" ;;
copyin) shift; mcarfs_copyin $*; exit 0;; copyin) shift; mcarfs_copyin "$@" ;;
rm) shift; mcarfs_rm "$@" ;;
*) exit 1;
esac esac
exit 1
exit 0