planetlab/nodes/nodes.php

   1 <?php
   2
   3 // $Id$
   4
   5 // Require login
   6 require_once 'plc_login.php';
   7
   8 // Get session and API handles
   9 require_once 'plc_session.php';
  10 global $plc, $api;
  11
  12 // Print header
  13 require_once 'plc_drupal.php';
  14 include 'plc_header.php';
  15
  16 // Common functions
  17 require_once 'plc_functions.php';
  18 require_once 'plc_peers.php';
  19 require_once 'plc_minitabs.php';
  20 require_once 'plc_tables.php';
  21
  22 // --------------------
  23 // recognized URL arguments
  24 $peerscope=$_GET['peerscope'];
  25 $pattern=$_GET['pattern'];
  26 $site_id=intval($_GET['site_id']);
  27 $slice_id=intval($_GET['slice_id']);
  28
  29 // --- decoration
  30 $title="Nodes";
  31 $tabs=array();
  32 $mysite_id=plc_my_site_id();
  33 $tabs []= tab_nodes_mysite();
  34 $tabs []= tab_nodes_local();
  35
  36 // --------------------
  37 $node_filter=array();
  38
  39 //////////////////
  40 // performs sanity check and summarize the result in a single column
  41 function node_status ($node) {
  42
  43   $messages=array();
  44
  45   // do all this stuff on local nodes only
  46   if ( ! $node['peer_id'] ) {
  47     // check that the node has keys
  48     if (count($node['interface_ids']) == 0) {
  49       $messages [] = "No interface";
  50     }
  51   }
  52   return plc_vertical_table($messages,'plc-warning');
  53 }
  54
  55
  56 // fetch nodes
  57 $node_columns=array('hostname','node_type','site_id','node_id','boot_state','interface_ids','peer_id', "arch");
  58 // server-side filtering - set pattern in $_GET for filtering on hostname
  59 if ($pattern) {
  60   $node_filter['hostname']=$pattern;
  61   $title .= " matching " . $pattern;
  62  } else {
  63   $node_filter['hostname']="*";
  64  }
  65
  66 // server-side selection on peerscope
  67 $peerscope=new PeerScope($api,$_GET['peerscope']);
  68 $node_filter=array_merge($node_filter,$peerscope->filter());
  69 $title .= ' - ' . $peerscope->label();
  70
  71 if ($site_id) {
  72   $sites=$api->GetSites(array($site_id));
  73   $site=$sites[0];
  74   $name=$site['name'];
  75   $login_base=$site['login_base'];
  76   $title .= t_site($site);
  77   $tabs []= tab_site($site);
  78   $node_filter['site_id']=array($site_id);
  79 }
  80
  81 if ($slice_id) {
  82   $slices=$api->GetSlices(array($slice_id),array('node_ids','name'));
  83   $slice=$slices[0];
  84   $title .= t_slice($slice);
  85   $tabs []= tab_slice($slice);
  86   $node_filter['node_id'] = $slice['node_ids'];
  87  }
  88
  89 // go
  90 $nodes=$api->GetNodes($node_filter,$node_columns);
  91
  92 // build site_ids - interface_ids
  93 $site_ids=array();
  94 $interface_ids=array();
  95 if ($nodes) foreach ($nodes as $node) {
  96   $site_ids []= $node['site_id'];
  97   $interface_ids = array_merge ($interface_ids,$node['interface_ids']);
  98 }
  99
 100 // fetch related interfaces
 101 $interface_columns=array('ip','node_id','interface_id');
 102 $interface_filter=array('is_primary'=>TRUE,'interface_id'=>$interface_ids);
 103 $interfaces=$api->GetInterfaces($interface_filter,$interface_columns);
 104
 105 $interface_hash=array();
 106 foreach ($interfaces as $interface) $interface_hash[$interface['node_id']]=$interface;
 107
 108 // fetch related sites
 109 $site_columns=array('site_id','login_base');
 110 $site_filter=array('site_id'=>$site_ids);
 111 $sites=$api->GetSites($site_filter,$site_columns);
 112
 113 $site_hash=array();
 114 foreach ($sites as $site) $site_hash[$site['site_id']]=$site;
 115
 116 // --------------------
 117 drupal_set_title($title);
 118
 119 plc_tabs($tabs);
 120
 121 if ( ! $nodes ) {
 122   drupal_set_message ('No node found');
 123   return;
 124  }
 125
 126 $headers = array ("Peer"=>"string",
 127                   "Region"=>"string",
 128                   "Site"=>"string",
 129                   "State"=>"string",
 130                   "Hostname"=>"string",
 131                   "IP"=>"IPAddress",
 132                   "Type"=>"string",
 133                   "Arch"=>"string",
 134                   "?"=>"string",
 135                   );
 136
 137 # initial sort on hostnames
 138 $table=new PlcTable ("nodes",$headers,4);
 139 $table->start();
 140
 141 $peers = new Peers ($api);
 142 // write rows
 143 foreach ($nodes as $node) {
 144     $hostname=$node['hostname'];
 145     $node_id=$node['node_id'];
 146     $site_id=$node['site_id'];
 147     $site=$site_hash[$site_id];
 148     $login_base = $site['login_base'];
 149     $node_id=$node['node_id'];
 150     $ip=$interface_hash[$node['node_id']]['ip'];
 151     $interface_id=$interface_hash[$node['node_id']]['interface_id'];
 152     $peer_id=$node['peer_id'];
 153     $shortname = $peers->shortname($peer_id);
 154     $node_type = $node['node_type'];
 155
 156     $table->row_start();
 157     $table->cell ($peers->link($peer_id,$shortname));
 158     $table->cell (topdomain($hostname));
 159     $table->cell (l_site_t($site_id,$login_base));
 160     $table->cell ($node['boot_state']);
 161     $table->cell (l_node_t($node_id,$hostname));
 162     $table->cell (l_interface_t($interface_id,$ip));
 163     $table->cell ($node_type);
 164     $table->cell ($node['arch']);
 165     $table->cell (node_status($node));
 166     $table->row_end();
 167
 168 }
 169
 170 $table->end();
 171
 172 //plc_tabs ($tabs,"bottom");
 173
 174 // Print footer
 175 include 'plc_footer.php';
 176
 177 ?>