1
# -*- Mode: perl; indent-tabs-mode: nil -*-
3
# The contents of this file are subject to the Mozilla Public
4
# License Version 1.1 (the "License"); you may not use this file
5
# except in compliance with the License. You may obtain a copy of
6
# the License at http://www.mozilla.org/MPL/
8
# Software distributed under the License is distributed on an "AS
9
# IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or
10
# implied. See the License for the specific language governing
11
# rights and limitations under the License.
13
# The Original Code is the Bugzilla Bug Tracking System.
15
# The Initial Developer of the Original Code is Netscape Communications
16
# Corporation. Portions created by Netscape are
17
# Copyright (C) 1998 Netscape Communications Corporation. All
20
# Contributor(s): Erik Stambaugh <erik@dasbistro.com>
21
# Max Kanat-Alexander <mkanat@bugzilla.org>
23
package Bugzilla::Auth::Login::Env;
25
use base qw(Bugzilla::Auth::Login);
27
use Bugzilla::Constants;
30
use constant can_logout => 0;
31
use constant can_login => 0;
32
use constant requires_verification => 0;
36
my $dbh = Bugzilla->dbh;
38
my $env_id = $ENV{Bugzilla->params->{"auth_env_id"}} || '';
39
my $env_email = $ENV{Bugzilla->params->{"auth_env_email"}} || '';
40
my $env_realname = $ENV{Bugzilla->params->{"auth_env_realname"}} || '';
42
return { failure => AUTH_NODATA } if !$env_email;
44
return { username => $env_email, extern_id => $env_id,
45
realname => $env_realname };
49
ThrowCodeError('env_no_email');