svn实现垃圾清理的方法及代码
 

2009-03-06 来源:网络

 

以前使用svn进行代码版本管理,svn还是很强大的,能几个人同时对同一个文件进行修改,只要修改的不是同一处代码,svn会自动进行代码合并,如果万一冲突了也不要紧,手动进行冲突处理吧,哈哈。现在不用svn了,以前的代码里面有很多svn留下的垃圾,也就是隐藏的.svn文件夹和里面的文件,可以占到40%的空间,一个个手动去清理,要烦死,故写了个小工具自动清理svn垃圾。原理很简单,遍历文件夹,发现是.svn文件夹删除之。部分代码如下:

view plaincopy to clipboardprint?
hFind = FindFirstFile(szFileName, &fd);
if (hFind == INVALID_HANDLE_VALUE)
goto Exit0;
do
{
// 过滤
if (::lstrcmpi(TEXT("."), fd.cFileName) == 0 || ::lstrcmpi(TEXT(".."), fd.cFileName) == 0)
continue;

::lstrcpy(s, fd.cFileName);
*(s + ::lstrlen(fd.cFileName)) = L'\0';

// 如果是文件夹则递归
if (fd.dwFileAttributes & FILE_ATTRIBUTE_DIRECTORY)
{
// 删除.svn目录,我做一个小工作,删文件,o(∩_∩)o...
TCHAR szSvnCmd[MAX_PATH] = {0};
TCHAR szSvnPath[MAX_PATH] = {0};

::lstrcpy(szSvnCmd, TEXT("rmdir /s/q "));
::lstrcat(szSvnCmd, TEXT("\""));
::lstrcat(szSvnCmd, szFileName);

// 本身就是.svn目录,则直接删除
if (0 == ::lstrcmpi(fd.cFileName, TEXT(".svn")))
{
::lstrcpy(szSvnPath, szFileName);
::lstrcat(szSvnCmd, TEXT("\""));
}
else
{
::lstrcpy(szSvnPath, szFileName);
::lstrcat(szSvnPath, TEXT("\\.svn"));
::lstrcat(szSvnCmd, TEXT("\\.svn\""));
}
if (!::PathFileExists(szSvnPath))
continue;
printf("删除命令: %s \n", szSvnCmd);
#if defined(UNICODE) || defined(_UNICODE)
system(W2A(szSvnCmd));
#else
system(szSvnCmd);
#endif
// 递归
ScanDirectory(szFileName);
}
else
{
// 对文件进行处理
// TODO...
NULL;
}
}while(::FindNextFile(hFind, &fd));
hFind = FindFirstFile(szFileName, &fd);
if (hFind == INVALID_HANDLE_VALUE)
goto Exit0;
do
{
// 过滤
if (::lstrcmpi(TEXT("."), fd.cFileName) == 0 || ::lstrcmpi(TEXT(".."), fd.cFileName) == 0)
continue;
::lstrcpy(s, fd.cFileName);
*(s + ::lstrlen(fd.cFileName)) = L'\0';
// 如果是文件夹则递归
if (fd.dwFileAttributes & FILE_ATTRIBUTE_DIRECTORY)
{
// 删除.svn目录,我做一个小工作,删文件,o(∩_∩)o...
TCHAR szSvnCmd[MAX_PATH] = {0};
TCHAR szSvnPath[MAX_PATH] = {0};
::lstrcpy(szSvnCmd, TEXT("rmdir /s/q "));
::lstrcat(szSvnCmd, TEXT("\""));
::lstrcat(szSvnCmd, szFileName);
// 本身就是.svn目录,则直接删除
if (0 == ::lstrcmpi(fd.cFileName, TEXT(".svn")))
{
::lstrcpy(szSvnPath, szFileName);
::lstrcat(szSvnCmd, TEXT("\""));
}
else
{
::lstrcpy(szSvnPath, szFileName);
::lstrcat(szSvnPath, TEXT("\\.svn"));
::lstrcat(szSvnCmd, TEXT("\\.svn\""));
}
if (!::PathFileExists(szSvnPath))
continue;
printf("删除命令: %s \n", szSvnCmd);
#if defined(UNICODE) || defined(_UNICODE)
system(W2A(szSvnCmd));
#else
system(szSvnCmd);
#endif
// 递归
ScanDirectory(szFileName);
}
else
{
// 对文件进行处理
// TODO...
NULL;
}
}while(::FindNextFile(hFind, &fd));

全部的代码和里面编译好的TCleanSVN.exe可以到http://download.csdn.net/source/999584去下载,使用时,只要把TCleanSVN.exe放在要清理的目录下,双击运行即可。


火龙果软件/UML软件工程组织致力于提高您的软件工程实践能力,我们不断地吸取业界的宝贵经验,向您提供经过数百家企业验证的有效的工程技术实践经验,同时关注最新的理论进展,帮助您“领跑您所在行业的软件世界”。
资源网站: UML软件工程组织