<?php
$ps3_ip='192.168.11.175'; 
$ps3_ftp_user='ps3'; 
$ps3_ftp_pass='zefie'; 
$ps3tdb = './ps3tdb.xml'; // Path to ps3tdb.xml, can be relative

$outfile = "mygames.txt";
$outfile_xml = "mygames.xml";
$infile_xsl = "mygames.xsl";

$crlf = "\n";

// Override PSN Packages into software category
$override['software'] = array(
	'NPEA90124',
	'NPIA00025',
	'NPUP00030',
	'NPUP10027',
	'NPUP10028'	
);

// Override PSN Packages (Disc Games) into PS3 Games category
$override['ps3'] = array(
	'NPUA80145',
	'NPUA80472',
	'NPUA80480',
	'NPUA80638',
	'NPUA80643',
	'NPUA80657',
	'NPUA80662',
	'NPUB30575',
	'NPUB30606',
	'NPUB30638',
	'NPUB30700',
	'NPUB30704',
	'NPUB30715',
	'NPUB30886',
	'NPUB30923',
	'NPUB30932',
	'NPUB30985',
	'NPUB31052',
	'NPUB31083',
	'NPUB31133',
	'NPUB31136',
	'NPUB31154',
	'NPUB31241',
	'NPUB31247',
	'NPUB31257',
	'NPUB31306'
);

$blacklist['ps3'] = 'XMBMANPLS';

// Override specific values
$override['ps2']['SLPS25527']['Verification'] = 'PATCHED'; // .hack//fragment eng/online patch
$override['ps2']['PBPX95517']['Region'] = 'US';

// Prettify PS1/PSN Package Names (for consistancy)
$override['ps1']['SLUS00879']['Title'] = 'Final Fantasy V';
$override['ps1']['SLUS00900']['Title'] = 'Final Fantasy VI';
$override['ps1']['SLUS01041']['Title'] = 'Chrono Cross';

// Prettify titles that ps3tdb misses
$override['ps3']['MRTC00001']['Title'] = 'Star Ocean: The Last Hope -International-';
$override['ps3']['MRTC00003']['Title'] = 'Final Fantasy XIII';
$override['ps3']['BLUS31460']['Title'] = 'Kingdom Hearts HD 2.5 ReMIX'; // in ps3tdb but 'HD 2.5' written as '2.5 HD', going with order written on game case

// Override ps3tdb titles I don't like
$override['ps3']['BLUS30008']['Title'] = 'Sonic the Hedgehog ("Sonic '."'".'06")';
$override['ps3']['BLUS30087']['Title'] = 'The Elder Scrolls IV: Oblivion';
$override['ps3']['BLUS30433']['Title'] = 'Dance Dance Revolution';
$override['ps3']['BLUS30451']['Title'] = 'Fallout 3';
$override['ps3']['BLUS30701']['Title'] = 'Hyperdimension Neptunia';
$override['ps3']['BLUS31139']['Title'] = 'Mass Effect';
$override['ps3']['BCUS98119']['Title'] = 'inFamous'; 

// PSN consistancy edits
$override['psn']['NPUA80523']['Title'] = 'Tokyo Jungle';
$override['psn']['NPUB30162']['Title'] = 'Scott Pilgrim vs. The World: The Game';

// Shorten Title
$override['psn']['NPUB30043']['Title'] = 'Penny Arcade Adventures: OtRSPoD, Episode One';
$override['psn']['NPUB30056']['Title'] = 'Penny Arcade Adventures: OtRSPoD, Episode Two';

// Fix homebrew titles
$override['software']['BLES80608']['Title'] = 'multiMAN';
$override['software']['NPEA90124']['Title'] = 'SEN Enabler';
$override['software']['RBGTLBOX2']['Title'] = 'Rebug Toolbox';
$override['software']['RPSN00001']['Title'] = 'reActPSN 3.20+';

$content_order = array(
	'ps1',
	'ps2',
	'ps3',
	'psp',
	'psn',
	'software',
	'dvd',
	'bd'
);


$ascii_table = new ascii_table($crlf);
	
