// node info
$hostname= $node['hostname'];
$boot_state= $node['boot_state'];
+$run_level = $node['run_level'];
$site_id= $node['site_id'];
$model= $node['model'];
$version= $node['version'];
$conf_file_ids= $node['conf_file_ids'];
$interface_ids= $node['interface_ids'];
$nodegroup_ids= $node['nodegroup_ids'];
-$pcu_ids= $node['pcu_ids'];
// get peers
$peer_id = $node['peer_id'];
if( !empty( $nodegroup_ids ) )
$nodegroups= $api->GetNodeGroups( $nodegroup_ids, array("groupname","tag_type_id","value"));
-// xxx Thierry : remaining stuff
-// (*) events: should display the latest events relating to that node.
-// disabling call to GetEvents, that gets the session deleted in the DB
-// (*) conf_files: is fetched but not displayed
-if( !empty( $conf_file_ids ) )
- $conf_files= $api->GetConfFiles( $conf_file_ids );
-// (*) idem for PCUs
-// gets pcu and port info key to both is $pcu_id
-// turning this off: GetPCUs is not allowed to users, and we don't show PCUs yet anyway
-//if( !empty( $pcu_ids ) )
-// $PCUs= $api->GetPCUs( $pcu_ids );
+// Thierry : remaining stuff
+// (*) events: xxx todo xxx for admins xxx
+// should display the latest events relating to that node.
+// historically we had to turn this off at some point as GetEvents was getting the session deleted in the DB
+// (*) conf_files: xxx todo xxx for admins xxx
+//if( !empty( $conf_file_ids ) )
+// $conf_files= $api->GetConfFiles( $conf_file_ids );
//////////////////// display node info
$peers->block_start ($peer_id);
$toggle = new PlekitToggle ('node',"Details",
- array('trigger-bubble'=>'Display and modify details for that node'));
+ array('bubble'=>'Display and modify details for that node',
+ 'visible'=>get_arg('show_details',true)));
$toggle->start();
$details=new PlekitDetails($privileges);
$details->form_end();
if ($privileges) $details->space();
+////////////////////
+// PCU stuff - not too sure why, but GetPCUs is not exposed to the 'user' role
+$display_pcus = (plc_is_admin() || plc_is_pi() || plc_is_tech());
+if ($display_pcus) {
+ $pcu_ids= $node['pcu_ids'];
+ $ports= $node['ports'];
+ // avoid 2 API calls : get all site PCUs and then search from there
+ function search_pcu ($site_pcus,$pcu_id) {
+ if ($site_pcus) foreach ($site_pcus as $site_pcu) if ($site_pcu['pcu_id']==$pcu_id) return $site_pcu;
+ return FALSE;
+ }
+ $site_pcus = $api->GetPCUs(array('site_id'=>$site_id));
+ // not sure what the exact semantics is, but I expect pcu_ids and ports should have same cardinality
+ if (count ($pcu_ids) != count ($ports))
+ $pcu_string = "Unexpected condition: " . count($pcu_ids) . " pcu_ids and " . count($ports) . " ports";
+ else if (count($pcu_ids) == 0)
+ $pcu_string = plc_warning_html("No PCU !");
+ else if (count($pcu_ids) == 1) {
+ $pcu_id=$pcu_ids[0];
+ $port=$ports[0];
+ $pcu_columns = array('hostname');
+ $pcu=search_pcu($site_pcus,$pcu_id);
+ if ( ! $pcu )
+ $pcu_string = "Cannot find PCU " . $pcu_id;
+ else
+ $pcu_string = $pcu['hostname'] . " on port " . $port;
+ } else
+ $pcu_string = plc_warning_html("More than one PCU attached ? ");
+
+
+ $details->form_start(l_actions(),array("action"=>"attach-pcu","node_id"=>$node_id));
+ // prepare selectors
+ if (! $site_pcus) {
+ $pcu_update_area = "This site has no PCU - " . href ( l_pcu_add(), "add one here");
+ } else {
+ $pcu_add_link = href (l_pcu_add(),plc_add_icon());
+
+ // first option in pcus
+ if ($pcu_ids)
+ $none_detach = 'Detach';
+ else
+ $none_detach='None';
+ $pcu_selectors = array(array('display'=>$none_detach,'value'=>-1));
+ // one option per site pcu
+ foreach ($site_pcus as $site_pcu) {
+ $selector=array('display'=>$site_pcu['hostname'],'value'=>$site_pcu['pcu_id']);
+ if ($pcu_id == $site_pcu['pcu_id']) $selector['selected']=true;
+ $pcu_selectors []= $selector;
+ }
+ $pcu_chooser = $details->form()->select_html('pcu_id',$pcu_selectors);
+
+ function port_selector ($i,$port) {
+ $selector = array ('display'=>'port ' . $i, 'value'=>$i);
+ if ($i == $port) $selector['selected'] = true;
+ return $selector;
+ }
+ $port_selectors = array () ;
+ $available_ports =range(1,8);
+ foreach ($available_ports as $available_port)
+ $port_selectors []= port_selector ($available_port,$port);
+ $port_chooser = $details->form()->select_html('port',$port_selectors);
+
+ $pcu_attach_button =
+ $details->form()->submit_html('attach_pcu',"Attach PCU");
+
+ $pcu_update_area = $pcu_add_link . " " . $pcu_chooser . " " . $port_chooser . " " . $pcu_attach_button;
+ }
+
+ $details->th_td("PCU",plc_vertical_table(array($pcu_string,$pcu_update_area)));
+ $details->form_end();
+ $details->space();
+ }
+
+//////////////////// type & version
$details->th_td("Type",$node_type);
$details->th_td("Version",$version);
// let's use plc_objects
// boot area
$details->space ();
+$details->th_td ("Observed Boot state",$run_level . ( $Node->stale() ? " -- stale value" : "" ));
if ( ! ($local_peer && $privileges)) {
// just display it
$boot_value=$boot_state;
$boot_form = new PlekitForm (l_actions(), array("node_id"=>$node_id,
"action"=>"node-boot-state"));
$boot_value .= $boot_form->start_html();
- $states = array( 'boot'=>'Boot', 'safeboot'=>'SafeBoot', 'failboot'=>'FailBoot',
- 'disabled' => 'Disabled', 'install'=>'Install', 'reinstall'=>'Reinstall');
+ $states = array( 'boot'=>'Boot', 'safeboot'=>'SafeBoot',
+ 'disabled' => 'Disabled', 'reinstall'=>'Reinstall');
$selectors=array();
foreach ($states as $dbname=>$displayname) {
$selector=array("display"=>$displayname, "value"=>$dbname);
$boot_value .= $boot_form->select_html("boot_state",$selectors,array('autosubmit'=>true));
$boot_value .= $boot_form->end_html();
}
-$details->th_td ("Boot state",$boot_value);
+$details->th_td ("Preferred Boot state",$boot_value);
// same here for the download area
if ( $local_peer && $privileges) {
$selectors = array(
array("display"=>"-- All in one images --","disabled"=>true),
array("value"=>"download-node-iso","display"=>"Download ISO image for $hostname"),
- array("value"=>"download-node-usb","display"=>"Download USB image for $hostname<"),
+ array("value"=>"download-node-usb","display"=>"Download USB image for $hostname"),
+ array("value"=>"download-node-usb-partition", "display"=>"Download partitioned, USB image for $hostname"),
array("display"=>"-- Floppy + generic image --","disabled"=>true),
array("value"=>"download-node-floppy","display"=>"Download Floppy file for $hostname"),
array("value"=>"download-generic-iso","display"=>"Download generic ISO image (requires floppy)"),
array('label'=>"Download mode",'autosubmit'=>true));
$download_value .= $download_form->end_html();
$details->th_td ("Download",$download_value);
+
}
// site info and all site nodes
$form=new PlekitForm (l_actions(), array('node_id'=>$node_id));
$form->start();
+//////////////////////////////////////////////////////////// slivers
+{
+ $toggle=new PlekitToggle ('slices',count_english_warning($slices,'sliver'),
+ array('bubble'=>'Review slices running on that node',
+ 'visible'=>get_arg('show_slices',false)));
+ $toggle->start();
+ if ( ! $slices ) {
+ plc_warning ("This node is not associated to any slice");
+ } else {
+ $headers=array();
+ $headers['Peer']="string";
+ $headers['Slice Name']="string";
+ $headers['Sliver']="string";
+ $reasonable_page=10;
+ $table_options = array('notes_area'=>false,"search_width"=>10,'pagesize'=>$reasonable_page);
+ if (count ($slices) <= $reasonable_page) {
+ $table_options['search_area']=false;
+ $table_options['pagesize_area']=false;
+ }
+ $table=new PlekitTable("node_slices",$headers,1,$table_options);
+ $table->start();
+
+ foreach ($slices as $slice) {
+ $table->row_start();
+ $peers->cell ($table,$slice['peer_id']);
+ $table->cell (l_slice_t ($slice['slice_id'],$slice['name']));
+ # xxx l_sliver not implemented yet - what should we show exactly ?
+ $table->cell (l_sliver_t ($node_id,$slice['slice_id'],'sliver tags'));
+ $table->row_end();
+ }
+ $table->end();
+ }
+ $toggle->end();
+}
+
//////////////////////////////////////////////////////////// Tags
// tags section
-$show_tags = (plc_is_admin());
if ( $local_peer ) {
$tags=$api->GetNodeTags (array('node_id'=>$node_id));
function get_tagname ($tag) { return $tag['tagname'];}
+ // xxx looks like tech-only see an error here,
+ // might be that GetNodeTags is not accessible or something
$tagnames = array_map ("get_tagname",$tags);
$nodegroups_hash=plc_nodegroup_global_hash($api,$tagnames);
- $toggle = new PlekitToggle ('tags',"Tags",
- array('trigger-bubble'=>'Inspect and set tags on that node',
- 'start-visible'=>$show_tags));
+ $toggle = new PlekitToggle ('tags',count_english_warning($tags,'tag'),
+ array('bubble'=>'Inspect and set tags on that node',
+ 'visible'=>get_arg('show_tags',false)));
$toggle->start();
$headers=array("Name"=>"string",
$table->row_start();
$table->cell($form->submit_html("delete-node-tags","Remove Tags"),
// use the whole columns and right adjust
- $table->columns(), "right");
+ array('hfill'=>true,'align'=>'right'));
$table->row_end();
// set tag area
$selector=array_map("tag_selector",$all_tags);
$table->cell($form->select_html("tag_type_id",$selector,array('label'=>"Choose")));
$table->cell($form->text_html("value","",array('width'=>8)));
- $table->cell($form->submit_html("set-tag-on-node","Set Tag"),2,"left");
+ $table->cell($form->submit_html("set-tag-on-node","Set Tag"),array('columns'=>2,'align'=>'left'));
$table->row_end();
}
//////////////////////////////////////////////////////////// interfaces
if ( $local_peer ) {
- $toggle=new PlekitToggle ('interfaces',"Interfaces",
- array('trigger-bubble'=>'Inspect and tune interfaces on that node',
- 'start-hidden'=>true));
+ $toggle=new PlekitToggle ('interfaces',count_english_warning($interfaces,'interface'),
+ array('bubble'=>'Inspect and tune interfaces on that node',
+ 'visible'=>get_arg('show_interfaces',false)));
$toggle->start();
// display interfaces
if( ! $interfaces ) {
if ($privileges) {
$table->tfoot_start();
$table->row_start();
- $add_button=new PlekitFormButton (l_interface_add($node_id),"add_interface","Add interface","GET");
+ $add_button=new PlekitFormButton (l_interface_add($node_id),"add","Add Interface","GET");
// we should have 6 cols, use 3 for the left (new) and the rest for the right (remove)
- $table->cell($add_button->html(), 3,"left");
- $table->cell($form->submit_html("delete-interfaces","Remove Interfaces"), $table->columns()-3,"right");
+ $table->cell($add_button->html(),array('columns'=> 3,'align'=>'left'));
+ $table->cell($form->submit_html("delete-interfaces","Remove Interfaces"),
+ array('columns'=>$table->columns()-3,'align'=>'right'));
$table->row_end();
}
$table->end();
$toggle->end();
}
-//////////////////////////////////////////////////////////// slices
-// display slices
-
-{
- $toggle=new PlekitToggle ('slices',"Slices",
- array('trigger-bubble'=>'Review slices running on that node',
- 'start-hidden'=>true));
- $toggle->start();
- if ( ! $slices ) {
- plc_warning ("This node is not associated to any slice");
- } else {
- $headers=array();
- $headers['Peer']="string";
- $headers['Name']="string";
- $headers['Slivers']="string";
- $reasonable_page=10;
- $table_options = array('notes_area'=>false,"search_width"=>10,'pagesize'=>$reasonable_page);
- if (count ($slices) <= $reasonable_page) {
- $table_options['search_area']=false;
- $table_options['pagesize_area']=false;
- }
- $table=new PlekitTable("node_slices",$headers,1,$table_options);
- $table->start();
-
- foreach ($slices as $slice) {
- $table->row_start();
- $table->cell ($peers->shortname($peer_id));
- $table->cell (l_slice_t ($slice['slice_id'],$slice['name']));
- $table->cell (l_sliver_t ($node_id,$slice['slice_id'],'view'));
- $table->row_end();
- }
- $table->end();
- }
- $toggle->end();
-}
-
$form->end();
////////////////////////////////////////////////////////////