XeNTaX

Code: Select all

goto "EOF"
savepos OFFSET
math OFFSET -= 1
goto OFFSET
get FILETYPE byte
math OFFSET -= 4
goto OFFSET
get FILES long
math OFFSET -= 4
goto OFFSET
get LISTOFFSET long
goto LISTOFFSET

for i = 0 < FILES
get FNAMELEN byte
get FILESTYPE byte
MATH FILNAMELEN += 1
get OFFSET long
get ZSIZE long
get SIZE long
getdstring NAME FNAMELEN
clog NAME OFFSET ZSIZE SIZE
next i

Code: Select all

comtype lzss    # NOT the right compression!!!
goto -1
get FILETYPE byte
goto -5
get FILES long
goto -9
get LISTOFFSET long
goto LISTOFFSET

for i = 0 < FILES
    get FNAMELEN byte
    get TYPE byte
    math FNAMELEN += 1
    get OFFSET long
    get ZSIZE long
    get SIZE long
    getdstring NAME FNAMELEN
    if TYPE != 2
        clog NAME OFFSET ZSIZE SIZE
    endif
next i

Code: Select all

#include "stdafx.h"
#include<string>
#include<cstring>
#include<vector>
#include <fstream>
#include <iostream>
using namespace std;
#define DIRECTORY_NAME 2
#define FILE_NAME 1
struct codedFile
{
	char fileNameLen;
	char fileType;
	unsigned long offsetInPAK;
	unsigned long codedLen;
	unsigned long originLen;
	string fileName;
};
ifstream infile;
int main(int argc, char* argv[])
{
	//读入pak文件
	void decode(const codedFile& theFile,const char * path);
	infile.open(argv[1],ios::in|ios::binary);
	char charBuffer;			//字节缓冲
	codedFile tempCF;			//codedFile结构缓冲
	long fileNum;				//解压后的文件夹+文件个数
	long codedFileGOffset;				//codedFile组所在的偏移位置
	vector<codedFile> codedFileG;
	infile.seekg(-1,ios::end );	//读取最后一个字节
	infile.get(charBuffer);
	if(charBuffer==0x12)			//标记来的吧
	{
		cout<<"The PAK can be decoded..."<<endl;
		infile.seekg(-5,ios::end );	//从倒数第五个字节开始读双字，为fileNum
		infile.read((char *)&fileNum,4);
		infile.seekg(-9,ios::end );	//从倒数第9个字节开始读双字，为codedFile组所在的偏移位置
		infile.read((char *)&codedFileGOffset,4);
		infile.seekg(codedFileGOffset,ios::beg );  //指针移动到codedFile组所在的偏移位置
		for(int i=0;i<fileNum;i++)			//读取codedFile进codeFileG
		{
			//不读文件名的起始地址
			infile.read ((char *)&tempCF.fileNameLen,1);	
			infile.read ((char *)&tempCF.fileType ,1);
			infile.read ((char *)&tempCF.offsetInPAK,4);
			infile.read ((char *)&tempCF.codedLen,4);
			infile.read ((char *)&tempCF.originLen,4);
			//读取文件名
			tempCF.fileName="";
			for(int j=0;j<=tempCF.fileNameLen ;j++)
			{
				infile.get(charBuffer);
				if(charBuffer=='/') charBuffer='\\';
				tempCF.fileName+=charBuffer;

			}
			codedFileG.push_back(tempCF);
		}
		/*
		for(int i=0;i<fileNum;i++)
		{
			cout<<codedFileG[i].fileName<<endl;
		}
		*/
		for(int i=0;i<fileNum;i++)
		{
			cout<<"Reading "<<argv[2]<<codedFileG[i].fileName<<endl;
			decode(codedFileG[i],argv[2]);
			cout<<"OK!!"<<endl;
		}

	}
	else cout<<"The PAK can't be decoded"<<endl;
	infile.close ();
	return 0;
}

