Five66

为啥示例里的文件名一个.H 一个.ZBS 一个.TBS ? 这有啥规律不? 还是都这样? 名字会重复不? 会的话要如何处理?
为啥示例里的文件内容一个是BidFileTable的value 一个是FileTable的value? 会出现其他的不? 还是都这样? 会出现多个的value不? 会的话要如何处理?
为啥示例文件的合并结果value值解码后开头是PK? 所有文件使用7zip压缩 ,是指用7zip压缩成zip不?

Five66

这样行不?
保存ansi或gbk编码的bat ,然后放到包含需要处理的文件夹下运行
7z.exe所在路径和输出路径自行设置

@{}#? 2>nul&powershell -c "type -literalpath '%~f0'|out-string|iex"&exit/b

$nanaz='Z:\Program Files\7-Zip\7z.exe'
$outpath='Z:\Users\foobar\Desktop'

$p=new-object System.Diagnostics.Process
$p.StartInfo.UseShellExecute=$false
$p.StartInfo.RedirectStandardOutput=$true
$p.StartInfo.FileName=$nanaz
$pargs='a -tzip {0} -so (-_-) "{1}"'
$bf=new-object 'byte[]' (4*1024*1024)

$files=gci -file
foreach($file in $files){
$dir=$file.basename
if([io.directory]::exists($pwd.path+"\$dir")){
$coding='default'
$str=gc -LiteralPath ($file.fullname) -raw
if($str -Match 'encoding *= *"utf-?8"'){
$coding='utf8';$str=gc -LiteralPath ($file.fullname) -raw -encoding $coding
}
$pw="";if($str -match '(?<=uniquecode=")[^"]*(?=")'){$pw='-p'+$matches[0]}
$p.StartInfo.Arguments=$pargs -f $pw,($dir+"\*")
$p.start()
$ms=new-object 'system.io.memorystream'
$done=$false;while(-not $done){
$c=$p.StandardOutput.BaseStream.read($bf,0,$bf.length)
if($c){$ms.write($bf,0,$c)}else{$done=$true}
}
if($str -match '<..*? value="'){
$v=$matches[0]
$t=$str -split '<..*? value="',2
}else{
write-host "未找到value ,自动添加" -ForegroundColor yellow
$v='<qwertyuiop Value="'
$t=@($str,'" />')
}
$p.WaitForExit()
$ms.capacity=$ms.length
write-host ("保存到文件:"+$outpath+"\已合并_"+$file.name) -ForegroundColor green
set-content -LiteralPath ($outpath+"\已合并_"+$file.name) -encoding $coding -value @(
$t[0],$v,[convert]::ToBase64String($ms.getbuffer(),0,$ms.length),$t[1]) -nonewline
}else{
write-host "找不到文件夹: $dir" -ForegroundColor red
}}
"`ndone"
cmd /c pause
复制代码

Five66

回复 8# 304802301


    正常 ,压缩时使用的算法 ,算法版本 ,压缩参数 ,写入方式之类的都会影响压缩出来的数据 ,只要压缩出来的数据不同base64的结果就不同
7楼代码由于写入方式跟常规不一样 ,所以压缩后的base64跟常规的不一样 ,虽然base64不同 ,但是base64解码还原后的压缩包应该是能正常解压的 ,并且解压后跟原来的一样的
总之 ,没啥特别要求的话 ,应该测试看看base64解码还原后的压缩包能不能正常解压 ,解压后跟原来是否一样

Five66

回复 14# 304802301


    将7楼代码第22行换成下面的 ,因为使用的是字符串 ,base64解码后涉及字符串编码问题 ,简单的判断了下编码

$pw="";if($str -match '(?<=uniquecode=")[^"]*(?=")'){
if($Matches[0]){$pw=$matches[0];$o=$pw.Length%4
if($o){$pw=$pw+'===='.Substring(0,4-$o)}
$pwdc=[text.encoding]::utf8.getstring([convert]::FromBase64String($pw))
if($pwdc -match '\?'){
write-host "密码的编码可能不是utf8 ,将使用默认编码" -ForegroundColor yellow
$pwdc=[text.encoding]::default.getstring([convert]::FromBase64String($pw))}
$pw='-p"'+$pwdc+'"'
}}
复制代码

Five66

啊 ,代码没有排除bat本身 ,bat的名字最好取个唯一的名字 ,也就是说不要有跟bat对应的文件夹

Five66

回复 16# Five66


    改一下 ,加上了密码base64解码后包含英文双引号时的处理
将7楼代码第22行换成下面的 ,因为使用的是字符串 ,密码base64解码后可能涉及字符串编码问题 ,简单的判断了下编码
代码没有排除bat本身 ,bat的名字最好取个唯一的名字 ,也就是说最好不要有跟bat对应的文件夹 ,不然对应的文件夹也会压缩处理

$pw="";if($str -match '(?<=uniquecode=")[^"]*(?=")'){
if($Matches[0]){$pw=$matches[0];$o=$pw.Length%4
if($o){$pw=$pw+'===='.Substring(0,4-$o)}
$pwdc=[text.encoding]::utf8.getstring([convert]::FromBase64String($pw))
if($pwdc -match '\?'){
write-host "密码的编码可能不是utf8 ,将使用默认编码" -ForegroundColor yellow
$pwdc=[text.encoding]::default.getstring([convert]::FromBase64String($pw))}
$pwdc=[regex]::replace($pwdc,'\\+"|""+|"',[scriptblock]::create('"\"+($args[0].value.tochararray() -join "\")'))
$pw='-p"'+$pwdc+'"'
}}
复制代码