123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383 |
- shell_patterns=0
- + ! t t
- @ Do something on the current file
- CMD=%{Enter command}
- $CMD %f
- + t t
- @ Do something on the tagged files
- set %t; CMD=%{Enter command}
- while [ -n "$1" ]; do
- $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"
- test -r $I && mail root < $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
- nroff -man %f | less
- 2 Call the info hypertext browser
- info
- = t d
- 3 Compress the current subdirectory (tar.gz)
- Pwd=`basename %d /`
- echo -n "Name of the compressed file (without extension) [$Pwd]: "
- read tar
- if [ "$tar"x = x ]; then tar="$Pwd"; fi
- cd .. && \
- tar cf - "$Pwd" | gzip -f9 > "$tar.tar.gz" && \
- echo "../$tar.tar.gz created."
- 4 Compress the current subdirectory (tar.bz2)
- Pwd=`basename %d /`
- echo -n "Name of the compressed file (without extension) [$Pwd]: "
- read tar
- if [ "$tar"x = x ]; then tar="$Pwd"; fi
- cd .. && \
- tar cf - "$Pwd" | bzip2 -f > "$tar.tar.bz2" && \
- echo "../$tar.tar.bz2 created."
- 5 Compress the current subdirectory (tar.p7)
- Pwd=`basename %d /`
- echo -n "Name of the compressed file (without extension) [$Pwd]: "
- read tar
- if [ "$tar"x = x ]; then tar="$Pwd"; fi
- cd .. && \
- tar cf - "$Pwd" | 7za a -si "$tar.tar.7z" && \
- echo "../$tar.tar.7z created."
- 6 Compress the current subdirectory (tar.lzma)
- Pwd=`basename %d /`
- echo -n "Name of the compressed file (without extension) [$Pwd]: "
- read tar
- if [ "$tar"x = x ]; then tar="$Pwd"; fi
- cd .. && \
- tar cf - "$Pwd" | lzma -f > "$tar.tar.lzma" && \
- echo "../$tar.tar.lzma created."
- 7 Compress the current subdirectory (tar.lz)
- Pwd=`basename %d /`
- echo -n "Name of the compressed file (without extension) [$Pwd]: "
- read tar
- if [ "$tar"x = x ]; then tar="$Pwd"; fi
- cd .. && \
- tar cf - "$Pwd" | lzip -f > "$tar.tar.lz" && \
- echo "../$tar.tar.lz created."
- 8 Compress the current subdirectory (tar.xz)
- Pwd=`basename %d /`
- echo -n "Name of the compressed file (without extension) [$Pwd]: "
- read tar
- if [ "$tar"x = x ]; then tar="$Pwd"; fi
- 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
- make `basename %f .c` 2>/dev/null || cc -O -o `basename %f .c` %f
- + t r & ! t t
- a Append file to opposite
- cat %f >> %D/%f
- + t t
- A Append files to opposite files
- set %t
- while [ -n "$1" ]; do
- 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 directories must be different."
- exit 1
- fi
- if [ -f %D/%f ]; then # if two of them, then
- if cmp -s %D/%f %f; then
- rm %f && echo "%f: DELETED."
- else
- 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."
- 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."
- exit 1
- fi
- for i in %t
- do
- if [ -f "%D/$i" ]; then
- SUM1="`sum $i`"
- SUM2="`sum %D/$i`"
- if [ "$SUM1" = "$SUM2" ]; then
- rm "$i" && echo "${i}: DELETED."
- else
- echo "$i and %D/$i differ: NOT deleted."
- fi
- else
- echo "%f has no copy in %D/%f: NOT deleted."
- fi
- done
- m View manual page
- MAN=%{Enter manual name}
- %view man -P cat $MAN
- = f \.gz$ & t r
- + ! t t
- n Inspect gzip'ed newsbatch file
- dd if=%f bs=1 skip=12|zcat|${PAGER-more}
- # assuming the cunbatch header is 12 bytes long.
- = t r &
- + ! t t
- h Strip headers from current newsarticle
- CHECK=`awk '{print $1 ; exit}' %f` 2>/dev/null
- 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."
- ;;
- *)
- echo "%f is not a news article."
- ;;
- esac
- + t t
- 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
- Newsgroups:|Path:)
- cp "$1" "$WFILE" && sed '/^'"$CHECK"' /,/^$/d' "$WFILE" > "$1"
- if [ "$?" = "0" ]; then
- rm "$WFILE"; echo "$1 header removed. OK."
- else
- echo "Oops! Please check $1 against $WFILE."
- fi
- ;;
- *)
- echo "$1 skipped: Not a news article."
- ;;
- esac
- shift
- done
- = t r
- + ! t t
- r Copy file to remote host
- echo -n "To which host?: "
- read Host
- echo -n "To which directory on $Host?: "
- read Dir
- rcp -p %f "${Host}:$Dir"
- + t t
- R Copy files to remote host (no error checking)
- echo -n "Copy files to which host?: "
- read Host
- echo -n "To which directory on $Host? :"
- read Dir
- rcp -pr %u "${Host}:$Dir"
- = f \.tex$ & t r
- + f \.tex$ & t r & ! t t
- t Run latex on file and show it with xdvi
- latex %f && xdvi `basename %f .tex`.dvi
- =+ f ^part | f ^Part | f uue & t r
- + t t
- 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
- done
- ) |sed '/^$/d' |sed -n '/^begin 6/,/^end$/p' | uudecode
- if [ "$?" != "0" ]; then
- echo "Cannot decode %t."
- fi
- 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\.7z$ | f \.tar\.xz$ | f \.tar\.Z$ | f \.tar\.bz2$ & t r
- x Extract the contents of a compressed tar file
- unset PRG
- case %f in
- *.tar.bz2)
- PRG="bunzip2 -c"
- ;;
- *.tar.gz|*.tar.z|*.tgz|*.tpz|*.tar.Z)
- PRG="gzip -dc"
- ;;
- *.tar.lzma)
- PRG="lzma -dc"
- ;;
- *.tar.lz)
- PRG="lzip -dc"
- ;;
- *.tar.xz)
- PRG="xz -dc"
- ;;
- *.tar.7z)
- PRG="7za e -so"
- ;;
- *)
- exit 1
- ;;
- esac
- $PRG %f | tar xvf -
- = t r
- + ! t t
- y Gzip or gunzip current file
- unset DECOMP
- case %f in
- *.gz) DECOMP=-d;;
- *.[zZ]) DECOMP=-d;;
- esac
- gzip $DECOMP -v %f
- + t t
- Y Gzip or gunzip tagged files
- for i in %t
- do
- unset DECOMP
- case "$i" in
- *.gz) DECOMP=-d;;
- *.[zZ]) DECOMP=-d;;
- esac
- gzip $DECOMP -v "$i"
- done
- + ! t t
- b Bzip2 or bunzip2 current file
- unset DECOMP
- case %f in
- *.bz2) DECOMP=-d;;
- esac
- bzip2 $DECOMP -v %f
- + t t
- B Bzip2 or bunzip2 tagged files
- for i in %t
- do
- unset DECOMP
- case "$i" in
- *.bz2) DECOMP=-d;;
- esac
- 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
- z Extract compressed tar file to subdirectory
- unset D
- set gzip -cd
- case %f in
- *.tar.gz) D="`basename %f .tar.gz`";;
- *.tgz) D="`basename %f .tgz`";;
- *.tpz) D="`basename %f .tpz`";;
- *.tar.Z) D="`basename %f .tar.Z`";;
- *.tar.z) D="`basename %f .tar.z`";;
- *.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 -)
- + t t
- Z Extract compressed tar files to subdirectories
- for i in %t
- do
- set gzip -dc
- unset D
- case "$i" in
- *.tar.gz) D="`basename $i .tar.gz`";;
- *.tgz) D="`basename $i .tgz`";;
- *.tpz) D="`basename $i .tpz`";;
- *.tar.Z) D="`basename $i .tar.Z`";;
- *.tar.z) D="`basename $i .tar.z`";;
- *.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 -)
- done
- + f \.gz$ | f \.tgz$ | f \.tpz$ | f \.Z$ | f \.z$ | f \.bz2$ & t r & ! t t
- c Convert gz<->bz2, tar.gz<->tar.bz2 & tgz->tar.bz2
- unset D
- unset EXT
- case %f in
- *.tgz) EXT=tgz;;
- *.tpz) EXT=tpz;;
- *.Z) EXT=Z;;
- *.z) EXT=z;;
- *.gz) EXT=gz;;
- *.bz2) EXT=bz2;;
- esac
- case $EXT in
- tgz|tpz) D="`basename %f .$EXT`.tar";;
- gz|Z|z) D="`basename %f .$EXT`";;
- bz2) D="`basename %f .bz2`";;
- esac
- if [ "$EXT" = "bz2" ]; then
- bunzip2 -v %f ; gzip -f9 -v "$D"
- else
- gunzip -v %f ; bzip2 -v "$D"
- fi
- + t t
- C Convert gz<->bz2, tar.gz<->tar.bz2 & tgz->tar.bz2
- set %t
- while [ -n "$1" ]
- do
- unset D
- unset EXT
- case "$1" in
- *.tgz) EXT=tgz;;
- *.tpz) EXT=tpz;;
- *.Z) EXT=Z;;
- *.z) EXT=z;;
- *.gz) EXT=gz;;
- *.bz2) EXT=bz2;;
- esac
- case $EXT in
- tgz) D="`basename $1 .tgz`.tar";;
- tpz) D="`basename $1 .tpz`.tar";;
- gz|Z|z) D="`basename $1 .$EXT`";;
- bz2) D="`basename $1 .bz2`";;
- esac
- if [ "$EXT" = "bz2" ]; then
- bunzip2 -v "$1"
- gzip -f9 -v "$D"
- else
- gunzip -v "$1"
- bzip2 -v "$D"
- fi
- shift
- done
- + x /usr/bin/open | x /usr/local/bin/open & x /bin/sh
- o Open next a free console
- open -s -- sh
|