echo $crlf;
echo 'Please note that '.$outfile.' output will be cleaner than'.$crlf;
echo 'what is shown on this console.'.$crlf.$crlf;
echo 'Connecting to PS3... Please wait...'.$crlf;
$ps3ftp = ftp_connect($ps3_ip);
$login_result = ftp_login($ps3ftp, $ps3_ftp_user, $ps3_ftp_pass); 
if (!$login_result) {
	echo 'Error logging in.';
	exit;
}
echo 'Connected, scanning games...'.$crlf;
$content = NULL;

//$content = scanISO($ps3ftp,$content,'ps1','dev_usb000');
//$content = scanISO($ps3ftp,$content,'ps1');
$content = scanISO($ps3ftp,$content,'ps2');
$content = scanISO($ps3ftp,$content,'ps3','dev_usb000');
//$content = scanISO('local',$content,'ps3','Z:/PS3');
//$content = scanISO($ps3ftp,$content,'dvd','dev_usb000');
//$content = scanISO($ps3ftp,$content,'dvd','dev_usb000');
$content = scanFolder($ps3ftp,$content,'game');
// scanFolder might work with /dev_hdd0/GAMES and GAMEZ but is not tested
echo 'Done, disconnecting from PS3...'.$crlf;
ftp_close($ps3ftp); 

// Generate txt
echo 'Generating '.$outfile.'... ';
$out = "";
$col_widths = getTableWidth($content);
foreach ($content_order as $f) {
	if (@$content[$f]) { $out .= processData($content[$f],getTableTitle($f),$col_widths); }
}
if ($crlf !== "\n") {
	$o = preg_replace("/\n/",$crlf,$out);
	$out = $o;
}
$fp = fopen($outfile,'w+');
fwrite($fp,$out);
fclose($fp);
echo 'Done.'.$crlf;

// Generate xml
echo 'Generating '.$outfile_xml.'... ';

$xsl = NULL;
if (@$infile_xsl) {
	if (file_exists($infile_xsl)) {
		$xsl = file($infile_xsl);
		unset($xsl[0]);
	}
}
$fp = fopen($outfile_xml,'w+');
fwrite($fp,exportToXML($content,$xsl));
fclose($fp);
echo 'Done.'.$crlf;


/* -------------- Functions -------------- */

function removeUnwantedWording($iso) {
	$iso = preg_replace("/ \(Digital\)/","",$iso);
	$iso = preg_replace("/ \(Download Ver\.\)/","",$iso);
	$iso = preg_replace("/ \(Trial Version\)/","",$iso);
	$iso = preg_replace("/ Trial Version/","",$iso);
	$iso = preg_replace("/\: Trial/","",$iso);
	$iso = preg_replace("/ DOWNLOAD$/","",$iso);
	$iso = preg_replace("/ Trial$/","",$iso);
	$iso = preg_replace("/ Demo$/","",$iso);
	$iso = preg_replace("/\([RT]M?\)/","",$iso); // (R) and (TM)
	$iso = preg_replace("/((?![\x01-\x7F]).)*/","",$iso); // strip any non-ascii we missed	
	$iso = preg_replace("/ Updater     .*/"," Updater",$iso);
	//$iso = preg_replace("/ \(Disc [0-9]\)/","",$iso);

	return $iso;
}
function checkOverride($s,$k) {
	global $override;
	if (@$override[$k]) {
		return in_array($s,$override[$k]);
	}
	return false;
}
function isBlacklisted($id) {
	global $blacklist;
	if (@$blacklist) {
		return in_array($id,$blacklist);
	}
	return false;
}	

function ps3GetTitleFromDiscID($id) {
	global $ps3tdb;
	if (file_exists($ps3tdb)) {
		$xml = simplexml_load_file($ps3tdb);
		$xmlNode = $xml->xpath("//id[. ='".$id."']/..");
		return @$xmlNode[0]->locale->title;
	}
	return null;
}

function getTitleFromDiscID($id,$sys) {
	switch ($sys) {
			case "ps3":
				return ps3GetTitleFromDiscID($id);
				
			default:
				return NULL;
	}
}

function getNameFromISO($iso,$sys) {
	$id = substr($iso,0,9);
	if ($sys === 'ps3') {
		$t = getTitleFromDiscID($id,$sys);
		if (strlen($t) >= 3)	return $t;
	}
	$p1 = strpos($iso,'[') + 1;
	$p2 = strpos($iso,']',$p1);
	return substr($iso,$p1,($p2 - strlen($iso)));
}

