<?php
  // $Id: index.php 11750 2009-01-29 10:11:53Z thierry $
  //

  // Require login
require_once 'plc_login.php';

// Get session and API handles
require_once 'plc_session.php';
global $plc, $api;

// Print header
require_once 'plc_drupal.php';
include 'plc_header.php';

// Common functions
require_once 'plc_functions.php';
require_once 'plc_peers.php';
require_once 'plc_minitabs.php';
require_once 'plc_tables.php';

// -------------------- 
// recognized URL arguments
$peerscope=$_GET['peerscope'];
$pattern=$_GET['pattern'];

// --- decoration
$title="Sites";
$tabs=array();

// -------------------- 
$site_filter=array();

function site_status ($site) {

  $messages=array();
  
  if (empty ($site['node_ids'])) 
    $messages [] = "No node";

  $class=($site['peer_id']) ? 'plc-foreign' : 'plc-warning';

  // do all this stuff on local sites only
  if ( ! $site['peer_id'] ) {
    
    // check that site is enabled
    if ( ! $site['enabled']) 
      $messages [] = "Not enabled";
  
    // check that site has at least a PI and a tech
    global $api;
    $persons=$api->GetPersons(array("person_id"=>$site['person_ids']),array("role_ids"));
    $nb_pis=0;
    $nb_tech=0;
    if ( $persons) foreach ($persons as $person) {
	if (in_array( '20', $person['role_ids'])) $nb_pis += 1;
	if (in_array( '40', $person['role_ids'])) $nb_techs += 1;
      }
    if ($nb_pis == 0) $messages [] = "No PI";
    if ($nb_techs == 0) $messages [] = "No Tech";
    
    // check number of slices
    if ( $site['max_slices'] == 0) {
      $messages [] = "No slice allowed";
    } else if (count($site["slice_ids"]) >= $site['max_slices']) {
      $messages [] = "No slice left";
    }
  }

  return plc_vertical_table ($messages,$class);
}

////////////////////
// The set of columns to fetch
// and the filter applied for fetching sites
if ($pattern) {
  $site_filter['login_base']=$pattern;
  $title .= " with login_base matching " . $pattern;
 } else {
  $site_filter['login_base']="*";
 }

// server-side selection on peerscope
$peerscope = new PeerScope ($api,$peerscope);
$site_filter=array_merge($site_filter,$peerscope->filter());
$title .= ' - ' . $peerscope->label();

if (! plc_is_admin()) {
  $site_columns = array("site_id", "name", "abbreviated_name", "login_base" , "peer_id" );
  $site_filter = array_merge ($site_filter, array ("enabled" => TRUE));
 } else {
  $site_columns = array("site_id", "name", "abbreviated_name", "login_base" , "peer_id" , 
			"enabled", "person_ids", "max_slices", "slice_ids", "node_ids");
 }

$tabs['My site'] = array('url'=>l_site(plc_my_site_id()));
$tabs['Local sites'] = array('url'=>l_sites_peer('local'));
if (plc_is_admin()) 
  $tabs['Pending'] = array ('url'=>l_sites_pending(),
			    'bubble'=>'Review pending join requests');

drupal_set_title($title);
plc_tabs($tabs);

// go
$sites= $api->GetSites( $site_filter , $site_columns);

$peers=new Peers($api);

$headers['Peer']="string";
$headers['Full Name']="string";
$headers['Login']="string";
$headers['Abbrev.']="string";
if (plc_is_admin()) {
  $headers['N']="int";
  $headers['U']="int";
  $headers['S']="int";
  $headers['?']="string";
 }

plc_table_start("sites",$headers,2);

if ($sites) foreach ($sites as $site) {
  $shortname = $peers->shortname($site['peer_id']);
  plc_table_row_start();
  plc_table_cell($shortname);
  plc_table_cell (l_site_t($site['site_id'],$site['name']));
  plc_table_cell ($site['login_base']);
  plc_table_cell ($site['abbreviated_name']);
  if (plc_is_admin()) {
    plc_table_cell(count($site['node_ids']));
    plc_table_cell(count($site['person_ids']));
    plc_table_cell(count($site['slice_ids']));
    plc_table_cell(site_status($site));
  }
  plc_table_row_end();
}
$notes=array("N = number of sites / U = number of users / S = number of slices");

plc_table_end("sites",array('notes'=>$notes));

// Print footer
include 'plc_footer.php';

?>