QQ聊天记录快速备份 v0.9

关注

原创最新推荐文章于 2026-10-08 20:46:05 发布 2.5k 阅读 AI 写同款· GEO 优化 ›

云盘同步本地文件和QQ聊天记录一、腾讯微云同步QQ聊天记录和QQ接受的文件1. 下载QQ，开始安装QQ时，点击自定义安装选项，如下图以上是QQ安装的默认形式，为了以后安全的考虑，我们将QQ软件安装目录定义为D:\CMWang\QQsetup（若将QQ的在C盘，重装系统QQ所有信息都会丢失），QQ的聊天记录和QQ上接受别人发给你的文件建议储存在D:\CMWang\QQtempfiles\QQrecord，为何新建了两层的子目录阅读详情

本程序由爱页工作室(www.ayeah.net)使用C#在VS2008上开发

目前发布第一版v0.9

有以下功能：
1、输入QQ号码提取所有聊天记录为TXT文件（包括普通聊天记录、群聊天记录、临时会话。。。）
2、一键打包成rar（自动调用rar.exe）
3、发送到邮箱中做备份（使用SMTP）

其它说明：
本程序需要.net framework 2.0以上版本运行库

本程序为绿色版，不用安装，不写注册表，解压到任意目录即用，可自动识别QQ所在目录

聊天记录导出不需要密码，对于本地消息加密的MsgEX.DB暂未测试。

本程序只作聊天记录备份之用，请勿用于偷窥他人隐私。

点击这里下载

ayeah
2008.12.03
爱页工作室
www.ayeah.net

参考了以下内容：
1、解密QQ消息文件格式
http://blog.youkuaiyun.com/vbvan/archive/2007/12/14/1937440.aspx

2、Decompiling CHM (help) files with C#
http://www.codeproject.com/csharp/decompilingchm.asp?print=true

3、Google,优快云,Google....

Storage.cs（从RelatedObjects.Storage.dll反编译而来）

 using System;
using System.Collections.Generic;
using System.Linq;
using System.Text;
using System.Collections;
using System.IO;
using System.Runtime.InteropServices;
using System.Security;

namespace RelatedObjects.Storage
{
    [ComImport, SuppressUnmanagedCodeSecurity, Guid("0000000B-0000-0000-C000-000000000046"), InterfaceType(ComInterfaceType.InterfaceIsIUnknown)]
    public interface IStorage
    {
        [return: MarshalAs(UnmanagedType.Interface)]
        UCOMIStream CreateStream([In, MarshalAs(UnmanagedType.BStr)] string pwcsName, [In, MarshalAs(UnmanagedType.U4)] int grfMode, [In, MarshalAs(UnmanagedType.U4)] int reserved1, [In, MarshalAs(UnmanagedType.U4)] int reserved2);
        [return: MarshalAs(UnmanagedType.Interface)]
        UCOMIStream OpenStream([In, MarshalAs(UnmanagedType.BStr)] string pwcsName, IntPtr reserved1, [In, MarshalAs(UnmanagedType.U4)] int grfMode, [In, MarshalAs(UnmanagedType.U4)] int reserved2);
        [return: MarshalAs(UnmanagedType.Interface)]
        IStorage CreateStorage([In, MarshalAs(UnmanagedType.BStr)] string pwcsName, [In, MarshalAs(UnmanagedType.U4)] int grfMode, [In, MarshalAs(UnmanagedType.U4)] int reserved1, [In, MarshalAs(UnmanagedType.U4)] int reserved2);
        [return: MarshalAs(UnmanagedType.Interface)]
        IStorage OpenStorage([In, MarshalAs(UnmanagedType.BStr)] string pwcsName, IntPtr pstgPriority, [In, MarshalAs(UnmanagedType.U4)] int grfMode, IntPtr snbExclude, [In, MarshalAs(UnmanagedType.U4)] int reserved);
        void CopyTo(int ciidExclude, [In, MarshalAs(UnmanagedType.LPArray)] Guid[] rgiidExclude, IntPtr snbExclude, [In, MarshalAs(UnmanagedType.Interface)] IStorage pstgDest);
        void MoveElementTo([In, MarshalAs(UnmanagedType.BStr)] string pwcsName, [In, MarshalAs(UnmanagedType.Interface)] IStorage pstgDest, [In, MarshalAs(UnmanagedType.BStr)] string pwcsNewName, [In, MarshalAs(UnmanagedType.U4)] int grfFlags);
        void Commit(int grfCommitFlags);
        void Revert();
        int EnumElements([In, MarshalAs(UnmanagedType.U4)] int reserved1, IntPtr reserved2, [In, MarshalAs(UnmanagedType.U4)] int reserved3, [MarshalAs(UnmanagedType.Interface)] out IEnumSTATSTG ppenum);
        void DestroyElement([In, MarshalAs(UnmanagedType.BStr)] string pwcsName);
        void RenameElement([In, MarshalAs(UnmanagedType.BStr)] string pwcsOldName, [In, MarshalAs(UnmanagedType.BStr)] string pwcsNewName);
        void SetElementTimes([In, MarshalAs(UnmanagedType.BStr)] string pwcsName, [In] FILETIME pctime, [In] FILETIME patime, [In] FILETIME pmtime);
        void SetClass(ref Guid clsid);
        void SetStateBits(int grfStateBits, int grfMask);
        int Stat(out STATSTG pStatStg, int grfStatFlag);
    }

    [ComImport, Guid("0000000D-0000-0000-C000-000000000046"), SuppressUnmanagedCodeSecurity, InterfaceType(ComInterfaceType.InterfaceIsIUnknown)]
    public interface IEnumSTATSTG
    {
        [PreserveSig]
        int Next(int celt, out STATSTG rgVar, out int pceltFetched);
        [PreserveSig]
        int Skip(int celt);
        [PreserveSig]
        int Reset();
        int Clone(out IEnumSTATSTG newEnum);
    }