function readParamSFO($data,$force_max = false) {
	$keytable_offset = unpack('I',substr($data,8,4))[1];
	$data_offset = unpack('I',substr($data,12,4))[1];
	$table_entries = unpack('I',substr($data,16,4))[1];

	$keytable = array_filter(explode("\0",substr($data,$keytable_offset,($data_offset - $keytable_offset))));
	$idxtable = substr($data,20,($keytable_offset-20));
	$data = substr($data,$data_offset,-1);

	$pos = 0;
	$i = 1;
	while ($pos < strlen($idxtable)) {
		$key[$i]['start'] = unpack('I',substr($idxtable,$pos,2)."\0\0")[1];
		$pos = $pos + 2;
		$key[$i]['fmt'] = unpack('I',substr($idxtable,$pos,2)."\0\0")[1];
		$pos = $pos + 2;
		$key[$i]['len'] = unpack('I',substr($idxtable,$pos,4))[1];
		$pos = $pos + 4;
		$key[$i]['max_len'] = unpack('I',substr($idxtable,$pos,4))[1];
		$pos = $pos + 4;
		$key[$i]['offset'] = unpack('I',substr($idxtable,$pos,4))[1];
		$pos = $pos + 4;
		$i++;
	}
	$i = 0;
	foreach ($key as $k) {
		if ($force_max) {
			$pm = substr($data,$k['offset'],$k['max_len']);
		} else {
			$pm = substr($data,$k['offset'],$k['len']);
		}
		$param[$keytable[$i]] = trim($pm);
		$i++;
	}
	return $param;
}

