iteration on toggles, ready to spread
[plewww.git] / planetlab / nodes / node.php
index 8de39d7..7129187 100644 (file)
@@ -20,6 +20,7 @@ require_once 'plc_minitabs.php';
 require_once 'plc_tables.php';
 require_once 'plc_details.php';
 require_once 'plc_forms.php';
+require_once 'plc_toggles.php';
 require_once 'plc_objects.php';
 
 // -------------------- 
@@ -93,8 +94,9 @@ 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
-if( !empty( $pcu_ids ) )
-  $PCUs= $api->GetPCUs( $pcu_ids );
+// 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 );
 
 //////////////////// display node info
 
@@ -103,10 +105,14 @@ $local_peer= ! $peer_id;
 
   
 // extra privileges to admins, and (pi||tech) on this site
-$privileges = plc_is_admin () || ( plc_in_site($site_id) && ( plc_is_pi() || plc_is_tech()));
+$privileges = (plc_is_admin () && $local_peer) || ( plc_in_site($site_id) && ( plc_is_pi() || plc_is_tech()));
   
 $tabs=array();
 // available actions
+$tabs [] = tab_nodes_site($site_id);
+$tabs [] = tab_site($site_id);
+$tabs [] = tab_nodes();
+
 if ( $local_peer  && $privileges ) {
     
   $tabs['Delete'] = array ('url'=>l_actions(),
@@ -116,17 +122,15 @@ if ( $local_peer  && $privileges ) {
                           'confirm'=>'Are you sure to delete ' . $hostname. ' ?');
   // xxx subject to roles
   $tabs["Add Interface"]=array('url'=>l_interface_add($node_id),
-                              'bubble'=>"Declare new network interface on $hostname");
-  $tabs["Events"]=array_merge(tabs_events(),
+                              'bubble'=>"Define new network interface on $hostname");
+  $tabs["Events"]=array_merge(tablook_event(),
                              array('url'=>l_event("Node","node",$node_id),
                                    'bubble'=>"Events for node $hostname"));
-  $tabs["Comon"]=array_merge(tabs_comon(),
+  $tabs["Comon"]=array_merge(tablook_comon(),
                             array('url'=>l_comon("node_id",$node_id),
                                   'bubble'=>"Comon page about node $hostname"));
  }
 
-$tabs["All nodes"]=l_nodes();
-
 plc_tabs($tabs);
 
 // show gray background on foreign objects : start a <div> with proper class
@@ -135,23 +139,24 @@ $peers->block_start ($peer_id);
 $details=new PlcDetails($privileges);
 $details->start();
 if ( ! $local_peer) {
-  $details->line("Peer",$peers->peer_link($peer_id));
+  $details->th_td("Peer",$peers->peer_link($peer_id));
   $details->space();
  }
 
 $details->form_start(l_actions(),array("action"=>"update-node", "node_id"=>$node_id));
-$details->line("Hostname",$hostname,"hostname"); 
-$details->line("Model",$model,"model");
-$details->line("",$details->submit_html("submit","Update Node"));
+$details->th_td("Hostname",$hostname,"hostname"); 
+$details->th_td("Model",$model,"model");
+$details->tr_submit("submit","Update Node");
 $details->form_end();
+if ($privileges) $details->space();
 
-$details->line("Type",$node_type);
-$details->line("Version",$version);
+$details->th_td("Type",$node_type);
+$details->th_td("Version",$version);
 // let's use plc_objects
 $Node = new Node($node);
-$details->line("Date created",$Node->dateCreated());
-$details->line("Last contact",$Node->lastContact());
-$details->line("Last update",$Node->lastUpdated());
+$details->th_td("Date created",$Node->dateCreated());
+$details->th_td("Last contact",$Node->lastContact());
+$details->th_td("Last update",$Node->lastUpdated());
 
 // boot area
 $details->space ();
@@ -171,10 +176,10 @@ if ( ! ($local_peer && $privileges)) {
     if ($dbname == $boot_state) $selector['selected']=true;
     $selectors []= $selector;
   }
-  $boot_value .= $boot_form->select_html("boot_state",$selectors,NULL,true);
+  $boot_value .= $boot_form->select_html("boot_state",$selectors,array('autosubmit'=>true));
   $boot_value .= $boot_form->end_html();
  }
-$details->line ("Boot state",$boot_value);
+$details->th_td ("Boot state",$boot_value);
 
 // same here for the download area
 if ( $local_peer  && $privileges) {
@@ -190,21 +195,22 @@ if ( $local_peer  && $privileges) {
                     array("value"=>"download-node-floppy","display"=>"Download Floppy file for $hostname"),
                     array("value"=>"download-generic-iso","display"=>"Download generic ISO image (requires floppy)"),
                     array("value"=>"download-generic-usb","display"=>"Download generic USB image (requires floppy)"));
-  $download_value .= $download_form->select_html("action",$selectors,"Download mode",true);
+  $download_value .= $download_form->select_html("action",$selectors,
+                                                array('label'=>"Download mode",'autosubmit'=>true));
   $download_value .= $download_form->end_html();
-  $details->line ("Download",$download_value);
+  $details->th_td ("Download",$download_value);
  }
 
 // site info and all site nodes
 $details->space ();
-$details->line("Site",l_site_t($site_id,$site_name));
+$details->th_td("Site",l_site_t($site_id,$site_name));
                   
 // build list of node links
 $nodes_area=array();
 foreach ($site_node_hash as $hash_node_id => $hash_hostname) {
   $nodes_area []= l_node_t($hash_node_id,$hash_hostname);
 }
-$details->lines ("All site nodes",$nodes_area);
+$details->th_tds ("All site nodes",$nodes_area);
 
 $details->end ();
 
@@ -212,7 +218,8 @@ $form=new PlcForm (l_actions(), array('node_id'=>$node_id));
 $form->start();
 
 //////////////////////////////////////////////////////////// Tags
-// get tags
+// tags section
+$show_tags = (plc_is_admin());
 if ( $local_peer ) {
   
   $tags=$api->GetNodeTags (array('node_id'=>$node_id));
@@ -220,7 +227,11 @@ if ( $local_peer ) {
   $tagnames = array_map ("get_tagname",$tags);
   $nodegroups_hash=plc_nodegroup_global_hash($api,$tagnames);
   
-  plc_section("Tags");
+  $toggle = new PlcToggle ('tags',"Tags",array('trigger-tagname'=>'h2',
+                                              'trigger-bubble'=>'Inspect and set tags on that node',
+                                              'start-visible'=>$show_tags));
+  $toggle->start();
+
   $headers=array("Name"=>"string",
                 "Value"=>"string",
                 "Nodegroup"=>"string",
@@ -262,19 +273,22 @@ if ( $local_peer ) {
     // xxx cannot use onchange=submit() - would need to somehow pass action name 
     function tag_selector ($tag) { return array("display"=>$tag['tagname'],"value"=>$tag['tag_type_id']); }
     $selector=array_map("tag_selector",$all_tags);
-    $table->cell($form->select_html("tag_type_id",$selector,"Choose"));
-    $table->cell($form->text_html("value","",8));
+    $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->row_end();
   }
   
   $table->end();
- }
+  $toggle->end();
+}
 
 //////////////////////////////////////////////////////////// interfaces
 if ( $local_peer ) {
-
-  plc_section ("Interfaces");
+  $toggle=new PlcToggle ('interfaces',"Interfaces",array('trigger-tagname'=>'h2',
+                                                        'trigger-bubble'=>'Inspect and tune interfaces on that node',
+                                                        'start-hidden'=>true));
+  $toggle->start();
   // display interfaces
   if( ! $interfaces ) {
     echo '<p>';
@@ -329,7 +343,7 @@ if ( $local_peer ) {
     if ($privileges) {
       $table->tfoot_start();
       $table->row_start();
-      $add_button=new PlcFormButton (l_interface_add($node_id),"add_interface","Add interface");
+      $add_button=new PlcFormButton (l_interface_add($node_id),"add_interface","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");
@@ -337,43 +351,51 @@ if ( $local_peer ) {
     }
     $table->end();
   }
+  $toggle->end();
  }
 
 //////////////////////////////////////////////////////////// slices
 // display slices
 
-plc_section ("Slices");
-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 PlcTable("node_slices",$headers,1,$table_options);
-  $table->start();
+{
+  $toggle=new PlcToggle ('slices',"Slices",array('trigger-tagname'=>'h2',
+                                                '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 PlcTable("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();
+    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();
   }
-  $table->end();
- }
+  $toggle->end();
+}
 
 $form->end();
 
 ////////////////////////////////////////////////////////////
 $peers->block_end($peer_id);
 
+plc_tabs ($tabs,"bottom");
 
 // Print footer
 include 'plc_footer.php';