    public class Ole32
    {
        // Methods
        [DllImport("Ole32.dll")]
        public static extern int StgOpenStorage([MarshalAs(UnmanagedType.LPWStr)] string wcsName, IStorage pstgPriority, int grfMode, IntPtr snbExclude, int reserved, out IStorage storage);
    }

    public class IStorageWrapper : IBaseStorageWrapper
    {
        // Methods
        public IStorageWrapper(string workPath)
        {
            Ole32.StgOpenStorage(workPath, null, 0x10, IntPtr.Zero, 0, out this.storage);
            IBaseStorageWrapper.BaseUrl = workPath;
            STATSTG pStatStg = new STATSTG();
            base.storage.Stat(out pStatStg, 1);
            base.EnumIStorageObject(base.storage);
            
        }
    }

    public class IBaseStorageWrapper
    {
        // Fields
        private static string baseUrl;
        public FileObjects foCollection = new FileObjects();
        protected IStorage storage;

        // Methods
        protected void EnumIStorageObject(IStorage stgArgument)
        {
            this.EnumIStorageObject(stgArgument, "");
        }

        protected void EnumIStorageObject(IStorage stgArgument, string BasePath)
        {
            IEnumSTATSTG mstatstg;
            STATSTG statstg;
            int num;
            stgArgument.EnumElements(0, IntPtr.Zero, 0, out mstatstg);
            mstatstg.Reset();
            while (mstatstg.Next(1, out statstg, out num) == 0)
            {
                FileObjects.FileObject fo = new FileObjects.FileObject();
                fo.FileType = statstg.type;
                switch (statstg.type)
                {
                    case 1:
                        {
                            IStorage storage = stgArgument.OpenStorage(statstg.pwcsName, IntPtr.Zero, 0x10, IntPtr.Zero, 0);
                            if (storage != null)
                            {
                                string basePath = BasePath + statstg.pwcsName.ToString();
                                fo.FileStorage = storage;
                                fo.FilePath = BasePath;
                                fo.FileName = statstg.pwcsName.ToString();
                                this.foCollection.Add(fo);
                                this.EnumIStorageObject(storage, basePath);
                            }
                            break;
                        }
                    case 2:
                        {
                            UCOMIStream stream = stgArgument.OpenStream(statstg.pwcsName, IntPtr.Zero, 0x10, 0);
                            fo.FilePath = BasePath;
                            fo.FileName = statstg.pwcsName.ToString();
                            fo.FileStream = stream;
                            this.foCollection.Add(fo);
                            break;
                        }
                    case 3:
                        Console.WriteLine("[Property:ILockBytes] Ignoring...");
                        break;

                    case 4:
                        Console.WriteLine("[Property:IProperty] Ignoring...");
                        break;

                    default:
                        Console.WriteLine("Unknown object, skipping and continuing...");
                        break;
                }
                if (statstg.type == 1)
                {
                    Console.WriteLine("Type: STORAGE");
                }
            }
        }

        // Properties
        public static string BaseUrl
        {
            get
            {
                return baseUrl;
            }
            set
            {
                baseUrl = "mk:@MSITStore:" + value + "::/";
            }
        }

        // Nested Types
        public class FileObjects : CollectionBase
        {
            // Methods
            public void Add(FileObject fo)
            {
                base.List.Add(fo);
            }

            public FileObject Item(int index)
            {
                return (FileObject)base.List[index];
            }

            public void Remove(int index)
            {
                if ((index < (base.Count - 1)) && (index > 0))
                {
                    base.List.RemoveAt(index);
                }
            }

            // Nested Types
            public class FileObject : Stream
            {
                // Fields
                private string fileName;
                private string filePath;
                private IStorage fileStorage;
                private UCOMIStream fileStream;
                private int fileType;
                private string fileUrl;

                // Methods
                public override void Close()
                {
                    if (this.fileStream != null)
                    {
                        this.fileStream.Commit(0);
                        Marshal.ReleaseComObject(this.fileStream);
                        this.fileStream = null;
                        GC.SuppressFinalize(this);
                    }
                }

                public override void Flush()
                {
                    if (this.fileStream == null)
                    {
                        throw new ObjectDisposedException("theStream");
                    }
                    this.fileStream.Commit(0);
                }

                public override int Read(byte[] buffer, int offset, int count)
                {
                    if (this.fileStream == null)
                    {
                        throw new ObjectDisposedException("theStream");
                    }
                    int length = 0;
                    object obj2 = length;
                    GCHandle handle = new GCHandle();
                    try
                    {
                        handle = GCHandle.Alloc(obj2, GCHandleType.Pinned);
                        IntPtr pcbRead = handle.AddrOfPinnedObject();
                        if (offset != 0)
                        {
                            byte[] pv = new byte[count - 1];
                            this.fileStream.Read(pv, count, pcbRead);
                            length = (int)obj2;
                            Array.Copy(pv, 0, buffer, offset, length);
                            return length;
                        }
                        this.fileStream.Read(buffer, count, pcbRead);
                        length = (int)obj2;
                    }
                    finally
                    {
                        if (handle.IsAllocated)
                        {
                            handle.Free();
                        }
                    }
                    return length;
                }

                public string ReadFromFile()
                {
                    int num;
                    if (this.fileStream == null)
                    {
                        throw new ObjectDisposedException("theStream");
                    }
                    Stream stream = new MemoryStream();
                    byte[] buffer = new byte[this.Length];
                    this.Seek(0L, SeekOrigin.Begin);
                    while ((num = this.Read(buffer, 0, 0x400)) > 0)
                    {
                        stream.Write(buffer, 0, num);
                    }
                    stream.Seek(0L, SeekOrigin.Begin);
                    StreamReader reader = new StreamReader(stream);
                    return reader.ReadToEnd().ToString();
                }

