1
1

Ticket #1967: shell variables quoting in user menu.

Thanks to pavlinux for the original patch.

Signed-off-by: Andrew Borodin <aborodin@vmail.ru>
Этот коммит содержится в:
Andrew Borodin 2010-01-22 15:41:02 +00:00
родитель 933831301f
Коммит a77e64732c
2 изменённых файлов: 99 добавлений и 99 удалений

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

@ -2,22 +2,22 @@ shell_patterns=0
+ ! t t
@ Do something on the current file
CMD=%{Enter command}
$CMD %f
"$CMD" %f
+ t t
@ Do something on the tagged files
set %t; CMD=%{Enter command}
while [ -n "$1" ]; do
$CMD "$1"
"$CMD" "$1"
shift
done
0 Edit a bug report and send it to root
I=`mktemp ${MC_TMPDIR:-/tmp}/mail.XXXXXX` || exit 1
${EDITOR-vi} $I
I=`mktemp "${MC_TMPDIR:-/tmp}/mail.XXXXXX"` || exit 1
${EDITOR-vi} "$I"
test -r $I && mail root < $I
rm -f $I
rm -f "$I"
=+ f \.1$ | f \.3$ | f \.4$ | f \.5$ | f \.6$ | f \.7$ | f \.8$ | f \.man$ & t r
1 Display the file with roff -man
@ -80,6 +80,7 @@ shell_patterns=0
cd .. && \
tar cf - "$Pwd" | xz -f > "$tar.tar.xz" && \
echo "../$tar.tar.xz created."
= f \.c$ & t r
+ f \.c$ & t r & ! t t
Compile and link current .c file
@ -87,52 +88,52 @@ shell_patterns=0
+ t r & ! t t
a Append file to opposite
cat %f >>%D/%f
cat %f >> %D/%f
+ t t
A Append files to opposite files
set %t
while [ -n "$1" ]; do
cat $1 >>%D/$1
cat "$1" >> "%D/$1"
shift
done
+ t r & ! t t
d Delete file if a copy exists in the other directory.
if [ "%d" = "%D" ]; then
echo "The two directores must be different"
echo "The two directories must be different."
exit 1
fi
if [ -f %D/%f ]; then # if two of them, then
if [ -f %D/%f ]; then # if two of them, then
if cmp -s %D/%f %f; then
rm %f && echo %f: DELETED
rm %f && echo "%f: DELETED."
else
echo "%f and %D/%f differ: NOT deleted"
echo "%f and %D/%f differ: NOT deleted."
echo -n "Press RETURN "
read key
fi
else
echo %f: No copy in %D/%f: NOT deleted.
echo "%f: No copy in %D/%f: NOT deleted."
fi
+ t t
D Delete tagged files if a copy exists in the other directory.
if [ "%d" = "%D" ]; then
echo "The two directores must be different"
echo "The two directores must be different."
exit 1
fi
fi
for i in %t
do
if [ -f %D/$i ]; then
do
if [ -f "%D/$i" ]; then
SUM1="`sum $i`"
SUM2="`sum %D/$i`"
if [ "$SUM1" = "$SUM2" ]; then
rm $i && echo ${i}: DELETED
rm "$i" && echo "${i}: DELETED."
else
echo $i and %D/$i differ: NOT deleted.
echo "$i and %D/$i differ: NOT deleted."
fi
else
echo %f has no copy in %D/%f: NOT deleted.
echo "%f has no copy in %D/%f: NOT deleted."
fi
done
@ -150,15 +151,15 @@ n Inspect gzip'ed newsbatch file
+ ! t t
h Strip headers from current newsarticle
CHECK=`awk '{print $1 ; exit}' %f` 2>/dev/null
case $CHECK in
case "$CHECK" in
Newsgroups:|Path:)
I=`mktemp ${MC_TMPDIR:-/tmp}/news.XXXXXX` || exit 1
cp %f $I && sed '/^'"$CHECK"' /,/^$/d' $I > %f
[ "$?" = "0" ] && rm $I
echo %f: header removed
I=`mktemp "${MC_TMPDIR:-/tmp}/news.XXXXXX"` || exit 1
cp %f "$I" && sed '/^'"$CHECK"' /,/^$/d' "$I" > %f
[ "$?" = "0" ] && rm "$I"
echo "%f: header removed."
;;
*)
echo %f is not a news article.
echo "%f is not a news article."
;;
esac
@ -167,18 +168,18 @@ H Strip headers from the marked newsarticles
set %t
while [ -n "$1" ]; do
CHECK=`awk '{print $1 ; exit}' $1` 2>/dev/null
WFILE=`mktemp ${MC_TMPDIR:-/tmp}/news.XXXXXX` || exit 1
case $CHECK in
WFILE=`mktemp "${MC_TMPDIR:-/tmp}/news.XXXXXX"` || exit 1
case "$CHECK" in
Newsgroups:|Path:)
cp $1 $WFILE && sed '/^'"$CHECK"' /,/^$/d' $WFILE > $1
cp "$1" "$WFILE" && sed '/^'"$CHECK"' /,/^$/d' "$WFILE" > "$1"
if [ "$?" = "0" ]; then
rm $WFILE; echo $1 header removed. OK.
rm "$WFILE"; echo "$1 header removed. OK."
else
echo "Oops! Please check $1 against $WFILE"
echo "Oops! Please check $1 against $WFILE."
fi
;;
*)
echo $1 skipped: Not a news article.
echo "$1 skipped: Not a news article."
;;
esac
shift
@ -191,7 +192,7 @@ r Copy file to remote host
read Host
echo -n "To which directory on $Host?: "
read Dir
rcp -p %f ${Host}:$Dir
rcp -p %f "${Host}:$Dir"
+ t t
R Copy files to remote host (no error checking)
@ -199,7 +200,7 @@ R Copy files to remote host (no error checking)
read Host
echo -n "To which directory on $Host? :"
read Dir
rcp -pr %u ${Host}:$Dir
rcp -pr %u "${Host}:$Dir"
= f \.tex$ & t r
+ f \.tex$ & t r & ! t t
@ -212,14 +213,14 @@ U Uudecode marked news articles (needs work)
set %t
(
while [ -n "$1" ]; do # strip headers
FIRST=`awk '{print $1 ; exit}' $1`
cat $1 | sed '/^'"$FIRST"' /,/^$/d'; shift
FIRST=`awk '{print $1 ; exit}' "$1"`
cat "$1" | sed '/^'"$FIRST"' /,/^$/d'; shift
done
) |sed '/^$/d' |sed -n '/^begin 6/,/^end$/p' | uudecode
if [ "$?" != "0" ]; then
echo "Cannot decode %t"
echo "Cannot decode %t."
fi
echo "Please test the output file before deleting anything"
echo "Please test the output file before deleting anything."
=+ f \.tar\.gz$ | f \.tar\.z$ | f \.tgz$ | f \.tpz$ | f \.tar\.lz$ | f \.tar\.lzma$ | f \.tar\.lz$ | f \.tar\.7z$ | f \.tar\.xz$ | f \.tar\.Z$| f \.tar\.bz2$ & t r
x Extract the contents of a compressed tar file
@ -247,13 +248,13 @@ x Extract the contents of a compressed tar file
exit 1
;;
esac
$PRG | tar xvf -
"$PRG" | tar xvf -
= t r
+ ! t t
y Gzip or gunzip current file
unset DECOMP
case %f in
case %f in
*.gz) DECOMP=-d;;
*.[zZ]) DECOMP=-d;;
esac
@ -264,17 +265,17 @@ Y Gzip or gunzip tagged files
for i in %t
do
unset DECOMP
case $i in
case "$i" in
*.gz) DECOMP=-d;;
*.[zZ]) DECOMP=-d;;
esac
gzip $DECOMP -v $i
gzip $DECOMP -v "$i"
done
+ ! t t
b Bzip2 or bunzip2 current file
unset DECOMP
case %f in
case %f in
*.bz2) DECOMP=-d;;
esac
bzip2 $DECOMP -v %f
@ -284,10 +285,10 @@ B Bzip2 or bunzip2 tagged files
for i in %t
do
unset DECOMP
case $i in
case "$i" in
*.bz2) DECOMP=-d;;
esac
bzip2 $DECOMP -v $i
bzip2 $DECOMP -v "$i"
done
+ f \.tar.gz$ | f \.tgz$ | f \.tpz$ | f \.tar.Z$ | f \.tar.z$ | f \.tar.bz2$ | f \.tar.F$ & t r & ! t t
@ -303,7 +304,7 @@ z Extract compressed tar file to subdirectory
*.tar.bz2) D="`basename %f .tar.bz2`"; set bunzip2 -c ;;
*.tar.F) D="`basename %f .tar.F`"; set freeze -dc;
esac
mkdir $D; cd $D && ($1 $2 ../%f | tar xvf -)
mkdir "$D"; cd "$D" && ("$1" "$2" ../%f | tar xvf -)
+ t t
Z Extract compressed tar files to subdirectories
@ -311,7 +312,7 @@ Z Extract compressed tar files to subdirectories
do
set gzip -dc
unset D
case $i in
case "$i" in
*.tar.gz) D="`basename $i .tar.gz`";;
*.tgz) D="`basename $i .tgz`";;
*.tpz) D="`basename $i .tpz`";;
@ -320,7 +321,7 @@ Z Extract compressed tar files to subdirectories
*.tar.F) D="`basename $i .tar.F`"; set freeze -dc;;
*.tar.bz2) D="`basename $i .tar.bz2`"; set bunzip2 -c;;
esac
mkdir $D; (cd $D && $1 $2 ../$i | tar xvf -)
mkdir "$D"; (cd "$D" && "$1" "$2" "../$i" | tar xvf -)
done
+ f \.gz$ | f \.tgz$ | f \.tpz$ | f \.Z$ | f \.z$ | f \.bz2$ & t r & ! t t
@ -341,9 +342,9 @@ c Convert gz<->bz2, tar.gz<->tar.bz2 & tgz->tar.bz2
bz2) D="`basename %f .bz2`";;
esac
if [ "$EXT" = "bz2" ]; then
bunzip2 -v %f ; gzip -f9 -v $D
bunzip2 -v %f ; gzip -f9 -v "$D"
else
gunzip -v %f ; bzip2 -v $D
gunzip -v %f ; bzip2 -v "$D"
fi
+ t t
@ -353,7 +354,7 @@ C Convert gz<->bz2, tar.gz<->tar.bz2 & tgz->tar.bz2
do
unset D
unset EXT
case $1 in
case "$1" in
*.tgz) EXT=tgz;;
*.tpz) EXT=tpz;;
*.Z) EXT=Z;;
@ -368,11 +369,11 @@ C Convert gz<->bz2, tar.gz<->tar.bz2 & tgz->tar.bz2
bz2) D="`basename $1 .bz2`";;
esac
if [ "$EXT" = "bz2" ]; then
bunzip2 -v $1
gzip -f9 -v $D
bunzip2 -v "$1"
gzip -f9 -v "$D"
else
gunzip -v $1
bzip2 -v $D
gunzip -v "$1"
bzip2 -v "$D"
fi
shift
done
@ -380,4 +381,3 @@ C Convert gz<->bz2, tar.gz<->tar.bz2 & tgz->tar.bz2
+ x /usr/bin/open | x /usr/local/bin/open & x /bin/sh
o Open next a free console
open -s -- sh

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

