svn客户端代码版本号自动更新依赖Lua

OStack程序员社区-中国程序员成长平台 › 门户 › 编程› LUA›LUA教程

原作者: [db:作者] 来自: [db:来源] 收藏邀请

首先，依赖于提交前拿项目根的最大版本号，然后加1再提交

依赖：Lua和Subversion

不清楚这个流程是否有问题，望高人指点。实现如下：

文档类有个静态变量表示svn的版本


public static const SVN_VERSION : String = "71";

然后项目根目录下有个比处理hook.bat，是入口


@echo off
setlocal enabledelayedexpansion
::Lua路径
SET LUA_PATH=D:\Lua\
SET LOCAL_PATH=%~dp0
%LUA_PATH%lua.exe -e "local_path='%LOCAL_PATH:\=\\%';file_name='src\\LocalFile.as';dofile('%LUA_PATH%\\svn\\hook.lua');"
if %errorlevel% gtr 0 goto err
exit 0
:err
echo 错误
exit 1

file_name：表示要替换的文件在项目的相对路径，在我这里是LocalFile.as

在Lua的svn的下面有个hook.lua的文件是实际查找替换的文件，在我这里是D:\Lua\svn\hook.lua

下面是lua的代码


--初始化
svn = {};
--设置svn的路径
svn.bin = "C:\\Program Files\\Subversion\\bin\\";
--要替换的文件相对路径
svn.fileName = file_name;
svn.localPath = local_path.."";
function os.capture(cmd, raw)
  local f = assert(io.popen(cmd, 'r'))
  local s = assert(f:read('*a'))
  f:close()
if raw then return s end
  s = string.gsub(s, '^%s+', '')
  s = string.gsub(s, '%s+$', '')
  s = string.gsub(s, '[\n\r]+', ' ')
return s
end
function svn.info(path)
  local s = os.capture("\"".. svn.bin .."svn.exe\" info "..path,1);
if s then 
return s;
else
return nil;
  end
end
function svn.getHeadVersion(path)
  local s = svn.info(path);
if s then
    local info = s;
    io.write(s);
    s = info:match("最后修改的版本:(%d*)");
  end
return s;
end
function svn.getInfo(path)
  local info = {};
  local s = svn.info(path);
for k,v in s:gmatch("([^:]+):%s*([^\r\n]+)[\r\n]+") do
    info[k]=v
  end
return info;
end
--先拿版本库的根
local local_info = svn.getInfo(svn.localPath);
--再拿版本库根的最新版本
local ii = svn.getInfo(local_info["版本库根"]);
--local ss = svn.getHeadVersion("svn://192.168.1.243/Flash");
local _version = ii["最后修改的版本"] + 1;
local _root = ii["版本库根"];
if _version and svn.fileName and svn.localPath and svn.localPath ~= '' then
  file = io.open(svn.localPath..svn.fileName,"r");
  local v = _version;
  ss = file:read("*a");
  ss = ss:gsub("SVN_VERSION%s?:%s?String%s?=%s?\"(%d*)\"","SVN_VERSION : String = \""..v.."\"",1);
  file:close();
  file = nil;
  file = io.open(svn.localPath..svn.fileName,"w");
  file:write(ss);
  file:close();
else
do
    local message = "";
if not _version then message = message.."_version 为空"; end
if not svn.fileName then  message = message.."svn.fileName 为空"; end
if not svn.localPath then  message = message.."svn.localPath 为空"; end
if svn.localPath == "" then  message = message.."svn.localPath 为\"\""; end
    error("错误 in lua"..message);
  end
end