用户登录  |  傲看软件园 用户注册
文章中心广告代码ASP源码PHP源码JSP源码.NET源码源码相关傲看留言板繁體中文
当前位置:傲看软件园文章中心编程开发网络编程

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

减小字体 增大字体 作者:佚名  来源:本站整理  发布时间:2009-02-09 23:17:07

以前使用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放在要清理的目录下,双击运行即可。

Tags:

作者:佚名

文章评论评论内容只代表网友观点,与本站立场无关!

   评论摘要(共 0 条,得分 0 分,平均 0 分) 查看完整评论

精品栏目导航

关于本站 | 网站帮助 | 广告合作 | 下载声明 | 友情连接 | 网站地图
冀ICP备08004437号 | 客服Q:354766721 | 交流群83228313
傲看软件园 - 绿色软件,破解软件下载站! 源码网 源码之家 绿软之家
Copyright © 2003-2010 OkHan.Net. All Rights Reserved .
页面执行时间:37,640.63000 毫秒
Powered by:OkHan CMS Version 4.0.0 SP2