From 0d78deef42cd1e5d461d98d2acefd4266d323046 Mon Sep 17 00:00:00 2001
From: default <nobody@localhost>
Date: Sun, 22 Oct 2023 09:00:37 +0200
Subject: New function deluser(), to delete a user.

Only unfollows by now.
---
 utils.c | 26 ++++++++++++++++++++++++++
 1 file changed, 26 insertions(+)

(limited to 'utils.c')

diff --git a/utils.c b/utils.c
index 21922d1..74058aa 100644
--- a/utils.c
+++ b/utils.c
@@ -337,3 +337,29 @@ int resetpwd(snac *snac)
 
     return ret;
 }
+
+
+int deluser(snac *user)
+/* deletes a user */
+{
+    int ret = 0;
+    xs *fwers = following_list(user);
+    xs_list *p = fwers;
+    xs_str *v;
+
+    while (xs_list_iter(&p, &v)) {
+        xs *object = NULL;
+
+        if (valid_status(following_get(user, v, &object))) {
+            xs *msg = msg_undo(user, xs_dict_get(object, "object"));
+
+            following_del(user, v);
+
+            enqueue_output_by_actor(user, msg, v, 0);
+
+            printf("Unfollowing actor %s\n", v);
+        }
+    }
+
+    return ret;
+}
-- 
cgit v1.2.3