[脚本] 规范化文件名

NeoAnderson · 发表于 2005-1-20 22:54:10

都没用。
对，我要改的是文件名

lastart · 发表于 2005-1-20 23:13:34

刚发现我用rename是用perl写的一个脚本,
那就没意思了, 还不如自己写呢,
下面是我尝试写的一个: (还没测试)

#!/bin/sh
for file in *
do
newname=`echo $file|sed 's/[_\ ]/-/g'`
echo $newname
newname2=`echo $newname|sed 's/--*/-/g'`
echo $newname2
newname3=`echo $newname2|sed 's/$^[a-z]\{1\}$/\U\1/'`
echo $newname3
#mv "$file" "$newname3"
done

复制代码

NeoAnderson · 发表于 2005-1-21 09:30:35

我用DSL的方法重写了，内容大大缩减

但好像有点问题。中括号的问题还是存在。请各位帮看看

#!/bin/bash
# This script turns underlines and blanks in filenames to hyphens
# Written by Neo Anderson <ZeeGeek@gmail.com>
# Jan 19 2005
DIR=$1
TEMP_FILE="/tmp/ulb2h.tmp"
ulbtoh() {
exec < $TEMP_FILE
while read FILE_NAME
do
BASE_NAME="`basename "$FILE_NAME"`"
FINAL_NAME="${FILE_NAME%$BASE_NAME}$(echo "$BASE_NAME" | tr -s ' |_' '-')"
# rename target
mv "$FILE_NAME" "$FINAL_NAME"
sleep 3
done
rm $TEMP_FILE
}
usage() {
echo "Usage: ul2h.sh [directory...]"
}
if [ -z $DIR ]
then
usage
else
# get the file list of filenames containing underlines or blanks
find $DIR -type f -iname '*_*' > $TEMP_FILE
find $DIR -type f -iname '* *' >> $TEMP_FILE
ulbtoh
# get the file list of directory names containing underlines
find $DIR -iname '*_*' > $TEMP_FILE
find $DIR -iname '* *' >> $TEMP_FILE
ulbtoh
fi

复制代码

lastart · 发表于 2005-1-21 12:17:07

可以用以下语句将' '_-(多个)都改为一个-
echo $name | sed 's/[_\ -]\+/-/g'
用 's/^[a-z]/\U&/' 可以把头字母大写

我觉得用判断改后和改前是否有差别可以缩短长度
if [ "$newname" != "$name" ]
then
...
fi

NeoAnderson · 发表于 2005-1-21 13:17:06

我是想将每个单词的首字母大写，不仅仅是文件名的首字母。
我的思路是这样的：
1、获取给定文件夹下所有需要改的文件名，并将这些文件名存到临时文件；
2、开始更改，改完整个列表的文件名后将临时文件删掉；
3、获取给定文件夹下所有需要更改的目录名，并存到临时文件；
4、开始更改，改完删掉临时文件。
因为我是一次获得文件列表之后就根据文件列表进行更改，所以不能先更改目录名，否则后面出现该目录下的文件就会找不到了。改完文件名再改目录名就没问题。例如，文件列表有以下内容：
/abc/t__est/
/abc/t__est/f_i_l_e
如果先更改了目录t__est的话，到改f_i_l_e文件时由于目录已经不存在而无法更改。
我不太明白lastart所说的用判断具体怎么实现，请稍微讲解一下，谢谢

lastart · 发表于 2005-1-21 20:44:19

我的意思是不管文件是否合规范都改了.改后比较是不是跟原来的是一样的. 如果是则不处理.
其实如果用find你可以把文件倒序了, 就不会出现先改目录的问题.
下面是我写的一个, 用了vim, 有点赖皮了.呵呵
不过应该比较合你的要求吧

#!/bin/sh
echo -n > /tmp/orgfile
find "$1" >>/tmp/orgfile
tac /tmp/orgfile >/tmp/revfile
vim -c "%s/.*\//" -c "%s/[-_\ ]\+/-/g" -c "%s/\<.\{-}\>/\u&/g" -c "%s/\<A\>/a/g" -c "%s/\<\cof\>/of/g" -c "%s/\<\cthe\>/the/g" -c "wq! /tmp/tempfile" /tmp/revfile
#cd "$1"
i=$((1))
while read oldname
do
mv "$oldname" "`dirname "$oldname"`/`cat /tmp/tempfile|sed -n "$i,$i"p`"
i=$(($i+1))
done < /tmp/revfile
rm -f /tmp/orgfile /tmp/revfile /tmp/tempfile

复制代码

运行效果大概是这样的, 测试的时候我把mv 改为echo了. 我这里没有加上文件名是否相同的判断.所以都改了.
不过源名和目标名相同mv会自动不执行.所以也没什么问题.

./.swp --> ./.Swp
./a -b__-c[d -c]/dks_-fjkd 0- --> ./a -b__-c[d -c]/Dks-Fjkd-0-
./a -b__-c[d -c]/a_b-d[/dks_-fjkd 0- --> ./a -b__-c[d -c]/a_b-d[/Dks-Fjkd-0-
./a -b__-c[d -c]/a_b-d[ --> ./a -b__-c[d -c]/a-B-D[
./a -b__-c[d -c] --> ./a-B-C[D-C]
./rename --> ./Rename
./.tmp.swp --> ./.Tmp.Swp
./test --> ./Test
./tmp --> ./Tmp
./dks_-fjkd 0- --> ./Dks-Fjkd-0-
./.test.swp --> ./.Test.Swp
./ --> ./

复制代码

真正运行之后的效果如下

lastart@qf-host:/tmp/test$ find .
.
./test
./.Test.Swp
./Tmp
./Test
./.Tmp.Swp
./Rename
./Dks-Fjkd-0-
./.Swp
./a-B-C[D-C]
./a-B-C[D-C]/a-B-D[
./a-B-C[D-C]/a-B-D[/Dks-Fjkd-0-
./a-B-C[D-C]/Dks-Fjkd-0-

复制代码

NeoAnderson · 发表于 2005-1-22 00:42:49

佩服佩服，真是利害，所有功能都实现了。非常感谢！这篇贴子学了不少。我得好好看看vim后面那串东西。

lastart · 发表于 2005-1-22 01:05:03

感觉sed的某些代替没用vim好用.
化简一下

#!/bin/sh
find "$1" | tac | while read oldname
do
newname="`dirname "$oldname"`/`basename "$oldname"|sed "s/[-\ _]\+/-/g"|sed "s/-[A-Za-z]\|^[A-Za-z]/\U&/g"|sed "s/\<Of\|A\|The\|For\|With\>/\L&/g"`"
if [ "$2" = "do" ]
then
mv "$oldname" "$newname"
fi
echo "$oldname" '-->' "$newname"
done

复制代码

使用:
程序目录 [do]

		自动登录	找回密码
密码			注册

[脚本] 规范化文件名

浏览过的版块