void decode(const codedFile& theFile,const char * path)
{
	vector<char> textBuffer;
	int r=0;							//缓冲字节区内指针
	char outFileName[255];
	strcpy(outFileName,path);
	strcat(outFileName,theFile.fileName .c_str ());
	if(theFile.fileType == FILE_NAME)
	{
		infile.seekg(theFile.offsetInPAK ,ios::beg );
		//真正解码开始……………………………………
		int readLen=0;
		//readLen=(int)infile.tellg ()-theFile.offsetInPAK +2;
		while(textBuffer.size ()<theFile.originLen && readLen<theFile.codedLen-1 )
		{
			char codeInfo;			//储存加密标记字节
			infile.get(codeInfo);
			readLen++;
			for(int i=0;i<8;i++)
			{
				char codeFlag=codeInfo&0x1;	//记录是否加密的标记位，0=未加密，1=加密
				char charBuffer;					//字节缓冲
				if(codeFlag==0)				//未加密处理过程：直接拷贝原文
				{
					//if(!infile.eof())
					//{
						if(readLen==theFile.codedLen) goto endit;
						
						infile.get(charBuffer);
						readLen++;
						//////////outfile.put(charBuffer);
						
						//buffer[r++]=charBuffer;
						textBuffer.push_back(charBuffer);
						r++;
						
					//}
				}
				else						//加密处理过程
				{
					//if(!infile.eof())
					//{
						if(readLen==theFile.codedLen) goto endit;
						short int codePair;			//加密组合，高4位代表长度，低12位代表偏移量
						infile.read((char *)&codePair,2);
						readLen+=2;
						short int len=((codePair>>12)&0xf)+2;			//长度
						short int offset=codePair&0xfff;			//偏移量
						for(int j=0;j<len;j++)
						{
							charBuffer=textBuffer[r-offset];
							//charBuffer=buffer[r-offset];
							///////////outfile.put(charBuffer);
							//buffer[r++]=charBuffer;
							textBuffer.push_back(charBuffer);
							r++;
						}
					//}
				}
				codeInfo>>=1;
			}//end of for
			
		}//end of while
endit:		ofstream outfile;
		outfile.open(outFileName,ios::out|ios::binary);
		vector<char>::iterator textBufferI;
		cout<<"Extracting "<<outFileName<<endl;
		for(textBufferI=textBuffer.begin ();textBufferI!=textBuffer.end();textBufferI++)
		{
			outfile.put(*textBufferI);
		}
		outfile.close();
	}//end of if
	else			//文件夹
	{
		char commandLine[265]="md ";
		strcat(commandLine,outFileName);
		system(commandLine);
	}
}

Code: Select all

goto -1
get FILETYPE byte
goto -5
get FILES long
goto -9
get LISTOFFSET long
goto LISTOFFSET

for MYFILES = 0 < FILES
    get FNAMELEN byte
    get TYPE byte
    math FNAMELEN += 1
    get OFFSET long
    get ZSIZE long
    get SIZE long
    getdstring NAME FNAMELEN

    if TYPE == 1
        if SIZE == ZSIZE
            log NAME OFFSET SIZE
        else
            log MEMORY_FILE OFFSET ZSIZE
            log MEMORY_FILE2 0 SIZE     # blah, assign memory

            set readlen long 0
            set r long 0
            for readlen = readlen < ZSIZE
                get codeinfo byte MEMORY_FILE
                math readlen += 1
                for i = 0 < 8
                    if codeinfo & 1
                        if readlen >= ZSIZE
                            break
                        endif
                        get codepair short MEMORY_FILE
                        math readlen += 2
                        set len long codepair
                        math len >>= 12
                        math len &= 0xf
                        math len += 2
                        math codepair &= 0xfff      # offset
                        for j = 0 < len
                            set tmp long r
                            math tmp -= codepair    # offset
                            getvarchr charbuffer MEMORY_FILE2 tmp
                            putvarchr MEMORY_FILE2 r charbuffer
                            math r += 1
                        next j
                    else
                        if readlen >= ZSIZE
                            break
                        endif
                        get charbuffer byte MEMORY_FILE
                        math readlen += 1
                        putvarchr MEMORY_FILE2 r charbuffer
                        math r += 1
                    endif
                    math codeinfo >>= 1
                next i
            next

            log NAME 0 SIZE MEMORY_FILE2
        endif
    endif
next MYFILES