version 1.9, 2006/12/20 22:41:07
|
version 1.11, 2009/02/13 17:20:35
|
Line 1
|
Line 1
|
# The LearningOnline Network |
# The LearningOnline Network |
# Uploaded File Replication Manager |
# Uploaded File Replication Manager |
# |
# |
|
# $Id$ |
|
# |
# Copyright Michigan State University Board of Trustees |
# Copyright Michigan State University Board of Trustees |
# |
# |
# This file is part of the LearningOnline Network with CAPA (LON-CAPA). |
# This file is part of the LearningOnline Network with CAPA (LON-CAPA). |
Line 30 use strict;
|
Line 32 use strict;
|
use Apache::Constants qw(:common :http); |
use Apache::Constants qw(:common :http); |
use Apache::lonrep(); |
use Apache::lonrep(); |
use Apache::lonnet; |
use Apache::lonnet; |
use CGI::Cookie(); |
|
use LONCAPA(); |
use LONCAPA(); |
|
|
sub handler { |
sub handler { |
Line 59 sub handler {
|
Line 60 sub handler {
|
return OK; |
return OK; |
} |
} |
} |
} |
my %cookies=CGI::Cookie->parse($r->header_in('Cookie')); |
my $handle = &Apache::lonnet::check_for_valid_session($r); |
my $lonid=$cookies{'lonID'}; |
if ($handle) { |
if ($lonid) { |
$r->log_reason('Copying failed in lonuploadrep for '.$handle); |
$r->log_reason('Copying failed in lonuploadrep for '.$lonid->value); |
|
return HTTP_NOT_FOUND; |
return HTTP_NOT_FOUND; |
} else { |
} else { |
$r->log_reason('Copying failed in lonuploadrep for unknown user'); |
$r->log_reason('Copying failed in lonuploadrep for unknown user'); |