6 require_once 'plc_login.php';
8 // Get session and API handles
9 require_once 'plc_session.php';
13 require_once 'plc_drupal.php';
14 include 'plc_header.php';
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 require_once 'plc_details.php';
22 require_once 'plc_forms.php';
23 require_once 'plc_objects.php';
25 // --------------------
26 // recognized URL arguments
27 $node_id=intval($_GET['id']);
28 if ( ! $node_id ) { plc_error('Malformed URL - id not set'); return; }
31 // Get all columns as we focus on only one entry
32 $nodes= $api->GetNodes( array($node_id));
35 drupal_set_message ("Node " . $node_id . " not found");
41 $hostname= $node['hostname'];
42 $boot_state= $node['boot_state'];
43 $site_id= $node['site_id'];
44 $model= $node['model'];
45 $version= $node['version'];
46 $node_type = $node['node_type'];
48 // arrays of ids of node info
49 $slice_ids= $node['slice_ids'];
50 $conf_file_ids= $node['conf_file_ids'];
51 $interface_ids= $node['interface_ids'];
52 $nodegroup_ids= $node['nodegroup_ids'];
53 $pcu_ids= $node['pcu_ids'];
56 $peer_id = $node['peer_id'];
57 $peers=new Peers ($api);
60 $sites= $api->GetSites( array( $site_id ) );
62 $site_name= $site['name'];
63 $site_node_ids= $site['node_ids'];
65 // hash node_id=>hostname for this site's nodes
66 $site_node_hash=array();
67 if( !empty( $site_node_ids ) ) {
68 // get site node info basics
69 $site_nodes= $api->GetNodes( $site_node_ids );
71 foreach( $site_nodes as $site_node ) {
72 $site_node_hash[$site_node['node_id']]= $site_node['hostname'];
76 // gets slice info for each slice
77 if( !empty( $slice_ids ) )
78 $slices= $api->GetSlices( $slice_ids, array( "slice_id", "name" , "peer_id" ) );
81 if( !empty( $interface_ids ) )
82 $interfaces= $api->GetInterfaces( $interface_ids );
84 // gets nodegroup info
85 if( !empty( $nodegroup_ids ) )
86 $nodegroups= $api->GetNodeGroups( $nodegroup_ids, array("groupname","tag_type_id","value"));
88 // xxx Thierry : remaining stuff
89 // (*) events: should display the latest events relating to that node.
90 // disabling call to GetEvents, that gets the session deleted in the DB
91 // (*) conf_files: is fetched but not displayed
92 if( !empty( $conf_file_ids ) )
93 $conf_files= $api->GetConfFiles( $conf_file_ids );
95 // gets pcu and port info key to both is $pcu_id
96 if( !empty( $pcu_ids ) )
97 $PCUs= $api->GetPCUs( $pcu_ids );
99 //////////////////// display node info
101 drupal_set_title("Details for node " . $hostname);
102 $local_peer= ! $peer_id;
105 // extra privileges to admins, and (pi||tech) on this site
106 $privileges = (plc_is_admin () && $local_peer) || ( plc_in_site($site_id) && ( plc_is_pi() || plc_is_tech()));
110 if ( $local_peer && $privileges ) {
112 $tabs['Delete'] = array ('url'=>l_actions(),
114 'values'=>array('action'=>'delete-node','node_id'=>$node_id),
115 'bubble'=>"Delete node $hostname",
116 'confirm'=>'Are you sure to delete ' . $hostname. ' ?');
117 // xxx subject to roles
118 $tabs["Add Interface"]=array('url'=>l_interface_add($node_id),
119 'bubble'=>"Declare new network interface on $hostname");
120 $tabs["Events"]=array_merge(tabs_events(),
121 array('url'=>l_event("Node","node",$node_id),
122 'bubble'=>"Events for node $hostname"));
123 $tabs["Comon"]=array_merge(tabs_comon(),
124 array('url'=>l_comon("node_id",$node_id),
125 'bubble'=>"Comon page about node $hostname"));
128 $tabs["All nodes"]=l_nodes();
132 // show gray background on foreign objects : start a <div> with proper class
133 $peers->block_start ($peer_id);
135 $details=new PlcDetails($privileges);
137 if ( ! $local_peer) {
138 $details->th_td("Peer",$peers->peer_link($peer_id));
142 $details->form_start(l_actions(),array("action"=>"update-node", "node_id"=>$node_id));
143 $details->th_td("Hostname",$hostname,"hostname");
144 $details->th_td("Model",$model,"model");
145 $details->tr_submit("submit","Update Node");
146 $details->form_end();
147 if ($privileges) $details->space();
149 $details->th_td("Type",$node_type);
150 $details->th_td("Version",$version);
151 // let's use plc_objects
152 $Node = new Node($node);
153 $details->th_td("Date created",$Node->dateCreated());
154 $details->th_td("Last contact",$Node->lastContact());
155 $details->th_td("Last update",$Node->lastUpdated());
159 if ( ! ($local_peer && $privileges)) {
161 $boot_value=$boot_state;
164 $boot_form = new PlcForm (l_actions(), array("node_id"=>$node_id,
165 "action"=>"node-boot-state"));
166 $boot_value .= $boot_form->start_html();
167 $states = array( 'boot'=>'Boot', 'safeboot'=>'SafeBoot', 'failboot'=>'FailBoot',
168 'disabled' => 'Disabled', 'install'=>'Install', 'reinstall'=>'Reinstall');
170 foreach ($states as $dbname=>$displayname) {
171 $selector=array("display"=>$displayname, "value"=>$dbname);
172 if ($dbname == $boot_state) $selector['selected']=true;
173 $selectors []= $selector;
175 $boot_value .= $boot_form->select_html("boot_state",$selectors,array('autosubmit'=>true));
176 $boot_value .= $boot_form->end_html();
178 $details->th_td ("Boot state",$boot_value);
180 // same here for the download area
181 if ( $local_peer && $privileges) {
184 $download_form = new PlcForm (l_actions_download(),array("node_id"=>$node_id));
185 $download_value .= $download_form->start_html();
187 array("display"=>"-- All in one images --","disabled"=>true),
188 array("value"=>"download-node-iso","display"=>"Download ISO image for $hostname"),
189 array("value"=>"download-node-usb","display"=>"Download USB image for $hostname<"),
190 array("display"=>"-- Floppy + generic image --","disabled"=>true),
191 array("value"=>"download-node-floppy","display"=>"Download Floppy file for $hostname"),
192 array("value"=>"download-generic-iso","display"=>"Download generic ISO image (requires floppy)"),
193 array("value"=>"download-generic-usb","display"=>"Download generic USB image (requires floppy)"));
194 $download_value .= $download_form->select_html("action",$selectors,
195 array('label'=>"Download mode",'autosubmit'=>true));
196 $download_value .= $download_form->end_html();
197 $details->th_td ("Download",$download_value);
200 // site info and all site nodes
202 $details->th_td("Site",l_site_t($site_id,$site_name));
204 // build list of node links
206 foreach ($site_node_hash as $hash_node_id => $hash_hostname) {
207 $nodes_area []= l_node_t($hash_node_id,$hash_hostname);
209 $details->th_tds ("All site nodes",$nodes_area);
213 $form=new PlcForm (l_actions(), array('node_id'=>$node_id));
216 //////////////////////////////////////////////////////////// Tags
220 $tags=$api->GetNodeTags (array('node_id'=>$node_id));
221 function get_tagname ($tag) { return $tag['tagname'];}
222 $tagnames = array_map ("get_tagname",$tags);
223 $nodegroups_hash=plc_nodegroup_global_hash($api,$tagnames);
226 $headers=array("Name"=>"string",
228 "Nodegroup"=>"string",
230 if (plc_is_admin()) $headers[plc_delete_icon()]="none";
232 $table_options=array("notes_area"=>false,"pagesize_area"=>false,"search_width"=>10);
233 $table=new PlcTable("node_tags",$headers,0,$table_options);
235 if ($tags) foreach ($tags as $tag) {
236 // does this match a nodegroup ?
237 $nodegroup_name="n/a";
238 $nodegroup_key=$tag['tagname'] . "=" . $tag['value'];
239 $nodegroup=$nodegroups_hash[$nodegroup_key];
240 if ($nodegroup) $nodegroup_name=l_nodegroup_t($nodegroup['nodegroup_id'],$nodegroup['groupname']);
242 $table->cell(l_tag_obj($tag));
243 $table->cell($tag['value']);
244 $table->cell($nodegroup_name);
245 // the remove checkbox
246 if (plc_is_admin()) $table->cell ($form->checkbox_html('node_tag_ids[]',$tag['node_tag_id']));
251 $table->tfoot_start();
255 $table->cell($form->submit_html("delete-node-tags","Remove Tags"),
256 // use the whole columns and right adjust
257 $table->columns(), "right");
262 // get list of tag names in the node/* category
263 $all_tags= $api->GetTagTypes( array ("category"=>"node*"), array("tagname","tag_type_id"));
264 // xxx cannot use onchange=submit() - would need to somehow pass action name
265 function tag_selector ($tag) { return array("display"=>$tag['tagname'],"value"=>$tag['tag_type_id']); }
266 $selector=array_map("tag_selector",$all_tags);
267 $table->cell($form->select_html("tag_type_id",$selector,array('label'=>"Choose")));
268 $table->cell($form->text_html("value","",array('width'=>8)));
269 $table->cell($form->submit_html("set-tag-on-node","Set Tag"),2,"left");
276 //////////////////////////////////////////////////////////// interfaces
279 plc_section ("Interfaces");
280 // display interfaces
281 if( ! $interfaces ) {
283 plc_warning_html("This node has no interface");
284 echo "Please add an interface to make this a usable PLC node.</p>\n";
288 $headers["IP"]="IPAddress";
289 $headers["Method"]="string";
290 $headers["Type"]="string";
291 $headers["MAC"]="string";
292 $headers["bw limit"]="FileSize";
293 // a single symbol, marking 'p' for primary and a delete button for non-primary
294 if ( $privileges ) $headers[plc_delete_icon()]='string';
296 $table_options=array('search_area'=>false,"pagesize_area"=>false,'notes_area'=>false);
297 $table=new PlcTable("node_interfaces",$headers,2,$table_options);
300 foreach ( $interfaces as $interface ) {
301 $interface_id= $interface['interface_id'];
302 $interface_ip= $interface['ip'];
303 $interface_broad= $interface['broadcast'];
304 $interface_primary= $interface['is_primary'];
305 $interface_network= $interface['network'];
306 $interface_dns1= $interface['dns1'];
307 $interface_dns2= $interface['dns2'];
308 $interface_hostname= $interface['hostname'];
309 $interface_netmaks= $interface['netmask'];
310 $interface_gatewary= $interface['gateway'];
311 $interface_mac= $interface['mac'];
312 $interface_bwlimit= $interface['bwlimit'];
313 $interface_type= $interface['type'];
314 $interface_method= $interface['method'];
317 $table->cell(l_interface_t($interface_id,$interface_ip));
318 $table->cell($interface_method);
319 $table->cell($interface_type);
320 $table->cell($interface_mac);
321 $table->cell($interface_bwlimit);
323 if ($interface_primary) {
324 $table->cell(plc_bubble("p","Cannot delete a primary interface"));
326 $table->cell ($form->checkbox_html('interface_ids[]',$interface_id));
332 $table->tfoot_start();
334 $add_button=new PlcFormButton (l_interface_add($node_id),"add_interface","Add interface","GET");
335 // we should have 6 cols, use 3 for the left (new) and the rest for the right (remove)
336 $table->cell($add_button->html(), 3,"left");
337 $table->cell($form->submit_html("delete-interfaces","Remove Interfaces"), $table->columns()-3,"right");
344 //////////////////////////////////////////////////////////// slices
347 plc_section ("Slices");
349 plc_warning ("This node is not associated to any slice");
352 $headers['Peer']="string";
353 $headers['Name']="string";
354 $headers['Slivers']="string";
356 $table_options = array('notes_area'=>false,"search_width"=>10,'pagesize'=>$reasonable_page);
357 if (count ($slices) <= $reasonable_page) {
358 $table_options['search_area']=false;
359 $table_options['pagesize_area']=false;
361 $table=new PlcTable("node_slices",$headers,1,$table_options);
364 foreach ($slices as $slice) {
366 $table->cell ($peers->shortname($peer_id));
367 $table->cell (l_slice_t ($slice['slice_id'],$slice['name']));
368 $table->cell (l_sliver_t ($node_id,$slice['slice_id'],'view'));
376 ////////////////////////////////////////////////////////////
377 $peers->block_end($peer_id);
381 include 'plc_footer.php';