                public void Save(string FileName)
                {
                    int num;
                    if (this.fileStream == null)
                    {
                        throw new ObjectDisposedException("theStream");
                    }
                    byte[] buffer = new byte[this.Length];
                    this.Seek(0L, SeekOrigin.Begin);
                    Stream stream = File.OpenWrite(FileName);
                    while ((num = this.Read(buffer, 0, 0x400)) > 0)
                    {
                        stream.Write(buffer, 0, num);
                    }
                    stream.Close();
                }

                public override long Seek(long offset, SeekOrigin origin)
                {
                    if (this.fileStream == null)
                    {
                        throw new ObjectDisposedException("theStream");
                    }
                    long num = 0L;
                    object obj2 = num;
                    GCHandle handle = new GCHandle();
                    try
                    {
                        handle = GCHandle.Alloc(obj2, GCHandleType.Pinned);
                        IntPtr plibNewPosition = handle.AddrOfPinnedObject();
                        this.fileStream.Seek(offset, (int)origin, plibNewPosition);
                        num = (long)obj2;
                    }
                    finally
                    {
                        if (handle.IsAllocated)
                        {
                            handle.Free();
                        }
                    }
                    return num;
                }

                public override void SetLength(long Value)
                {
                    if (this.fileStream == null)
                    {
                        throw new ObjectDisposedException("theStream");
                    }
                    this.fileStream.SetSize(Value);
                }

                public override void Write(byte[] buffer, int offset, int count)
                {
                    if (this.fileStream == null)
                    {
                        throw new ObjectDisposedException("theStream");
                    }
                    if (offset != 0)
                    {
                        int length = buffer.Length - offset;
                        byte[] destinationArray = new byte[length];
                        Array.Copy(buffer, offset, destinationArray, 0, length);
                        this.fileStream.Write(destinationArray, length, IntPtr.Zero);
                    }
                    else
                    {
                        this.fileStream.Write(buffer, count, IntPtr.Zero);
                    }
                }

                // Properties
                public override bool CanRead
                {
                    get
                    {
                        return (this.fileStream != null);
                    }
                }

                public override bool CanSeek
                {
                    get
                    {
                        return true;
                    }
                }

                public override bool CanWrite
                {
                    get
                    {
                        return true;
                    }
                }

                public string FileName
                {
                    get
                    {
                        return this.fileName;
                    }
                    set
                    {
                        this.fileName = value;
                    }
                }

                public string FilePath
                {
                    get
                    {
                        return this.filePath;
                    }
                    set
                    {
                        this.filePath = value;
                    }
                }

                public IStorage FileStorage
                {
                    get
                    {
                        return this.fileStorage;
                    }
                    set
                    {
                        this.fileStorage = value;
                    }
                }

                public UCOMIStream FileStream
                {
                    get
                    {
                        return this.fileStream;
                    }
                    set
                    {
                        this.fileStream = value;
                    }
                }

                public int FileType
                {
                    get
                    {
                        return this.fileType;
                    }
                    set
                    {
                        this.fileType = value;
                    }
                }

                public string FileUrl
                {
                    get
                    {
                        return (IBaseStorageWrapper.BaseUrl + this.FilePath.Replace(@"/", "/") + "/" + this.FileName);
                    }
                    set
                    {
                        this.fileUrl = value;
                    }
                }

                public override long Length
                {
                    get
                    {
                        STATSTG statstg;
                        if (this.fileStream == null)
                        {
                            throw new ObjectDisposedException("theStream");
                        }
                        this.fileStream.Stat(out statstg, 1);
                        return statstg.cbSize;
                    }
                }

                public override long Position
                {
                    get
                    {
                        return this.Seek(0L, SeekOrigin.Current);
                    }
                    set
                    {
                        this.Seek(value, SeekOrigin.Begin);
                    }
                }
            }
        }
    }

 

}

QQMsgMgr.cs -- 从vbvan处修改而来，主要修改了一直占用MsgEx.db的毛病

 using System;
using System.Collections.Generic;
using System.Drawing;
using System.IO;
using System.Text;
using RelatedObjects.Storage;

namespace QQBackup
{
    public enum QQMsgType
    {
        BIM, C2C, Group, Sys, Mobile, TempSession //Disc
    }

    class QQMsgMgr
    {
        private static readonly int s_MsgTypeNum = (int)QQMsgType.TempSession + 1;
        private static readonly string[] s_MsgName = new string[] {
            "BIMMsg", "C2CMsg", "GroupMsg", "SysMsg", "MobileMsg", "TempSessionMsg"
        };
        private IStorageWrapper m_Storage;
        private byte[] m_Password;

        private List<string>[] m_MsgList = new List<string>[s_MsgTypeNum];

        public void Open(string QQID)
        {
            Open(QQID, null);
        }

        public void Open(string QQID, string QQPath)
        {
            if (QQPath == null)
            {
                using (Microsoft.Win32.RegistryKey reg = Microsoft.Win32.Registry.LocalMachine.OpenSubKey(@"Software/Tencent/QQ"))
                {
                    QQPath = reg.GetValue("Install") as string;
                }
                if (QQPath == null) return;
            }

            for (int i = 0; i < m_MsgList.Length; ++i)
            {
                m_MsgList[i] = new List<string>();
            }
            m_Storage = null;
            m_Password = null;

            m_Storage = new IStorageWrapper(QQPath + QQID + @"/MsgEx.db");
            m_Password = QQMsgMgr.GetGlobalPass(m_Storage, QQID);
            
            if (m_Password == null) m_Storage = null;

            foreach (IBaseStorageWrapper.FileObjects.FileObject fileObject in m_Storage.foCollection)
            {
                if (fileObject.FileType == 1)
                {
                    for (int i = 0; i < m_MsgList.Length; ++i)
                    {
                        if (fileObject.FilePath == s_MsgName[i])
                        {
                            m_MsgList[i].Add(fileObject.FileName);
                        }
                    }
                }
            }
        }

