###
### get_Security.jacl
###
###
### Generate JACL configuration code by reading
### from an existing configuration
###
### From xmi:type fields in resources.xml
###
###

proc get_Security {cname} {

global AdminConfig
global AdminControl

set securityid [$AdminConfig getid /Cell:$cname/Security:/]
set xyz [$AdminConfig showall $securityid]
puts $xyz

}


###
### Main
###

if { !($argc == 1) } {
   puts ""
   puts "Usage: "
   puts " "
   puts "wsadmin.sh -username system -password password -f get_Security.jacl cellname"
   puts " "
} else { 
   set xcell      [lindex $argv 0]  
   get_Security $xcell 
}