用于CORBA命名服务组映射的Jython或JACL

Question

我正在使用IBM WebSphere 7.0。

我希望将CORBA命名服务组 EVERYONE映射到Cos Naming Write和Cos Naming Read角色。如何使用Jython或JACL实现这一点？请给出一些提示、代码片段或指向广泛的Jython文档的链接。

Answer 1

这并不是很安全，所以我假设您这样做是为了开发，或者是在某种防火墙后面。这个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 {}
    }
  }
}