        public void OutputMsg()
        {
            for (int i = 0; i < s_MsgTypeNum; ++i)
            {
                OutputMsg((QQMsgType)i);
            }
        }

        public void OutputMsg(QQMsgType type)
        {
            if (m_Storage == null) return;
            if (m_Password == null) return;

            int typeIndex = (int)type;
            if (typeIndex < 0 || typeIndex >= s_MsgTypeNum)
            {
                throw new ArgumentException("Invalid QQMsgType", "type");
            }

            string filePath = s_MsgName[typeIndex] + "//";
            Directory.CreateDirectory(filePath);

            foreach (string QQID in m_MsgList[typeIndex])
            {
                string fileName = filePath + QQID + ".txt";
                OutputMsg(type, QQID, fileName);
            }
        }

        public void OutputMsg(QQMsgType type, string QQID)
        {
            if (m_Storage == null) return;
            if (m_Password == null) return;

            int typeIndex = (int)type;
            if (typeIndex < 0 || typeIndex >= s_MsgTypeNum)
            {
                throw new ArgumentException("Invalid QQMsgType", "type");
            }

            string filePath = s_MsgName[typeIndex] + "//";
            Directory.CreateDirectory(filePath);

            string fileName = filePath + QQID + ".txt";
            OutputMsg(type, QQID, fileName);
        }

        private void OutputMsg(QQMsgType type, string QQID, string fileName)
        {
            string msgPath = s_MsgName[(int)type] + QQID;
            IList<byte[]> msgList = QQMsgMgr.DecryptMsg(m_Storage, msgPath, m_Password);
            Encoding encoding = Encoding.GetEncoding(936);

            using (FileStream fs = new FileStream(fileName, FileMode.Create))
            {
                using (StreamWriter sw = new StreamWriter(fs))
                {
                    for (int i = 0; i < msgList.Count; ++i)
                    {
                        using (MemoryStream ms = new MemoryStream(msgList[i]))
                        {
                            using (BinaryReader br = new BinaryReader(ms, Encoding.GetEncoding(936)))
                            {
#if false
                                fs.Write(msgList[i], 0, msgList[i].Length);
#else
                                int ticks = br.ReadInt32();
                                DateTime time = new DateTime(1970, 1, 1) + new TimeSpan(0, 0, ticks);
                                switch (type)
                                {
                                    case QQMsgType.BIM:
                                    case QQMsgType.C2C:
                                    case QQMsgType.Mobile:
                                        ms.Seek(1, SeekOrigin.Current);
                                        break;
                                    case QQMsgType.Group:
                                        ms.Seek(8, SeekOrigin.Current);
                                        break;
                                    case QQMsgType.Sys:
                                        ms.Seek(4, SeekOrigin.Current);
                                        break;
                                    case QQMsgType.TempSession: //?
                                        ms.Seek(9, SeekOrigin.Current);
                                        break;
                                }
                                if (type == QQMsgType.TempSession)
                                {
                                    int gLen = br.ReadInt32();
                                    string groupName = encoding.GetString(br.ReadBytes(gLen));
                                    if (groupName.Length > 0) sw.WriteLine("{0}", groupName);
                                }
                                int nLen = br.ReadInt32();
                                string id = encoding.GetString(br.ReadBytes(nLen));
                                sw.WriteLine("{0}: {1}", id, time.ToString());
                                int cLen = br.ReadInt32();
                                string msg = encoding.GetString(br.ReadBytes(cLen));
                                //msg=msg.Replace("/n", Environment.NewLine);
                                msg = msg.Replace(new string(new char[] { (char)21 }), "(图片)");
                                msg = msg.Replace(new string(new char[] { (char)20 }), "(表情)");
                                char[] t = msg.ToCharArray();
                                msg=msg.Split((char)19)[0];
                                msg = msg.Replace("/n", Environment.NewLine);
                                sw.WriteLine(msg);
                                sw.WriteLine();
#endif
                            }
                        }
                    }
                    sw.Close();
                }
                fs.Close();
            }
            
        }

        public void OutputFileList()
        {
            if (m_Storage == null) return;

            Dictionary<string, long> dic = new Dictionary<string, long>();
            foreach (IBaseStorageWrapper.FileObjects.FileObject fileObject in m_Storage.foCollection)
            {
                if (fileObject.FileType == 2 && fileObject.FileName == "Index.msj")
                {
                    dic[fileObject.FilePath] = fileObject.Length / 4;
                }
            }

            for (int i = 0; i < m_MsgList.Length; ++i)
            {
                Console.WriteLine("{0}", s_MsgName[i]);
                foreach (string ID in m_MsgList[i])
                {
                    Console.WriteLine("/t{0}: {1}", ID, dic[s_MsgName[i] + ID]);
                }
            }
        }

        private static IBaseStorageWrapper.FileObjects.FileObject GetStorageFileObject(IStorageWrapper iw, string path, string fileName)
        {
            foreach (IBaseStorageWrapper.FileObjects.FileObject fileObject in iw.foCollection)
            {
                if (fileObject.CanRead)
                {
                    if (fileObject.FilePath == path && fileObject.FileName == fileName) return fileObject;
                }
            }
            return null;
        }
        