function scanISO($ftp,$content,$dir,$disk = "dev_hdd0") {
	// Assumes filename is XXXX#####-[Game Name].iso (or .bin)
	// Falls back to entire filename as title.
	
	global $crlf;
	switch (strtolower($dir)) {
		case "psx":
			// no break to allow it to hit ps1 processing
			$dir = "ps1";
			
		case "ps1":
			$rdir = "PSXISO";
			break;
			
		case "ps2":
			$rdir = "PS2ISO";
			break;

		case "ps3":
			$rdir = "PS3ISO";
			break;

		case "dvd":
			$rdir = "DVDISO";
			break;

		case "bd":
			$rdir = "BDISO";
			break;
			
		default:
			return false;
			break;
	}
	if ($ftp === "local") {
		$ftptmp = array();
		$ftptmp_tmp = scandir($disk.'/'.$rdir);
		foreach ($ftptmp_tmp as $v) {
			if ($v !== "." && $v !== "..")
				$ftptmp[]['name'] = $v;
		}
		unset($ftptmp_tmp);
	} else {
		$ftptmp = ftp_mlsd($ftp,"/".$disk."/".$rdir);
	}
	foreach ($ftptmp as $d) {		
		if (strtolower(substr($d['name'],(strlen($d['name']) - 3),3)) == "bin" || strtolower(substr($d['name'],(strlen($d['name']) - 3),3)) == "iso" || strtolower(substr($d['name'],(strlen($d['name']) - 5),5)) == "iso.0") {
			if ($dir == 'ps1' || $dir == 'ps2' || $dir == 'psp') {
				$valid = "No";
			} else {
				$valid = "-N/A-";
			}
			if (preg_match("/^[SNUBPM][A-Z]{3}[0-9]{5}/",$d['name'])) {				
				$v = getNameFromISO($d['name'],$dir);				
				$tid = substr($d['name'],0,9);
				if ($dir == 'ps1' || $dir == 'ps2' || $dir == 'ps3') { 
					if ($dir == 'ps3') {
						$valid = "IRD";
					} else {
						$valid = "redump.org";
					}					
					if (preg_match("/\[\^\]/",$d['name'])) {
						if ($dir == 'ps3') {
							$valid = "None";
						} else {
							$valid = "None";
						}
					}
					if (preg_match("/\[\!\]/",$d['name'])) {
						$valid = "Fail";
					}
				}
			} else {
				$tid = "-N/A-";
				if (strtolower(substr($d['name'],(strlen($d['name']) - 5),5)) == "iso.0") {
					$v = substr($d['name'],0,(strlen($d['name']) - 6));	
				} else {
					$v = substr($d['name'],0,(strlen($d['name']) - 4));
				}
			}
			echo strtoupper($dir).": ".$v."".$crlf;
			$i = getNextKey(@$content[strtolower($dir)]);
			unset($ca);
			$ca['ID'] = $tid;
			$ca['Title'] = removeUnwantedWording($v);
			$ca['Region'] = getCountryFromTitleID(substr($d['name'],0,9));
			$ca['Type'] = "ISO";
			$ca['Verification'] = $valid;
			$content = setContent($content,$i,strtolower($dir),$ca);
		}
	}
	return $content;
}
function getCountryFromTitleID($titleid) {
	$cc = substr($titleid,2,1);
	switch ($cc) {
		case "U":
			return "US";
		
		case "E";
			return "EU";
			
		case "J":
		case "P":
			return "JP";

		default:
			return "WW";
	}
}
function scanFolder($ftp,$content,$dir,$disk = "dev_hdd0",$filter = true) {
	global $crlf;
	$ftptmp = ftp_mlsd($ftp,"/".$disk."/".$dir);
	$res = [];
	foreach ($ftptmp as $d) {
		// is XXXX#####, starts with N or U, is a directory, isn't blacklisted (by id)
		if ((preg_match("/^[NU][A-Z]{3}[0-9]{5}$/",$d['name']) && $d['type'] == 'dir' && !isBlacklisted($d['name'])) || !$filter) {
			unset($ca);
			ob_start();
			$result = ftp_get($ftp, "php://output", "/dev_hdd0/".$dir."/".$d['name']."/PARAM.SFO", FTP_BINARY);
			$ps3sfo = ob_get_contents();
			ob_end_clean();
			if (strlen(@$ps3sfo) > 0) {
				$pdecode = readParamSFO($ps3sfo);
				// Check again against SFO TITLE_ID
				if (isBlacklisted(@$pdecode['TITLE_ID'])) {
					continue;
				}
				if (@$pdecode['BOOTABLE']) {
					$v = preg_replace("/\n/"," ",$pdecode['TITLE']);
					
					switch (substr($pdecode['TITLE_ID'],0,2)) {
						case "UL":
						case "UC":
							$pdecode = readParamSFO($ps3sfo,1);
							$v = preg_replace("/\n/"," ",$pdecode['TITLE']);
							echo "PSP (Pkg): ".$v."".$crlf;
							$i = getNextKey(@$content['psp']);
							$ca['ID'] = $pdecode['TITLE_ID'];
							$ca['Title'] = $v;
							$ca['Region'] = getCountryFromTitleID(substr($pdecode['TITLE_ID'],0,9));
							$ca['Type'] = "PKG";
							$ca['Verification'] = "None";
							$content = setContent($content,$i,'psp',$ca);
							break;
							
						case "SC":
						case "SL":
							$ser = substr($pdecode['TITLE_ID'],4,5);
							if ((intval($ser) >= 20000 && substr($pdecode['TITLE_ID'],1,1) == "L") ||
								(intval($ser) >= 96000 && substr($pdecode['TITLE_ID'],1,1) == "C")) {
								echo "PS2: ".removeUnwantedWording($v)." [".$pdecode['TITLE_ID']."]".$crlf;
								$i = getNextKey(@$content['ps2']);
								$ca['ID'] = $pdecode['TITLE_ID'];
								$ca['Title'] = removeUnwantedWording($v);
								$ca['Region'] = getCountryFromTitleID(substr($pdecode['TITLE_ID'],0,9));
								$ca['Type'] = "PSN";
								$ca['Verification'] = "PSN";
								$content = setContent($content,$i,'ps2',$ca);
							} else {
								echo "PS1: ".removeUnwantedWording($v)." [".$pdecode['TITLE_ID']."]".$crlf;
								$i = getNextKey(@$content['ps1']);
								$ca['ID'] = $pdecode['TITLE_ID'];
								$ca['Title'] = removeUnwantedWording($v);
								$ca['Region'] = getCountryFromTitleID(substr($pdecode['TITLE_ID'],0,9));
								$ca['Type'] = "PSN";
								$ca['Verification'] = "PSN";
								$content = setContent($content,$i,'ps1',$ca);
							}
							break;

						default:
							// Fell back to generic PSN Package, so check overrides
							if (checkOverride($pdecode['TITLE_ID'],'ps1')) {
								echo "PS1: ".removeUnwantedWording($v)."".$crlf;
								$i = getNextKey(@$content['ps1']);
								$ca['ID'] = $pdecode['TITLE_ID'];
								$ca['Title'] = removeUnwantedWording($v);
								$ca['Region'] = getCountryFromTitleID(substr($pdecode['TITLE_ID'],0,9));
								$ca['Type'] = "PSN";
								$ca['Verification'] = "PSN";
								$content = setContent($content,$i,'ps1',$ca);
							}
							elseif (checkOverride($pdecode['TITLE_ID'],'ps2')) {
								echo "PS2: ".removeUnwantedWording($v)."".$crlf;
								$i = getNextKey(@$content['ps2']);
								$ca['ID'] = $pdecode['TITLE_ID'];
								$ca['Title'] = removeUnwantedWording($v);
								$ca['Region'] = getCountryFromTitleID(substr($pdecode['TITLE_ID'],0,9));
								$ca['Type'] = "PSN";
								$ca['Verification'] = "PSN";
								$content = setContent($content,$i,'ps2',$ca);
							}						
							elseif (checkOverride($pdecode['TITLE_ID'],'ps3')) {
								echo "PS3: ".removeUnwantedWording($v)."".$crlf;
								$i = getNextKey(@$content['ps3']);
								$ca['ID'] = $pdecode['TITLE_ID'];
								$ca['Title'] = removeUnwantedWording($v);
								$ca['Region'] = getCountryFromTitleID(substr($pdecode['TITLE_ID'],0,9));
								$ca['Type'] = "PSN";
								$ca['Verification'] = "PSN";
								$content = setContent($content,$i,'ps3',$ca);
							}		
							elseif (checkOverride($pdecode['TITLE_ID'],'software')) {
								echo "Software: ".removeUnwantedWording($v)."".$crlf;
								$i = getNextKey(@$content['software']);
								$ca['ID'] = $pdecode['TITLE_ID'];
								$ca['Title'] = removeUnwantedWording($v);
								$ca['Region'] = "-N/A-";
								$ca['Type'] = "PKG";
								$ca['Verification'] = "-N/A-";
								$content = setContent($content,$i,'software',$ca);
							}									
							else {
								echo "PSN: ".removeUnwantedWording($v)." (".$pdecode['TITLE_ID'].")".$crlf;
								$i = getNextKey(@$content['psn']);
								$ca['ID'] = $pdecode['TITLE_ID'];
								$ca['Title'] = removeUnwantedWording($v);
								$ca['Region'] = getCountryFromTitleID(substr($pdecode['TITLE_ID'],0,9));
								$ca['Type'] = "PSN";
								$ca['Verification'] = "PSN";
								$content = setContent($content,$i,'psn',$ca);
							}
							break;
					}
				}
			}
		} elseif ($dir == 'game' && preg_match("/^[A-Z0-9]{9}$/",$d['name']) && (!preg_match("/^B[A-Z0-9]{8}$/",$d['name']) || $d['name'] == "BLES80608")) {
			ob_start();
			$result = ftp_get($ftp, "php://output", "/".$disk."/".$dir."/".$d['name']."/PARAM.SFO", FTP_BINARY);
			$ps3sfo = ob_get_contents();
			ob_end_clean();
			$pdecode = readParamSFO($ps3sfo,1);
			// Check again against SFO TITLE_ID
			if (isBlacklisted(@$pdecode['TITLE_ID'])) {
				continue;
			}
			$v = preg_replace("/\n/"," ",$pdecode['TITLE']);
			echo "Software: ".removeUnwantedWording($v)." [".$pdecode['TITLE_ID']."]".$crlf;
			$i = getNextKey(@$content['software']);
			$ca['ID'] = $pdecode['TITLE_ID'];
			$ca['Title'] = removeUnwantedWording($v);
			$ca['Region'] = "-N/A-";
			$ca['Type'] = "PKG";
			$ca['Verification'] = "-N/A-";
			$content = setContent($content,$i,'software',$ca);			
		}	
	}
	return $content;
}

