# DCltfs.ctl:369:Collects StorageTek Linear Tape File System Information # $Id: DCltfs.ctl,v 1.5 2015/07/03 12:04:44 RDA Exp $ # ARCS: $Header: /home/cvs/cvs/RDA_8/src/scripting/lib/collect/OFM/DCltfs.ctl,v 1.5 2015/07/03 12:04:44 RDA Exp $ # # Change History # 20150703 MSC Improve the documentation. =head1 NAME OFM:DCltfs - Collects StorageTek Linear Tape File System Information =head1 DESCRIPTION This module collects StorageTek Linear Tape File System-related information. The following reports can be generated and are regrouped under C: =head1 REPORTS =cut echo tput('bold'),'Processing OFM.LTFS module ...',tput('off') # Initialization var $TAIL = ${DFT.N_TAIL:1000} var $TOC = '%TOC%' var $TOP = '[[#Top][Back to top]]' pretoc '1:StorageTek Linear Tape File System' # Load the common macros run RDA:library() =head2 Installation Log Files Gathers StorageTek Linear Tape File System-related installation log files from the F directory structure. =cut debug ' Inside LTFS module, gathering install log files' pretoc '2:Installation Log Files' call sort_files(3,$TAIL,grepDir('/var/log/LTFSLE/Install','^\.+$','drv')) unpretoc =head2 Log Files Gathers StorageTek Linear Tape File System-related log files from the F directory structure. =cut # Macro to get the logs macro get_logs {var (\@log,$dir,$pat) = @arg # Analyze the directory loop $nam (grepDir($dir,'^\.+$','nv')) {next match($nam,$pat,true) var $pth = catFile($dir,$nam) if ?testDir('d',$pth) call push(@sub,$pth) elsif and(testFile('frT',$pth),match($pth,'\.log$',true)) call push(@log,$pth) } # Treat the subdirectories loop $sub (@sub) call get_logs(\@log,$sub) } debug ' Inside LTFS module, gathering log files' pretoc '2:Log Files' var @log = () call get_logs(\@log,'/var/log/LTFSLE','^Install$') call sort_files(3,$TAIL,@log) unpretoc =head2 Oracle WebLogic Server Domain Information It includes all reports produced by the L module for the specified Oracle WebLogic Server domain. =cut toc '%PUSH("%SPLIT%")%' toc '%PUSH("1+:Oracle WebLogic Server Overview")%' toc '%INCLUDE("OFM_WREQ_OFM_LTFS_WH_TF.toc")%' toc '%POP2%' toc '%PUSH("%SPLIT%")%' toc '%PUSH("1+:Oracle WebLogic Server Domain")%' toc '%INCLUDE("OFM_WREQ_OFM_LTFS_DOM_TF.toc")%' toc '%POP2%' unpretoc =head1 SEE ALSO L, L =begin credits =over 10 =item RDA 4.30: Atiq Ahamad, Jeffrey Salleh, Brian Zents, Michael Zhou. =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