        private static byte[] Decrypt(byte[] src, byte[] pass, long offset)
        {
            RedQ.QQCrypt decryptor = new RedQ.QQCrypt();
            return decryptor.QQ_Decrypt(src, pass, offset);
        }

        private static IList<byte[]> DecryptMsg(IStorageWrapper iw, string path, byte[] pass)
        {
            List<byte[]> msgList = new List<byte[]>();

            int num = 0;
            int[] pos = null;
            int[] len = null;
            using (IBaseStorageWrapper.FileObjects.FileObject fileObject = GetStorageFileObject(iw, path, "Index.msj"))
            {
                if (fileObject == null) return msgList;
                int fileLen = (int)fileObject.Length;
                num = fileLen / 4;
                pos = new int[num + 1];
                using (BinaryReader br = new BinaryReader(fileObject))
                {
                    for (int i = 0; i < num; ++i)
                    {
                        pos[i] = br.ReadInt32();
                    }
                }
            }
            using (IBaseStorageWrapper.FileObjects.FileObject fileObject = GetStorageFileObject(iw, path, "Data.msj"))
            {
                if (fileObject != null)
                {
                    int fileLen = (int)fileObject.Length;
                    len = new int[num];
                    pos[num] = fileLen;
                    for (int i = 0; i < num; ++i)
                    {
                        len[i] = pos[i + 1] - pos[i];
                    }
                    using (BinaryReader br = new BinaryReader(fileObject))
                    {
                        for (int i = 0; i < num; ++i)
                        {
                            fileObject.Seek(pos[i], SeekOrigin.Begin);
                            byte[] data = br.ReadBytes(len[i]);
                            byte[] msg = Decrypt(data, pass, 0);
                            msgList.Add(msg);
                        }
                    }
                }
            }
            return msgList;
        }

        private static byte[] GetGlobalPass(IStorageWrapper iw, string QQID)
        {
            System.Security.Cryptography.MD5 md5 = System.Security.Cryptography.MD5.Create();
            byte[] dataID = new byte[QQID.Length];
            for (int i = 0; i < QQID.Length; ++i) dataID[i] = (byte)(QQID[i]);
            byte[] hashID = md5.ComputeHash(dataID);
            IBaseStorageWrapper.FileObjects.FileObject fileObject = GetStorageFileObject(iw, "Matrix", "Matrix.db");
            if (fileObject != null)
            {
                using (BinaryReader br = new BinaryReader(fileObject))
                {
                    byte[] data = br.ReadBytes((int)fileObject.Length);
                    long len = data.Length;
                    if (len < 6 || data[0] != 0x51 || data[1] != 0x44) return null;
                    if (len >= 32768) return null;

                    bool bl = false;
                    int i = 6;
                    while (i < len)
                    {
                        bl = false;
                        byte type = data[i++];
                        if (i + 2 > len) break;
                        int len1 = data[i] + data[i + 1] * 256;
                        byte xor1 = (byte)(data[i] ^ data[i + 1]);
                        i += 2;
                        if (i + len1 > len) break;
                        for (int j = 0; j < len1; ++j) data[i + j] = (byte)(~(data[i + j] ^ xor1));
                        if (len1 == 3 && data[i] == 0x43 && data[i + 1] == 0x52 && data[i + 2] == 0x4B)
                        {
                            bl = true;
                        }
                        i += len1;

                        if (type > 7) break;
                        if (i + 4 > len) break;
                        int len2 = data[i] + data[i + 1] * 256 + data[i + 2] * 256 * 256 + data[i + 3] * 256 * 256 * 256;
                        byte xor2 = (byte)(data[i] ^ data[i + 1]);
                        i += 4;
                        if (i + len2 > len) break;
                        if (type == 6 || type == 7)
                        {
                            for (int j = 0; j < len2; ++j) data[i + j] = (byte)(~(data[i + j] ^ xor2));
                        }
                        if (bl && len2 == 0x20)
                        {
                            byte[] dataT = new byte[len2];
                            for (int j = 0; j < len2; ++j) dataT[j] = data[i + j];
                            return Decrypt(dataT, hashID, 0);
                        }
                        i += len2;
                    }
                    if (i != len) return null;
                }
            }
            return null;
        }

        public void Close(string QQID) {
            if (m_Storage == null)
            {
                return;
            }
            else {
                m_Storage = null;

            }
        }
    }
}

QQCrypt.cs -- 原封未动，直接copy过来的

 using System;

namespace RedQ
{
    /**//// <summary>
    /// QQ Msg En/DeCrypt Class
    /// Writen By Red_angelX On 2006.9.13
    /// </summary>
    public class QQCrypt
    {    
        //QQ TEA-16 Encrypt/Decrypt Class 
        // 
        // 
        //And also LumaQQ//s source code 
        //  CopyRight:No CopyRight^_^ 
        //  Author : Red_angelX     
        //  NetWork is Free,Tencent is ****!
        // 
        //Class Begin 
        //AD:Find Job!!,If you Want Give me a Job,Content Me!!

        //Copied & translated from LumaQQ//s source code          `From LumaQQ///s source code: 
        private byte[] Plain;                                   //指向当前的明文块 
        private byte[] prePlain ;                               //指向前面一个明文块 
        private byte[] Out;                                     //输出的密文或者明文 
        private long Crypt, preCrypt;                           //当前加密的密文位置和上一次加密的密文块位置，他们相差8 
        private long Pos;                                       //当前处理的加密解密块的位置 
        private long padding;                                   //填充数 
        private byte[] Key = new byte[16];                      //密钥 
        private bool Header;                                    //用于加密时，表示当前是否是第一个8字节块，因为加密算法 
                                                                //是反馈的，但是最开始的8个字节没有反馈可用，所有需要标 
                                                                //明这种情况 
        private long contextStart;                              //这个表示当前解密开始的位置，之所以要这么一个变量是为了 
                                                                //避免当解密到最后时后面已经没有数据，这时候就会出错，这 
                                                                //个变量就是用来判断这种情况免得出错 
        public QQCrypt()
        {
            //
            // TODO: 在此处添加构造函数逻辑
            //
        }
        

