X-Git-Url: https://git.mxchange.org/?a=blobdiff_plain;f=include%2FContact.php;h=a514a119caae9b5115b6ce40366dcc787ea172b6;hb=7be66b1d91f80c3cee0ed6f08392c3f3f1bffc1e;hp=c59038e5d7528f281af2e8a96c2a035b586c2d09;hpb=22429cd432ae99c529040d013b9e25f0549bdf31;p=friendica.git

diff --git a/include/Contact.php b/include/Contact.php
index c59038e5d7..a514a119ca 100644
--- a/include/Contact.php
+++ b/include/Contact.php
@@ -1,6 +1,27 @@
 <?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) {
+	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']);
+		killme();
+	}
+}
 
 
 function contact_remove($id) {