X-Git-Url: http://git.onelab.eu/?a=blobdiff_plain;f=planetlab%2Fcommon%2Fadminsearch.php;h=354b17900127954f1341978ed0acfb4c5f11d626;hb=61556d062d4419b54810e4420803a219f2c44a39;hp=45a1c618914d37cbccf3f6f85ff5fad9d2ad9fd9;hpb=878ce4154f4619a5d07c780bf1f76dfd46771df4;p=plewww.git
diff --git a/planetlab/common/adminsearch.php b/planetlab/common/adminsearch.php
index 45a1c61..354b179 100644
--- a/planetlab/common/adminsearch.php
+++ b/planetlab/common/adminsearch.php
@@ -1,6 +1,8 @@
= 2 ) {
- return true;
+$pattern="";
+if (isset($_GET['pattern'])) { $pattern=$_GET['pattern']; }
+if (isset($_POST['pattern'])) { $pattern=$_POST['pattern']; }
+
+$tokens=explode(" ",$pattern);
+function token_filter ($t) { $t = trim($t); if (empty($t)) return false; return true; }
+$tokens=array_filter($tokens, "token_filter");
+
+
+////////////////////
+// from a single search form, extract all tokens entered
+// and then show all entities that match one of that tokens among
+// persons - sites - slices - nodes
+////////////////////
+function display_form ($pattern) {
+ if ($pattern) {
+ $title="Searching for $pattern";
+ $visible=false;
} else {
- return false;
+ $title="Search for what";
+ $visible=true;
}
+ $toggle=new PlekitToggle("admin-search",$title,array('visible'=>$visible));
+ $toggle->start();
+ print <<< EOF
+
+This form searches for any entry in the database
+(among persons, slices,
+sites and nodes)
+matching a name fragment, or token.
+You can specify a space-separated list of tokens, all entries matching
+any token would then get listed.
+
\n";
+//////////
+// create link from an id, using the various global hashes
+function plc_person_link ($person_id) {global $persons_hash; return l_person_obj($persons_hash[$person_id]);}
+function plc_slice_link ($slice_id) {global $slices_hash; return l_slice_obj($slices_hash[$slice_id]);}
+function plc_site_link ($site_id) {global $sites_hash; return l_site_obj($sites_hash[$site_id]);}
+function plc_node_link ($node_id) {global $nodes_hash; return l_node_obj($nodes_hash[$node_id]);}
+
+global $table_options;
+$table_options = array('notes_area'=>false);
+
+global $peers;
+$peers = new Peers ($api);
+
+function display_persons ($persons,$visible) {
+ if ( ! $persons) return;
+
+ $toggle=new PlekitToggle('persons-area',"Persons",array('visible'=>$visible));
+ $toggle->start();
+
+ $headers=array('id'=>'int',
+ 'P'=>'string',
+ 'email'=>'string',
+ 'sites'=>'string',
+ 'slices'=>'string',
+ 'roles'=>'string');
+ global $table_options;
+ global $peers;
+ $table=new PlekitTable('persons',$headers,1,$table_options);
+ $table->start();
+ foreach ($persons as $person) {
+ $table->row_start();
+ $table->cell($person['person_id']);
+ $peers->cell($table,$person['peer_id']);
+ $table->cell(l_person_obj($person));
+ $table->cell(plc_vertical_table(array_map("plc_site_link",$person['site_ids'])));
+ $table->cell(plc_vertical_table(array_map("plc_slice_link",$person['slice_ids'])));
+ $table->cell(plc_vertical_table($person['roles']));
+ $table->row_end();
+ }
+ $table->end();
+ $toggle->end();
+}
- }
-
+function display_slices ($slices,$visible) {
+ if ( ! $slices) return;
+
+ $toggle=new PlekitToggle('slices-area',"Slices",array('visible'=>$visible));
+ $toggle->start();
+
+ $headers=array('id'=>'int',
+ 'P'=>'string',
+ 'name'=>'string',
+ 'site'=>'string',
+ 'persons'=>'string',
+ 'N'=>'string');
+ global $table_options;
+ global $peers;
+ $table=new PlekitTable('slices',$headers,1,$table_options);
+ $table->start();
+ foreach ($slices as $slice) {
+ $table->row_start();
+ $table->cell($slice['slice_id']);
+ $peers->cell($table,$slice['peer_id']);
+ $table->cell(l_slice_obj($slice));
+ global $sites_hash;
+ $site=$sites_hash[$slice['site_id']];
+ $table->cell(l_site_obj($site));
+ $table->cell(plc_vertical_table(array_map("plc_person_link",$slice['person_ids'])));
+ // this makes really long tables, use the slice link to see details
+ //$table->cell(plc_vertical_table(array_map("plc_node_link",$slice['node_ids'])));
+ $table->cell(count($slice['node_ids']));
+ $table->row_end();
}
- return $persons;
+ $table->end();
+ $toggle->end();
}
-// find person roles
-$_person= $plc->person;
-$_roles= $_person['role_ids'];
-
-
-///////////////////////////////////////////////////////////////////////
-// Initially, we need a search form, and blank information after that.
-// Based on the fields of the search form, we should be able to populate a lot
-// of information, related to user, site, keys,
-//
-// from a simple domain name search, it would display the site,
-// nodes -> pcu
-// users grouped by role,
-// from a user search, it would find,
-// user info link, site, roles, etc.
-//
-// userquery will be one of these types:
-// part of a user name, email, user_id
-// part of a site name, site alias, site_id
-// part of a node name, domain, node_id
-//
-// we should be able to return results based on these guesses. If they're
-// good, we'll get hits, if nothing comes back, we won't display anything.
-
-
-echo "
\n
- \n
-
\n
- \n";
-
-// if userquery then search based on string
-if( $_POST['userquery'] or $_GET['userquery']) {
- if ( $_POST['userquery'] ) {
- $query = $_POST['userquery'];
- } else {
- $query = $_GET['userquery'];
+function display_nodes ($nodes,$visible) {
+ if ( ! $nodes) return;
+
+ $toggle=new PlekitToggle('nodes-area',"Nodes",array('visible'=>$visible));
+ $toggle->start();
+
+ $headers=array('id'=>'int',
+ 'P'=>'string',
+ 'hostname'=>'string',
+ 'site'=>'string',
+ 'slices'=>'string');
+ global $table_options;
+ global $peers;
+ $table=new PlekitTable('nodes',$headers,1,$table_options);
+ $table->start();
+ foreach ($nodes as $node) {
+ $table->row_start();
+ $table->cell($node['node_id']);
+ $peers->cell($table,$node['peer_id']);
+ $table->cell(l_node_obj($node));
+ global $sites_hash;
+ $site=$sites_hash[$node['site_id']];
+ $table->cell(l_site_obj($site));
+ // same as above, too many entries, just list how many there are
+ //$table->cell(plc_vertical_table(array_map("plc_slice_link",$node['slice_ids'])));
+ $table->cell(count($node['slice_ids']));
+ $table->row_end();
}
- echo "
Search Results:
\n";
-
- $f_commas = explode(",", $query);
- // PHASE 1: query contains email, user_id, or part of a user name
- foreach($f_commas as $tok) {
- $tok = trim($tok); // strip white space.
-
- $e = false;
- //find user by email
- if ( is_valid_email_addr($tok) ){
- $u = get_and_print_user(array("email"=>$tok));
- $e = true;
- if( count( $u ) == 0 ) $none = 1;
- }
- $n = false;
- // find user by user_id
- if ( is_numeric($tok) ){
- $u = get_and_print_user(array("person_id"=>intval($tok)));
- $n = true;
- if( count( $u ) == 0 ) $none = 1;
- }
- // neither of the above,
- if (!$n && !$e) {
- // split on spaces, and search each part.
- // TODO: search upper and lower-case
- $f_spaces = explode(" ", $tok);
- foreach($f_spaces as $stok) {
- // assume $tok is part of a name
- // get_user
- $a = get_and_print_user(array("first_name"=>$stok));
- $b = get_and_print_user(array("last_name"=>$stok));
- // c = intersect_users(a, b)
- // if c
- // print_user(c),
- // else
- // print_user(a,b)
- }
- if( count( $a ) == 0 && count( $b ) == 0 ) $none = 1;
- }
+ $table->end();
+ $toggle->end();
+}
- // PHASE 2: query contains login_base, site_id, or part of a site name
- // find site by login_base
- $lb = false;
- $s = get_and_print_site(array("login_base"=>strtolower($tok)));
- if( count( $s ) == 0 ) $none = 1;
- else $lb = true;
+////////////////////////////////////////////////////////////
+display_form($pattern);
- $n = false;
- // find site by site_id
- if ( is_numeric($tok) ){
- $s = get_and_print_site(array("site_id"=>intval($tok)));
- $n = true;
- if( count( $s ) == 0 ) $none = 1;
- }
+if ($pattern) {
- if( !$lb && !$n ) {
- $f_spaces = explode(" ", $tok);
- foreach($f_spaces as $stok) {
- $a = get_and_print_site(array("name"=>$stok));
- }
- if( count($a) == 0 ) $none = 1;
- }
+ ////////// search database
+ // search persons on email
+ $persons = array();
+ $persons = array_merge ($persons, generic_search ('Persons','email',$tokens));
- // PHASE 3: query contains part of a node name, domain, node_id
+ // search slices on name
+ $slices=array();
+ $slices = array_merge ($slices, generic_search ('Slices','name',$tokens));
- //if( $none == 1 ) echo "
No Results.
\n";
- if ( is_possible_domainname($tok) ) {
- $n = get_and_print_hostname(array("hostname"=>$tok));
- }
+ // search sites on name and login_base
+ $sites=array();
+ $sites = array_merge ($sites, generic_search('Sites','name',$tokens));
+ $sites = array_merge ($sites, generic_search('Sites','login_base',$tokens));
+
+ // nodes on hostname
+ $nodes=array();
+ $nodes = array_merge ($nodes, generic_search('Nodes','hostname',$tokens));
+
+ print "Search results for $pattern \n";
+
+ // what kind of result have we gotten:
+ // if none : display message and exit
+ // if only one kind of objects : start toggle with visible=true
+ // otherwise start all toggles with visible=false
+ $areas=0;
+ if ($persons) $areas += 1;
+ if ($slices) $areas += 1;
+ if ($sites) $areas += 1;
+ if ($nodes) $areas += 1;
+
+ if ( $areas == 0) {
+ plc_warning ("No result found");
+ return;
+ } else if ($areas == 1) {
+ $visible=true;
+ } else {
+ $visible=false;
}
- echo "