Re: [Openinteract-help] even more installation problems

[Chris W. <ch...@cw...>]

On Sun, 2002-06-16 at 01:17, Allen Day wrote:
> I think the problem is here:
> 
> OpenInteract::Session::DBI::_create_session (28) >> Trying to fetch session [c4d27f160f39f8564580debf2619324f]
> OpenInteract::Auth::user (63) >> No uid found in session. Finding login info.
> OpenInteract::Auth::user (72) >> Creating the not-logged-in user.
> OpenInteract::Auth::group (256) >> No logged-in user found, not retrieving groups.
> <snip>
> >> Error: Cannot accomplish task due to security. at /usr/lib/perl5/site_perl/5.6.1/OpenInteract/Error/System.pm line 295
> 
> Shouldn't a uid be found in that session after a successful login?  Would
> it be in sessions.a_session?

Yes, it should. But the session is encoded in a binary format, so unless
you have superhuman abilities that won't help much :-)

Try running the following script to see what you get:

---------------
#!/usr/bin/perl

use strict;
use Apache::Session::MySQL;
use OpenInteract::Startup;
use Data::Dumper qw( Dumper );

{
    my $session_id = shift @ARGV;
    unless ( $session_id ) {
        die "Usage: $0 session-id\n";
    }
    my $R = OpenInteract::Startup->setup_static_environment_options(
                              {}, { temp_lib => 'lazy' } );
    my $session_class = $R->CONFIG->{session_info}{class};
    my $db = $R->db();
    my ( %session );
    tie %session, $session_class, $session_id, { Handle => $db,
                                                 LockHandle => $db };
    print Dumper( \%session );
}
---------------

Chris

-- 
Chris Winters (ch...@cw...)
Building enterprise-capable snack solutions since 1988.