This file is indexed.

/usr/share/perl5/Apache/Session/Sybase.pm is in libapache-session-perl 1.93-2ubuntu1.

This file is owned by root:root, with mode 0o644.

The actual contents of the file can be viewed below.

 1
 2
 3
 4
 5
 6
 7
 8
 9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
#############################################################################
#
# Apache::Session::Sybase
# Apache persistent user sessions in a Sybase database
# Copyright(c) 1998, 1999, 2000 Jeffrey William Baker (jwbaker@acm.org)
# Modified from Apache::Session::MySQL by Chris Winters (chris@cwinters.com)
# Distribute under the Perl License
#
############################################################################

package Apache::Session::Sybase;

use strict;
use vars qw( @ISA $VERSION );

use Apache::Session;
use Apache::Session::Lock::Null;
use Apache::Session::Store::Sybase;
use Apache::Session::Generate::MD5;
use Apache::Session::Serialize::Sybase;

$VERSION = '1.00';
@ISA     = qw( Apache::Session );

sub populate {
    my $self = shift;

    $self->{object_store} = new Apache::Session::Store::Sybase $self;
    $self->{lock_manager} = new Apache::Session::Lock::Null $self;
    $self->{generate}     = \&Apache::Session::Generate::MD5::generate;
    $self->{validate}     = \&Apache::Session::Generate::MD5::validate;
    $self->{serialize}    = \&Apache::Session::Serialize::Sybase::serialize;
    $self->{unserialize}  = \&Apache::Session::Serialize::Sybase::unserialize;

    return $self;
}

1;

=pod

=head1 NAME

Apache::Session::Sybase - An implementation of Apache::Session

=head1 SYNOPSIS

 use Apache::Session::Sybase;

 # if you want Apache::Session to open new DB handles:

 tie %hash, 'Apache::Session::Sybase', $id, {
    DataSource => 'dbi:Sybase:database=sessions;server=SYBASE',
    UserName   => $db_user,
    Password   => $db_pass,
    Commit     => 1,
 };

 # or, if your handle is already opened:

 tie %hash, 'Apache::Session::Sybase', $id, {
    Handle     => $dbh,
    Commit     => 0,    
 };

=head1 DESCRIPTION

This module is an implementation of Apache::Session.  It uses the
Sybase backing store and the Null locking scheme.  See the example,
and the documentation for Apache::Session::Store::Sybase (also for the
parameters that get passed to the backing store along with the schema
necessary to save the sessions) and Apache::Session::Lock::Null for
more details.

=head1 AUTHOR

This module was based on L<Apache::Session::MySQL> which was written
by Jeffrey William Baker <jwbaker@acm.org>; it was modified by Chris
Winters <chris@cwinters.com>.

=head1 SEE ALSO

L<Apache::Session>

=cut