slon-project/slon
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Slon/Http/AdminServer: Allow deletion of users

Browse source
This commit is contained in:
Alec Murphy 2025-02-17 14:55:01 -05:00
parent fcc95d971b
commit 261c8454f5
2 changed files with 34 additions and 2 deletions
Download patch file Download diff file Expand all files Collapse all files

24
Slon/Http/AdminServer.HC
View file

@ -227,6 +227,25 @@ U0 @slon_admin_settings_instance_get(SlonHttpSession* session, U8* buf)
String.Append(buf, "<br><br><input type=submit value=Save></form>");
}
U0 @slon_admin_delete_account(SlonHttpSession* session)
{
SLON_SCRATCH_BUFFER_AND_REQUEST_JSON
if (!request_json->@("id"))
return;
I64 i;
JsonArray* accounts = db->a("accounts");
JsonObject* account = NULL;
for (i = 0; i < accounts->length; i++) {
account = accounts->o(i);
if (account && !StrICmp(request_json->@("id"), account->@("id"))) {
accounts->remove(i);
break;
}
}
@slon_db_save_to_disk;
@slon_http_send_json(session, SLON_EMPTY_JSON_OBJECT);
}
U0 @slon_admin_new_account(SlonHttpSession* session)
{
SLON_SCRATCH_BUFFER_AND_REQUEST_JSON
@ -276,6 +295,11 @@ U0 @slon_admin_server_get(SlonHttpSession* session)
return;
}
if (!StrICmp("/delete/account", @slon_http_request_path(session))) {
@slon_admin_delete_account(session);
return;
}
if (!StrICmp("/manage/accounts", @slon_http_request_path(session))) {
@slon_admin_manage_accounts(session);
return;