~ubuntu-branches/ubuntu/natty/otrs2/natty-updates

« back to all changes in this revision

Viewing changes to Kernel/System/AuthSession.pm

  • Committer: Package Import Robot
  • Author(s): Torsten Werner
  • Date: 2007-04-14 17:58:55 UTC
  • mto: (20.1.1 squeeze)
  • mto: This revision was merged to the branch mainline in revision 6.
  • Revision ID: package-import@ubuntu.com-20070414175855-9ne0w01yu1q44ch0
Tags: upstream-2.1.7
ImportĀ upstreamĀ versionĀ 2.1.7

Show diffs side-by-side

added added

removed removed

Lines of Context:
1
1
# --
2
2
# Kernel/System/AuthSession.pm - provides session check and session data
3
 
# Copyright (C) 2001-2005 Martin Edenhofer <martin+code@otrs.org>
 
3
# Copyright (C) 2001-2006 OTRS GmbH, http://otrs.org/
4
4
# --
5
 
# $Id: AuthSession.pm,v 1.23 2005/07/28 19:58:28 martin Exp $
 
5
# $Id: AuthSession.pm,v 1.26 2006/08/29 17:30:35 martin Exp $
6
6
# --
7
7
# This software comes with ABSOLUTELY NO WARRANTY. For details, see
8
8
# the enclosed file COPYING for license information (GPL). If you
14
14
use strict;
15
15
 
16
16
use vars qw($VERSION);
17
 
$VERSION = '$Revision: 1.23 $';
 
17
$VERSION = '$Revision: 1.26 $';
18
18
$VERSION =~ s/^\$.*:\W(.*)\W.+?$/$1/;
19
19
 
20
20
 
97
97
    return $Self->{Backend}->CheckSessionID(%Param);
98
98
}
99
99
 
100
 
=item CheckSessionID()
 
100
=item CheckSessionIDMessage()
 
101
 
 
102
returns why CheckSessionID() returns false (e. g. invalid session id,
 
103
 different remote ip, ...)
 
104
 
 
105
  my $Message = $SessionObject->CheckSessionIDMessage();
 
106
 
 
107
=cut
 
108
 
 
109
sub CheckSessionIDMessage {
 
110
    my $Self = shift;
 
111
    my %Param = @_;
 
112
    return $Self->{Backend}->CheckSessionIDMessage(%Param);
 
113
}
 
114
 
 
115
=item GetSessionIDData()
101
116
 
102
117
get session data in a hash
103
118
 
251
266
 
252
267
=head1 VERSION
253
268
 
254
 
$Revision: 1.23 $ $Date: 2005/07/28 19:58:28 $
 
269
$Revision: 1.26 $ $Date: 2006/08/29 17:30:35 $
255
270
 
256
271
=cut