set_JAASAuthData.jacl

 



    global AdminConfig
    global AdminControl
    global AdminApp

    set security [$AdminConfig getid /Security:/]

    
    puts $security
    
     
    $AdminConfig create JAASAuthData $security { \
        {alias hostnameManager/opsAlias} \
        {password *****} \
        {userId ops} \
    } 
    
     
#    $AdminConfig create JAASAuthData $security { {alias hostnameManager/installAlias} \
#    {password *****} \
#    {userId root} } 
#     
#    $AdminConfig create JAASAuthData $security { {alias hostnameManager/buyerROAlias} \
#    {password *****} \
#    {userId b_DB_ro} } 
#     
#    $AdminConfig create JAASAuthData $security { {alias hostnameManager/buyerRWAlias} \
#    {password *****} \
#    {userId b_DB} } 
#     
#    $AdminConfig create JAASAuthData $security { {alias hostnameManager/hubRWAlias} \
#    {password *****} \
#    {userId h_DB} } 
#     
#    $AdminConfig create JAASAuthData $security { {alias hostnameManager/sellerROAlias} \
#    {password *****} \
#    {userId s_DB_ro} } 
#     
#    $AdminConfig create JAASAuthData $security { {alias hostnameManager/sellerRWAlias} \
#    {password *****} \
#    {userId s_DB} } 
#     
#    $AdminConfig create JAASAuthData $security { {alias hostnameManager/truAlias} \
#    {password *****} \
#    {userId edw} } 
#     
#    $AdminConfig create JAASAuthData $security { {alias hostnameManager/lawsonAlias} \
#    {password *****} \
#    {userId lawson} } 
#     
#    $AdminConfig create JAASAuthData $security { {alias hostnameManager/db2prodAlias} \
#    {password *****} \
#    {userId db2prod} } 


$AdminConfig save


set cells [$AdminConfig list Cell]

foreach cell $cells {
     set cname [$AdminConfig showAttribute $cell name]
     set nodes [$AdminConfig list Node $cell]

     puts " "
     puts "Cell: $cname         "

     foreach node $nodes {

        set nname [$AdminConfig showAttribute $node name]
        puts " "
        puts "Node: $nname            "

        puts "Checking for the existence of a NodeSync MBean on node $nname"
        set nodeSync [$AdminControl completeObjectName type=NodeSync,node=$nname,*]

        if {[llength $nodeSync] == 0} {
           puts "NodeSync MBean not found for name $nname"
           continue 
        }

        puts "Invoking synchronization for node $nodeSync"
        $AdminControl invoke $nodeSync sync
        puts "Done with synchronization."
     }
  }