158 lines
3.6 KiB
PHP
158 lines
3.6 KiB
PHP
<?php
|
|
|
|
use Friendica\App;
|
|
use Friendica\Core\System;
|
|
|
|
function uexport_init(App $a) {
|
|
if (!local_user()) {
|
|
killme();
|
|
}
|
|
|
|
require_once("mod/settings.php");
|
|
settings_init($a);
|
|
}
|
|
|
|
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)
|
|
);
|
|
|
|
$output = array('item' => $r);
|
|
echo json_encode($output) . "\n";
|
|
}
|
|
}
|