<?php

function uexport_init(App $a) {
	if (! local_user()) {
		killme();
	}

	require_once("mod/settings.php");
	settings_init($a);
}

/// @TODO Change space -> tab where wanted
function uexport_content(App $a) {

	if ($a->argc > 1) {
		header("Content-type: application/json");
		header('Content-Disposition: attachment; filename="'.$a->user['nickname'].'.'.$a->argv[1].'"');
		switch($a->argv[1]) {
			case "backup":
				uexport_all($a);
				killme();
				break;
			case "account":
				uexport_account($a);
				killme();
				break;
			default:
				killme();
		}
	}

	/**
	 * options shown on "Export personal data" page
	 * list of array( 'link url', 'link text', 'help text' )
	 */
	$options = array(
		array('uexport/account',t('Export account'),t('Export your account info and contacts. Use this to make a backup of your account and/or to move it to another server.')),
		array('uexport/backup',t('Export all'),t('Export your accout info, contacts and all your items as json. Could be a very big file, and could take a lot of time. Use this to make a full backup of your account (photos are not exported)')),
	);
	call_hooks('uexport_options', $options);

	$tpl = get_markup_template("uexport.tpl");
	return replace_macros($tpl, array(
		'$baseurl' => App::get_baseurl(),
		'$title' => t('Export personal data'),
		'$options' => $options
	));
}

function _uexport_multirow($query) {
	$result = array();
	$r = q($query);
	if (dbm::is_result($r)) {
		foreach ($r as $rr){
			$p = array();
			foreach ($rr as $k => $v) {
				$p[$k] = $v;
			}
			$result[] = $p;
		}
	}
	return $result;
}

function _uexport_row($query) {
	$result = array();
	$r = q($query);
	if (dbm::is_result($r)) {
		foreach ($r as $rr) {
			foreach ($rr as $k => $v) {
				$result[$k] = $v;
			}
		}
	}
	return $result;
}


function uexport_account($a){

	$user = _uexport_row(
		sprintf( "SELECT * FROM `user` WHERE `uid` = %d LIMIT 1", intval(local_user()) )
	);

	$contact = _uexport_multirow(
		sprintf( "SELECT * FROM `contact` WHERE `uid` = %d ",intval(local_user()) )
	);


	$profile =_uexport_multirow(
		sprintf( "SELECT * FROM `profile` WHERE `uid` = %d ", intval(local_user()) )
	);

	$photo = _uexport_multirow(
		sprintf( "SELECT * FROM `photo` WHERE uid = %d AND profile = 1", intval(local_user()) )
	);
	foreach ($photo as &$p) {
		$p['data'] = bin2hex($p['data']);
	}

	$pconfig = _uexport_multirow(
		sprintf( "SELECT * FROM `pconfig` WHERE uid = %d",intval(local_user()) )
	);

	$group = _uexport_multirow(
		sprintf( "SELECT * FROM `group` WHERE uid = %d",intval(local_user()) )
	);

	$group_member = _uexport_multirow(
		sprintf( "SELECT * FROM `group_member` WHERE uid = %d",intval(local_user()) )
	);

	$output = array(
		'version' => FRIENDICA_VERSION,
		'schema' => DB_UPDATE_VERSION,
		'baseurl' => App::get_baseurl(),
		'user' => $user,
		'contact' => $contact,
		'profile' => $profile,
		'photo' => $photo,
		'pconfig' => $pconfig,
		'group' => $group,
		'group_member' => $group_member,
	);

	//echo "<pre>"; var_dump(json_encode($output)); killme();
	echo json_encode($output);
}

/**
 * echoes account data and items as separated json, one per line
 */
function uexport_all(App $a) {

	uexport_account($a);
	echo "\n";

	$r = q("SELECT count(*) as `total` FROM `item` WHERE `uid` = %d ",
		intval(local_user())
	);
	if (dbm::is_result($r)) {
		$total = $r[0]['total'];
	}
	// chunk the output to avoid exhausting memory

	for ($x = 0; $x < $total; $x += 500) {
		$item = array();
		$r = q("SELECT * FROM `item` WHERE `uid` = %d LIMIT %d, %d",
			intval(local_user()),
			intval($x),
			intval(500)
		);
		/*if (dbm::is_result($r)) {
			foreach ($r as $rr)
				foreach ($rr as $k => $v)
					$item[][$k] = $v;
		}*/

		$output = array('item' => $r);
		echo json_encode($output)."\n";
	}
}