Zsh Mailing List Archive
Messages sorted by: Reverse Date, Date, Thread, Author

Re: help with 'rename' function

On Jun 12,  4:15am, Timothy J Luoma wrote:
} Subject: help with 'rename' function
} I used to have a binary that did this, but I've lost it.
} What it did was simple: it changed extensions of filenames.
} For example, say you have a bunch of files which ended with .THIS and you  
} wanted to change them to end with .THAT
} You would do
} 	rename *.THIS THIS=THAT

I've had the following sitting around for a -long- time; in fact, I seem
not to have used it since sometime before installing 3.0, as I had to fix
some things to make it work.  It should probably be rewritten to use the
"getopts" builtin, and there's probably other things that are being done
in old-fashioned ways.

I have this in a file named "ren" in a directory in my fpath.  Probably
best invoked as "noglob ren ...." rather than with all the glob patterns
quoted (as they are in the examples).  Note that the patterns are glued
together as strings, without first checking for directory-ness etc., so
you have to be careful of where you put your "/" characters.

I doubt the core dump mentioned in the comments below still afflicts zsh,
but ....

#! /usr/local/bin/zsh -f
# Rename files according to a pattern.
#    ren \*.foo .bar			Renames all *.foo files to *.bar
#    ren -h foo\* bar			Renames all foo* files to bar*
#    ren -c cp \*.foo .bar		Copies all *.foo files to *.bar
#    ren \*.foo .bar /tmp/		Renames *.foo files to /tmp/*.bar
#    ren /tmp/\*.bar .foo /usr/tmp/	Renames /tmp/*.bar to /usr/tmp/*.foo
#    ren -h /tmp/bar\* /foo /usr/tmp	Renames /tmp/bar* to /usr/tmp/foo*
#    ren -h /tmp/bar\* /usr/tmp/foo	Renames /tmp/bar* to /usr/tmp/foo*
# To check what ren will execute, use something like:
#	ren -c echo /tmp/\*.bar .foo /usr/tmp
# (Note, the above example has a deliberate error, missing a /.)
# To use I/O redirection instead of arguments ("filter" mode):
#	ren -c head\< /tmp/\*bar .foo \>
#	ren -c cat\< /tmp/\*bar .foo \>/usr/tmp/
# The -e option (error) causes ren to exit if any command fails.
# The -s option (swap) switches the positions of the pattern and the
# replacement:
#    ren -s \*.foo .bar			For all *.foo renames .bar to .foo
# The -x option (eXchange) executes the command only on the replacements
# (i.e., passes only one argument to the command, which is the replacement):
#    ren -x -c touch \*.o .c		For each *.o, touches the .c

local files="" prefix="" chop=% head="" tail="" cmd=mv error="" xchg=false i

while [[ $# -gt 2 ]]
    case $1 in
    -c) cmd=$2; shift 2;;
    -e) error='|| break';;
    -h) chop='#*'; shift;;
    -t) chop='%'; shift;;
    -s) xchg=true; shift;;
    -x) xchg=drop; shift;;
    *) break;;

if [[ $# -lt 2 || $# -gt 3 || -z "$cmd" ]]
    echo "usage: ${0:t} [-h|-t] [-e] [-c command] pat repl [prefix]" 1>&2
    if [[ $# -gt 3 ]]
	echo 'Did you remember to quote metacharacters in the pattern?' 1>&2
    return -1
elif [[ $# -eq 3 ]]

case $chop in
%) tail=$2;;
*) head=$2;;

# Use globbing to get the target files

for i in $files
    case $xchg in
	eval $cmd $prefix$head\$\{\$\{i$chop$1:t\}:r\}$tail $error
	eval $cmd $prefix$head\$\{\$\{i$chop$1:t\}:r\}$tail $i $error
	eval $cmd $i $prefix$head\$\{\$\{i$chop$1:t\}:r\}$tail $error
    esac	# Omit this and zsh dumps core in gettext2()

Bart Schaefer                                 Brass Lantern Enterprises
http://www.well.com/user/barts              http://www.brasslantern.com

Messages sorted by: Reverse Date, Date, Thread, Author