version 1.38, 2008/07/18 03:27:48
|
version 1.39, 2008/11/10 13:20:04
|
Line 28
|
Line 28
|
# |
# |
### |
### |
|
|
|
=head1 NAME |
|
|
|
Apache::lonupload - upload files into construction space |
|
|
|
=head1 SYNOPSIS |
|
|
|
Invoked by /etc/httpd/conf/srm.conf: |
|
|
|
<Location /adm/upload> |
|
PerlAccessHandler Apache::lonacc |
|
SetHandler perl-script |
|
PerlHandler Apache::lonupload |
|
ErrorDocument 403 /adm/login |
|
ErrorDocument 404 /adm/notfound.html |
|
ErrorDocument 406 /adm/unauthorized.html |
|
ErrorDocument 500 /adm/errorhandler |
|
</Location> |
|
|
|
=head1 INTRODUCTION |
|
|
|
This module uploads a file sitting on a client computer into |
|
library server construction space. |
|
|
|
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 * |
|
|
|
Initialize variables |
|
|
|
=item * |
|
|
|
Start page output |
|
|
|
=item * |
|
|
|
output relevant interface phase (phaseone or phasetwo or phasethree) |
|
|
|
=item * |
|
|
|
(phase one is to specify upload file; phase two is to handle conditions |
|
subsequent to specification--like overwriting an existing file; phase three |
|
is to handle processing of secondary uploads - of embedded objects in an |
|
html file). |
|
|
|
=back |
|
|
|
=head1 OTHER SUBROUTINES |
|
|
|
=over 4 |
|
|
|
=item * |
|
|
|
phaseone() : Interface for specifying file to upload. |
|
|
|
=item * |
|
|
|
phasetwo() : Interface for handling post-conditions about uploading (such |
|
as overwriting an existing file). |
|
|
|
=item * |
|
|
|
phasethree() : Interface for handling secondary uploads of embedded objects |
|
in an html file. |
|
|
|
=item * |
|
|
|
upfile_store() : Store contents of uploaded file into temporary space. Invoked |
|
by phaseone subroutine. |
|
|
|
=item * |
|
|
|
check_extension() : Checks if filename extension is permitted and checks type |
|
of file - if html file, calls parser to check for embedded objects. |
|
Invoked by phasetwo subroutine. |
|
|
|
=back |
|
|
|
=cut |
|
|
package Apache::lonupload; |
package Apache::lonupload; |
|
|
use strict; |
use strict; |
Line 377 function verifyForm() {
|
Line 463 function verifyForm() {
|
1; |
1; |
__END__ |
__END__ |
|
|
=head1 NAME |
|
|
|
Apache::lonupload - upload files into construction space |
|
|
|
=head1 SYNOPSIS |
|
|
|
Invoked by /etc/httpd/conf/srm.conf: |
|
|
|
<Location /adm/upload> |
|
PerlAccessHandler Apache::lonacc |
|
SetHandler perl-script |
|
PerlHandler Apache::lonupload |
|
ErrorDocument 403 /adm/login |
|
ErrorDocument 404 /adm/notfound.html |
|
ErrorDocument 406 /adm/unauthorized.html |
|
ErrorDocument 500 /adm/errorhandler |
|
</Location> |
|
|
|
=head1 INTRODUCTION |
|
|
|
This module uploads a file sitting on a client computer into |
|
library server construction space. |
|
|
|
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 * |
|
|
|
Initialize variables |
|
|
|
=item * |
|
|
|
Start page output |
|
|
|
=item * |
|
|
|
output relevant interface phase (phaseone or phasetwo or phasethree) |
|
|
|
=item * |
|
|
|
(phase one is to specify upload file; phase two is to handle conditions |
|
subsequent to specification--like overwriting an existing file; phase three |
|
is to handle processing of secondary uploads - of embedded objects in an |
|
html file). |
|
|
|
=back |
|
|
|
=head1 OTHER SUBROUTINES |
|
|
|
=over 4 |
|
|
|
=item * |
|
|
|
phaseone() : Interface for specifying file to upload. |
|
|
|
=item * |
|
|
|
phasetwo() : Interface for handling post-conditions about uploading (such |
|
as overwriting an existing file). |
|
|
|
=item * |
|
|
|
phasethree() : Interface for handling secondary uploads of embedded objects |
|
in an html file. |
|
|
|
=item * |
|
|
|
upfile_store() : Store contents of uploaded file into temporary space. Invoked |
|
by phaseone subroutine. |
|
|
|
=item * |
|
|
|
check_extension() : Checks if filename extension is permitted and checks type |
|
of file - if html file, calls parser to check for embedded objects. |
|
Invoked by phasetwo subroutine. |
|
|
|
=back |
|
|
|
=cut |
|