@ -2,13 +2,13 @@ shell_patterns=0
+ ! t t
@ Ради нешто над текућом датотеком
CMD=%{Унесите наредбу}
$CMD %f
"$CMD" %f
+ t t
@ Ради нешто над означеним датотекама
set %t; CMD=%{Унесите наредбу}
while [ -n "$1" ]; do
$CMD "$1"
"$CMD" "$1"
shift
done
@ -57,46 +57,46 @@ a Надовежи датотеку на ону из другог окна
A Надовежи датотеке на оне из другог окна
set %t
while [ -n "$1" ]; do
cat $1 >>%D/$1
cat "$1" >> "%D/$1"
shift
done
+ t r & ! t t
d Обриши датотеку ако њена копија постоји у другом окну.
if [ "%d" = "%D" ]; then
echo "Два директоријума морају да буду различити"
echo "Два директоријума морају да буду различити."
exit 1
fi
if [ -f %D/%f ]; then # if two of them, then
if cmp -s %D/%f %f; then
rm %f && echo %f: ОБРИСАНА
rm %f && echo "%f: ОБРИСАНА."
else
echo "%f и %D/%f се разликују: НИЈЕ обрисана"
echo "%f и %D/%f се разликују: НИЈЕ обрисана."
echo -n "Притисните `RETURN' "
read тастер
fi
else
echo %f: Нема копије у %D/%f: НИЈЕ обрисана.
echo "%f: Нема копије у %D/%f: НИЈЕ обрисана."
fi
+ t t
D Обриши означене датотеке ако постоји копија у другом окну.
if [ "%d" = "%D" ]; then
echo "Два директоријума морају да буду различити"
echo "Два директоријума морају да буду различити."
exit 1
fi
for i in %t
do
if [ -f %D/$i ]; then
if [ -f "%D/$i" ]; then
SUM1="`sum $i`"
SUM2="`sum %D/$i`"
if [ "$SUM1" = "$SUM2" ]; then
rm $i && echo ${i}: ОБРИСАНА
rm "$i" && echo "${i}: ОБРИСАНА."
else
echo $i и %D/$i се разликују: НИЈЕ обрисана.
echo "$i и %D/$i се разликују: НИЈЕ обрисана."
fi
else
echo %f нема копију у %D/%f: НИЈЕ обрисана.
echo "%f нема копију у %D/%f: НИЈЕ обрисана."
fi
done
@ -114,14 +114,14 @@ n Прегледај датотеку вести компримовану
+ ! t t
h Скини заглавља из текућег чланка вести
CHECK=`awk '{print $1 ; exit}' %f` 2>/dev/null
case $CHECK in
case "$CHECK" in
Newsgroups:|Path:)
cp %f /tmp/%f.$$ && sed '/^'"$CHECK"' /,/^$/d' /tmp/%f.$$ > %f
[ "$?" = "0" ] && rm /tmp/%f.$$
echo %f: уклоњено заглавље
[ "$?" = "0" ] && rm "/tmp/%f.$$"
echo "%f: уклоњено заглавље."
;;
*)
echo %f није чланак вести.
echo "%f није чланак вести."
;;
esac
@ -129,19 +129,19 @@ h Скини заглавља из текућег чланка вести
H Скини заглавља из означених чланака вести
set %t
while [ -n "$1" ]; do
CHECK=`awk '{print $1 ; exit}' $1` 2>/dev/null
CHECK=`awk '{print $1 ; exit}' "$1"` 2>/dev/null
WFILE=/tmp/${1}.$$
case $CHECK in
case "$CHECK" in
Newsgroups:|Path:)
cp $1 $WFILE && sed '/^'"$CHECK"' /,/^$/d' $WFILE > $1
cp "$1" "$WFILE" && sed '/^'"$CHECK"' /,/^$/d' "$WFILE" > "$1"
if [ "$?" = "0" ]; then
rm $WFILE; echo $1 заглавље уклоњено. У реду.
rm "$WFILE"; echo "$1 заглавље уклоњено. У реду."
else
echo "Уупс! Молим да проверите $1 са $WFILE"
echo "Уупс! Молим да проверите $1 са $WFILE."
fi
;;
*)
echo $1 прескочена: Није чланак вести.
echo "$1 прескочена: Није чланак вести."
;;
esac
shift
@ -154,7 +154,7 @@ r Копирај датотеку на удаљеног домаћина
read Домаћин
echo -n "У који директоријум на $Домаћин?: "
read Дир
rcp -p %f ${Домаћин}:$Дир
rcp -p %f "${Домаћин}:$Дир"
+ t t
R Копирај датотеке на удаљеног домаћина (без провере грешака)
@ -162,7 +162,7 @@ R Копирај датотеке на удаљеног домаћина (
read Домаћин
echo -n "У који директоријум на $Домаћин? :"
read Дир
rcp -pr %u ${Домаћин}:$Дир
rcp -pr %u "${Домаћин}:$Дир"
= f \.tex$ & t r
+ f \.tex$ & t r & ! t t
@ -175,14 +175,14 @@ U Уудекодирај означени чланак вести (тре
set %t
(
while [ -n "$1" ]; do # strip headers
FIRST=`awk '{print $1 ; exit}' $1`
cat $1 | sed '/^'"$FIRST"' /,/^$/d'; shift
FIRST=`awk '{print $1 ; exit}' "$1"`
cat "$1" | sed '/^'"$FIRST"' /,/^$/d'; shift
done
) |sed '/^$/d' |sed -n '/^begin 6/,/^end$/p' | uudecode
if [ "$?" != "0" ]; then
echo "Не могу да декодирам %t"
echo "Не могу да декодирам %t."
fi
echo "Молим да проверите излазну датотеку пре било каквог брисања"
echo "Молим да проверите излазну датотеку пре било каквог брисања."
=+ f \.tar\.gz$ | f \.tar\.z$ | f \.tgz$ | f \.tpz$ | f \.tar\.Z$| f \.tar\.bz2$ & t r
x Издвој садржај компримоване датотеке врсте `tar'
@ -211,17 +211,17 @@ Y Пакуј или расп. означ. дат. програмима `gz
for i in %t
do
unset DECOMP
case $i in
case "$i" in
*.gz) DECOMP=-d;;
*.[zZ]) DECOMP=-d;;
esac
gzip $DECOMP -v $i
gzip $DECOMP -v "$i"
done
+ ! t t
b Пакуј или расп. тек. дат. програмима `bzip2' или `bunzip2'
unset DECOMP
case %f in
case %f in
*.bz2) DECOMP=-d;;
esac
bzip2 $DECOMP -v %f
@ -231,10 +231,10 @@ B Пакуј или расп. означ. дат. програмима `bz
for i in %t
do
unset DECOMP
case $i in
case "$i" in
*.bz2) DECOMP=-d;;
esac
bzip2 $DECOMP -v $i
bzip2 $DECOMP -v "$i"
done
+ f \.tar.gz$ | f \.tgz$ | f \.tpz$ | f \.tar.Z$ | f \.tar.z$ | f \.tar.bz2$ | f \.tar.F$ & t r & ! t t
@ -250,7 +250,7 @@ z Издвој компримовану датотеку врсте `tar'
*.tar.bz2) D="`basename %f .tar.bz2`"; set bunzip2 -c ;;
*.tar.F) D="`basename %f .tar.F`"; set freeze -dc;
esac
mkdir $D; cd $D && ($1 $2 ../%f | tar xvf -)
mkdir "$D"; cd "$D" && ("$1" "$2" ../%f | tar xvf -)
+ t t
Z Издвој компримовану датотеке врсте `tar' у поддиректоријуме
@ -258,7 +258,7 @@ Z Издвој компримовану датотеке врсте `tar'
do
set gzip -dc
unset D
case $i in
case "$i" in
*.tar.gz) D="`basename $i .tar.gz`";;
*.tgz) D="`basename $i .tgz`";;
*.tpz) D="`basename $i .tpz`";;
@ -267,13 +267,13 @@ Z Издвој компримовану датотеке врсте `tar'
*.tar.F) D="`basename $i .tar.F`"; set freeze -dc;;
*.tar.bz2) D="`basename $i .tar.bz2`"; set bunzip2 -c;;
esac
mkdir $D; (cd $D && $1 $2 ../$i | tar xvf -)
mkdir "$D"; (cd "$D" && "$1" "$2" "../$i" | tar xvf -)
done
+ f \.gz$ | f \.tgz$ | f \.tpz$ | f \.Z$ | f \.z$ | f \.bz2$ & t r & ! t t
c Пребаци gz<->bz2, tar.gz<->tar.bz2 и tgz->tar.bz2
unset D
case %f in
case "%f" in
*.tgz) EXT=tgz;;
*.tpz) EXT=tpz;;
*.Z) EXT=Z;;
@ -287,9 +287,9 @@ c Пребаци gz<->bz2, tar.gz<->tar.bz2 и tgz->tar.bz2
bz2) D="`basename %f .bz2`";;
esac
if [ "$EXT" = "bz2" ]; then
bunzip2 -v %f ; gzip -f9 -v $D
bunzip2 -v "%f" ; gzip -f9 -v "$D"
else
gunzip -v %f ; bzip2 -v $D
gunzip -v "%f" ; bzip2 -v "$D"
fi
+ t t
@ -298,7 +298,7 @@ C Пребаци gz<->bz2, tar.gz<->tar.bz2 и tgz->tar.bz2
while [ -n "$1" ]
do
unset D
case $1 in
case "$1" in
*.tgz) EXT=tgz;;
*.tpz) EXT=tpz;;
*.Z) EXT=Z;;
@ -313,11 +313,11 @@ C Пребаци gz<->bz2, tar.gz<->tar.bz2 и tgz->tar.bz2
bz2) D="`basename $1 .bz2`";;
esac
if [ "$EXT" = "bz2" ]; then
bunzip2 -v $1
gzip -f9 -v $D
bunzip2 -v "$1"
gzip -f9 -v "$D"
else
gunzip -v $1
bzip2 -v $D
gunzip -v "$1"
bzip2 -v "$D"
fi
shift
done