function setContent($c,$i,$t,$d) {
	global $override;
	$c[$t][$i] = $d;
	if (is_array(@$override[$t][$d['ID']])) {
		foreach ($override[$t][$d['ID']] as $k => $v) {
			$c[$t][$i][$k] = $v;
		}
	}
	return $c;
}
function sortByTitle($a, $b) {
	return strnatcasecmp($a['Title'], $b['Title']);
}

function processData($d,$s,$c=null) {
	global $crlf;
	$s .= " (".count($d)." total)";
	global $ascii_table;
	usort($d, 'sortByTitle');
	if (is_array($c)) {
		$width = 0;
		foreach ($c as $f) {
			$width = ($width + $f);
		}
		$width = $width + (count($c) * 3) - 1;
		$out = "+".str_repeat('-',$width)."+".$crlf;
		$out .= $ascii_table->make_table($d,$s,true,$c);
	} else {
		$out = $ascii_table->make_table($d,$s,true);
	}
	return $out."".$crlf;
}

function getNextKey($array) {
	if (is_array(@$array)) {
		return count($array);
	} else {
		return 0;
	}
}

function getTableTitle($k) {
	switch ($k) {
		case 'ps1':
			$title = "PLAYSTATION(R) 1 Games";
			break;
		case 'ps2':
			$title = "PLAYSTATION(R) 2 Games";
			break;
		case 'ps3':
			$title = "PLAYSTATION(R) 3 Games";
			break;
		case 'psp':
			$title = "PLAYSTATION(R) Portable Games";
			break;
		case 'psn':
			$title = "PLAYSTATION(R) Network Games";
			break;
		case 'software':
			$title = "PLAYSTATION(R) 3 Software";
			break;
		case 'dvd':
			$title = "DVD Video ISOs";
			break;
		case 'bd':
			$title = "Blu-ray Video ISOs";
			break;			
	}
	return $title;
}

