# DCasg.ctl:306:Collects Application Server Guard Information # $Id: DCasg.ctl,v 1.3 2013/10/30 07:18:32 RDA Exp $ # ARCS: $Header: /home/cvs/cvs/RDA_8/src/scripting/lib/collect/OFM/DCasg.ctl,v 1.3 2013/10/30 07:18:32 RDA Exp $ # # Change History # 20130422 MSC Improve the validation. =head1 NAME OFM:DCasg - Collects Application Server Guard Information =head1 DESCRIPTION This module collects the Application Server Guard-related information. The following reports can be generated and are regrouped under C: =head1 REPORTS =cut echo tput('bold'),'Processing OFM.ASG module ...',tput('off') # Initialization var $ORACLE_HOME = ${D_ORACLE_HOME/P:''} var $ASG_HOME = catDir($ORACLE_HOME,'dsa') var $TOC = '%TOC%' var $TOP = '[[#Top][Back to top]]' pretoc '1:AS Guard Information' # Load the common macros run RDA:library() =head2 Configuration Files Collects all files from the F directory. =cut debug ' Inside ASG module, gathering configuration files' pretoc '2:Configuration Files' call sort_files(3,0,catFile($ASG_HOME,'dsa.conf'),\ grepDir(catDir($ASG_HOME,'conf'),'.*','pn')) unpretoc =head2 Log Files Collects all files from the F directory. =cut debug ' Inside ASG module, gathering log files' pretoc '2:Log Files' if ?testDir('d',catDir($ASG_HOME,'log')) call sort_files(3,0,grepDir(lastDir(),'.*','pn')) unpretoc =head2 not_found - Not Found Used as a warning when none of the Application Server Guard information is found. =cut if !isTocCreated() {debug ' Inside ASG module, no file found' report not_found write 'No Application Server Guard information was found. This does not mean \ there was necessarily a problem with RDA, but it should be \ investigated.' toc '2:[[',getFile(),'][rda_report][Not Found]]' } =head1 SEE ALSO L =begin credits =over 10 =item RDA 4.10: Daniel Mortimer. =item RDA 4.10: Russell Hodgson. =back =end credits =head1 COPYRIGHT NOTICE Copyright (c) 2002, 2016, Oracle and/or its affiliates. All rights reserved. =head1 TRADEMARK NOTICE Oracle and Java are registered trademarks of Oracle and/or its affiliates. Other names may be trademarks of their respective owners. =cut