그다지 안전하지 않으므로, 개발을 위해 또는 어떤 종류의 방화벽 뒤에 있다고 가정합니다. 이 Jacl 스 니펫은 원하는대로해야합니다.
# Loop over all role assignments
foreach roleAssignmentExt [$AdminConfig list RoleAssignmentExt] {
set role [$AdminConfig showAttribute $roleAssignmentExt role]
set roleName [$AdminConfig showAttribute $role roleName]
# Look for the interesting roles.
if {$roleName == "CosNamingWrite" || $roleName == "CosNamingRead"} {
# Create an assignment of Everyone isn't already assigned.
set everyoneRoles [$AdminConfig list EveryoneExt $roleAssignmentExt]
if {[string length $everyoneRoles] == 0} {
puts "Adding EveryoneExt to $roleAssignmentExt"
$AdminConfig create EveryoneExt $roleAssignmentExt {}
}
}
}
Thanx for advice. – coms