$value) { setcookie("currentpage[$key]", $value, $expire_time, '/'); } echo << $title EOS; if ($stylesheets) { foreach ($stylesheets as $s) { echo "\n"; } } if ($javascripts) { foreach ($javascripts as $j) { echo "\n"; } } echo "\n"; echo << EOS; //echo "
\n"; // end the top div } // end insertHeader // This is the data structure that represents the menu for each page. $MENU = array( 'machines' => array( 'label' => 'Machines', 'default' => 'groups', 'list' => array( 'lab' => array('label' => 'Lab Floor', 'url' => "$TOPDIR/machines/lab.php"), 'frames' => array('label' => 'Frames', 'url' => "$TOPDIR/machines/frames.php"), 'groups' => array('label' => 'Groups', 'url' => "$TOPDIR/machines/groups.php"), 'nodes' => array('label' => 'Nodes', 'url' => "$TOPDIR/machines/nodes.php"), 'layout' => array('label' => 'Layout', 'url' => "$TOPDIR/machines/layout.php"), ) ), 'manage' => array( 'label' => 'Manage', 'default' => 'dsh', 'list' => array( 'dsh' => array('label' => 'Run Cmds', 'url' => "$TOPDIR/manage/dsh.php"), 'copyfiles' => array('label' => 'Copy Files', 'url' => "$TOPDIR/manage/copyfiles.php"), 'cfm' => array('label' => 'Sync Files', 'url' => "$TOPDIR/manage/cfm.php"), 'hwctrl' => array('label' => 'HW Ctrl', 'url' => "$TOPDIR/manage/hwctrl.php"), 'diagnodes' => array('label' => 'Diagnose', 'url' => "$TOPDIR/manage/diagnodes.php"), ) ), 'jobs' => array( 'label' => 'Jobs', 'default' => 'overview', 'list' => array( 'overview' => array('label' => 'Overview', 'url' => "$TOPDIR/jobs/overview.php"), //todo: Vallard fill in rest ) ), 'deploy' => array( 'label' => 'Deploy', 'default' => 'osimages', 'list' => array( 'osimages' => array('label' => 'OS Images', 'url' => "$TOPDIR/deploy/osimages.php"), 'prepare' => array('label' => 'Prepare', 'url' => "$TOPDIR/deploy/prepare.php"), 'deploy' => array('label' => 'Deploy', 'url' => "$TOPDIR/deploy/deploy.php"), 'monitor' => array('label' => 'Monitor', 'url' => "$TOPDIR/deploy/monitor.php"), ) ), 'config' => array( 'label' => 'Configure', 'default' => 'site', 'list' => array( 'prefs' => array('label' => 'Preferences', 'url' => "$TOPDIR/config/prefs.php"), 'site' => array('label' => 'Cluster Settings', 'url' => "$TOPDIR/config/site.php"), 'mgmtnode' => array('label' => 'Mgmt Node', 'url' => "$TOPDIR/config/mgmtnode.php"), 'monitor' => array('label' => 'Monitor Setup', 'url' => "$TOPDIR/config/monitor.php"), 'eventlog' => array('label' => 'Event Log', 'url' => "$TOPDIR/config/eventlog.php"), ) ), 'support' => array( 'label' => 'Support', 'default' => 'diagnose', 'list' => array( 'diagnose' => array('label' => 'Diagnose', 'url' => "$TOPDIR/support/diagnose.php"), 'update' => array('label' => 'Update', 'url' => "$TOPDIR/support/update.php"), 'howtos' => array('label' => 'HowTos', 'url' => getDocURL('howto')), 'manpages' => array('label' => 'Man Pages', 'url' => getDocURL('manpage')), 'maillist' => array('label' => 'Mail List', 'url' => getDocURL('web','mailinglist')), 'wiki' => array('label' => 'Wiki', 'url' => getDocURL('web','wiki')), 'suggest' => array('label' => 'Suggestions', 'url' => "$TOPDIR/support/suggest.php"), 'about' => array('label' => 'About', 'url' => "$TOPDIR/support/about.php"), ) ), ); //----------------------------------------------------------------------------- // Insert the menus at the top of the page // $currents is an array of the current menu choice tree function insertMenus($currents) { global $TOPDIR; global $MENU; echo "\n"; insertMenuRow($currents[0], 1, $MENU); insertMenuRow($currents[1], 0, $MENU[$currents[0]]['list']); echo "
\n"; } //----------------------------------------------------------------------------- // Insert one set of choices under a main choice. function insertMenuRow($current, $isTop, $items) { global $TOPDIR; //$img = "$TOPDIR/images/h3bg_new.gif"; $menuRowClass = $isTop ? '' : 'class=MenuRowBottom'; $menuItemClass = $isTop ? 'class=MenuItemTop' : ''; $currentClass = $isTop ? 'class=CurrentMenuItemTop' : ''; //echo "\n"; //echo "
\n"; echo "
  • $label

  • "; } else { //echo "\n"; echo "
  • $label
  • "; } } //echo "\n"; //echo "\n"; echo "\n\n"; } //----------------------------------------------------------------------------- // Inserts the html for each pages footer function insertFooter() { echo ''; } //----------------------------------------------------------------------------- // Run a cmd via the xcat client/server protocol // args is an array of arguments to the cmd // Returns a tree of SimpleXML objects. See perl-xCAT/xCAT/Client.pm for the format. function docmd($cmd, $nr, $args){ $request = simplexml_load_string(''); $request->addChild('command',$cmd); foreach ($args as $a) { $request->addChild('arg',$a); } if(!empty($nr)){ $request->addChild('noderange',$nr); } #echo $request->asXML(); $xml = submit_request($request,0); return $xml; } //----------------------------------------------------------------------------- // Used by docmd() // req is a tree of SimpleXML objects // Returns a tree of SimpleXML objects. See perl-xCAT/xCAT/Client.pm for the format. function submit_request($req, $skipVerify){ #global $cert,$port,$xcathost; $apachehome = '/var/www'; #todo: for sles this should be /var/lib/wwwrun $cert = "$apachehome/.xcat/client-cred.pem"; $xcathost = "localhost"; $port = "3001"; $rsp = 0; $response = ''; $cleanexit=0; // Open a socket to xcatd $context = stream_context_create(array('ssl'=>array('local_cert' => $cert))); if($fp = stream_socket_client('ssl://'.$xcathost.':'.$port,$errno,$errstr,30, STREAM_CLIENT_CONNECT,$context)){ fwrite($fp,$req->asXML()); // send the xml to xcatd while(!feof($fp)){ // and then read until there is no more $response .= preg_replace('/\n/','', stream_get_contents($fp)); // remove newlines and add it to the response // Look for the serverdone response $pattern = '/\s*\s*<\/serverdone>\s*<\/xcatresponse>\s*$/'; if(preg_match($pattern,$response)) { // transaction is done, pkg up the xml and return it #echo htmlentities($response); $response = '' . preg_replace($pattern,'', $response) . ''; // remove the serverdone response and put an xcat tag around the rest $rsp = simplexml_load_string($response,'SimpleXMLElement', LIBXML_NOCDATA); $cleanexit = 1; } } fclose($fp); }else{ echo "

    xCAT Submit request Error: $errno - $errstr

    \n"; } if(! $cleanexit){ if(!$skipVerify){ echo "

    Error: xCAT response ended prematurely.

    "; $rsp = 0; } } return $rsp; } /** ---------------------------------------------------------------------------------------------- Function to run the commands on the remote nodes. Four arguments: 1. The command 2. Mode: 0: If successful, return output to a reference variable in the caller function, with the newlines removed. Otherwise, print the error msg to the screen 2: Like mode 0, if successful, return output to a reference variable in the caller function, with the newlines removed. But error msgs are output to reference variable in the caller function 1: Long running cmd, intermediate results/errors are ouput as the command is executed 3: Long running cmd. Results/errors are output to a file and return a file handle to the caller function 3. Reference variable to hold the output returned to caller function 4. Reference to an options hash, e.g. { NoVerbose => 1, NoRedirectStderr => 1 } Return status: 0 - successful, error - 1 ------------------------------------------------------------------------------------------------*/ function runcmd ($cmd, $mode, &$output, $options=NULL){ //Set error output to the same source as standard output (on Linux) if (strstr($cmd,'2>&1') == FALSE && !$options["NoRedirectStdErr"]) { $cmd .= ' 2>&1'; } if (!isSupported('ClientServer')) { $cmd = "/usr/bin/sudo $cmd"; } //todo: add support for xcat 2 $ret_stat = ""; //$arr_output = NULL; if ($mode == 3) { // long running cmd - pipe output to file handle $handle = popen($cmd, "r"); if($handle) { $output = $handle; //return file handle to caller return 0; //successful } else { msg('E', "Piping command ($cmd) into a file handle failed."); return 1; } }elseif ($mode == 0 || $mode == 2 ){ exec($cmd, $output, $ret_stat); if ($ret_stat == 0){ //$output = $arr_output; } else { //output the error msg to the screen if ($mode == 0) foreach ($output as $line) { msg('E', $line); } //output error msg to the caller function //elseif ($mode == 2) $output = $arr_output[0]; // error is already in the output } } elseif ($mode == 1){ echo "\n"; system($cmd, $ret_stat); echo "\n"; } return $ret_stat; } //----------------------------------------------------------------------------- // Send the keys and values in the primary global arrays function dumpGlobals() { trace('$_SERVER:'); foreach ($_SERVER as $key => $val) { trace("$key = $val"); } trace('
    $_ENV:'); foreach ($_ENV as $key => $val) { trace("$key = $val"); } trace('
    $_REQUEST:'); foreach ($_REQUEST as $key => $val) { trace("$key = $val"); } if (isset($_SESSION)) { trace('
    $_SESSION:'); foreach ($_SESSION as $key => $val) { trace("$key = $val"); } } } //----------------------------------------------------------------------------- function getXcatRoot() { return isset($_ENV['XCATROOT']) ? $_ENV['XCATROOT'] : '/opt/xcat'; } //----------------------------------------------------------------------------- # Returns true if the given rpm file is already installed at this version or higher. function isInstalled($rpmfile) { $aixrpmopt = isAIX() ? '--ignoreos' : ''; $lang = isWindows() ? '' : 'LANG=C'; //todo: add this back in $out = array(); $rc = runcmd("rpm -U $aixrpmopt --test $rpmfile", 2, $out); # The rc is not reliable in this case because it will be 1 if it is already installed # of if there is some other problem like a dependency is not satisfied. So we parse the # output instead. if (preg_grep('/package .* already installed/', $out)) { return 1; } else { return 0; } } $isSupportedHash = array(); //----------------------------------------------------------------------------- # Returns true if the specified feature is supported. This is normally determined by some fast # method like checking for the existence of a file. The answer is also cached for next time. function isSupported($feature) { if (isset($isSupportedHash[$feature])) { return $isSupportedHash[$feature]; } # These are supported in xCAT 2.0 and above if ($feature == 'ClientServer' || $feature == 'DB') { $isSupportedHash[$feature] = file_exists(getXcatRoot() . '/bin/xcatclient'); } # These are supported in xCAT x.x and above //elseif ($feature == 'DshExecute') // { $isSupportedHash[$feature] = -e '/opt/csm/bin/csmsetuphwmaint'; } else { return false; } return $isSupportedHash[$feature]; } // Debug output ------------------------------------ define("TRACE", "1"); function trace($str) { if (TRACE) { echo "

    $str

    \n"; } } //----------------------------------------------------------------------------- // Take in a hostname or ip address and return the fully qualified primary hostname. If resolution fails, // it just returns what it was given. function resolveHost($host) { if (isIPAddr($host)) { // IP address $hostname = gethostbyaddr($host); return $hostname; } else { //todo: implement resolution of hostname to full primary hostname with just one call $ip = gethostbyname($host); if (!isIPAddr($ip)) { return $host; } $hostname = gethostbyaddr($ip); return $hostname; } } //----------------------------------------------------------------------------- function isIPAddr ($host) { return preg_match('/^(\d+)\.(\d+)\.(\d+)\.(\d+)$/', $host); } //----------------------------------------------------------------------------- // Returns the URL for the requested documentation. This provides 1 level of indirection in case // the location of some of the documentation changes. // book is the name (minus the dollar sign) of one of the arrays below. // section is the book/website/table name, or in the case of manpage: cmd.section# function getDocURL($book, $section = NULL) { global $TOPDIR; $web = array ( 'docs' => "http://xcat.svn.sourceforge.net/svnroot/xcat/xcat-core/trunk/xCAT-client/share/doc", 'mailinglist' => "http://xcat.org/mailman/listinfo/xcat-user", 'updates' => "http://xcat.sourceforge.net/yum", 'opensrc' => "http://xcat.sourceforge.net/yum", 'wiki' => "http://xcat.wiki.sourceforge.net", ); $manpage = array( 0 => "$TOPDIR/../xcat-doc", 1 => "$TOPDIR/../xcat-doc/man1/xcat.1.html", ); $dbtable = array( 0 => "$TOPDIR/../xcat-doc/man5", 1 => "$TOPDIR/../xcat-doc/man5/xcatdb.5.html", ); $howto = array( 0 => "$TOPDIR/../xcat-doc", 1 => "$TOPDIR/../xcat-doc/index.html", 'linuxCookbook' => "$TOPDIR/../xcat-doc/xCAT2.pdf", 'idataplexCookbook' => "$TOPDIR/../xcat-doc/xCAT-iDpx.pdf", 'aixCookbook' => "$TOPDIR/../xcat-doc/xCAT2onAIX.pdf", ); /* $rsctadmin = array ( //todo: update this 0 => "http://publib.boulder.ibm.com/infocenter/clresctr/vxrx/topic/com.ibm.cluster.rsct.doc/rsct_aix5l53", 1 => "$rsctadmin[0]/bl5adm1002.html", 'sqlExpressions' => "$rsctadmin[0]/bl5adm1042.html#ussexp", 'conditions' => "$rsctadmin[0]/bl5adm1041.html#cmrcond", 'responses' => "$rsctadmin[0]/bl5adm1041.html#cmrresp", 'resourceClasses' => "$rsctadmin[0]/bl5adm1039.html#lavrc", ); $rsctref = array ( //todo: update this 0 => "http://publib.boulder.ibm.com/infocenter/clresctr/vxrx/topic/com.ibm.cluster.rsct.doc/rsct_linux151", 1 => "$rsctref[0]/bl5trl1002.html", 'errm' => "$rsctref[0]/bl5trl1067.html#errmcmd", 'errmScripts' => "$rsctref[0]/bl5trl1081.html#errmscr", 'sensor' => "$rsctref[0]/bl5trl1088.html#srmcmd", 'auditlog' => "$rsctref[0]/bl5trl1095.html#audcmd", 'lscondresp' => "$rsctref[0]/bl5trl1071.html#lscondresp", 'startcondresp' => "$rsctref[0]/bl5trl1079.html#startcondresp", ); */ if ($book) { //$url = &$$book; if ($book=='web') $url = & $web; elseif ($book=='manpage') $url = & $manpage; elseif ($book=='dbtable') $url = & $dbtable; elseif ($book=='howto') $url = & $howto; else return NULL; if (!$section) { return $url[1]; } // link to whole book if no section specified if ($book=='manpage') { $m = explode('.',$section); // 1st part is cmd name, 2nd part is man section return "$url[0]/man$m[1]/$m[0].$m[1].html"; } elseif ($book=='dbtable') { return "$url[0]/$section.5.html"; } else return $url[$section]; } else { // produce html for a page that contains all the links above, for testing purposes return ''; //todo: } } //----------------------------------------------------------------------------- // This returns important display info about each type of hardware, so we can easily add new hw types. function getHWTypeInfo($hwtype, $attr) { //todo: get the aliases to be keys in this hash too $hwhash = array ( 'x335' => array ( 'image'=>'330.gif', 'rackimage'=>'x335-front', 'u'=>1, 'aliases'=>'8676' ), 'x336' => array ( 'image'=>'330.gif', 'rackimage'=>'x335-front', 'u'=>1, 'aliases'=>'8837' ), 'x306' => array ( 'image'=>'330.gif', 'rackimage'=>'x335-front', 'u'=>1, 'aliases'=>'8836' ), 'x306m' => array ( 'image'=>'330.gif', 'rackimage'=>'x335-front', 'u'=>1, 'aliases'=>'8849,8491' ), 'x3550' => array ( 'image'=>'330.gif', 'rackimage'=>'x335-front', 'u'=>1, 'aliases'=>'7978' ), 'e325' => array ( 'image'=>'330.gif', 'rackimage'=>'x335-front', 'u'=>1, 'aliases'=>'8835' ), 'e326' => array ( 'image'=>'330.gif', 'rackimage'=>'x335-front', 'u'=>1, 'aliases'=>'8848' ), 'e326m' => array ( 'image'=>'330.gif', 'rackimage'=>'x335-front', 'u'=>1, 'aliases'=>'7969' ), 'e327' => array ( 'image'=>'330.gif', 'rackimage'=>'x335-front', 'u'=>1, 'aliases'=>'' ), 'x340' => array ( 'image'=>'342.gif', 'rackimage'=>'x345-front', 'u'=>2, 'aliases'=>'8656' ), 'x342' => array ( 'image'=>'342.gif', 'rackimage'=>'x345-front', 'u'=>2, 'aliases'=>'8669' ), 'x345' => array ( 'image'=>'342.gif', 'rackimage'=>'x345-front', 'u'=>2, 'aliases'=>'8670' ), 'x346' => array ( 'image'=>'342.gif', 'rackimage'=>'x345-front', 'u'=>2, 'aliases'=>'8840' ), 'x3650' => array ( 'image'=>'342.gif', 'rackimage'=>'x345-front', 'u'=>2, 'aliases'=>'7979' ), 'x360' => array ( 'image'=>'342.gif', 'rackimage'=>'x366-front', 'u'=>3, 'aliases'=>'8686' ), 'x365' => array ( 'image'=>'342.gif', 'rackimage'=>'x366-front', 'u'=>3, 'aliases'=>'8862' ), 'x366' => array ( 'image'=>'342.gif', 'rackimage'=>'x366-front', 'u'=>3, 'aliases'=>'8863' ), 'x3850' => array ( 'image'=>'342.gif', 'rackimage'=>'x366-front', 'u'=>3, 'aliases'=>'8863' ), 'x445' => array ( 'image'=>'342.gif', 'rackimage'=>'x366-front', 'u'=>3, 'aliases'=>'' ), 'x450' => array ( 'image'=>'342.gif', 'rackimage'=>'x366-front', 'u'=>3, 'aliases'=>'' ), 'x455' => array ( 'image'=>'342.gif', 'rackimage'=>'x366-front', 'u'=>3, 'aliases'=>'' ), 'x460' => array ( 'image'=>'342.gif', 'rackimage'=>'x366-front', 'u'=>3, 'aliases'=>'' ), 'x3950' => array ( 'image'=>'342.gif', 'rackimage'=>'x366-front', 'u'=>3, 'aliases'=>'' ), 'hs20' => array ( 'image'=>'blade.gif', 'rackimage'=>'blade-front', 'u'=>7, 'aliases'=>'8678,8843,7981' ), # removed 8832 because it is older and it made this entry to wide in the drop down boxes 'js20' => array ( 'image'=>'blade.gif', 'rackimage'=>'blade-front', 'u'=>7, 'aliases'=>'8842' ), 'js21' => array ( 'image'=>'blade.gif', 'rackimage'=>'blade-front', 'u'=>7, 'aliases'=>'8844' ), 'ls20' => array ( 'image'=>'blade.gif', 'rackimage'=>'blade-front', 'u'=>7, 'aliases'=>'8850' ), 'hs40' => array ( 'image'=>'blade2.gif', 'rackimage'=>'blade2-front', 'u'=>7, 'aliases'=>'8839' ), 'p5-505' => array ( 'image'=>'330.gif', 'rackimage'=>'x335-front', 'u'=>1, 'aliases'=>'9115' ), 'p5-505Q' => array ( 'image'=>'330.gif', 'rackimage'=>'x335-front', 'u'=>1, 'aliases'=>'9115' ), 'p5-510' => array ( 'image'=>'342.gif', 'rackimage'=>'x345-front', 'u'=>2, 'aliases'=>'9110' ), 'p5-510Q' => array ( 'image'=>'342.gif', 'rackimage'=>'x345-front', 'u'=>2, 'aliases'=>'9110' ), 'p5-575' => array ( 'image'=>'342.gif', 'rackimage'=>'x345-front', 'u'=>2, 'aliases'=>'9118' ), 'p5-520' => array ( 'image'=>'520.gif', 'rackimage'=>'p5-520-front', 'u'=>4, 'aliases'=>'9111' ), 'p5-520Q' => array ( 'image'=>'520.gif', 'rackimage'=>'p5-520-front', 'u'=>4, 'aliases'=>'9131' ), 'p5-550' => array ( 'image'=>'520.gif', 'rackimage'=>'p5-520-front', 'u'=>4, 'aliases'=>'9113' ), 'p5-550Q' => array ( 'image'=>'520.gif', 'rackimage'=>'p5-520-front', 'u'=>4, 'aliases'=>'9133' ), 'p5-560' => array ( 'image'=>'520.gif', 'rackimage'=>'p5-520-front', 'u'=>4, 'aliases'=>'9116' ), 'p5-560Q' => array ( 'image'=>'520.gif', 'rackimage'=>'p5-520-front', 'u'=>4, 'aliases'=>'9116' ), 'p5-570' => array ( 'image'=>'520.gif', 'rackimage'=>'p5-520-front', 'u'=>4, 'aliases'=>'9117' ), 'p5-590' => array ( 'image'=>'590.gif', 'rackimage'=>'p5-590-front', 'u'=>42, 'aliases'=>'9119' ), 'p5-595' => array ( 'image'=>'590.gif', 'rackimage'=>'p5-590-front', 'u'=>42, 'aliases'=>'9119' ), 'p710' => array ( 'image'=>'342.gif', 'rackimage'=>'x335-front', 'u'=>2, 'aliases'=>'9123' ), 'p720' => array ( 'image'=>'520.gif', 'rackimage'=>'x345-front', 'u'=>4, 'aliases'=>'9124' ), 'p610' => array ( 'image'=>'520.gif', 'rackimage'=>'x335-front', 'u'=>5, 'aliases'=>'7028' ), 'p615' => array ( 'image'=>'520.gif', 'rackimage'=>'x335-front', 'u'=>4, 'aliases'=>'7029' ), 'p630' => array ( 'image'=>'520.gif', 'rackimage'=>'x335-front', 'u'=>4, 'aliases'=>'7026' ), 'p640' => array ( 'image'=>'520.gif', 'rackimage'=>'x335-front', 'u'=>5, 'aliases'=>'7026' ), 'p650' => array ( 'image'=>'520.gif', 'rackimage'=>'x335-front', 'u'=>8, 'aliases'=>'7038' ), 'p655' => array ( 'image'=>'590.gif', 'rackimage'=>'x335-front', 'u'=>42, 'aliases'=>'7039' ), 'p670' => array ( 'image'=>'590.gif', 'rackimage'=>'x335-front', 'u'=>42, 'aliases'=>'7040' ), 'p690' => array ( 'image'=>'590.gif', 'rackimage'=>'x335-front', 'u'=>42, 'aliases'=>'7040' ), ); $info = $hwhash[strtolower($hwtype)]; if (isset($attr)) { return $info[$attr]; } else { return $info; } } //----------------------------------------------------------------------------- // Returns the image that should be displayed for this type of hw. Gets this from getHWTypeInfo() function getHWTypeImage($hwtype, $powermethod) { # 1st try to match the hw type $info = getHWTypeInfo($hwtype, 'image'); if ($info) { return $info['image']; } # No matches yet. Use the power method to get a generic type. if (isset($powermethod)) { $powermethod = strtolower($powermethod); if ($powermethod == 'blade') { return getHWTypeInfo('hs20', 'image'); } elseif ($powermethod == 'hmc') { return getHWTypeInfo('p5-520', 'image'); } elseif ($powermethod == 'bmc') { return getHWTypeInfo('x335','image'); } elseif ($powermethod == 'xseries') { return getHWTypeInfo('x335', 'image'); } } # As a last resort, return the most common node image return getHWTypeInfo('x335', 'image'); } //----------------------------------------------------------------------------- // Return the image that represents the status string passed in function getStatusImage($status) { global $TOPDIR; if ($status == 'good') { return "$TOPDIR/images/green-ball-m.gif"; } elseif ($status == 'warning') { return "$TOPDIR/images/yellow-ball-m.gif"; } elseif ($status == 'bad') { return "$TOPDIR/images/red-ball-m.gif"; } else { return "$TOPDIR/images/blue-ball-m.gif"; } } //----------------------------------------------------------------------------- // Returns the specified user preference value, or the default. (The preferences are stored in cookies.) // If no key is specified, it will return the list of preference names. function getPref($key) { $prefDefaults = array( 'nodesPerPage' => 40, 'displayCmds' => 0, ); if (!isset($key)) { return array_keys($prefDefaults); } if (isset($_COOKIE[$key])) { return $_COOKIE[$key]; } return $prefDefaults[$key]; // return default if not in the cookie } //----------------------------------------------------------------------------- // Returns a list of some or all of the nodes in the cluster and some of their attributes. // Pass in a node range (or NULL to get all nodes) and an array of attribute names (or NULL for none). // Returns an array where each key is the node name and each value is an array of attr/value pairs. // attrs is an array of attributes that should be returned. function getNodes($noderange, $attrs) { //my ($hostname, $type, $osname, $distro, $version, $mode, $status, $conport, $hcp, $nodeid, $pmethod, $location, $comment) = split(/:\|:/, $na); //$nodes[] = array('hostname'=>"node$i.cluster.com", 'type'=>'x3655', 'osname'=>'Linux', 'distro'=>'RedHat', 'version'=>'4.5', 'status'=>1, 'conport'=>$i, 'hcp'=>"node$i-bmc.cluster.com", 'nodeid'=>'', 'pmethod'=>'bmc', 'location'=>"frame=1 u=$", 'comment'=>''); $nodes = array(); //$xml = docmd('nodels',$noderange,implode(' ',$attrs)); $xml = docmd('nodels',$noderange,$attrs); $output = $xml->xcatresponse->children(); // technically, we should iterate over the xcatresponses, because there can be more than one foreach ($output as $o) { $nodename = (string)$o->name; $data = $o->data; $attrval = (string)$data->contents; $attrname = (string)$data->desc; //echo "

    $attrname = $attrval

    \n"; //echo "

    "; print_r($nodename); echo "

    \n"; //echo "

    "; print_r($o); echo "

    \n"; //$nodes[$nodename] = array('osversion' => $attr); if (!array_key_exists($nodename,$nodes)) { $nodes[$nodename] = array(); } $attributes = & $nodes[$nodename]; $attributes[$attrname] = $attrval; } return $nodes; } //function awalk($value, $key) { echo "

    $key=$value.

    \n"; } //function awalk2($a) { foreach ($a as $key => $value) { if (is_array($value)) {$v='';} else {$v=$value;} echo "

    $key=$v.

    \n"; } } //----------------------------------------------------------------------------- // Returns the node groups defined in the cluster. function getGroups() { $groups = array(); $xml = docmd('tabdump','',array('nodelist')); $output = $xml->xcatresponse->children(); #$output = $xml->children(); // technically, we should iterate over the xcatresponses, because there can be more than one foreach ($output as $line) { //echo "

    line=$line

    "; $vals = array(); preg_match('/^"([^"]*)","([^"]*)"/', $line, $vals); //todo: create function to parse tabdump output better if (count($vals) > 2) { //$node = $vals[1]; $grplist = preg_split('/,/', $vals[2]); foreach ($grplist as $g) { $groups[$g] = 1; } } } $grplist = array_keys($groups); sort($grplist); return $grplist; } //----------------------------------------------------------------------------- // Returns true if we are running on AIX function isAIX() { } //todo: implement //----------------------------------------------------------------------------- // Returns true if we are running on Linux function isLinux() { } //todo: implement //----------------------------------------------------------------------------- // Returns true if we are running on Windows function isWindows() { return array_key_exists('WINDIR', $_SERVER); } //----------------------------------------------------------------------------- // Create file folder-like tabs. Tablist is an array of label/url pairs. function insertTabs ($tablist, $currentTabIndex) { echo ""; foreach ($tablist as $key => $tab) { if ($key != 0) { echo ""; } if ($currentTabIndex == $key) { echo ""; } else { echo ""; } } echo "
    $tab[0]$tab[0]
    \n"; } //----------------------------------------------------------------------------- // Create the Action buttons in a table. Each argument passed in is a button, which is an array of attribute strings. // If your onclick attribute contains javascript code that uses quotes, use double quotes instead of single quotes. // Note: if only 1 button is passed in, the button is not put in a table. function insertButtons () { $num = func_num_args(); if ($num > 1) echo ""; foreach (func_get_args() as $button) { //echo ""; $otherattrs = @$button['otherattrs']; if ($num > 1) echo ""; } if ($num > 1) echo "
    "; echo "{$button['label']}"; if ($num > 1) echo "
    \n"; } //----------------------------------------------------------------------------- // Display messages in the html. If severity is W or E, it will attempt to use the Error class // from the style sheet. function msg($severity, $msg) { //if ($severity=~/V/ && !$::GUI_VERBOSE) { return; } if (preg_match('/O/', $severity)) { echo "$msg\n"; return; } $styleclass = 'Info'; if (preg_match('/[WE]/', $severity)) { $styleclass = 'Error'; } echo "

    $msg

    \n"; } //----------------------------------------------------------------------------- function insertNotDoneYet() { echo "

    This page is not done yet.

    \n"; } ?>