From 6512655aee73d3d295daa4de0e4ef25c08cfec9e Mon Sep 17 00:00:00 2001
From: Malf Furious <m@lfurio.us>
Date: Sat, 27 Oct 2018 18:12:02 -0400
Subject: Rename examples/ directory

In preparation for the release, I'm renaming this directory since
'examples' is confusion and misleading.  Really this directory just
holds some old code that needs re-integrated, so I name it 'todo'.

Signed-off-by: Malf Furious <m@lfurio.us>
---
 todo/deleteacct.mod.php | 63 +++++++++++++++++++++++++++++++++++++++++++++++++
 1 file changed, 63 insertions(+)
 create mode 100644 todo/deleteacct.mod.php

(limited to 'todo/deleteacct.mod.php')

diff --git a/todo/deleteacct.mod.php b/todo/deleteacct.mod.php
new file mode 100644
index 0000000..0178c95
--- /dev/null
+++ b/todo/deleteacct.mod.php
@@ -0,0 +1,63 @@
+<?php
+
+/*
+ * SCROTT Copyright (C) 2016 Malf Furious
+ *
+ * Scrott is free software: you can redistribute it and/or modify
+ * it under the terms of the GNU General Public License as published
+ * by the Free Software Foundation, either version 3 of the License,
+ * or (at your option) any later version.
+ *
+ * Scrott is distributed in the hope that it will be useful, but
+ * WITHOUT ANY WARRANTY; even the implied warranty of MERCHANTABILITY
+ * or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU General Public
+ * License for more details.
+ */
+
+require_once "model/common.mod.php";
+require_once "class/form.class.php";
+require_once "class/user.class.php";
+
+class DeleteacctModel extends CommonModel
+{
+    /*
+     * Default action
+     */
+    function deflt()
+    {
+    }
+
+    /*
+     * Delete current user's account
+     */
+    function del($input)
+    {
+        $form = new Form();
+        $form->field_text("password", null, false);
+
+        if (!$form->populate($input))
+        {
+            $this->logFormErrors($form);
+            return;
+        }
+
+        $user = $this->getCurrentUser();
+
+        if (!$user->validatePassword($form->password))
+        {
+            $this->logError("Account not deleted - Password was incorrect");
+            return;
+        }
+
+        if ($user->admin && $user->getNumAdmins() == 1)
+        {
+            $this->logError("Account not deleted - Cannot remove the last admin account");
+            return;
+        }
+
+        $user->delObj();
+        $this->redirectTo($this->ar() . "/");
+    }
+}
+
+?>
-- 
cgit v1.2.3