[问题求助] 求精通PS和PY的大侠转换微信图片的格式

5i365

电脑版微信, 聊天过程中的图片在电脑上存为了dat格式, 在github上找了个python代码和C#代码, 可以成功解析还原为图片,

但是要装python, 感觉powershell实现起来应该更精简一些, 求大侠帮忙, 提前感谢

--------------------------------------------------------------------------------------------
微信dat文件转png、jpg图片

dat文件路径：C:\image\ 没有先创建好 将要转换的微信dat文件 放到此处。

图片输出路径：C:\image\jpg\

写死了相应的路径，可根据需要修改，或创建此目录

python代码:

# weixin_Image.bat 破解
# JPG 16进制 FF D8 FF
# PNG 16进制 89 50 4e 47
# GIF 16进制 47 49 46 38
# 微信.bat 16进制 a1 86----->jpg  ab 8c----jpg     dd 04 --->png
# 自动计算异或 值
import os

into_path = r'C:/image'  # 微信image文件路径
out_path = r"C:/image/jpg"


def main(into_path, out_path):

    dat_list = Dat_files(into_path)  # 把路径文件夹下的dat文件以列表呈现
    lens = len(dat_list)
    if lens == 0:
        print('没有dat文件')
        exit()

    num = 0
    for dat_file in dat_list:  # 逐步读取文件
        num += 1
        temp_path = into_path + '/' + dat_file  # 拼接路径：微信图片路径+图片名
        dat_file_name = dat_file[:-4]  # 截取字符串 去掉.dat
        imageDecode(temp_path, dat_file_name, out_path)  # 转码函数
        value = int((num / lens) * 100)             # 显示进度
        print('正在处理--->{}%'.format(value))


def Dat_files(file_dir):
    """
    :param file_dir: 寻找文件夹下的dat文件
    :return: 返回文件夹下dat文件的列表
    """
    dat = []
    for files in os.listdir(file_dir):
        if os.path.splitext(files)[1] == '.dat':
            dat.append(files)
    return dat


def imageDecode(temp_path, dat_file_name, out_path):
    dat_read = open(temp_path, "rb")  # 读取.bat 文件
    xo, j = Format(temp_path)  # 判断图片格式 并计算返回异或值 函数

    if j == 1:
        mat = '.png'
    elif j == 2:
        mat = '.gif'
    else:
        mat = '.jpg'

    out = out_path + '/' + dat_file_name + mat  # 图片输出路径
    png_write = open(out, "wb")  # 图片写入
    dat_read.seek(0)  # 重置文件指针位置

    for now in dat_read:  # 循环字节
        for nowByte in now:
            newByte = nowByte ^ xo  # 转码计算
            png_write.write(bytes([newByte]))  # 转码后重新写入

    dat_read.close()
    png_write.close()


def Format(f):
    """
    计算异或值
    各图片头部信息
    png：89 50 4e 47
    gif： 47 49 46 38
    jpeg：ff d8 ff
    """
    dat_r = open(f, "rb")

    try:
        a = [(0x89, 0x50, 0x4e), (0x47, 0x49, 0x46), (0xff, 0xd8, 0xff)]
        for now in dat_r:
            j = 0
            for xor in a:
                j = j + 1  # 记录是第几个格式 1：png 2：gif 3：jpeg
                i = 0
                res = []
                now2 = now[:3]      # 取前三组判断
                for nowByte in now2:
                    res.append(nowByte ^ xor[i])
                    i += 1
                if res[0] == res[1] == res[2]:
                    return res[0], j
    except:
        pass
    finally:
        dat_r.close()


# 运行
# 按间距中的绿色按钮以运行脚本。
if __name__ == '__main__':
    main(into_path, out_path)
复制代码

C#代码:

using System;
using System.Collections.Generic;
using System.Linq;
using System.Text;
using System.Threading.Tasks;
using System.IO;

namespace wx_dat2img
{
    class Decrypt
    {
        public static List<string> datDir = new List<string>();
        public static bool deldat = false;
        public Decrypt()
        {

        }
        public string ext { get; set; }
        public byte key { get; set; } //用于解密的数字
        public string datfile { get; set; }//需要转换的文件

        public string Convert()
        {
            FileInfo fileInfo = new FileInfo(datfile);

            byte[] dat = File.ReadAllBytes(fileInfo.FullName);

            getExt(dat[0], dat[1]);

            for (int i = 0; i < dat.Length; i++)
            {
                dat[i] ^= key;
            }

            string imgPath = Path.Combine(fileInfo.DirectoryName, "img", fileInfo.LastWriteTime.ToString("yyyyMMdd"));
            if (!Directory.Exists(imgPath)) Directory.CreateDirectory(imgPath);

            string imgFullPath = Path.Combine(imgPath, fileInfo.Name + ext);
            if (!File.Exists(imgFullPath))
                File.WriteAllBytes(imgFullPath, dat);

            if (deldat)
            {
                Microsoft.VisualBasic.FileIO.FileSystem.DeleteFile(datfile, Microsoft.VisualBasic.FileIO.UIOption.OnlyErrorDialogs, Microsoft.VisualBasic.FileIO.RecycleOption.SendToRecycleBin);
            }

            return imgFullPath;
        }

