# MCinit.ctl:280: Collects init.d Scripts
# $Id: MCinit.ctl,v 1.3 2014/01/02 13:17:46 RDA Exp $
# ARCS: $Header: /home/cvs/cvs/RDA_8/src/scripting/lib/collect/EXPLORER/MCinit.ctl,v 1.3 2014/01/02 13:17:46 RDA Exp $
#
# Change History
# 20131220  JGS  Fix spell.

=head1 NAME

EXPLORER:MCinit - Collects init.d Scripts

=head1 DESCRIPTION

Collects scripts from F<init.d> directories.

=cut

use Mrc

# Initialization
var $VALIDATE = true
keep $VALIDATE

section begin

var $TOC = '%TOC%'
var $TOP = '[[#Top][Back to top]]'

run EXPLORER:XPLRlib('init')

# -----------------------------------------------------------------------------
# XPLR_init section
# -----------------------------------------------------------------------------

section XPLR_init

# Validate the execution context
if !${B_GLOBAL:true}
 return
call log_run('Processing INIT sections ...')

=for stopwords init

=head2 init - init.d Scripts

Collects the init.d scripts from the following directories:

=over 2

=item o F</etc/rc0.d>

=item o F</etc/rc1.d>

=item o F</etc/rc2.d>

=item o F</etc/rc3.d>

=item o F</etc/rcS.d>

=back

=cut

report init
title '---+!! init.d Scripts'
title $TOC
title '   * Links point to files that have been collected in their original \
            format. Opening them directly in your browser can present risks. \
            To prevent them, access the file outside the browser or use the \
            link to save them and use an adequate viewer.'
loop $sub ('rc0.d','rc1.d','rc2.d','rc3.d','rcS.d')
{var $dir = catDir('/etc',$sub)
 debug ' Inside INIT collection, collecting ',$dir,' files'
 prefix
 {write '---+ ',encode($dir)
  write '|*File Path*| *Size*|*Last Modified Date*|'
 }
 call do_collect_dir(concat('init/',$sub),$dir)
 if hasOutput(true)
  write $TOP
}
if isCreated(true)
 toc '2:[[',getFile(),'][rda_report][init.d Scripts]]'

=head1 SEE ALSO

L<EXPLORER:DCxplr|collect::EXPLORER:DCxplr>,
L<EXPLORER:XPLRlib|collect::EXPLORER:XPLRlib>

=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