XeNTaX

Code: Select all

// binary template for 010 editor. save as FILENAME.bt
// wrs

/////////////////////////////////
typedef uint uint_p2 <read=ReadUIntP2>;

uint unpackLen(uint len)
{
  // len is is bits (x8 larger than it need be)
  // odd values are restored

  local int b = (len>>3);// + (len&0x7);
  //Printf("%u ==> %u (%u)**\n", len, b, (len&0x7));

if( (len&0x7) == 1 ){ b++; }

  return b - 4;//sizeof(uint);
}

// 010ed magic
string ReadUIntP2( uint_p2 b ) {
  string s;   
  SPrintf( s, "%u", unpackLen(b) );
  return s;
}
/////////////////////////////////
struct
{
  char Magic[4];
  Assert(Magic=="BINd");

  uint Version;
  Assert(Version==7);

} BINdHeader;
/////////////////////////////////
struct str(int size)
{
  byte len;

  if(size!=-1)
  Assert((len/2)==size);
  //Printf("Expected: %u\n",size);
  //Printf("Read:     %u\n",len/2);

  char cstr[len/2];

  Printf("%s\n", cstr);
};
/////////////////////////////////
struct ChunkBit
{
  uint_p2 len;
union{
  byte bits[unpackLen(len)];
  struct {
    uint tag <format=hex>;
    if( (tag &0xFF) == 0x10 ) {
      str astr(-1);
    }
  } s;
} u;
};
/////////////////////////////////

union un
{
  byte a[8];

  struct
  {
    byte a, b, c, d;
    uint_p2 len;
  } b;
};

/////////////////////////////////
struct
{
  byte flags[4];
  uint_p2 len_first; // from this offset -> eof


  // first chunk
  uint_p2 len; // from this offset -> eof 
  byte unknown[4];
  byte cnt_2;

  local uint cnt = cnt_2/2;
  if( cnt > 0 ) {
    struct {
       un hdr;
       local uint max = unpackLen(hdr.b.len);
       local uint size = 0;
      struct {
         while(size<max) {
         ChunkBit cs;
         size += sizeof(cs);
         }
      } data;
      
    } chunk[cnt] <optimize=false>;
  }

} data;

/////////////////////////////////

Assert(FEof());

/////////////////////////////////