        //Push 数据
        byte[] CopyMemory(byte[] arr,int arr_index,long input)  //lenth = 4
        {
            if(arr_index+4 > arr.Length)
            {
                // 不能执行
                return arr;
            }

            arr[arr_index+3]=(byte)((input & 0xff000000) >> 24);
            arr[arr_index+2]=(byte)((input & 0x00ff0000) >> 16);
            arr[arr_index+1]=(byte)((input & 0x0000ff00) >> 8);
            arr[arr_index]=(byte)(input & 0x000000ff);

            arr[arr_index] &= 0xff;
            arr[arr_index+1] &= 0xff;
            arr[arr_index+2] &= 0xff;
            arr[arr_index+3] &= 0xff;

            return arr;
        }

        long CopyMemory(long Out,byte[] arr,int arr_index)
        {
            if(arr_index+4 > arr.Length)
            {
                return Out;
                //不能执行
            }

            long x1 = arr[arr_index+3] << 24;
            long x2 = arr[arr_index+2] << 16;
            long x3 = arr[arr_index+1] << 8;
            long x4 = arr[arr_index];

            long o = x1 | x2 | x3 | x4;
            o &= 0xffffffff;
            return o;
        }

        long getUnsignedInt(byte[] arrayIn, int offset,int len /**//*Default is 4*/) 
        {

            long ret = 0;
            int end = 0;
            if (len > 8)
                end = offset + 8;
            else
                end = offset + len;
            for (int i = offset; i < end; i++) 
            {
                ret <<= 8;
                ret |= arrayIn[i] & 0xff;
            }
            return (ret & 0xffffffff) | (ret >> 32);
        }

        long Rand()
        {
            Random rd = new Random();
            long ret;
            ret = rd.Next() + (rd.Next() % 1024);
            return ret;
        }

        private byte[] Decipher(byte[] arrayIn,byte[] arrayKey,long offset)
        {
            //long Y,z,a,b,c,d;
            long sum,delta;
            //Y=z=a=b=c=d=0;
            byte[] tmpArray = new byte[24];
            byte[] tmpOut = new byte[8];
            if(arrayIn.Length < 8)
            {
                // Error:return
                return tmpOut;
            }
            if(arrayKey.Length < 16)
            {
                // Error:return
                return tmpOut;
            }
            sum = 0xE3779B90; 
            sum = sum & 0xFFFFFFFF; 
            delta = 0x9E3779B9; 
            delta = delta & 0xFFFFFFFF; 
            /**//*tmpArray[3] = arrayIn[offset]; 
            tmpArray[2] = arrayIn[offset + 1]; 
            tmpArray[1] = arrayIn[offset + 2]; 
            tmpArray[0] = arrayIn[offset + 3]; 
            tmpArray[7] = arrayIn[offset + 4]; 
            tmpArray[6] = arrayIn[offset + 5]; 
            tmpArray[5] = arrayIn[offset + 6]; 
            tmpArray[4] = arrayIn[offset + 7]; 
            tmpArray[11] = arrayKey[0]; 
            tmpArray[10] = arrayKey[1]; 
            tmpArray[9] = arrayKey[2]; 
            tmpArray[8] = arrayKey[3]; 
            tmpArray[15] = arrayKey[4]; 
            tmpArray[14] = arrayKey[5]; 
            tmpArray[13] = arrayKey[6]; 
            tmpArray[12] = arrayKey[7]; 
            tmpArray[19] = arrayKey[8]; 
            tmpArray[18] = arrayKey[9]; 
            tmpArray[17] = arrayKey[10]; 
            tmpArray[16] = arrayKey[11]; 
            tmpArray[23] = arrayKey[12]; 
            tmpArray[22] = arrayKey[13]; 
            tmpArray[21] = arrayKey[14]; 
            tmpArray[20] = arrayKey[15]; 
            Y=CopyMemory(Y,tmpArray,0);    
            z=CopyMemory(z,tmpArray,4);
            a=CopyMemory(a,tmpArray,8);
            b=CopyMemory(b,tmpArray,12);
            c=CopyMemory(c,tmpArray,16);
            d=CopyMemory(d,tmpArray,20);*/
            long Y = getUnsignedInt(arrayIn, (int)offset, 4);
            long z = getUnsignedInt(arrayIn, (int)offset + 4, 4);
            long a = getUnsignedInt(arrayKey, 0, 4);
            long b = getUnsignedInt(arrayKey, 4, 4);
            long c = getUnsignedInt(arrayKey, 8, 4);
            long d = getUnsignedInt(arrayKey, 12, 4);
            for(int i=1;i<=16;i++)
            {
                z -= ((Y<<4)+c) ^ (Y+sum) ^ ((Y>>5)+d);
                z &= 0xFFFFFFFF;
                Y -= ((z<<4)+a) ^ (z+sum) ^ ((z>>5)+b);
                Y &= 0xFFFFFFFF;
                sum -= delta;
                sum &= 0xFFFFFFFF; 
            }

            tmpArray = CopyMemory(tmpArray,0,Y);
            tmpArray = CopyMemory(tmpArray,4,z);
            tmpOut[0] = tmpArray[3]; 
            tmpOut[1] = tmpArray[2]; 
            tmpOut[2] = tmpArray[1]; 
            tmpOut[3] = tmpArray[0]; 
            tmpOut[4] = tmpArray[7]; 
            tmpOut[5] = tmpArray[6]; 
            tmpOut[6] = tmpArray[5]; 
            tmpOut[7] = tmpArray[4]; 

            return tmpOut;    
        }

