# DCipm.cfg: Collects Oracle WebCenter Content: Imaging Information # $Id: DCipm.cfg,v 1.18 2015/05/09 14:57:40 RDA Exp $ # ARCS: $Header: /home/cvs/cvs/RDA_8/src/scripting/lib/collect/OFM/DCipm.cfg,v 1.18 2015/05/09 14:57:40 RDA Exp $ # # Copyright (c) 2002, 2016, Oracle and/or its affiliates. All rights reserved. # # Change history # 20150509 MSC Improve description consistency. ############################################################################### # Collect Oracle WebCenter Content: Imaging setup information ############################################################################### #------------------------------------------------------------------------------ # Module definition #------------------------------------------------------------------------------ col=${B_IN_USE} dsc='Collects Oracle WebCenter Content: Imaging Information' pre=OFM:DCecm req=?B_REQ_WREQ:OFM:DCwreq rpt=B_IN_USE tgt=${I_OHC/C} trg=?B_REQ_WREQ:OFM:DCwreq var=not_used # Flow:in_use,B_IN_USE,D_COMMON_DOMAIN_HOME exe=sdcl { "if ${GRP.INIT.I_OH} "{var ${I_OHC/T} = $itm = last " var $ORACLE_HOME = $itm->get_first('D_ORACLE_HOME') " keep $ORACLE_HOME "} "var ${B_REQ_WREQ/T} = undef "var @{AUX.var} = \ " cond(${AUX.N_DEPTH},list('D_COMMON_DOMAIN_HOME'),\ " ${PRF.B_TESTS},list('in_use'),\ " list('B_IN_USE')) " "macro is_valid_domain "{var ($nam,$dir) = @arg " require testDir('d',$dir),\ " 'The specified WebLogic Server domain directory does not exist.' " require isAbsolute($dir),\ " 'The specified WebLogic Server domain directory is not an absolute path.' " require grepFile(catFile($dir,'config','config.xml'),\ " '^',scalar(@dir = splitDir($dir)),1) "{loop $srv (findDir(catDir($dir,'servers'),'^[^\.]+$','n')) " {if ?testDir('d',catDir($dir,'servers',$srv,'logs')) " call push(@itm,$srv,$srv) " } " var ${T_TMP_NAM/T} = $nam = pop(@dir) " var @{T_TMP_ITM/T} = @itm " if ${PRF/N_OFM_LEVEL} " {var $cnt = scalar(@itm) " if or(expr('==',$cnt,2),\ " and(expr('==',$cnt,4),grep(@itm,'^AdminServer$','if'))) " {var ${AUX.lvl} = ${PRF/N_OFM_LEVEL} " call unshift(@{AUX.W_NEXT},'server_comment') " } " else " var ${AUX.bef} = "\nServer list for '${T_TMP_NAM}' - domain home \ " (in ${CTX.D_DOMAIN_HOME}):\n\ " Two or more managed servers have been discovered." " } " var ${I_DOMAIN:'Target associated with the domain'} = \ " nvl(findItem('DOM','D_DOMAIN_HOME',getShortPath($dir,true)),\ " defineTarget('DOM',{D_DOMAIN_ROOT=>$top = catNative(@dir,''),\ " T_DOMAIN_NAME=>$nam,\ " T_TITLE=>"Domain ${VAR.nam} (in ${VAR.top})"})) " var ${T_TOP_FOCUS:\ " 'Focus areas for Oracle WebLogic Server Middleware collection'} = \ " 'Generic,Manifest' " var ${T_DOM_FOCUS:\ " 'Focus areas for Oracle WebLogic Server domain collection'} = \ " 'ExtDomCfg,ExtSnmCfg,ExtSrvCfg,MinDomCfg,MinSrvCfg,NodDomCfg,NodDomLog,\ " OFM_IPM,SrvErr,WlstOn,WlstDomCfg,WlstDomClu,WlstDomRun,WlstDomSrv,\ " WlstSrvCfg,WlstSrvExp,WlstSrvImg,WlstSrvRun,WlstSrvThd' " var ${CTX.B_REQ_WREQ:\ " 'Does IPM require Oracle WebLogic request handler collection?'} = true "} } [server_comment] typ=C def='./WREQ_OFM_IPM_DOM' dsc='Report RDA has determined the server(s) to collect' inp="\nServer list for '${T_TMP_NAM}' - domain home (in ${CTX.D_DOMAIN_HOME}):\ \nWhen RDA discovers only one managed server and/or an AdminServer, \ server list selection is suppressed.\n\ RDA will target the server(s):\n\ ${T_TMP_SERVERS}" # stopwords AdminServer vis=false exe=sdcl { "var ($cnt,$str) = (0) "loop $srv (@{T_SERVERS}) " var $str = join("\n",$str,sprintf(" %d %s",incr($cnt),$srv)) "var ${T_TMP_SERVERS/T} = $str } #------------------------------------------------------------------------------ # Identify the user #------------------------------------------------------------------------------ [T_USER] typ=T def='./WREQ_OFM_IPM_DOM' dsc='Oracle WebLogic server user name' val=E exe=sdcl { "var $tgt = addTarget('DOM_Setup',{B_MISSING_COMMON=>true,\ " B_MISSING_HOME=>true,\ " B_MISSING_PRODUCT=>true,\ " B_MISSING_WL_HOME=>true,\ " D_DOMAIN_HOME=>${CTX.D_DOMAIN_HOME}}) "if length($usr = $tgt->get_attr('DOMAIN_USER')) "{var ${AUX.dft} = $usr " var ${AUX.clr} = '-' " var ${AUX.err} = 'User name should not contain spacing characters.' " var ${AUX.inp} = "Enter the user name for the Oracle WebLogic Server \ " connection. If a dash (${AUX.clr}) is specified as \ " input, default user name retrieved from '${T_TMP_NAM}' \ " domain configuration file is considered." " var ${AUX.lvl} = 6 " var ${AUX.ref} = '^\S*$' "} "else "{var ${AUX.err} = 'User name cannot be empty and should not contain spacing \ " characters.' " var ${AUX.inp} = "Enter the user name for the Oracle WebLogic Server \ " connection for '${T_TMP_NAM}' domain" " var ${AUX.ref} = '^\S+$' "} } #------------------------------------------------------------------------------ # Common setting definitions #------------------------------------------------------------------------------ [I_OHC] typ=I cls='OH' dsc='Target associated with the Oracle home' vis=false