diff --git a/mod/settings.php b/mod/settings.php index 0d519e5a0..24cb2a879 100644 --- a/mod/settings.php +++ b/mod/settings.php @@ -129,8 +129,8 @@ function settings_init(App $a) $tabs[] = [ 'label' => L10n::t('Export personal data'), - 'url' => 'uexport', - 'selected' => (($a->argc == 1) && ($a->argv[0] === 'uexport')?'active':''), + 'url' => 'settings/uexport', + 'selected' => (($a->argc > 1) && ($a->argv[1] === 'uexport')?'active':''), 'accesskey' => 'e', ]; diff --git a/src/Module/BaseSettingsModule.php b/src/Module/BaseSettingsModule.php index 4c9173db7..6945af8a5 100644 --- a/src/Module/BaseSettingsModule.php +++ b/src/Module/BaseSettingsModule.php @@ -87,8 +87,8 @@ class BaseSettingsModule extends BaseModule $tabs[] = [ 'label' => L10n::t('Export personal data'), - 'url' => 'uexport', - 'selected' => (($a->argc == 1) && ($a->argv[0] === 'uexport') ? 'active' : ''), + 'url' => 'settings/uexport', + 'selected' => (($a->argc > 1) && ($a->argv[1] === 'uexport') ? 'active' : ''), 'accesskey' => 'e', ]; diff --git a/src/Module/Settings/Uexport.php b/src/Module/Settings/Uexport.php new file mode 100644 index 000000000..c9cab9b21 --- /dev/null +++ b/src/Module/Settings/Uexport.php @@ -0,0 +1,204 @@ +get(2); + if ($args->getArgc() > 2) { + header("Content-type: application/json"); + header('Content-Disposition: attachment; filename="' . $a->user['nickname'] . '.' . $action . '"'); + switch ($action) { + case "backup": + SELF::uexport_all($a); + exit(); + break; + case "account": + SELF::uexport_account($a); + exit(); + break; + default: + exit(); + } + } + + /** + * options shown on "Export personal data" page + * list of array( 'link url', 'link text', 'help text' ) + */ + $options = [ + ['settings/uexport/account', L10n::t('Export account'), L10n::t('Export your account info and contacts. Use this to make a backup of your account and/or to move it to another server.')], + ['settings/uexport/backup', L10n::t('Export all'), L10n::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 \x28photos are not exported\x29")], + ]; + Hook::callAll('uexport_options', $options); + + $tpl = Renderer::getMarkupTemplate("uexport.tpl"); + return Renderer::replaceMacros($tpl, [ + '$title' => L10n::t('Export personal data'), + '$options' => $options + ]); + } + private function uexport_multirow($query) { + global $dbStructure; + + preg_match("/\s+from\s+`?([a-z\d_]+)`?/i", $query, $match); + $table = $match[1]; + + $result = []; + $r = q($query); + if (DBA::isResult($r)) { + foreach ($r as $rr) { + $p = []; + foreach ($rr as $k => $v) { + switch ($dbStructure[$table]['fields'][$k]['type']) { + case 'datetime': + $p[$k] = $v ?? DBA::NULL_DATETIME; + break; + default: + $p[$k] = $v; + break; + } + } + $result[] = $p; + } + } + return $result; + } + + private function uexport_row($query) { + global $dbStructure; + + preg_match("/\s+from\s+`?([a-z\d_]+)`?/i", $query, $match); + $table = $match[1]; + + $result = []; + $r = q($query); + if (DBA::isResult($r)) { + + foreach ($r as $rr) { + foreach ($rr as $k => $v) { + switch ($dbStructure[$table]['fields'][$k]['type']) { + case 'datetime': + $result[$k] = $v ?? DBA::NULL_DATETIME; + break; + default: + $result[$k] = $v; + break; + } + } + } + } + return $result; + } + + private function uexport_account($a) { + + echo "

in uexport_account

"; + $user = SELF::uexport_row( + sprintf("SELECT * FROM `user` WHERE `uid` = %d LIMIT 1", intval(local_user())) + ); + + $contact = SELF::uexport_multirow( + sprintf("SELECT * FROM `contact` WHERE `uid` = %d ", intval(local_user())) + ); + + + $profile = SELF::uexport_multirow( + sprintf("SELECT * FROM `profile` WHERE `uid` = %d ", intval(local_user())) + ); + + $photo = SELF::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 = SELF::uexport_multirow( + sprintf("SELECT * FROM `pconfig` WHERE uid = %d", intval(local_user())) + ); + + $group = SELF::uexport_multirow( + sprintf("SELECT * FROM `group` WHERE uid = %d", intval(local_user())) + ); + + $group_member = SELF::uexport_multirow( + sprintf("SELECT `group_member`.`gid`, `group_member`.`contact-id` FROM `group_member` INNER JOIN `group` ON `group`.`id` = `group_member`.`gid` WHERE `group`.`uid` = %d", intval(local_user())) + ); + + $output = [ + 'version' => FRIENDICA_VERSION, + 'schema' => DB_UPDATE_VERSION, + 'baseurl' => System::baseUrl(), + 'user' => $user, + 'contact' => $contact, + 'profile' => $profile, + 'photo' => $photo, + 'pconfig' => $pconfig, + 'group' => $group, + 'group_member' => $group_member, + ]; + + echo json_encode($output, JSON_PARTIAL_OUTPUT_ON_ERROR); + } + + /** + * echoes account data and items as separated json, one per line + * + * @param App $a + * @throws Exception + */ + private function uexport_all(App $a) { + + SELF::uexport_account($a); + echo "\n"; + + $total = 0; + $r = q("SELECT count(*) as `total` FROM `item` WHERE `uid` = %d ", + intval(local_user()) + ); + if (DBA::isResult($r)) { + $total = $r[0]['total']; + } + // chunk the output to avoid exhausting memory + + for ($x = 0; $x < $total; $x += 500) { + $r = q("SELECT * FROM `item` WHERE `uid` = %d LIMIT %d, %d", + intval(local_user()), + intval($x), + intval(500) + ); + + $output = ['item' => $r]; + echo json_encode($output, JSON_PARTIAL_OUTPUT_ON_ERROR). "\n"; + } + } +} diff --git a/static/routes.config.php b/static/routes.config.php index 841fd68f9..479ba07c7 100644 --- a/static/routes.config.php +++ b/static/routes.config.php @@ -203,6 +203,7 @@ return [ '/verify' => [Module\Settings\TwoFactor\Verify::class, [R::GET, R::POST]], ], '/delegation[/{action}/{user_id}]' => [Module\Settings\Delegation::class, [R::GET, R::POST]], + '/uexport[/{action}]' => [Module\Settings\Uexport::class, [R::GET, R::POST]], ], '/randprof' => [Module\RandomProfile::class, [R::GET]],