XeNTaX

Code: Select all

idstring "dat2"
getdstring UNK 0x8
get FILES long
get NAMETABLESIZE long
savepos OFF
math NTABLE = FILES
math NTABLE *= 16
math NTABLE += OFF
log MEMORY_FILE NTABLE NAMETABLESIZE
for i = 0 < FILES
get OFFSET long
get ZSIZE long
get SIZE long
get NAMEOFF long
goto NAMEOFF MEMORY_FILE
get NAME string MEMORY_FILE
clog NAME OFFSET ZSIZE SIZE
next i

Code: Select all

<?php

//csv2bin('loca.csv', 'loca.bin');
//bin2csv('loca.bin', 'loca.csv');

function csv2bin($file_input, $file_output) {
	$structure = array(
		'header' => '',
		'entries' => 0,
		'unknown' => 0,
		'header_size' => 0,
		'str_delta' => '',
		'data' => array()
	);

	if ($FHo = fopen($file_output, 'wb+')) {
		$structure['entries'] = 0;
		$size_var = 0;
		$size_val = 0;
		if ($FHi = fopen($file_input, "r")) {
			while (($data = fgetcsv($FHi)) !== FALSE) {
				$size_var += strlen($data[0])+1;
				$size_val += strlen($data[1])+strlen($data[2])+4;
				$structure['data'][] = array('var' => $data[0], 'val' => $data[1], 'more' => $data[2]);
				$structure['entries']++;
			}
			fclose($FHi);
		}
		
		fwrite($FHo, "LOCA");
		putDword($FHo, count($structure['data']));
		putDword($FHo, 1);
		putDword($FHo, 0x18);
		fwrite($FHo, "delta\x00\x00\x00");
		
		$offset_var = (count($structure['data'])*8)+0x18;
		$offset_val = $offset_var+$size_var;

		$data_structure = '';
		$data_variable = '';
		$data_value = '';
		foreach($structure['data'] AS $row) {
			$data_variable .= $row['var']."\x00";
			$data_value .= $row['val']."\x00\x00".$row['more']."\x00\x00";
			putDword($FHo, $offset_var);
			putDword($FHo, $offset_val);
			$offset_var += strlen($row['var'])+1;
			$offset_val += strlen($row['val'])+strlen($row['more'])+4;
		}
		fwrite($FHo, $data_variable);
		fwrite($FHo, $data_value);
		fclose($FHo);
	}
}

function bin2csv($file_input, $file_output) {
	$structure = array(
		'header' => '',
		'entries' => 0,
		'unknown' => 0,
		'header_size' => 0,
		'str_delta' => '',
		'data' => array()
	);

	if ($FHi = fopen($file_input, 'rb')) {
		$file_input_data = '';
		while(!feof($FHi)) {
			$file_input_data .= fread($FHi, 4000);
		}
		fclose($FHi);

		$structure['header'] = getString($file_input_data, 0, 4);
		$structure['entries'] = getDword($file_input_data, 4);
		$structure['unknown'] = getDword($file_input_data, 8);
		$structure['header_size'] = getDword($file_input_data, 12);

		if ($structure['header'] != 'LOCA') {
			echo "Bad header\n";
			exit;
		}
		echo "Header: '".$structure['header']."' - OK!\n";
		echo "Number of entries: ".$structure['entries']."\n";
		echo "Unknown flag: ".$structure['unknown']."\n";
		echo "Size of header: ".$structure['header_size']."\n";
		
		
		$structure['str_delta'] = getString($file_input_data, 16, $structure['header_size']-16);
		if ($structure['str_delta'] != 'delta') {
			echo "Delta is unknown";
		}
		echo "Delta is: '".$structure['str_delta']."' - OK!\n";
		if ($FHo = fopen($file_output, 'wb+')) {	
			for ($i = 0; $i < $structure['entries']; $i++) {
				$offset_var = getDword($file_input_data, $structure['header_size']+(($i*4)*2));
				$offset_val = getDword($file_input_data, $structure['header_size']+((($i*4)*2)+4));

				$str_var = getString($file_input_data, $offset_var);
				$str_val = getString($file_input_data, $offset_val);
				$str_val2 = getString($file_input_data, $offset_val+strlen($str_val)+2);

				fwrite($FHo, $str_var.",\"".$str_val."\",\"".$str_val2."\"\n");
			}

			fclose($FHo);
		}
		
		echo "Done!\n";
	}
}

function putDword($hwnd, $value) {
	fwrite($hwnd, strrev(hex2bin(sprintf("%08X", $value))), 4);
}

function getDword($source, $offset) {
	return hexdec(bin2hex(strrev(substr($source, $offset, 4))));
}

function getString($source, $offset, $size = NULL) {
	if ($size == NULL) {
		return trim(strstr(substr($source, $offset, strlen($source)), "\x00", true));
	}
	return trim(substr($source, $offset, $size));
}

?>