summaryrefslogtreecommitdiffstats
path: root/app/model/deleteaccount.php
diff options
context:
space:
mode:
authorMalf Furious <m@lfurio.us>2018-10-27 18:28:22 -0400
committerMalf Furious <m@lfurio.us>2018-10-27 18:28:22 -0400
commit0421aa1b60f4fe6bf140888159c58059c1013588 (patch)
treec3285276f6c53b6789e2f6dc82cb3b0fd17b38a4 /app/model/deleteaccount.php
parent495157341d60522084dcc9f6219877b6ba497312 (diff)
parent6512655aee73d3d295daa4de0e4ef25c08cfec9e (diff)
downloadscrott-0421aa1b60f4fe6bf140888159c58059c1013588.tar.gz
scrott-0421aa1b60f4fe6bf140888159c58059c1013588.zip
Merge branch 'rel/v0.1'v0.1
Diffstat (limited to 'app/model/deleteaccount.php')
-rw-r--r--app/model/deleteaccount.php51
1 files changed, 51 insertions, 0 deletions
diff --git a/app/model/deleteaccount.php b/app/model/deleteaccount.php
new file mode 100644
index 0000000..d83537e
--- /dev/null
+++ b/app/model/deleteaccount.php
@@ -0,0 +1,51 @@
+<?php
+
+/*
+ * SCROTT IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
+ * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
+ * MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT.
+ * IN NO EVENT SHALL THE AUTHORS BE LIABLE FOR ANY CLAIM, DAMAGES OR
+ * OTHER LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE,
+ * ARISING FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR
+ * OTHER DEALINGS IN THE SOFTWARE.
+ *
+ * For more information, please refer to UNLICENSE
+ */
+
+require_once "class/form.class.php";
+require_once "class/user.class.php";
+
+/*
+ * Action: deleteaccount - Remove one's own user account
+ */
+if (isAction("deleteaccount"))
+{
+ $form = new form();
+ $form->text("passwd", false);
+
+ if (!$form->populate(input()))
+ return;
+
+ if (!($user = user::getCurrent()))
+ {
+ logError(ERROR, "You must be logged in to close your account");
+ return;
+ }
+
+ if (!$user->validatePasswd($form->passwd))
+ {
+ logError(WARNING, "Account not deleted, password was incorrect");
+ return;
+ }
+
+ if ($user->admin == 1 && count(user::getAllAdmin_ordByUname()) == 1)
+ {
+ logError(ERROR, "Account not deleted, can not remove the last administrator");
+ return;
+ }
+
+ $user->delObj();
+ location("/");
+}
+
+?>