- my( $self, $r, $username, $password ) = @_;
-
- unless ( _is_valid_user($username, $password) ) {
- warn "failed auth $username from ". $r->connection->remote_ip. "\n";
- return undef;
- }
-
- warn "authenticated $username from ". $r->connection->remote_ip. "\n";
- adminsuidsetup($username);
+ my( $self, $r, $username, $password, $totp_code ) = @_;