href (l_sites_pending(),"this page") .
" to review pending applications.");
-plc_details_start();
-plc_details_line("Full name",$sitename);
-plc_details_line("Login base",$login_base);
-plc_details_line("Abbreviated name",$abbrev_name);
-plc_details_line("URL",$site_url);
-plc_details_line("Latitude",$site_lat);
-plc_details_line("Longitude",$site_long);
-plc_details_line("Peer",$peers->peer_link($peer_id));
+$can_update=plc_is_admin () || ( plc_in_site($site_id) && plc_is_pi());
+$details = new PlcDetails($can_update);
+// XXX make this updatable
+$details->start();
+$details->line("Full name",$sitename);
+$details->line("Login base",$login_base);
+$details->line("Abbreviated name",$abbrev_name);
+$details->line("URL",$site_url);
+$details->line("Latitude",$site_lat);
+$details->line("Longitude",$site_long);
+$details->line("Peer",$peers->peer_link($peer_id));
if ( $local_peer ) {
// Nodes
- plc_details_space_line();
+ $details->space();
$nb_boot = 0;
if ($nodes) foreach ($nodes as $node) if ($node['boot_state'] == 'boot') $nb_boot ++;
- $node_text = $nb_boot . " boot / " . count($nodes) . " total";
- plc_details_line("# Nodes", href(l_nodes_site($site_id),$node_text));
+ $node_label = $nb_boot . " boot / " . count($nodes) . " total";
+ $details->line("# Nodes", href(l_nodes_site($site_id),$node_label));
function n_link ($n) { return l_node_t($n['node_id'],$n['hostname'] . " (" . $n['boot_state'] . ")");}
- $nodes_text= plc_vertical_table(array_map ("n_link",$nodes));
- plc_details_line ("hostnames",$nodes_text);
+ $nodes_label= plc_vertical_table(array_map ("n_link",$nodes));
+ $details->line ("hostnames",$nodes_label);
// Users
- plc_details_space_line();
- $user_text = count($person_ids) . " total / " .
+ $details->space();
+ $user_label = count($person_ids) . " total / " .
count ($pis) . " PIs / " .
count ($techs) . " techs";
if ( (count ($pis) == 0) || (count ($techs) == 0) || (count($person_ids) >=50))
- $user_text = plc_warning_text ($user_text);
- plc_details_line ("# Users",href(l_persons_site($site_id),$user_text));
+ $user_label = plc_warning_html ($user_label);
+ $details->line ("# Users",href(l_persons_site($site_id),$user_label));
function p_link ($p) { return l_person_t($p['person_id'],$p['email']); }
// PIs
- $pi_text = plc_vertical_table (array_map ("p_link",$pis));
- plc_details_line("PI's",$pi_text);
- // PIs
- $tech_text = plc_vertical_table (array_map ("p_link",$techs));
- plc_details_line("techs's",$tech_text);
+ $details->line("PI's",plc_vertical_table (array_map ("p_link",$pis)));
+ // techs
+ $details->line("techs's",plc_vertical_table (array_map ("p_link",$techs)));
// Slices
- plc_details_space_line();
- // summary on # slices
- $slice_text = count($slice_ids) . " running / " . $max_slices . " max";
- if (count($slice_ids) >= $max_slices) $slice_text = plc_warning_text ($slice_text);
- plc_details_line("# Slices", href(l_slices_site($site_id),$slice_text));
+ $details->space();
+ // summary on slices
+ $slice_label = count($slice_ids) . " running / " . $max_slices . " max";
+ if (count($slice_ids) >= $max_slices)
+ $slice_label = plc_warning_html ($slice_label);
+ $details->line("# Slices", href(l_slices_site($site_id),$slice_label));
if ($slices) foreach ($slices as $slice)
- plc_details_line($slice['instantiation'],l_slice_obj($slice));
-
+ $details->line($slice['instantiation'],l_slice_obj($slice));
// Addresses
if ($addresses) {
- plc_details_space_line();
- plc_details_line("Addresses","");
+ $details->space();
+ $details->line("Addresses","");
foreach ($addresses as $address) {
- plc_details_line(plc_vertical_table($address['address_types']),
+ $details->line(plc_vertical_table($address['address_types']),
plc_vertical_table(array($address['line1'],
$address['line2'],
$address['line3'],
}
-plc_details_end();
+$details->end();
////////////////////////////////////////
$peers->block_end($peer_id);