version 1.551, 2018/11/24 16:19:09
|
version 1.554, 2018/12/03 19:32:51
|
Line 176 my @installerrors = ("ok",
|
Line 176 my @installerrors = ("ok",
|
# shared ("Access to other domain's content by this domain") |
# shared ("Access to other domain's content by this domain") |
# enroll ("Enrollment in this domain's courses by others") |
# enroll ("Enrollment in this domain's courses by others") |
# coaurem ("Co-author roles for this domain's users elsewhere") |
# coaurem ("Co-author roles for this domain's users elsewhere") |
|
# othcoau ("Co-author roles in this domain for others") |
# domroles ("Domain roles in this domain assignable to others") |
# domroles ("Domain roles in this domain assignable to others") |
# catalog ("Course Catalog for this domain displayed elsewhere") |
# catalog ("Course Catalog for this domain displayed elsewhere") |
# reqcrs ("Requests for creation of courses in this domain by others") |
# reqcrs ("Requests for creation of courses in this domain by others") |
Line 235 my %trust = (
|
Line 236 my %trust = (
|
edit => {institutiononly => 1}, #not used currently |
edit => {institutiononly => 1}, #not used currently |
eget => {remote => 1, domroles => 1, enroll => 1}, #not used currently |
eget => {remote => 1, domroles => 1, enroll => 1}, #not used currently |
egetdom => {remote => 1, domroles => 1, enroll => 1, }, |
egetdom => {remote => 1, domroles => 1, enroll => 1, }, |
ekey => {}, #not used currently |
ekey => {anywhere => 1}, |
exit => {anywhere => 1}, |
exit => {anywhere => 1}, |
fetchuserfile => {remote => 1, enroll => 1}, |
fetchuserfile => {remote => 1, enroll => 1}, |
get => {remote => 1, domroles => 1, enroll => 1}, |
get => {remote => 1, domroles => 1, enroll => 1}, |
Line 300 my %trust = (
|
Line 301 my %trust = (
|
store => {remote => 1, enroll => 1, reqcrs => 1,}, |
store => {remote => 1, enroll => 1, reqcrs => 1,}, |
studentphoto => {remote => 1, enroll => 1}, |
studentphoto => {remote => 1, enroll => 1}, |
sub => {content => 1,}, |
sub => {content => 1,}, |
tmpdel => {anywhere => 1}, |
tmpdel => {institutiononly => 1}, |
tmpget => {anywhere => 1}, |
tmpget => {institutiononly => 1}, |
tmpput => {anywhere => 1}, |
tmpput => {remote => 1, othcoau => 1}, |
tokenauthuserfile => {anywhere => 1}, |
tokenauthuserfile => {anywhere => 1}, |
unsub => {content => 1,}, |
unsub => {content => 1,}, |
update => {shared => 1}, |
update => {shared => 1}, |
Line 832 sub PushFile {
|
Line 833 sub PushFile {
|
# hosts.tab ($filename eq host). |
# hosts.tab ($filename eq host). |
# domain.tab ($filename eq domain). |
# domain.tab ($filename eq domain). |
# dns_hosts.tab ($filename eq dns_host). |
# dns_hosts.tab ($filename eq dns_host). |
# dns_domain.tab ($filename eq dns_domain). |
# dns_domain.tab ($filename eq dns_domain). |
# loncapaCAcrl.pem ($filename eq loncapaCAcrl); |
# loncapaCAcrl.pem ($filename eq loncapaCAcrl). |
# Construct the destination filename or reject the request. |
# Construct the destination filename or reject the request. |
# |
# |
# lonManage is supposed to ensure this, however this session could be |
# lonManage is supposed to ensure this, however this session could be |
Line 5551 sub del_balcookie_handler {
|
Line 5552 sub del_balcookie_handler {
|
chomp($line); |
chomp($line); |
if ($line eq $clientname) { |
if ($line eq $clientname) { |
$dodelete = 1; |
$dodelete = 1; |
last; |
last; |
} |
} |
} |
} |
close($fh); |
close($fh); |
if ($dodelete) { |
if ($dodelete) { |
if (unlink("$execdir/$cookie.id")) { |
if (unlink("$execdir/$cookie.id")) { |
$deleted = 1; |
$deleted = 1; |