aboutsummaryrefslogtreecommitdiff
path: root/perl/lib/Wallet/Admin.pm
diff options
context:
space:
mode:
authorJon Robertson <jonrober@stanford.edu>2015-02-07 13:59:34 -0800
committerJon Robertson <jonrober@stanford.edu>2015-06-08 15:24:34 -0700
commit55875aa020f31751f295ae6c07547fe2949c5e82 (patch)
treeeb176bde578b87b23fff239e3913a85d9cf7936f /perl/lib/Wallet/Admin.pm
parent0e16def8a9e12f9b2232b29da79cdacb6710b086 (diff)
Added a new password object type
The password type inherits almost everything from the file object, but if you try to get a password object that has never been stored, we generate a random string to put in the object rather than just erroring out. The maximum and minimum length of the string can be set in the wallet config. If a password object was stored earlier and then cleared out, we don't generate another random string. Change-Id: I17a65ca7dac9d4430e8a731f417297890ee612bb
Diffstat (limited to 'perl/lib/Wallet/Admin.pm')
-rw-r--r--perl/lib/Wallet/Admin.pm1
1 files changed, 1 insertions, 0 deletions
diff --git a/perl/lib/Wallet/Admin.pm b/perl/lib/Wallet/Admin.pm
index 8120e9c..a8b8368 100644
--- a/perl/lib/Wallet/Admin.pm
+++ b/perl/lib/Wallet/Admin.pm
@@ -131,6 +131,7 @@ sub default_data {
[ 'duo-radius', 'Wallet::Object::Duo::RadiusProxy' ],
[ 'duo-rdp', 'Wallet::Object::Duo::RDP' ],
[ 'file', 'Wallet::Object::File' ],
+ [ 'password', 'Wallet::Object::Password' ],
[ 'keytab', 'Wallet::Object::Keytab' ],
[ 'wa-keyring', 'Wallet::Object::WAKeyring' ]);
($r1) = $self->{schema}->resultset('Type')->populate (\@record);