        private byte[] Decipher(byte[] arrayIn,byte[] arrayKey)
        {
            return Decipher(arrayIn,arrayKey,0);
        }

        private byte[] Encipher(byte[] arrayIn,byte[] arrayKey,long offset)
        {
            byte[] tmpOut = new byte[8];
            byte[] tmpArray = new byte[24];
            //long Y,z,a,b,c,d;
            //Y=z=a=b=c=d=0;
            long sum,delta;
            if(arrayIn.Length < 8)
            {
                // Error:
                return tmpOut;
            }
            if(arrayKey.Length < 16)
            {
                // Error:
                return tmpOut;
            }
            sum = 0;
            delta = 0x9E3779B9;
            delta &= 0xFFFFFFFF;

            /**//*tmpArray[3] = arrayIn[offset]; 
            tmpArray[2] = arrayIn[offset + 1]; 
            tmpArray[1] = arrayIn[offset + 2]; 
            tmpArray[0] = arrayIn[offset + 3]; 
            tmpArray[7] = arrayIn[offset + 4]; 
            tmpArray[6] = arrayIn[offset + 5]; 
            tmpArray[5] = arrayIn[offset + 6]; 
            tmpArray[4] = arrayIn[offset + 7]; 
            tmpArray[11] = arrayKey[0]; 
            tmpArray[10] = arrayKey[1]; 
            tmpArray[9] = arrayKey[2]; 
            tmpArray[8] = arrayKey[3]; 
            tmpArray[15] = arrayKey[4]; 
            tmpArray[14] = arrayKey[5]; 
            tmpArray[13] = arrayKey[6]; 
            tmpArray[12] = arrayKey[7]; 
            tmpArray[19] = arrayKey[8];
            tmpArray[18] = arrayKey[9]; 
            tmpArray[17] = arrayKey[10]; 
            tmpArray[16] = arrayKey[11]; 
            tmpArray[23] = arrayKey[12]; 
            tmpArray[22] = arrayKey[13]; 
            tmpArray[21] = arrayKey[14]; 
            tmpArray[20] = arrayKey[15]; 

            Y=CopyMemory(Y,tmpArray,0);
            z=CopyMemory(z,tmpArray,4);
            a=CopyMemory(a,tmpArray,8);
            b=CopyMemory(b,tmpArray,12);
            c=CopyMemory(c,tmpArray,16);
            d=CopyMemory(d,tmpArray,20);*/

            long Y = getUnsignedInt(arrayIn, (int)offset, 4);
            long z = getUnsignedInt(arrayIn, (int)offset + 4, 4);
            long a = getUnsignedInt(arrayKey, 0, 4);
            long b = getUnsignedInt(arrayKey, 4, 4);
            long c = getUnsignedInt(arrayKey, 8, 4);
            long d = getUnsignedInt(arrayKey, 12, 4);

            for(int i=1;i<=16;i++)
            {
                sum += delta;
                sum &= 0xFFFFFFFF;
                Y += ((z<<4)+a) ^ (z+sum) ^ ((z>>5)+b);
                Y &= 0xFFFFFFFF;
                z += ((Y<<4)+c) ^ (Y+sum) ^ ((Y>>5)+d);
                z &= 0xFFFFFFFF;
            }

            tmpArray = CopyMemory(tmpArray,0,Y);
            tmpArray = CopyMemory(tmpArray,4,z);

            tmpOut[0] = tmpArray[3]; 
            tmpOut[1] = tmpArray[2]; 
            tmpOut[2] = tmpArray[1];
            tmpOut[3] = tmpArray[0]; 
            tmpOut[4] = tmpArray[7]; 
            tmpOut[5] = tmpArray[6]; 
            tmpOut[6] = tmpArray[5]; 
            tmpOut[7] = tmpArray[4]; 
        
            return tmpOut;
        }
        

        private byte[] Encipher(byte[] arrayIn,byte[] arrayKey)
        {
            return Encipher(arrayIn,arrayKey,0);
        }
        
        private void Encrypt8Bytes()
        {
            byte[] Crypted;
            for(Pos=0;Pos<=7;Pos++)
            {
                if(this.Header == true)
                {
                    Plain[Pos] = (byte)(Plain[Pos] ^ prePlain[Pos]);
                }
                else
                {
                    Plain[Pos] = (byte)(Plain[Pos] ^ Out[preCrypt + Pos]);
                }
            }
            Crypted = Encipher(Plain,Key);
            
            for(int i=0;i<=7;i++)
            {
                Out[Crypt + i] = (byte)Crypted[i];
            }
            
            for(Pos=0;Pos<=7;Pos++)
            {
                Out[Crypt + Pos] = (byte)(Out[Crypt + Pos] ^ prePlain[Pos]);
            }            
            Plain.CopyTo(prePlain,0);
            preCrypt = Crypt;
            Crypt = Crypt + 8;
            Pos = 0;
            Header = false;
        }

        private bool Decrypt8Bytes(byte[] arrayIn,long offset)
        {
            long lngTemp;
            for(Pos=0;Pos<=7;Pos++)
            {
                if(this.contextStart+Pos > arrayIn.Length-1) 
                {
                    return true;
                }
                prePlain[Pos] = (byte)(prePlain[Pos] ^ arrayIn[offset+Crypt+Pos]);
            }
            try
            {
                prePlain = this.Decipher(prePlain,Key);
            }
            catch
            {
                return false;
            }
            lngTemp = prePlain.Length - 1;
            contextStart += 8;
            Crypt+=8;
            Pos = 0;
            return true;
        }

