* extfs/uar.in: Implement "copyin" and "rm" commands.
Этот коммит содержится в:
родитель
4925d2cdd5
Коммит
fd44d72c55
@ -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
|
||||||
|
Загрузка…
x
Ссылка в новой задаче
Block a user