6 require_once 'plc_login.php';
8 // Get session and API handles
9 require_once 'plc_session.php';
10 global $plc, $api, $adm;
13 require_once 'plc_drupal.php';
14 include 'plc_header.php';
17 require_once 'plc_functions.php';
18 require_once 'plc_minitabs.php';
19 require_once 'plc_tables.php';
22 $_person= $plc->person;
23 $_roles= $_person['role_ids'];
25 // --------------------
26 // recognized URL arguments
27 $peerscope=$_GET['peerscope'];
28 $pattern=$_GET['pattern'];
29 $site_id=intval($_GET['site_id']);
30 $slice_id=intval($_GET['slice_id']);
34 $tabs=array("Old page"=>l_nodes(),
35 "Logout"=>"/planetlab/logout.php");
37 // --------------------
43 // performs sanity check and summarize the result in a single column
44 function node_status ($node) {
48 // do all this stuff on local nodes only
49 if ( ! $node['peer_id'] ) {
50 // check that the node has keys
51 if (count($node['interface_ids']) == 0) {
52 $messages [] = "No interface";
55 return plc_make_table('plc-warning',$messages);
59 // fetch nodes - set pattern in the url for server-side filtering
60 $node_columns=array('hostname','site_id','node_id','boot_state','interface_ids','peer_id');
62 $node_filter['hostname']=$pattern;
63 $title .= " matching " . $pattern;
65 $node_filter['hostname']="*";
68 // server-side selection on peerscope
69 list ( $peer_filter, $peer_label) = plc_peer_info($api,$_GET['peerscope']);
70 $node_filter=array_merge($node_filter,$peer_filter);
73 $sites=$api->GetSites(array($site_id),array("name","login_base"));
76 $login_base=$site['login_base'];
77 $title .= t_site($site);
78 $tabs = array_merge($tabs,tabs_site($site));
79 $node_filter['site_id']=array($site_id);
83 $slices=$api->GetSlices(array($slice_id),array('node_ids','name'));
85 $title .= t_slice($slice);
86 $tabs = array_merge($tabs,tabs_slice($slice));
87 $node_filter['node_id'] = $slice['node_ids'];
91 $nodes=$api->GetNodes($node_filter,$node_columns);
93 // build site_ids - interface_ids
95 $interface_ids=array();
96 if ($nodes) foreach ($nodes as $node) {
97 $site_ids []= $node['site_id'];
98 $interface_ids = array_merge ($interface_ids,$node['interface_ids']);
101 // fetch related interfaces
102 $interface_columns=array('ip','node_id','interface_id');
103 $interface_filter=array('is_primary'=>TRUE,'interface_id'=>$interface_ids);
104 $interfaces=$api->GetInterfaces($interface_filter,$interface_columns);
106 $interface_hash=array();
107 foreach ($interfaces as $interface) {
108 $interface_hash[$interface['node_id']]=$interface;
111 // fetch related sites
112 $site_columns=array('site_id','login_base');
113 $site_filter=array('site_id'=>$site_ids);
114 $sites=$api->GetSites($site_filter,$site_columns);
117 foreach ($sites as $site) {
118 $site_hash[$site['site_id']]=$site;
122 $peer_columns=array('peer_id','shortname');
123 $peer_filter=array();
124 $peers = $api->GetPeers($peer_filter,$peer_columns);
127 foreach ($peers as $peer) {
128 $peer_hash[$peer['peer_id']]=$peer;
131 // --------------------
132 drupal_set_title($title);
137 drupal_set_message ('No node found');
141 $columns = array ("Peer"=>"string",
145 "Hostname"=>"string",
151 # initial sort on hostnames
152 plc_table_start("nodes",$columns,4);
155 $fake1=1; $fake2=3.14; $fake_i=0;
156 foreach ($nodes as $node) {
157 $hostname=$node['hostname'];
158 $node_id=$node['node_id'];
159 $site_id=$node['site_id'];
160 $site=$site_hash[$site_id];
161 $login_base = $site['login_base'];
162 $node_id=$node['node_id'];
163 $ip=$interface_hash[$node['node_id']]['ip'];
164 $interface_id=$interface_hash[$node['node_id']]['interface_id'];
165 if ( ! $node['peer_id'] ) {
166 $shortname=PLC_SHORTNAME;
168 $shortname=$peer_hash[$node['peer_id']]['shortname'];
170 printf ('<tr id="%s">',$hostname);
172 plc_table_cell ($shortname);
173 plc_table_cell (topdomain($hostname));
174 plc_table_cell (l_site2($site_id,$login_base));
175 plc_table_cell ($node['boot_state']);
176 plc_table_cell (l_node2($node_id,$hostname));
177 plc_table_cell (l_interface2($interface_id,$ip));
178 plc_table_cell ($fake1);
179 plc_table_cell ($fake2);
180 plc_table_cell (node_status($node));
184 if ($fake_i % 5 == 0) $fake1 += 3;
185 if ($fake_i % 3 == 0) $fake2 +=5; else $fake2 -= $fake_i;