标题: [文本处理] 批处理怎样把数据流转化成文件? [打印本页]
作者: 304802301 时间: 前天 19:29 标题: 批处理怎样把数据流转化成文件?
各位论坛大神,有个需求,需要各位大神帮忙处理
1、有一个list.txt,有几万行,每一行数据格式都一致,都是【文件名称.后缀】+@#@+【文件自身经过转换后的数据流】。
2、比如示例中第一行,+@#@+的作用是分隔,前面【word附件dy.doc】是文件名字+格式,后面的一直到第一行末尾,都是文件的数据流。
3、这个文件的数据流,不清楚是怎么编码的。。。原来是正常文件通过转码变成的这个数据流,现在等于是反一下,数据流变成文件了。我是小白,真的搞不懂原来是怎么转码的。。只知道这个数据流肯定可以反转化变成文件的。
4、示例中有3行数据,对应的三个转换后的文件,可供参考,我需要一个bat自动把每一行+@#@+后面的文件数据流自动转换成文件,并重命名为+@#@+前面的文件名称+格式
链接:https://pan.baidu.com/s/1dzTx-jk03_wpC3NXRiE7Ag
提取码:dkfd
作者: Five66 时间: 前天 23:19
看了下 ,应该是base64编码的数据流
作者: Five66 时间: 昨天 13:38
本帖最后由 Five66 于 2024-11-4 13:58 编辑
保存为ansi编码的bat然后运行
假设base64编码的数据都有填充- @{}#? 2>nul&pause&powershell -c "type -literalpath '%~f0'|out-string|iex"&pause&exit/b
- '';gc -Encoding utf8 'list.txt' |foreach{
- "`n开始处理"
- $m=[regex]::match($_,'(\+@#@\+)+')
-
- if($m.success){
- $fname=$_.substring(0,$m.index)
- $fdata=$_.substring($m.index+$m.length)
- }else{
- $fname=$_
- $fdata=""
- }
-
- if(($fname -ceq "") -and ($fdata -ceq "")){
- echo "这一行是空行"
- }else{
- if(($fname -ceq '') -and ($m.length -gt 5)){$fname='+@#@+'}
- if($fname -ceq ''){
- echo '空白的文件名 , 开始添加'
- $fname='□'
- }
- if($fname.length -gt 100){
- echo '文件名太长 , 开始截取'
- $fname=$fname.substring(0,100)
- }
- $fname=$fname.split([io.path]::GetInvalidFileNameChars()) -join '□'
- $fname='+@#@+'+$fname
-
- if(test-path -LiteralPath ($pwd.path+"\"+$fname)){
- echo '存在同名文件 , 开始调整'
- }
- $i=$true;$j=1;$k="";while($i){
- if(test-path -LiteralPath ($pwd.path+"\$k"+$fname)){
- $j++
- $k="[$j]"
- }else{$i=$false}
- }
-
- if($fdata -ceq ""){
- echo ("空的数据流`n将输出到空文件`n"+"$k"+$fname)
- [io.file]::WriteAllText($pwd.path+"\$k"+$fname,"")
- }else{
- echo ("将输出到文件`n"+"$k"+$fname)
- [io.file]::WriteAllBytes($pwd.path+"\$k"+$fname,[convert]::FromBase64String($fdata))
- }
-
- }
- $null
- }
复制代码
作者: 304802301 时间: 昨天 14:20
回复 3# Five66
大神!!!可以使用!!
但是现在执行后的文件名是:+@#@+word附件.doc
文件名字前面多了个分隔的这些符号,实际的文件名是word附件.doc,是不是哪一行代码多了什么
作者: czjt1234 时间: 昨天 16:21
回复 4# 304802301
27行删掉试试
作者: Five66 时间: 昨天 16:24
回复 4# 304802301
啊 ,原来不算的么, 可以删掉3楼代码第27行 ,也就是
$fname='+@#@+'+$fname
那一行
作者: aloha20200628 时间: 昨天 19:17
本帖最后由 aloha20200628 于 2024-11-4 19:25 编辑
回复 1# 304802301
win系统内置的 certutil.exe 解码b64效率很高,试试以下这个版本... 存为 test.bat 运行,须与 list.txt 同目录,运行结果会在当前目录下创建一个子目录 ‘解码结果目录’,所需结果文件皆在此目录中... 已用一楼提供的示例样本文件测试通过
- @echo off &(md "解码结果目录" &cd "解码结果目录") 2>nul
- powershell "foreach($l in [io.file]::ReadLines('..\list.txt')){$n=$l.indexof('+@#@+');if($n -le 0){continue};[io.file]::writeAlltext($l.substring(0,$n)+'.b64',$l.substring($n+5))}"
- for /f "delims=" %%F in ('dir /b/a-d *.b64') do certutil -f -decode "%%F" "%%~nF"
- del/q *.b64 2>nul
- pause&exit/b
复制代码
作者: flashercs 时间: 昨天 22:17
这内存占用太大了.
.NET字符串长度超过2GB,怎么办?certutil 解密base64最大2GB
欢迎光临 批处理之家 (http://bathome.net./) |
Powered by Discuz! 7.2 |