        private bool Decrypt8Bytes(byte[] arrayIn)
        {
            return Decrypt8Bytes(arrayIn,0);
        }


        #region Public Methods!

        /**//// <summary>
        /// QQ TEA 加密函数
        /// </summary>
        /// <param name="arrayIn">要加密的字串</param>
        /// <param name="arrayKey">密钥</param>
        /// <param name="offset">偏移</param>
        /// <returns></returns>
        public byte[] QQ_Encrypt(byte[] arrayIn,byte[] arrayKey,long offset)
        {
            Plain = new byte[8];
            prePlain = new byte[8];
            long l;
            Pos = 1;
            padding = 0;
            Crypt = preCrypt = 0;
            arrayKey.CopyTo(Key,0);    // Key Must Be 16 Length!
            Header = true;
            Pos = 2;
            //计算头部填充字节数
            Pos = (arrayIn.Length+10) % 8;
            if(Pos != 0)
                Pos = 8-Pos;
            //输出长度
            Out = new byte[arrayIn.Length+Pos+10];
            //把POS存到PLAIN的第一个字节
            //0xf8后面3位是空的，正好给Pos
            Plain[0] = (byte)((Rand() & 0xf8) | Pos);
            //用随机数填充1到Pos的内容
            for(int i=1;i<=Pos;i++)
            {
                Plain[i] = (byte)(Rand() & 0xff);
            }
            Pos++;
            padding = 1;

            //继续填充两个字节随机数，满8字节就加密
            while(padding < 3)
            {
                if( Pos < 8)
                {
                    Plain[Pos] = (byte)(Rand() & 0xff);
                    padding++;
                    Pos++;
                }
                else if(Pos == 8)
                {
                    this.Encrypt8Bytes();
                }
            }

            int I = (int)offset;
            l = 0;
            //明文内容，满8字节加密到读完
            l = arrayIn.Length;
            while ( l > 0)
            {
                if(Pos<8)
                {
                    Plain[Pos] = arrayIn[I];
                    I++;
                    Pos++;
                    l--;
                }
                else if(Pos == 8)
                {
                    this.Encrypt8Bytes();
                }
            }

            //末尾填充0，保证是8的倍数
            padding = 1;
            while(padding < 9)      
            {
                if(Pos<8)
                {
                    Plain[Pos] = 0;
                    Pos++;
                    padding++;
                }
                else if(Pos == 8)
                {
                    this.Encrypt8Bytes();
                }
            }

            return Out;
        }


        public byte[] QQ_Encrypt(byte[] arrayIn,byte[] arrayKey)
        {
            return QQ_Encrypt(arrayIn,arrayKey,0);
        }

        /**//// <summary>
        ///  QQ TEA 解密函数
        /// </summary>
        /// <param name="arrayIn">要解密字串</param>
        /// <param name="arrayKey">密钥</param>
        /// <param name="offset">偏移</param>
        /// <returns></returns>
        public byte[] QQ_Decrypt(byte[] arrayIn,byte[] arrayKey,long offset)
        {
            byte[] error = new byte[0];
            //检查是否是8的倍数至少16字节
            if(arrayIn.Length < 16 || (arrayIn.Length % 8 != 0))
            {
                //Return What?
                return error;
            }
            if(arrayKey.Length != 16)
            {
                //Return What?
                return error;
            }
            byte[] m;
            long I,Count;
            m= new byte[offset+8];
            arrayKey.CopyTo(Key,0);
            Crypt = preCrypt = 0;
            //计算消息头部，明文开始的偏移，解密第一字节和7相与得到
            prePlain = this.Decipher(arrayIn,arrayKey,offset);
            Pos = prePlain[0] & 7;
            //计算明文长度
            Count = arrayIn.Length - Pos - 10;
            if(Count <= 0)
            {
                //Return What?
                return error;
            }
            Out = new byte[Count];
            preCrypt = 0;
            Crypt = 8;
            this.contextStart = 8;
            Pos++;
            padding = 1;
            //跳过头部
            while(padding < 3)
            {
                if(Pos<8)
                {
                    Pos++;
                    padding++;
                }
                else if(Pos==8)
                {
                    for(int i=0;i<m.Length;i++)
                        m[i]=arrayIn[i];
                    if(this.Decrypt8Bytes(arrayIn,offset) == false)
                    {
                        //Return What?
                        return error;
                    }
                }
            }

            //解密明文
            I=0;
            while(Count != 0)
            {
                if(Pos<8)
                {
                    Out[I] = (byte)(m[offset+preCrypt+Pos] ^ prePlain[Pos]);
                    I++;
                    Count--;
                    Pos++;
                }
                else if(Pos == 8)
                {
                    m = arrayIn;
                    preCrypt = Crypt - 8;
                    if(this.Decrypt8Bytes(arrayIn,offset) == false)
                    {
                        //Return What?
                        return error;
                    }
                }
            }

            //最后的解密部分，检查尾部是不是0
            for(padding=1;padding<=7;padding++)
            {
                if(Pos<8)
                {
                    if( (m[offset+preCrypt+Pos] ^ prePlain[Pos]) != 0 )
                    {
                        //Return What?
                        return error;
                    }
                    Pos++;
                }
                else if(Pos == 8)
                {
                    for(int i=0;i<m.Length;i++)
                        m[i] = arrayIn[i];
                    preCrypt = Crypt;
                    if(this.Decrypt8Bytes(arrayIn,offset) == false)
                    {
                        //Return What?
                        return error;
                    }
                }
            }
            return Out;
        }

        public byte[] QQ_Decrypt(byte[] arrayIn,byte[] arrayKey)
        {
            return QQ_Decrypt(arrayIn,arrayKey,0);
        }
        #endregion
    }
}