        private void getExt(byte key1, byte key2)
        {

            byte jkey1 = (byte)(key1 ^ 0xff);
            byte jkey2 = (byte)(key2 ^ 0xD8);

            if (jkey1 == jkey2)
            {
                key = jkey1;
                ext = ".jpg";
            }

            byte gkey1 = (byte)(key1 ^ 0x47);
            byte gkey2 = (byte)(key2 ^ 0x49);

            if (gkey1 == gkey2)
            {
                key = gkey1;
                ext = ".gif";
            }

            byte pkey1 = (byte)(key1 ^ 0x89);
            byte pkey2 = (byte)(key2 ^ 0x50);
            if (pkey1 == pkey2)
            {
                key = pkey1;
                ext = ".png";
            }

            byte bkey1 = (byte)(key1 ^ 0x42);
            byte bkey2 = (byte)(key2 ^ 0x4d);

            if (bkey1 == bkey2)
            {
                key = bkey1;
                ext = ".bmp";
            }

        }

    }
}
复制代码

idwma

$into_path = 'C:/image'  # 微信image文件路径
$out_path = "C:/image/jpg"

function imageDecode($temp_path, $dat_file_name, $out_path){
$dat_read=gc $temp_path -enc byte # 读取.bat 文件
$xo, $j = Format($temp_path) # 判断图片格式 并计算返回异或值 函数
if($j -eq 1){$mat = '.png'}elseif($j -eq 2){$mat = '.gif'}elseif($j -eq 3){$mat = '.jpg'}
$out = $out_path + '/' + dat_file_name + $mat  # 图片输出路径
sc -enc byte $out $(foreach($now in $dat_read){$now -bxor $xo})# 图片写入
}

function Format($f){
$a = @((0x89, 0x50, 0x4e), (0x47, 0x49, 0x46), (0xff, 0xd8, 0xff))
$dat_r = gc $f -enc byte
foreach($xor in $a){$j++;foreach($now in $xor){$res+=$now -bxor $dat_r[$i++]};if($res[0] -eq $res[1] -eq $res[2]){return $res[0], $j};rv i,res}
}

dir $into_path|%{
$temp_path=$_.fullname # 拼接路径：微信图片路径+图片名
$dat_file_name=$_.basename # 截取字符串 去掉.dat
imageDecode($temp_path, $dat_file_name, $out_path) # 转码函数
}
复制代码

5i365

回复 2# idwma


    感谢帮忙, 执行时一直报错,下面是示例文件
https://send.cm/d/8ac9

idwma

回复 3# 5i365

改了
    密码是多少

#@&cls&powershell "type '%~0'|out-string|iex"&pause&exit
$into_path = '.\image'  # 微信image文件路径
$out_path = "."

function imageDecode($temp_path, $dat_file_name, $out_path){
$dat_read=gc -readcount 0 $temp_path -enc byte # 读取.bat 文件
$xo, $j = Format($temp_path) # 判断图片格式 并计算返回异或值 函数
if($j -eq 1){$mat = '.png'}elseif($j -eq 2){$mat = '.gif'}elseif($j -eq 3){$mat = '.jpg'}
$out = $out_path + '/' + $dat_file_name + $mat  # 图片输出路径
[io.file]::writeallbytes($out,([byte[]]$(foreach($now in $dat_read){$now -bxor $xo}))) # 图片写入
}

function Format($f){
$a = @((0x89, 0x50, 0x4e), (0x47, 0x49, 0x46), (0xff, 0xd8, 0xff))
$dat_r = gc -readcount 0 $f -enc byte
foreach($xor in $a){$j++;foreach($now in $xor){$res+=@($now -bxor $dat_r[$i++])};if($res[0] -eq $res[1] -eq $res[2]){return $res[0], $j};rv i,res}
}

dir $into_path|%{
$temp_path=$_.fullname # 拼接路径：微信图片路径+图片名
$dat_file_name=$_.basename # 截取字符串 去掉.dat
imageDecode $temp_path $dat_file_name $out_path # 转码函数
}
复制代码

5i365

回复 4# idwma


    奇怪, 这网站经常自己加密码
https://send.cm/d/8aoa

idwma

回复 5# 5i365


    4楼改了

5i365

回复 6# idwma


    大侠技术太牛X了,

同时感觉Powershell也太强大了, 别的语言, 近百行代码, 用Ps, 也就二十行, 碉堡了