From: Chris W. <la...@us...> - 2005-02-25 00:03:14
|
Update of /cvsroot/openinteract/OpenInteract2/lib/Apache/OpenInteract2 In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv8503/Apache/OpenInteract2 Modified Files: HttpAuth.pm Log Message: simple log message updates Index: HttpAuth.pm =================================================================== RCS file: /cvsroot/openinteract/OpenInteract2/lib/Apache/OpenInteract2/HttpAuth.pm,v retrieving revision 1.9 retrieving revision 1.10 diff -C2 -d -r1.9 -r1.10 *** HttpAuth.pm 22 Feb 2004 04:41:48 -0000 1.9 --- HttpAuth.pm 25 Feb 2005 00:03:05 -0000 1.10 *************** *** 16,21 **** unless ( $r->some_auth_required ) { ! $log->error( "Asked to process authentication request ", ! "but no authentication configured" ); $r->log_reason( "No authentication has been configured" ); return FORBIDDEN; --- 16,21 ---- unless ( $r->some_auth_required ) { ! $log->warn( "Asked to process authentication request ", ! "but no authentication configured" ); $r->log_reason( "No authentication has been configured" ); return FORBIDDEN; *************** *** 26,37 **** # e.g., HTTP_UNAUTHORIZED if ( $res ) { ! $log->is_info && ! $log->info( "Got result [$res] from auth" ); return $res; } my $user_sent = $r->connection->user; ! $log->is_debug && ! $log->debug( "Trying to authenticate [$user_sent]" ); unless ( $user_sent ) { return AUTH_REQUIRED; --- 26,35 ---- # e.g., HTTP_UNAUTHORIZED if ( $res ) { ! $log->is_debug && $log->debug( "Got result '$res' from auth" ); return $res; } my $user_sent = $r->connection->user; ! $log->is_debug && $log->debug( "Trying to authenticate '$user_sent'" ); unless ( $user_sent ) { return AUTH_REQUIRED; *************** *** 41,59 **** ->fetch_by_login_name( $user_sent, { skip_security => 1 } ); unless ( $user ) { ! $log->is_info && ! $log->info( "User [$user_sent] is not in OI" ); ! $r->log_reason( "User [$user_sent] is not in OI" ); return AUTH_REQUIRED; } unless ( $user->check_password( $password_sent ) ) { ! $log->is_info && ! $log->info( "User [$user->{login_name}] found but password ", ! "mismatch" ); ! $r->log_reason( "User [$user->{login_name}] exists, but password ", ! "does not match" ); return AUTH_REQUIRED; } ! $log->is_debug && ! $log->debug( "User [$user->{login_name}] auth ok" ); $r->pnotes( 'login_user', $user ); return OK; --- 39,54 ---- ->fetch_by_login_name( $user_sent, { skip_security => 1 } ); unless ( $user ) { ! my $msg = "User '$user_sent' is not an OpenInteract user."; ! $log->is_info && $log->info( $msg ); ! $r->log_reason( $msg ); return AUTH_REQUIRED; } unless ( $user->check_password( $password_sent ) ) { ! my $msg = "User '$user_sent' found but password does not match"; ! $log->is_info && $log->info( $msg ); ! $r->log_reason( $msg ); return AUTH_REQUIRED; } ! $log->is_debug && $log->debug( "User '$user_sent' auth ok" ); $r->pnotes( 'login_user', $user ); return OK; |