From 7342c7f0e19e15ab3c7ba2133a56393c15989f08 Mon Sep 17 00:00:00 2001
From: Janik Kleinhoff <ilbelkyr@shalture.org>
Date: Mon, 8 May 2017 02:06:38 +0000
Subject: Move users to DB

Summary:
This will automatically take care of migrating the users from
users.json; you may delete that file.

Note that this removes htpasswd support. We now store (hashed) user
passwords in the database.

See T19 for rationale.

Test Plan: Run this on a testnet for a while, try to break it.

Reviewers: ilbelkyr, #antispammeta

Reviewed By: ilbelkyr, #antispammeta

Tags: #antispammeta, #database

Differential Revision: https://dev.antispammeta.net/D2
---
 lib/ASM/DB/Result/User.pm | 34 ++++++++++++++++++++++++++++++++++
 1 file changed, 34 insertions(+)

(limited to 'lib/ASM/DB/Result')

diff --git a/lib/ASM/DB/Result/User.pm b/lib/ASM/DB/Result/User.pm
index 5e5d17c..675ccba 100644
--- a/lib/ASM/DB/Result/User.pm
+++ b/lib/ASM/DB/Result/User.pm
@@ -6,6 +6,8 @@ use warnings;
 
 use parent 'DBIx::Class::Core';
 
+use Authen::Passphrase::RejectAll;
+
 __PACKAGE__->load_components('InflateColumn::DateTime', 'PassphraseColumn');
 __PACKAGE__->table('users');
 __PACKAGE__->add_columns(
@@ -30,9 +32,41 @@ __PACKAGE__->add_columns(
         passphrase_check_method => 'check_password',
         is_nullable => 0,
     },
+    flag_secret => {
+        data_type   => 'boolean',
+        is_nullable => 0,
+        default_value => 0,
+    },
+    flag_hilights => {
+        data_type   => 'boolean',
+        is_nullable => 0,
+        default_value => 0,
+    },
+    flag_admin => {
+        data_type   => 'boolean',
+        is_nullable => 0,
+        default_value => 0,
+    },
+    flag_plugin => {
+        data_type   => 'boolean',
+        is_nullable => 0,
+        default_value => 0,
+    },
+    flag_debug => {
+        data_type   => 'boolean',
+        is_nullable => 0,
+        default_value => 0,
+    },
 );
 
 __PACKAGE__->set_primary_key('id');
 __PACKAGE__->add_unique_constraint(uniq_user_name => ['name']);
 
+sub new {
+    my $self = shift;
+    $_[0]{passphrase} //= Authen::Passphrase::RejectAll->new;
+
+    $self->SUPER::new(@_);
+}
+
 1;
-- 
cgit v1.2.3