/******************************************************************************
* Copyright 1991-2006 by Quantum, Inc. All rights reserved.
* No part of this work may be reproduced or transmitted in any
* form or by any means, electronic or mechanical, including
* photocopying and recording, or by any information storage
* or retrieval system, except as may be expressly permitted by
* the 17 U.S.C. section 101, et. seq., or in writing by
* Quantum, Inc.
*******************************************************************************/
/******************************************************************************
* Name: reportSystemConfig.htm
* Purpose: System Configuration Report
* $Id: reportSystemConfig.htm 1.34.2.5 2007/08/15 14:03:44MDT Bill Gray (bgray) dev $
*******************************************************************************/
$isReportPopup = 1; // Set so we do not release the Service menu RAS Token when bringing up a report.
include ('common_user_inc.htm');
include ('IOB_inc.htm');
$date = get_date_and_time($user);
$formattedDate = strftime("%B %e, %Y", $date->timestamp);
$formattedTime = strftime("%k:%M", strtotime($date->month."/".$date->day."/".$date->year." ".$date->hour.":".$date->minute.":".$date->second));
$networkConfig = get_network_configuration_ipv4($user);
$productInfo = get_product_info($user);
error_log("Product Info = " . print_r($productInfo, true ));
$sortCriteria = new SortCriteria();
$sortCriteria->sortColumn = 3;
$sortCriteria->ascending = 1;
$sortCriteria->filterPattern = "*";
$drives = get_all_drives_ex($user, $sortCriteria);
$iobs = get_blades($user);
error_log("IO Blades = " . print_r($iobs, true ));
$sort = new SortCriteria();
$libs = get_logical_libraries($user, $sort);
$IPv6Enabled = is_ipv6_enabled();
$ipv6Addrs = get_all_ipv6_addresses();
error_log("ipv6Addrs = ". print_r($ipv6Addrs, true ) );
//$ipv6Addrs = array("2001::55:ee/64", "2001::55:3e/64", "2001::55:2e/64", "2001::55:1e/64", "2001::55:e9/64", "2001::55:e8/64", "2001::55:e7/64", "2001::55:e6/64", "2001::55:e5/64", "2001::55:e4/64", "2001::55:e3/64", "2001::55:e2/64", "2001::55:e1/64" );
// Try the GUI over ride first
$Brand = getenv(ADICLIBRARY_BRAND_GUI);
if( $Brand == "" )
$Brand = getenv(ADICLIBRARY_BRAND);
switch( $Brand )
{
case 'ibm':
$theSN = $productInfo->alternateId;
break;
case 'dell':
$theSN = $productInfo->serialnumber;
break;
case 'tandberg':
$theSN = $productInfo->serialnumber;
break;
case 'adic':
$theSN = $productInfo->serialnumber;
break;
case 'quantum':
$theSN = $productInfo->serialnumber;
break;
}
?>
System Information Report
include ('reportHeader.htm');
?>
foreach ($libs as $lib)
{
$sortCriteria = new SortCriteria();
$sortCriteria->filterColumn = 0;
$sortCriteria->ascending = true;
$libraryDrives = get_all_drives_by_library($user, $lib->guid, $sortCriteria, (int) 0, (int) MEDIA_TYPE_ANY);
$cpDrives = get_command_path_drives($user, $lib->guid);
$commandPath = "None";
$foundCommandPath = false;
foreach ($libraryDrives as $libraryDrive)
{
foreach ($cpDrives as $cpDrive)
{
if ($cpDrive == $libraryDrive->guid)
{
error_log("Command Path Drive interface type is :". print_r($libraryDrive->interfaceType,true) );
if ($libraryDrive->interfaceType == 'SCSI')
{
$commandPath = "SCSI ID ".$libraryDrive->scsiId;
}
else if (($libraryDrive->interfaceType == 'Fibre' || $libraryDrive->interfaceType == 'SAS' ) && $libraryDrive->wwnn)
{
$commandPath = "WWNN ".$libraryDrive->wwnn;
}
$foundCommandPath = true;
break;
}
}
if ($foundCommandPath) break;
}
if ($foundCommandPath == false)
{
// If we still have not found a control path and there is a blade in the system - then make the Cp the blade.
if( sizeof($iobs) != 0 )
{
// Has BLADES
$commandPath = "FC I/O Blade";
}
}
?>