# HCsunos.def: Solaris Specific Code
# $Id: HCsunos.def,v 1.11 2009/01/14 11:43:53 ldens Exp $
# ARCS: $Header: /u02/webapps/workbench/cvs/RDA_4/src/scripting/lib/modules/HCsunos.def,v 1.11 2009/01/14 11:43:53 ldens Exp $
#
# Change History
# 20090114  LDE  Change the copyright notice.

=head1 NAME

HCsunos - Sub Module Specific to the Solaris Operating System

=cut

# Make the module persistent
keep $KEEP_BLOCK,@SHARE_MACROS
var @SHARE_MACROS = ('get_df')

=head1 DESCRIPTION

This module determines the operating system version and its bit size.

The following macro is available:

=cut

import $OS_BIT,$OS_NAM,$OS_PLT,$OS_VER
var $OS_BIT = 32
var $OS_NAM = uname('s')
var $OS_PLT = 'Sun'
var $OS_VER = replace(uname('r'),'^5','2')
var $osm = field('\.',1,$OS_VER)
if expr('>=',$osm,7)
{var ($str) = command('isainfo -v')
 if match($str,'^64-bit')
  var $OS_BIT = 64
}

=head2 get_df($dir)

This macro returns the number of free KiB on the file system containing the
specified directory.

=cut

macro get_df
{var ($dir) = @arg
 var ($lin) = grepCommand(concat('df -k ',quote($dir,'x')),'\s\d+\%')
 var (undef,undef,undef,$siz) = split('\s+',$lin,5)
 return $siz
}

=head1 COPYRIGHT NOTICE

Copyright (c) 2002-2009, Oracle. All rights reserved.

=head1 TRADEMARK NOTICE

Oracle, JD Edwards, PeopleSoft, and Siebel are registered trademarks of Oracle
Corporation and/or its affiliates. Other names may be trademarks of their
respective owners.

=cut