function getTableWidth($c) {
	global $ascii_table;
	$cw = array();
	$cm = 0;
	foreach ($c as $k => $v) {
		$ascii_table->get_col_widths($c[$k]);
		$atcw = $ascii_table->col_widths;
		foreach ($atcw as $t) {
			if ($t > $cm) {
				$cm = $t;
				$cw = $atcw;
			}
		}
	}
	return $cw;
}


class ascii_table{
    public $col_widths = array();
    private $table_width = 0;
	private $crlf = "\n";
    public  $error = '';
	
    function __construct($init = "\n") {
        $this->crlf = $init;
    }	
	
    function make_table($array,$title='',$return=false,$col_widths = array()){
        $table = '';
		$this->table_width = 0;
		
		if (is_array($col_widths)) {
			$this->col_widths = $col_widths;
		} else {
			$this->col_widths = array();
			$this->get_col_widths($array);	
		}
		
        if($title!=''){
			$this->get_table_width();
            $table .= $this->make_title($title);
        }

        if(isset($array[0])){
            $table .= $this->make_divider();
            $table .= $this->make_headers();
            $table .= $this->make_divider();
            $table .= $this->make_rows($array);
            $table .= $this->make_divider();

        }
        if(is_string($return)){
            $save = @file_put_contents($return,$table);
            if($save){
                return true;
            }else{
                $this->error = 'Unable to save table to "'.$return.'".';
                return false;
            }
        }else{
            if($return){
                return $table;
            }else{
                echo $table;
            }
        }
    }

    static function len($col_value){
        return extension_loaded('mbstring') ? mb_strlen($col_value) : strlen($col_value);
    }
    function break_table($table){
        $load_file = @file_get_contents($table);
        if($load_file!==false){
            $table = $load_file;
        }
        $table = explode("".$this->crlf,trim($table));
        if(substr($table[0],0,1)!='+'){
            unset($table[0]);
            $table = array_values($table);
        }
        $array = array();
        $array_columns = array();
        $columns = explode('|',$table[1]);
        foreach($columns as $n => $value){
            if($n>0 && $n<count($columns)-1){
                if(trim($value)!=''){
                    $array_columns[$n] = trim($value);
                }else{
                    $array_columns[$n] = $n;
                }
            }
        }
        for($row=3;$row<count($table)-1;$row++){
            $row_items = explode('|',$table[$row]);
            foreach($array_columns as $pos => $column){
                $array[$row][$column] = trim($row_items[$pos]);
            }
        }
        $array = array_values($array);
        return $array;
    }

    function scrape_table($table,$key,$value=null){
        $table = $this->break_table($table);
        $array = array();
        foreach($table as $row => $data){
            if($value==null){
                $grabbed_value = $data[$key];
                $grabbed_key = $row;
            }else{
                $grabbed_key = $data[$key];
                $grabbed_value = $data[$value];
            }
            $array[$grabbed_key] = $grabbed_value;

        }
        return $array;
    }

