Lines Matching refs:principal
8 # 1. Check that password is not the principal name
10 # 3. Check that password isn't repeated for this principal
50 my $principal = shift;
53 if ($principal eq $passwd) {
61 my $principal = shift;
69 $md5context->add($principal, ":", $passwd);
97 die "missing principal" if (!defined $params{'principal'});
102 $reason = check_basic($params{'principal'}, $params{'new-password'});
108 $reason = check_repeat($params{'principal'}, $params{'new-password'});