Ticket #1547: convert SR user menu to UTF-8.

Signed-off-by: Andrew Borodin <aborodin@vmail.ru>
This commit is contained in:
Andrew Borodin 2009-08-19 15:00:41 +04:00
parent 02bb6efe51
commit 9f1bb1e7ca

View File

@ -1,60 +1,60 @@
shell_patterns=0 shell_patterns=0
+ ! t t + ! t t
@ Ради нешто над текућом датотеком @ Ради нешто над текућом датотеком
CMD=%{Унесите наредбу} CMD=%{Унесите наредбу}
$CMD %f $CMD %f
+ t t + t t
@ Ради нешто над означеним датотекама @ Ради нешто над означеним датотекама
set %t; CMD=%{Унесите наредбу} set %t; CMD=%{Унесите наредбу}
while [ -n "$1" ]; do while [ -n "$1" ]; do
$CMD "$1" $CMD "$1"
shift shift
done done
0 Уреди пријаву грешке и пошаљи је администратору 0 Уреди пријаву грешке и пошаљи је администратору
${EDITOR-vi} /tmp/mail.$$ ${EDITOR-vi} /tmp/mail.$$
test -r /tmp/mail.$$ && mail root < /tmp/mail.$$ test -r /tmp/mail.$$ && mail root < /tmp/mail.$$
rm -f /tmp/mail.$$ rm -f /tmp/mail.$$
=+ f \.1$ | f \.3$ | f \.4$ | f \.5$ | f \.6$ | f \.7$ | f \.8$ | f \.man$ & t r =+ f \.1$ | f \.3$ | f \.4$ | f \.5$ | f \.6$ | f \.7$ | f \.8$ | f \.man$ & t r
1 Прикажи датотеку уз помоћ roff -man 1 Прикажи датотеку уз помоћ roff -man
nroff -man %f | less nroff -man %f | less
2 Позови читач хипертекста info 2 Позови читач хипертекста info
info info
= t d = t d
3 Компримуј текући поддиректоријум (tar.gz) 3 Компримуј текући поддиректоријум (tar.gz)
Pwd=`basename "%d" /` Pwd=`basename "%d" /`
echo -n "Назив компримоване датотеке (без врсте) [$Pwd]: " echo -n "Назив компримоване датотеке (без врсте) [$Pwd]: "
read tar read tar
if [ "$tar"x = x ]; then tar="$Pwd"; fi if [ "$tar"x = x ]; then tar="$Pwd"; fi
cd .. && \ cd .. && \
tar cf - "$Pwd" | gzip -f9 > "$tar.tar.gz" && \ tar cf - "$Pwd" | gzip -f9 > "$tar.tar.gz" && \
echo "Датотека ../$tar.tar.gz је створена." echo "Датотека ../$tar.tar.gz је створена."
4 Компримуј текући поддиректоријум (tar.bz2) 4 Компримуј текући поддиректоријум (tar.bz2)
Pwd=`basename %d /` Pwd=`basename %d /`
echo -n "Назив компримоване датотеке (без врсте) [$Pwd]: " echo -n "Назив компримоване датотеке (без врсте) [$Pwd]: "
read tar read tar
if [ "$tar"x = x ]; then tar="$Pwd"; fi if [ "$tar"x = x ]; then tar="$Pwd"; fi
cd .. && \ cd .. && \
tar cf - "$Pwd" | bzip2 -f > "$tar.tar.bz2" && \ tar cf - "$Pwd" | bzip2 -f > "$tar.tar.bz2" && \
echo "Датотека ../$tar.tar.bz2 је створена." echo "Датотека ../$tar.tar.bz2 је створена."
= f \.c$ & t r = f \.c$ & t r
+ f \.c$ & t r & ! t t + f \.c$ & t r & ! t t
5 Преведи и повежи текућу датотеку врсте `.c' 5 Преведи и повежи текућу датотеку врсте `.c'
make `basename %f .c` 2>/dev/null || cc -O -o `basename %f .c` %f make `basename %f .c` 2>/dev/null || cc -O -o `basename %f .c` %f
+ t r & ! t t + t r & ! t t
a Надовежи датотеку на ону из другог окна a Надовежи датотеку на ону из другог окна
cat %f >>%D/%f cat %f >>%D/%f
+ t t + t t
A Надовежи датотеке на оне из другог окна A Надовежи датотеке на оне из другог окна
set %t set %t
while [ -n "$1" ]; do while [ -n "$1" ]; do
cat $1 >>%D/$1 cat $1 >>%D/$1
@ -62,27 +62,27 @@ A
done done
+ t r & ! t t + t r & ! t t
d Обриши датотеку ако њена копија постоји у другом окну. d Обриши датотеку ако њена копија постоји у другом окну.
if [ "%d" = "%D" ]; then if [ "%d" = "%D" ]; then
echo "Два директоријума морају да буду различити" echo "Два директоријума морају да буду различити"
exit 1 exit 1
fi 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 if cmp -s %D/%f %f; then
rm %f && echo %f: ОБРИСАНА rm %f && echo %f: ОБРИСАНА
else else
echo "%f и %D/%f се разликују: НИЈЕ обрисана" echo "%f и %D/%f се разликују: НИЈЕ обрисана"
echo -n "Притисните `RETURN' " echo -n "Притисните `RETURN' "
read тастер read тастер
fi fi
else else
echo %f: Нема копије у %D/%f: НИЈЕ обрисана. echo %f: Нема копије у %D/%f: НИЈЕ обрисана.
fi fi
+ t t + t t
D Обриши означене датотеке ако постоји копија у другом окну. D Обриши означене датотеке ако постоји копија у другом окну.
if [ "%d" = "%D" ]; then if [ "%d" = "%D" ]; then
echo "Два директоријума морају да буду различити" echo "Два директоријума морају да буду различити"
exit 1 exit 1
fi fi
for i in %t for i in %t
@ -91,42 +91,42 @@ D
SUM1="`sum $i`" SUM1="`sum $i`"
SUM2="`sum %D/$i`" SUM2="`sum %D/$i`"
if [ "$SUM1" = "$SUM2" ]; then if [ "$SUM1" = "$SUM2" ]; then
rm $i && echo ${i}: ОБРИСАНА rm $i && echo ${i}: ОБРИСАНА
else else
echo $i и %D/$i се разликују: НИЈЕ обрисана. echo $i и %D/$i се разликују: НИЈЕ обрисана.
fi fi
else else
echo %f нема копију у %D/%f: НИЈЕ обрисана. echo %f нема копију у %D/%f: НИЈЕ обрисана.
fi fi
done done
m Погледај страницу упутства m Погледај страницу упутства
MAN=%{Унесите назив упутства} MAN=%{Унесите назив упутства}
%view man -P cat $MAN %view man -P cat $MAN
= f \.gz$ & t r = f \.gz$ & t r
+ ! t t + ! t t
n Прегледај датотеку вести компримовану програмом gzip n Прегледај датотеку вести компримовану програмом gzip
dd if=%f bs=1 skip=12|zcat|${PAGER-more} dd if=%f bs=1 skip=12|zcat|${PAGER-more}
# assuming the cunbatch header is 12 bytes long. # assuming the cunbatch header is 12 bytes long.
= t r & = t r &
+ ! t t + ! t t
h Скини заглавља из текућег чланка вести h Скини заглавља из текућег чланка вести
CHECK=`awk '{print $1 ; exit}' %f` 2>/dev/null CHECK=`awk '{print $1 ; exit}' %f` 2>/dev/null
case $CHECK in case $CHECK in
Newsgroups:|Path:) Newsgroups:|Path:)
cp %f /tmp/%f.$$ && sed '/^'"$CHECK"' /,/^$/d' /tmp/%f.$$ > %f cp %f /tmp/%f.$$ && sed '/^'"$CHECK"' /,/^$/d' /tmp/%f.$$ > %f
[ "$?" = "0" ] && rm /tmp/%f.$$ [ "$?" = "0" ] && rm /tmp/%f.$$
echo %f: уклоњено заглавље echo %f: уклоњено заглавље
;; ;;
*) *)
echo %f није чланак вести. echo %f није чланак вести.
;; ;;
esac esac
+ t t + t t
H Скини заглавља из означених чланака вести H Скини заглавља из означених чланака вести
set %t set %t
while [ -n "$1" ]; do while [ -n "$1" ]; do
CHECK=`awk '{print $1 ; exit}' $1` 2>/dev/null CHECK=`awk '{print $1 ; exit}' $1` 2>/dev/null
@ -135,13 +135,13 @@ H
Newsgroups:|Path:) Newsgroups:|Path:)
cp $1 $WFILE && sed '/^'"$CHECK"' /,/^$/d' $WFILE > $1 cp $1 $WFILE && sed '/^'"$CHECK"' /,/^$/d' $WFILE > $1
if [ "$?" = "0" ]; then if [ "$?" = "0" ]; then
rm $WFILE; echo $1 заглавље уклоњено. У реду. rm $WFILE; echo $1 заглавље уклоњено. У реду.
else else
echo "Уупс! Молим да проверите $1 са $WFILE" echo "Уупс! Молим да проверите $1 са $WFILE"
fi fi
;; ;;
*) *)
echo $1 прескочена: Није чланак вести. echo $1 прескочена: Није чланак вести.
;; ;;
esac esac
shift shift
@ -149,29 +149,29 @@ H
= t r = t r
+ ! t t + ! t t
r Копирај датотеку на удаљеног домаћина r Копирај датотеку на удаљеног домаћина
echo -n "На ког домаћина?: " echo -n "На ког домаћина?: "
read Домаћин read Домаћин
echo -n "У који директоријум на $Домаћин?: " echo -n "У који директоријум на $Домаћин?: "
read Дир read Дир
rcp -p %f ${Домаћин}:$Дир rcp -p %f ${Домаћин}:$Дир
+ t t + t t
R Копирај датотеке на удаљеног домаћина (без провере грешака) R Копирај датотеке на удаљеног домаћина (без провере грешака)
echo -n "На ког домаћина да копирам датотеке?: " echo -n "На ког домаћина да копирам датотеке?: "
read Домаћин read Домаћин
echo -n "У који директоријум на $Домаћин? :" echo -n "У који директоријум на $Домаћин? :"
read Дир read Дир
rcp -pr %u ${Домаћин}:$Дир rcp -pr %u ${Домаћин}:$Дир
= f \.tex$ & t r = f \.tex$ & t r
+ f \.tex$ & t r & ! t t + f \.tex$ & t r & ! t t
t Покрени ЛаТеХ над датотеком и прикажи је преко програма `xdvi' t Покрени ЛаТеХ над датотеком и прикажи је преко програма `xdvi'
latex %f && xdvi `basename %f .tex`.dvi latex %f && xdvi `basename %f .tex`.dvi
=+ f ^part | f ^Part | f uue & t r =+ f ^part | f ^Part | f uue & t r
+ t t + t t
U Уудекодирај означени чланак вести (требало би разрадити) U Уудекодирај означени чланак вести (требало би разрадити)
set %t set %t
( (
while [ -n "$1" ]; do # strip headers while [ -n "$1" ]; do # strip headers
@ -180,12 +180,12 @@ U
done done
) |sed '/^$/d' |sed -n '/^begin 6/,/^end$/p' | uudecode ) |sed '/^$/d' |sed -n '/^begin 6/,/^end$/p' | uudecode
if [ "$?" != "0" ]; then if [ "$?" != "0" ]; then
echo "Не могу да декодирам %t" echo "Не могу да декодирам %t"
fi fi
echo "Молим да проверите излазну датотеку пре било каквог брисања" echo "Молим да проверите излазну датотеку пре било каквог брисања"
=+ f \.tar\.gz$ | f \.tar\.z$ | f \.tgz$ | f \.tpz$ | f \.tar\.Z$| f \.tar\.bz2$ & t r =+ f \.tar\.gz$ | f \.tar\.z$ | f \.tgz$ | f \.tpz$ | f \.tar\.Z$| f \.tar\.bz2$ & t r
x Издвој садржај компримоване датотеке врсте `tar' x Издвој садржај компримоване датотеке врсте `tar'
unset EXT unset EXT
case %f in case %f in
*.tar.bz2) EXT=tar_bz2;; *.tar.bz2) EXT=tar_bz2;;
@ -198,7 +198,7 @@ x
= t r = t r
+ ! t t + ! t t
y Пакуј или расп. тек. дат. програмима `gzip' или `gunzip' y Пакуј или расп. тек. дат. програмима `gzip' или `gunzip'
unset DECOMP unset DECOMP
case %f in case %f in
*.gz) DECOMP=-d;; *.gz) DECOMP=-d;;
@ -207,7 +207,7 @@ y
gzip $DECOMP -v %f gzip $DECOMP -v %f
+ t t + t t
Y Пакуј или расп. означ. дат. програмима `gzip' или `gunzip' Y Пакуј или расп. означ. дат. програмима `gzip' или `gunzip'
for i in %t for i in %t
do do
unset DECOMP unset DECOMP
@ -219,7 +219,7 @@ Y
done done
+ ! t t + ! t t
b Пакуј или расп. тек. дат. програмима `bzip2' или `bunzip2' b Пакуј или расп. тек. дат. програмима `bzip2' или `bunzip2'
unset DECOMP unset DECOMP
case %f in case %f in
*.bz2) DECOMP=-d;; *.bz2) DECOMP=-d;;
@ -227,7 +227,7 @@ b
bzip2 $DECOMP -v %f bzip2 $DECOMP -v %f
+ t t + t t
B Пакуј или расп. означ. дат. програмима `bzip2' или `bunzip2' B Пакуј или расп. означ. дат. програмима `bzip2' или `bunzip2'
for i in %t for i in %t
do do
unset DECOMP unset DECOMP
@ -238,7 +238,7 @@ B
done done
+ f \.tar.gz$ | f \.tgz$ | f \.tpz$ | f \.tar.Z$ | f \.tar.z$ | f \.tar.bz2$ | f \.tar.F$ & t r & ! t t + f \.tar.gz$ | f \.tgz$ | f \.tpz$ | f \.tar.Z$ | f \.tar.z$ | f \.tar.bz2$ | f \.tar.F$ & t r & ! t t
z Издвој компримовану датотеку врсте `tar' у поддиректоријум z Издвој компримовану датотеку врсте `tar' у поддиректоријум
unset D unset D
set gzip -cd set gzip -cd
case %f in case %f in
@ -253,7 +253,7 @@ z
mkdir $D; cd $D && ($1 $2 ../%f | tar xvf -) mkdir $D; cd $D && ($1 $2 ../%f | tar xvf -)
+ t t + t t
Z Издвој компримовану датотеке врсте `tar' у поддиректоријуме Z Издвој компримовану датотеке врсте `tar' у поддиректоријуме
for i in %t for i in %t
do do
set gzip -dc set gzip -dc
@ -271,7 +271,7 @@ Z
done done
+ f \.gz$ | f \.tgz$ | f \.tpz$ | f \.Z$ | f \.z$ | f \.bz2$ & t r & ! t t + 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 c Пребаци gz<->bz2, tar.gz<->tar.bz2 и tgz->tar.bz2
unset D unset D
case %f in case %f in
*.tgz) EXT=tgz;; *.tgz) EXT=tgz;;
@ -293,7 +293,7 @@ c
fi fi
+ t t + t t
C Пребаци gz<->bz2, tar.gz<->tar.bz2 и tgz->tar.bz2 C Пребаци gz<->bz2, tar.gz<->tar.bz2 и tgz->tar.bz2
set %t set %t
while [ -n "$1" ] while [ -n "$1" ]
do do
@ -323,6 +323,6 @@ C
done done
+ x /usr/bin/open | x /usr/local/bin/open & x /bin/sh + x /usr/bin/open | x /usr/local/bin/open & x /bin/sh
o Отвори следећу слободну конзолу o Отвори следећу слободну конзолу
open -s -- sh open -s -- sh