Edited view/sv/profile-hide-friends.tpl via GitHub

[friendica.git] / include / Contact.php

diff --git a/include/Contact.php b/include/Contact.php
index 3c41f7650803174fd86ef5ab04bf01a3f92661f7..7cac3c0e0ca9a3b555b1569a1bb05d0461ddc418 100644 (file)
--- a/include/Contact.php
+++ b/include/Contact.php
@@ -1,6 +1,31 @@
 <?php
 
 
+// Included here for completeness, but this is a very dangerous operation.
+// It is the caller's responsibility to confirm the requestor's intent and
+// authorisation to do this.
+
+function user_remove($uid) {
+       if(! $uid)
+               return;
+       $a = get_app();
+       logger('Removing user: ' . $uid);
+       q("DELETE FROM `contact` WHERE `uid` = %d", intval($uid));
+       q("DELETE FROM `group` WHERE `uid` = %d", intval($uid));
+       q("DELETE FROM `group_member` WHERE `uid` = %d", intval($uid));
+       q("DELETE FROM `intro` WHERE `uid` = %d", intval($uid));
+       q("DELETE FROM `item` WHERE `uid` = %d", intval($uid));
+       q("DELETE FROM `mail` WHERE `uid` = %d", intval($uid));
+       q("DELETE FROM `photo` WHERE `uid` = %d", intval($uid));
+       q("DELETE FROM `profile` WHERE `uid` = %d", intval($uid));
+       q("DELETE FROM `profile_check` WHERE `uid` = %d", intval($uid));
+       q("DELETE FROM `user` WHERE `uid` = %d", intval($uid));
+       if($uid == local_user()) {
+               unset($_SESSION['authenticated']);
+               unset($_SESSION['uid']);
+               goaway($a->get_baseurl());
+       }
+}
 
 
 function contact_remove($id) {
@@ -13,6 +38,9 @@ function contact_remove($id) {
        q("DELETE FROM `photo` WHERE `contact-id` = %d ",
                intval($id)
        );
+       q("DELETE FROM `mail` WHERE `contact-id` = %d ",
+               intval($id)
+       );
 }
 
 
@@ -46,7 +74,7 @@ function mark_for_death($contact) {
 if(! function_exists('unmark_for_death')) {
 function unmark_for_death($contact) {
        // It's a miracle. Our dead contact has inexplicably come back to life.
-       q("UPDATE `contact` SET `term-date = '%s' WHERE `id` = %d LIMIT 1",
+       q("UPDATE `contact` SET `term-date` = '%s' WHERE `id` = %d LIMIT 1",
                dbesc('0000-00-00 00:00:00'),
                intval($contact['id'])
        );