user pref -> block remote wall posting

[friendica.git] / include / Contact.php

diff --git a/include/Contact.php b/include/Contact.php
index c59038e5d7528f281af2e8a96c2a035b586c2d09..4ca77d065175c58bc0f02d3b2f7239cc20fadb73 100644 (file)
--- a/include/Contact.php
+++ b/include/Contact.php
@@ -1,6 +1,33 @@
 <?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 `event` 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 `pconfig` 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 +40,12 @@ function contact_remove($id) {
        q("DELETE FROM `photo` WHERE `contact-id` = %d ",
                intval($id)
        );
+       q("DELETE FROM `mail` WHERE `contact-id` = %d ",
+               intval($id)
+       );
+       q("DELETE FROM `event` WHERE `cid` = %d ",
+               intval($id)
+       );
 }