version 1.118, 2008/11/16 02:46:19
|
version 1.121, 2008/11/25 14:19:07
|
Line 27
|
Line 27
|
# |
# |
### |
### |
|
|
|
=head1 NAME |
|
|
|
Apache::lonacc - Cookie Based Access Handler |
|
|
|
=head1 SYNOPSIS |
|
|
|
Invoked (for various locations) by /etc/httpd/conf/srm.conf: |
|
|
|
PerlAccessHandler Apache::lonacc |
|
|
|
=head1 INTRODUCTION |
|
|
|
This module enables cookie based authentication and is used |
|
to control access for many different LON-CAPA URIs. |
|
|
|
Whenever the client sends the cookie back to the server, |
|
this cookie is handled by either lonacc.pm or loncacc.pm |
|
(see srm.conf for what is invoked when). If |
|
the cookie is missing or invalid, the user is re-challenged |
|
for login information. |
|
|
|
This is part of the LearningOnline Network with CAPA project |
|
described at http://www.lon-capa.org. |
|
|
|
=head1 HANDLER SUBROUTINE |
|
|
|
This routine is called by Apache and mod_perl. |
|
|
|
=over 4 |
|
|
|
=item * |
|
|
|
transfer profile into environment |
|
|
|
=item * |
|
|
|
load POST parameters |
|
|
|
=item * |
|
|
|
check access |
|
|
|
=item * |
|
|
|
if allowed, get symb, log, generate course statistics if applicable |
|
|
|
=item * |
|
|
|
otherwise return error |
|
|
|
=item * |
|
|
|
see if public resource |
|
|
|
=item * |
|
|
|
store attempted access |
|
|
|
=back |
|
|
|
=head1 NOTABLE SUBROUTINES |
|
|
|
=over |
|
|
|
=cut |
|
|
|
|
package Apache::lonacc; |
package Apache::lonacc; |
|
|
use strict; |
use strict; |
Line 155 sub get_posted_cgi {
|
Line 222 sub get_posted_cgi {
|
$r->headers_in->unset('Content-length'); |
$r->headers_in->unset('Content-length'); |
} |
} |
|
|
# |
=pod |
# Perform size checks for file uploads to essayresponse items in course context. |
|
# |
=item upload_size_allowed() |
# Add form.HWFILESIZE.$part_$id to %env with file size (MB) |
|
# If file exceeds maximum allowed size, add form.HWFILETOOBIG.$part_$id to %env. |
Perform size checks for file uploads to essayresponse items in course context. |
# |
|
|
Add form.HWFILESIZE.$part_$id to %env with file size (MB) |
|
If file exceeds maximum allowed size, add form.HWFILETOOBIG.$part_$id to %env. |
|
|
|
=cut |
|
|
sub upload_size_allowed { |
sub upload_size_allowed { |
my ($name,$size,$fname) = @_; |
my ($name,$size,$fname) = @_; |
Line 181 sub upload_size_allowed {
|
Line 252 sub upload_size_allowed {
|
return 'ok'; |
return 'ok'; |
} |
} |
|
|
# handle the case of the single sign on user, at this point $r->user |
=pod |
# will be set and valid now need to find the loncapa user info and possibly |
|
# balance them |
=item sso_login() |
# returns OK if it was a SSO and user was handled |
|
# undef if not SSO or no means to hanle the user |
handle the case of the single sign on user, at this point $r->user |
|
will be set and valid now need to find the loncapa user info and possibly |
|
balance them |
|
returns OK if it was a SSO and user was handled |
|
undef if not SSO or no means to hanle the user |
|
|
|
=cut |
|
|
sub sso_login { |
sub sso_login { |
my ($r,$handle) = @_; |
my ($r,$handle) = @_; |
Line 460 sub handler {
|
Line 537 sub handler {
|
1; |
1; |
__END__ |
__END__ |
|
|
=head1 NAME |
=pod |
|
|
Apache::lonacc - Cookie Based Access Handler |
|
|
|
=head1 SYNOPSIS |
|
|
|
Invoked (for various locations) by /etc/httpd/conf/srm.conf: |
|
|
|
PerlAccessHandler Apache::lonacc |
|
|
|
=head1 INTRODUCTION |
|
|
|
This module enables cookie based authentication and is used |
|
to control access for many different LON-CAPA URIs. |
|
|
|
Whenever the client sends the cookie back to the server, |
|
this cookie is handled by either lonacc.pm or loncacc.pm |
|
(see srm.conf for what is invoked when). If |
|
the cookie is missing or invalid, the user is re-challenged |
|
for login information. |
|
|
|
This is part of the LearningOnline Network with CAPA project |
|
described at http://www.lon-capa.org. |
|
|
|
=head1 HANDLER SUBROUTINE |
|
|
|
This routine is called by Apache and mod_perl. |
|
|
|
=over 4 |
|
|
|
=item * |
|
|
|
transfer profile into environment |
|
|
|
=item * |
|
|
|
load POST parameters |
|
|
|
=item * |
|
|
|
check access |
|
|
|
=item * |
|
|
|
if allowed, get symb, log, generate course statistics if applicable |
|
|
|
=item * |
|
|
|
otherwise return error |
|
|
|
=item * |
|
|
|
see if public resource |
|
|
|
=item * |
|
|
|
store attempted access |
|
|
|
=back |
=back |
|
|
=cut |
=cut |
|
|