XeNTaX

Code: Select all

//--------------------------------------
//--- 010 Editor v5.0 Binary Template
//--------------------------------------

BigEndian();

struct Block;
struct Block
{
  char ID[4];
  uint Length;
  FSkip(8);

  switch(ID)
  {
    case "AAC ":
      uint SkippedInfo[8];
      Block Child;
    break;

     case "DIR ":
       uint items;
       FSkip(12);
       Block Child[items] <optimize=false>;

       local uint i=0;
       for(i=1;i<items;++i) {
         Printf("%s @ 0x%X - %u bytes\n", Child[i-1].name,
                        Child[i-1].offset,
                        (Child[i].offset-Child[i-1].offset));
       }

       Printf("%s @ 0x%X - %u bytes\n", Child[items-1].name,
                      Child[items-1].offset,
                      (FileSize()-Child[items-1].offset));

       break;
     case "dirn":
       Assert(Length == 160);
       char name[128];
       uint offset;
       FSkip(8);
       uint size; // not size!
       break;
  }
};

Block Root;

Code: Select all

# Based on code by Aluigi,
#   God among men, Son of the Fifth House,
#   Holder of the Sacred Chalice of Rixx, Heir to the Holy Rings of Betazed    
# http://aluigi.org/papers/bms/xcompress_file.bms

endian big
set INC 0
callfunction MAIN
startfunction MAIN
    For
        findloc START string \x4D\x52\x4F\x4E\x30\x30\x2E\x32    #MRON00.2
        goto START
        get NAME basename
        getdstring SIGN 8
        get numFiles long
        get unk1 long
        if unk1 == 2048
            callfunction MAIN
        else
        endif
        get unk2 long
        get null1 long
        get null2 long
        get null3 long
        string NAME += /
        math INC += 1
        string NAME += INC
        string NAME += /
        for x = 0 < numFiles
            math HELL = START
            math i = x
            math i += 1
            string NAME2 = NAME
            getdstring FTYPE 4
            string FTYPE r FTYPE
            get unk3 long
            get FSIZE long
            get FOFF long
            get null4 long
            get null5 long
            get null6 long
            get null7 long
            savepos headEND
            math HELL += FOFF
            goto HELL
            getdstring EXT 3
            if EXT == "SLZ"
                callfunction DECOM
            else
                goto HELL
                string NAME2 += i
                string NAME2 += "."
                string NAME2 += FTYPE
                log NAME2 HELL FSIZE
            endif
            goto headEND
        next x
    Next
endfunction

startfunction DECOM
    get type byte
    get unkX long
    get slzCsize long
    get slzUsize long
    get null long
    get unkY long
    get studentID long
    get Version short
    get DinnerReservation short
    get ContextFlags long
    get wrinkledFlags long
    get WindowSize long
    get compPartSize long
    get unCompSizeUpper long
    get unCompSizeLower long
    get compSizeUpper long
    get compSizeLower long
    get unCompBLKsize long
    get compBLKsizeMAX long
    comtype XMemDecompress  
    putvarchr MEMORY_FILE unCompSizeLower 0
    log MEMORY_FILE 0 0
    append
    for blackCanary = 0 < unCompSizeLower
        get CompressedBlockSize long
        savepos OFFSET
        clog MEMORY_FILE OFFSET CompressedBlockSize unCompBLKsize
        math OFFSET += CompressedBlockSize
        goto OFFSET
        math blackCanary += unCompBLKsize
    next
    append
    string NAME += i
    string NAME += "."
    string NAME += FTYPE
    get blackCanary asize MEMORY_FILE
    log NAME 0 blackCanary MEMORY_FILE
endfunction

Code: Select all

# script for QuickBMS http://aluigi.altervista.org/quickbms.htm

endian big
idstring "AAC "
get TOTAL_SIZE long
getdstring SKIP 8
get FILES long //?
get DIR_OFF long
get UNK long
get PLBK_TABLE_OFF long //playback?
get UNK2 short
get UNK3 short
getdstring SKIP 12
get DIR long
get DIR_SZ long //?
getdstring SKIP 8
get FILES2 long
getdstring SKIP 12
for i = 0 < FILES2
	getdstring DIRN 4
	get DIRN_SZ long
	getdstring SKIP 8
	getdstring NAME 128
	get OFFSET long
	getdstring SKIP 8
	get UNK4 long
	savepos TMP
	goto OFFSET
	goto 0x4 0 seek_cur
	get SIZE long
	log NAME OFFSET SIZE
	goto TMP
next i