    function get_col_widths($array){
        if(isset($array[0])){
            foreach(array_keys($array[0]) as $col){
					$this->col_widths[$col] = max(max(array_map(array($this,'len'), $this->arr_col($array, $col))), $this->len($col));
				
            }
        }
    }
    function arr_col($array,$col){
        if(is_callable('array_column')){
            return array_column($array,$col);
        }else{
            $return = array();
            foreach($array as $n => $dat){
                if(isset($dat[$col])){
                    $return[] = $dat[$col];
                }
            }
            return $return;
        }
    }
    function get_table_width(){
        $this->table_width = array_sum($this->col_widths);
        $this->table_width += count($this->col_widths)*2;
        $this->table_width += count($this->col_widths)+1;

    }

    function make_title($title){
        $title = trim($title);
        $lpadding = floor(($this->table_width-$this->len($title))/2) - 1;
		$rpadding = $lpadding;
		while ($this->len($title) + $lpadding + $rpadding + 2 < $this->table_width) {
			$rpadding++;
		}
        return "|".str_repeat(' ',max($lpadding,0)).$title.str_repeat(' ',max($rpadding,0))."|".$this->crlf;
    }

    function make_divider(){
        $divider = '+';
        foreach($this->col_widths as $col => $length){
            $divider .= str_repeat('-',$length+2).'+';
        }
        return $divider."".$this->crlf;
    }

    function make_headers(){
        $row = '|';
        foreach($this->col_widths as $col => $length){
            $row .= ' '.$col.' ';
            if($this->len($col)<$length){
                $row .= str_repeat(' ',$length-$this->len($col));
            }
            $row .= '|';
        }
        return $row."".$this->crlf;
    }

    function make_rows($array){
        $rows = '';
        foreach($array as $n => $data){
            $rows .= '|';
            foreach($data as $col => $value){
                $rows .= ' '.$value.' ';
                if($this->len($value)<$this->col_widths[$col]){
                    $rows .= str_repeat(' ', $this->col_widths[$col]-$this->len($value));
                }
                $rows .= '|';
            }
            $rows .= "".$this->crlf;
        }
        return $rows;
    }
}

function array_to_xml_custom( $data, &$xml_data , $i = 0) {
	if ($i == 0) {
		global $content_order;
		foreach ($content_order as $f) {
			if (@$data[$f]) {
				$ctmp = array();
				foreach ($data[$f] as $v) {
					$ctmp[] = $v;
				}
				unset($data[$f]);
				$data[$f]['name'] = getTableTitle($f);
				$data[$f]['content'] = $ctmp;
				unset($ctmp);
				$subnode = $xml_data->addChild($f);
				array_to_xml_custom($data[$f],$subnode,1);
			}
		}
		return;
	}
	
    foreach( $data as $key => $value ) {
        if( is_numeric($key) ){
            $key = 'item';
        }
        if( is_array($value) ) {
            $subnode = $xml_data->addChild($key);
            array_to_xml_custom($value, $subnode, ($i + 1));
        } else {
            $xml_data->addChild(strtolower($key),htmlspecialchars("$value"));
        }
     }
}

function exportToXML($data,$xsl = NULL) {
	if (strpos($xsl[1],"id=") <= 0) {
		$xsl[1] = preg_replace("/version\=/","id=\"stylesheet\" version=",$xsl[1]);
	}
	$xsl = implode("", $xsl);
	$xml_data = NULL;
	if ($xsl !== NULL) {
		$xml_data = new SimpleXMLElement('<?xml version="1.0"?><?xml-stylesheet type="text/xml" href="#stylesheet"?><!DOCTYPE platforms [<!ATTLIST xsl:stylesheet  id    ID  #REQUIRED>]><platforms>'.$xsl.'</platforms>');
	} else {
		$xml_data = new SimpleXMLElement('<?xml version="1.0"?><platforms></platforms>');
	}
	if ($xml_data !== NULL) {
		array_to_xml_custom($data,$xml_data);
		$dom = new DOMDocument("1.0");
		$dom->preserveWhiteSpace = false;
		$dom->formatOutput = true;
		$dom->loadXML($xml_data->asXML());
		return $dom->saveXML();
	} else {
		return NULL;
	}
}