###
### 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 
}