ckp - sites complete
[plewww.git] / planetlab / nodes / node.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_minitabs.php';
19 require_once 'plc_tables.php';
20 require_once 'plc_details.php';
21 require_once 'plc_forms.php';
22
23 // -------------------- 
24 // recognized URL arguments
25 $node_id=intval($_GET['id']);
26 if ( ! $node_id ) { plc_error('Malformed URL - id not set'); return; }
27
28 ////////////////////
29 // Get all columns as we focus on only one entry
30 $nodes= $api->GetNodes( array($node_id));
31
32 if (empty($nodes)) {
33   drupal_set_message ("Node " . $node_id . " not found");
34   return;
35  }
36
37 $node=$nodes[0];
38 // node info
39 $hostname= $node['hostname'];
40 $boot_state= $node['boot_state'];
41 $site_id= $node['site_id'];
42 $model= $node['model'];
43 $version= $node['version'];
44 $node_type = $node['node_type'];
45
46 // arrays of ids of node info
47 $slice_ids= $node['slice_ids'];
48 $conf_file_ids= $node['conf_file_ids'];
49 $interface_ids= $node['interface_ids'];
50 $nodegroup_ids= $node['nodegroup_ids'];
51 $pcu_ids= $node['pcu_ids'];
52
53 // get peer
54 $peer_id = $node['peer_id'];
55 if ($peer_id) {
56   $peers=$api->GetPeers(array($peer_id));
57   $peer=$peers[0];
58  }
59
60 // gets site info
61 $sites= $api->GetSites( array( $site_id ) );
62 $site=$sites[0];
63 $site_name= $site['name'];
64 $site_node_ids= $site['node_ids'];
65
66 // hash node_id=>hostname for this site's nodes
67 $site_node_hash=array();
68 if( !empty( $site_node_ids ) ) {
69   // get site node info basics
70   $site_nodes= $api->GetNodes( $site_node_ids );
71     
72   foreach( $site_nodes as $site_node ) {
73     $site_node_hash[$site_node['node_id']]= $site_node['hostname'];
74   }
75  }
76   
77 // gets slice info for each slice
78 if( !empty( $slice_ids ) )
79   $slices= $api->GetSlices( $slice_ids, array( "slice_id", "name" , "peer_id" ) );
80
81 // get interface info
82 if( !empty( $interface_ids ) )
83   $interfaces= $api->GetInterfaces( $interface_ids );
84
85 // gets nodegroup info
86 if( !empty( $nodegroup_ids ) )
87   $nodegroups= $api->GetNodeGroups( $nodegroup_ids, array("groupname","tag_type_id","value"));
88
89 // xxx Thierry : remaining stuff
90 // (*) events: should display the latest events relating to that node.
91 // disabling call to GetEvents, that gets the session deleted in the DB
92 // (*) conf_files: is fetched but not displayed
93 if( !empty( $conf_file_ids ) )
94   $conf_files= $api->GetConfFiles( $conf_file_ids );
95 // (*) idem for PCUs
96 // gets pcu and port info key to both is $pcu_id
97 if( !empty( $pcu_ids ) )
98   $PCUs= $api->GetPCUs( $pcu_ids );
99
100 //////////////////// display node info
101
102 // fetches peers and initialize hash peer_id->peer
103 $peer_hash = plc_peer_global_hash ($api);
104 // show gray background on foreign objects : start a <div> with proper class
105 $local_peer = plc_peer_block_start ($peer_hash,$peer_id);
106   
107 drupal_set_title("Details for node " . $hostname);
108   
109 // extra privileges to admins, and (pi||tech) on this site
110 $privileges = plc_is_admin () || ( plc_in_site($site_id) && ( plc_is_pi() || plc_is_tech()));
111   
112 $tabs=array();
113 // available actions
114 if ( $local_peer  && $privileges ) {
115     
116   $tabs['Update'] = array ('url'=>"/db/nodes/node_actions.php",
117                            'method'=>'POST',
118                            'values'=>array('action'=>'prompt-update','node_id'=>$node_id),
119                            'bubble'=>"Update details of $hostname");
120   $tabs['Delete'] = array ('url'=>"/db/nodes/node_actions.php",
121                            'method'=>'POST',
122                            'values'=>array('action'=>'delete','node_id'=>$node_id),
123                            'bubble'=>"Delete node $hostname",
124                            'confirm'=>'Are you sure to delete ' . $hostname. ' ?');
125   // xxx subject to roles
126   $tabs["Add Interface"]=array('url'=>l_interface_add($node_id),
127                                'bubble'=>"Declare new network interface on $hostname");
128   $tabs["Events"]=array_merge(tabs_events(),
129                               array('url'=>l_event("Node","node",$node_id),
130                                     'bubble'=>"Events for node $hostname"));
131   $tabs["Comon"]=array_merge(tabs_comon(),
132                              array('url'=>l_comon("node_id",$node_id),
133                                    'bubble'=>"Comon page about node $hostname"));
134  }
135
136 $tabs["All nodes"]=l_nodes();
137
138 plc_tabs($tabs);
139
140 plc_details_start ();
141 plc_details_line("Hostname",$hostname);
142 plc_details_line("Type",$node_type);
143 plc_details_line("Model",$model);
144 plc_details_line("Version",$version);
145 plc_details_line("Peer",plc_peer_label($peer));
146
147 // no tool to implement this multiple-choice setting yet
148 // xxx would need at least to use the proper class, like plc_details_class() or something
149 echo "<tr><th>Boot State: </th><td>";
150 if ( ! $local_peer) {
151   echo $boot_state;
152  } else {
153   echo "<form name='bootstate' action='/db/nodes/node_actions.php' method=post>\n";
154   echo "<input type=hidden name='node_id' value='$node_id'>\n";
155   echo "<input type=hidden name='action' value='boot-state'>\n";
156   echo "<select name='boot_state' onChange=\"submit();\">\n";
157
158   $states= array( 'boot'=>'Boot', 'dbg'=>'Debug', 'inst'=>'Install', 'rins'=>'Reinstall', 'rcnf'=>'Reconfigure', 'new'=>'New' );
159
160   foreach( $states as $key => $val ) {
161     echo "<option value='$key'";
162       
163     if( $key == $boot_state )
164       echo " selected";
165       
166     echo ">$val</option>\n";
167       
168   }
169   echo "</select></input></form>";
170  }
171 echo "</td></tr>\n";
172
173 // same here for the download area
174 if ( $local_peer  && $privileges) {
175
176   echo "<tr><th>Download </th><td>";
177   echo "<form name='download' action='/db/nodes/node_actions.php' method='post'>\n";
178   echo "<input type=hidden name='node_id' value='$node_id'></input>\n";
179   echo "<select name='action' onChange='submit();'>\n";
180   echo "<option value='' selected='selected'> Download Mode </option>\n";
181   echo "<option value='' disabled='disabled'> -- All in one images -- </option>"; 
182   echo "<option value='download-node-iso' $new_api_only> Download ISO image for $hostname</option>\n";
183   echo "<option value='download-node-usb' $new_api_only> Download USB image for $hostname</option>\n";
184   echo "<option value='' disabled='disabled'> -- Floppy + generic image -- </option>"; 
185   echo "<option value='download-node-floppy'> Download Floppy file for $hostname</option>\n";
186   echo "<option value='download-generic-iso' $new_api_only> Download generic ISO image (requires floppy) </option>\n";
187   echo "<option value='download-generic-usb' $new_api_only> Download generic USB image (requires floppy) </option>\n";
188   echo "</select></form>";
189   echo "</td></tr>\n";
190
191  }
192
193 // site info and all site nodes
194 plc_details_space_line ();
195 plc_details_line("Site",l_site_t($site_id,$site_name));
196                    
197 // build list of node links
198 $nodes_area=array();
199 foreach ($site_node_hash as $hash_node_id => $hash_hostname) {
200   $nodes_area []= l_node_t($hash_node_id,$hash_hostname);
201 }
202 plc_details_line_list ("All site nodes",$nodes_area);
203
204 plc_details_end ();
205
206 //////////////////////////////////////////////////////////// Tags
207 // get tags
208 $tags=$api->GetNodeTags (array('node_id'=>$node_id));
209 $tagnames = array_map ("get_tagname",$tags);
210 //plc_debug('tagnames',$tagnames);
211 $nodegroups_hash=plc_nodegroup_global_hash($api,$tagnames);
212 //plc_debug('hash',$nodegroups_hash);
213
214 plc_section("Tags");
215 $headers=array("Name"=>"string",
216                "Value"=>"string",
217                "Nodegroup"=>"string");
218
219 $table_options=array("notes_area"=>false,"pagesize_area"=>false,"search_width"=>10);
220 plc_table_start("node_tags",$headers,0,$table_options);
221 if ($tags) foreach ($tags as $tag) {
222   // does this match a nodegroup ?
223   $nodegroup_name="n/a";
224   $nodegroup_key=$tag['tagname'] . "=" . $tag['value'];
225   $nodegroup=$nodegroups_hash[$nodegroup_key];
226   if ($nodegroup) $nodegroup_name=l_nodegroup_t($nodegroup['nodegroup_id'],$nodegroup['groupname']);
227   plc_table_row_start();
228   plc_table_cell($tag['tagname']);
229   plc_table_cell($tag['value']);
230   plc_table_cell($nodegroup_name);
231   plc_table_row_end();
232 }
233 plc_table_end("node_tags");
234
235 //////////////////////////////////////////////////////////// slices
236 // display slices
237
238 plc_section ("Slices");
239 if ( ! $slices  ) {
240   plc_warning ("This node is not associated to any slice");
241  } else {
242   $headers=array();
243   $headers['Peer']="string";
244   $headers['Name']="string";
245   $headers['Slivers']="string";
246   $reasonable_page=10;
247   $table_options = array('notes_area'=>false,"search_width"=>10,'pagesize'=>$reasonable_page);
248   if (count ($slices) <= $reasonable_page) {
249     $table_options['search_area']=false;
250     $table_options['pagesize_area']=false;
251   }
252   plc_table_start ("node_slices",$headers,1,$table_options);
253
254   foreach ($slices as $slice) {
255     plc_table_row_start($slice['name']);
256     plc_table_cell (plc_peer_shortname($peer_hash,$slice['peer_id']));
257     plc_table_cell (l_slice_t ($slice['slice_id'],$slice['name']));
258     plc_table_cell (l_sliver_t ($node_id,$slice['slice_id'],'view'));
259     plc_table_row_end();
260   }
261   plc_table_end("node_slices");
262  }
263
264 //////////////////////////////////////////////////////////// interfaces
265 if ( $local_peer ) {
266
267   // display interfaces
268   if( ! $interfaces ) {
269     echo "<p><span class='plc-warning'>No interface</span>.  Please add an interface to make this a usable PLC node</p>.\n";
270   } else {
271     $headers=array();
272     if ( $privileges ) {
273       // a single symbol, marking 'p' for primary and a delete button for non-primary
274       $headers[' ']='string';
275     }
276          
277     $headers["IP"]="IPAddress";
278     $headers["Method"]="string";
279     $headers["Type"]="string";
280     $headers["MAC"]="string";
281     $headers["bw limit"]="FileSize";
282
283     plc_section('Interfaces');
284     $table_options=array('search_area'=>false,"pagesize_area"=>false,'notes_area'=>false);
285     plc_table_start("node_interfaces",$headers,2,$table_options);
286         
287     foreach ( $interfaces as $interface ) {
288       $interface_id= $interface['interface_id'];
289       $interface_ip= $interface['ip'];
290       $interface_broad= $interface['broadcast'];
291       $interface_primary= $interface['is_primary'];
292       $interface_network= $interface['network'];
293       $interface_dns1= $interface['dns1'];
294       $interface_dns2= $interface['dns2'];
295       $interface_hostname= $interface['hostname'];
296       $interface_netmaks= $interface['netmask'];
297       $interface_gatewary= $interface['gateway'];
298       $interface_mac= $interface['mac'];
299       $interface_bwlimit= $interface['bwlimit'];
300       $interface_type= $interface['type'];
301       $interface_method= $interface['method'];
302
303       plc_table_row_start($interface['ip']);
304       if ( $privileges ) {
305         if (!$interface_primary) {
306           // xxx 
307           plc_table_cell (plc_delete_link_button ('interfaces.php?id=' . $interface_id . '&delete=1&submitted=1', 
308                                                   '\\nInterface ' . $interface_ip));
309         } else {
310           plc_table_cell('p');
311         }
312       }
313       plc_table_cell(l_interface_t($interface_id,$interface_ip));
314       plc_table_cell($interface_method);
315       plc_table_cell($interface_type);
316       plc_table_cell($interface_mac);
317       plc_table_cell($interface_bwlimit);
318       plc_table_row_end();
319     }
320     if ($privileges) {
321       $button=plc_form_simple_button(l_interface_add($node_id),"Add interface","GET");
322       $footers=array(plc_table_td_text($button,6,"right"));
323     }
324     plc_table_end("node_interfaces",array("footers"=>$footers));
325   }
326  }
327       
328 ////////////////////////////////////////////////////////////
329 plc_peer_block_end();
330
331
332 // Print footer
333 include 'plc_footer.php';
334
335 ?>