nodes can set tags, tags and nodegroups are mostly OK
[plewww.git] / planetlab / persons / person.php
1 <?php
2
3 // $Id$
4
5 // Require login
6 require_once 'plc_login.php';
7
8 // Get session and API handles
9 require_once 'plc_session.php';
10 global $plc, $api;
11
12 // Print header
13 require_once 'plc_drupal.php';
14 include 'plc_header.php'; 
15
16 // Common functions
17 require_once 'plc_functions.php';
18 require_once 'plc_peers.php';
19 require_once 'plc_minitabs.php';
20 require_once 'plc_tables.php';
21 require_once 'plc_details.php';
22 require_once 'plc_forms.php';
23
24 // -------------------- 
25 // recognized URL arguments
26 $person_id=intval($_GET['id']);
27 if ( ! $person_id ) { 
28   plc_error('Malformed URL - id not set'); 
29   return;
30  }
31
32 ////////////////////
33 // Get all columns as we focus on only one entry
34 $persons= $api->GetPersons( array($person_id));
35
36 if (empty($persons)) {
37   drupal_set_message ("Person " . $person_id . " not found");
38   return;
39  }
40 $person=$persons[0];
41   
42 // vars from api
43 $enabled= $person['enabled'];
44 $first_name= $person['first_name'];
45 $last_name= $person['last_name'];
46 $email= $person['email'];
47 $url= $person['url'];
48 $phone= $person['phone'];
49 $title= $person['title'];
50 $bio= $person['bio'];
51 $peer_id=$person['peer_id'];
52
53 // arrays from api
54 $role_ids= $person['role_ids'];
55 $roles= $person['roles'];
56 $site_ids= $person['site_ids'];
57 $slice_ids= $person['slice_ids'];
58 $key_ids= $person['key_ids'];
59
60 // gets more data from API calls
61 $site_columns=array( "site_id", "name", "login_base" );
62 $sites= $api->GetSites( $site_ids, $site_columns);
63 $slices= $api->GetSlices( $slice_ids, array( "slice_id", "name" ) );
64 $keys= $api->GetKeys( $key_ids );
65
66 drupal_set_title("Details for account " . $first_name . " " . $last_name);
67 $local_peer = ! $peer_id;
68
69 $peers = new Peers ($api);
70
71 $is_my_account = plc_my_person_id() == $person_id;
72 $privileges = plc_is_admin () || ( plc_in_site($site_id) && plc_is_pi());
73
74 $tabs=array();
75
76 // update
77 if ($privileges || $is_my_account) 
78   $tabs['Update'] = array('url'=>'/db/persons/update.php',
79                           'values'=>array('id'=>$person_id),
80                           'bubble'=>"Update $first_name $last_name");
81   
82 // enable / disable
83 if ($local_peer && $privileges) 
84   if ($enabled) 
85     $tabs['Disable'] = array ('method'=>'POST',
86                               'url'=>l_actions(),
87                               'values'=> array ('person_id'=>$person_id,
88                                                 'action'=>'disable-person'),
89                               'bubble'=>"Disable $first_name $last_name",
90                               'confirm'=>"Are you sure you want to disable $first_name $last_name");
91   else 
92     $tabs['Enable'] = array ('method'=>'POST',
93                              'url'=>l_actions(),
94                              'values'=> array ('person_id'=>$person_id,
95                                                'action'=>'enable-person'),
96                              'bubble'=>"Enable $first_name $last_name",
97                              'confirm'=>"Are you sure you want to enable $first_name $last_name");
98
99 // become
100 if (plc_is_admin() && ! $is_my_account) 
101   $tabs['Become'] = array('method'=>'POST',
102                           'url'=>l_actions(),
103                           'values'=>array('action'=>'become-person',
104                                           'person_id'=>$person_id),
105                           'bubble'=>"Become $first_name $last_name",
106                           'confirm'=>"Are you sure you want to su $first_name $last_name");
107     
108 // delete
109 if ($local_peer && $privileges) 
110   $tabs['Delete'] = array ('method'=>'POST',
111                            'url'=>l_actions(),
112                            'values'=> array ('person_id'=>$person_id,
113                                              'action'=>'delete-person'),
114                            'bubble'=>"Delete $first_name $last_name",
115                            'confirm'=>"Are you sure to delete $first_name $last_name");
116 // events for that person
117 if ( $privileges) 
118   $tabs['Events'] = array('url'=>l_events(),
119                           'values'=>array('type'=>'Person','person'=>$person_id),
120                           'bubble'=>"Events about $first_name $last_name",
121                           'image'=>'/planetlab/icons/event.png','height'=>18);
122
123 // Back button
124 $tabs['All Users'] = array ('url'=>l_persons(),
125                             'bubble'=>'Back to the Users page');
126
127 plc_tabs($tabs);
128     
129 $peers->block_start ($peer_id);
130
131 if ($local_peer && $privileges && ! $enabled ) 
132   drupal_set_message ("$first_name $last_name is not enabled yet, you can enable her/him with the 'Enable' button below");
133
134 $enabled_text="Enabled";
135 if ( ! $enabled ) $enabled_text = plc_warning_text("Disabled");
136
137 plc_details_start();
138 plc_details_line("Enabled",$enabled_text);
139 plc_details_line("First Name",$first_name);
140 plc_details_line("Last Name",$last_name);
141 plc_details_line("Email",href("mailto:$email",$email));
142 plc_details_line("URL",$url);
143 plc_details_line("Phone",$phone);
144 plc_details_line("Title",$title);
145 plc_details_line("Bio",wordwrap($bio,50,"<br/>"));
146 plc_details_line("Peer",$peers->peer_link($peer_id));
147 plc_details_end();
148
149 //////////////////// slices
150 plc_section('Slices');
151
152 if( ! $slices) {
153   plc_warning ("User has no slice");
154  } else {
155   $headers=array('Slice name'=>'string');
156   $reasonable_page=5;
157   $table_options = array('notes_area'=>false,"search_width"=>10,'pagesize'=>$reasonable_page);
158   if (count ($slices) <= $reasonable_page) {
159     $table_options['search_area']=false;
160     $table_options['pagesize_area']=false;
161   }
162   plc_table_start("person_slices",$headers,1,$table_options);
163
164   foreach( $slices as $slice ) {
165     $slice_name= $slice['name'];
166     $slice_id= $slice['slice_id'];
167     plc_table_row_start();
168     plc_table_cell(l_slice_t($slice_id,$slice_name));
169     plc_table_row_end();
170   }
171   plc_table_end("person_slices");
172  }
173
174 // we don't set 'action', but use the submit button name instead
175 plc_form_start(l_actions(), array("person_id"=>$person_id,));
176
177 //////////////////// keys
178 plc_section ("Keys");
179                 
180 $can_manage_keys = ( $local_peer && ( plc_is_admin() || $is_my_account) );
181 if ( empty( $key_ids ) ) {
182   plc_warning("This user has no known key");
183  } 
184
185 // headers
186 $headers=array("Type"=>"string",
187                "Key"=>"string");
188 if ($can_manage_keys) $headers['Remove']="none";
189 // table overall options
190 $table_options=array('search_area'=>false,'pagesize_area'=>false,'notes_area'=>false);
191 plc_table_start("person_keys",$headers,"1",$table_options);
192     
193 if ($keys) foreach ($keys as $key) {
194   $key_id=$key['key_id'];
195   plc_table_row_start();
196   plc_table_cell ($key['key_type']);
197   plc_table_cell(wordwrap( $key['key'], 60, "<br />\n", 1 ));
198   if ($can_manage_keys) 
199     plc_table_cell (plc_form_checkbox_text('key_ids[]',$key_id));
200   plc_table_row_end();
201 }
202 // the footer area is used for displaying key-management buttons
203 $footers=array();
204 // add the 'remove keys' button and key upload areas as the table footer
205 if ($can_manage_keys) {
206   $remove_keys_area=plc_form_submit_text ("delete-keys","Remove keys");
207   $upload_key_left_area= plc_form_label_text("key","Upload new key") . plc_form_file_text("key",60);
208   $upload_key_right_area=plc_form_submit_text("upload-key","Upload key");
209   // no need to remove if there's no key
210   if ($keys) 
211     $footers[]="<td colspan=3 style='text-align:right'> $remove_keys_area </td>";
212   // upload a new key
213   $footers []="<td colspan=2 style='text-align:right'> $upload_key_left_area </td>".
214     "<td> $upload_key_right_area </td>";
215 }
216
217 plc_table_end("person_keys",array("footers"=>$footers));
218
219 //////////////////// sites
220 plc_section('Sites');
221   
222 // sites
223 if (empty( $sites ) ) {
224   plc_warning('This user is not affiliated with a site !!');
225  } 
226 $can_manage_sites = $local_peer && plc_is_admin() || $is_my_account;
227 $headers=array();
228 $headers['Login_base']="string";
229 $headers['Name']="string";
230 if ($can_manage_sites) 
231   $headers['Remove']="string";
232 $table_options = array('notes_area'=>false,'search_area'=>false, 'pagesize_area'=>false);
233 plc_table_start ("person_sites",$headers,0,$table_options);
234 foreach( $sites as $site ) {
235   $site_name= $site['name'];
236   $site_id= $site['site_id'];
237   $login_base=$site['login_base'];
238   plc_table_row_start();
239   plc_table_cell ($login_base);
240   plc_table_cell (l_site_t($site_id,$site_name));
241   if ($can_manage_sites)
242     plc_table_cell (plc_form_checkbox_text('site_ids[]',$site_id));
243   plc_table_row_end ();
244 }
245 // footers : the remove and add buttons
246 $footers=array();
247 if ($can_manage_sites) {
248   // remove selected sites
249   $remove_sites_area = plc_form_submit_text("remove-person-from-sites","Remove Sites");
250
251   // add a site : the button
252   $add_site_right_area=plc_form_submit_text("add-person-to-site","Add in site");
253   // get list of local sites that the person is not in
254   function get_site_id ($site) { return $site['site_id'];}
255   $person_site_ids=array_map("get_site_id",$sites);
256   $relevant_sites= $api->GetSites( array("peer_id"=>NULL,"~site_id"=>$person_site_ids), $site_columns);
257
258   // xxx cannot use onchange=submit() - would need to somehow pass action name 
259   $selector=array();
260   foreach ($relevant_sites as $site) 
261     $selector[]= array('display'=>$site['name'],"value"=>$site['site_id']);
262   $add_site_left_area=plc_form_select_text("site_id",$selector,"Choose a site to add");
263   $add_site_area = $add_site_left_area . $add_site_right_area;
264   if ($sites) 
265     $footers[]=plc_table_td_text ($remove_sites_area,3,"right");
266   // add a new site
267   $footers []= plc_table_td_text ($add_site_right_area,3,"right");
268  }
269 plc_table_end("person_sites",array("footers"=>$footers));
270
271 //////////////////// roles
272 plc_section("Roles");
273 if (! $roles) plc_warning ("This user has no role !");
274
275 $can_manage_roles= ($local_peer && plc_is_admin());
276 $table_options=array("search_area"=>false,"notes_area"=>false);
277
278 $headers=array("Role"=>"none");
279 if ($can_manage_roles) $headers ["Remove"]="none";
280
281 $table_options=array('search_area'=>false,'pagesize_area'=>false,'notes_area'=>false);
282 plc_table_start("person_roles",$headers,0,$table_options);  
283   
284 // construct array of role objs
285 $role_objs=array();
286 for ($n=0; $n<count($roles); $n++) {
287   $role_objs[]= array('role_id'=>$role_ids[$n], 'name'=>$roles[$n]);
288  }
289
290 if ($role_objs) foreach ($role_objs as $role_obj) {
291   plc_table_row_start();
292   plc_table_cell($role_obj['name']);
293   if ($can_manage_roles) plc_table_cell (plc_form_checkbox_text('role_ids[]',$role_obj['role_id']));
294   plc_table_row_end();
295  }
296
297 // footers : the remove and add buttons
298 $footers=array();
299 if ($can_manage_roles) {
300   // remove selected roles
301   $remove_roles_area = plc_form_submit_text("remove-roles-from-person","Remove Roles");
302
303   // add a role : the button
304   $add_role_right_area=plc_form_submit_text("add-role-to-person","Add role");
305   // get list of local roles that the person has not yet
306   // xxx this does not work because GetRoles does not support filters
307   $relevant_roles = $api->GetRoles( array("~role_id"=>$role_ids));
308
309   $selector=array();
310   foreach ($relevant_roles as $role) 
311     $selector[]= array('display'=>$role['name'],"value"=>$role['role_id']);
312   $add_role_left_area=plc_form_select_text("role_id",$selector,"Choose a role to add");
313   $add_role_area = $add_role_left_area . $add_role_right_area;
314   if ($roles) 
315     $footers[]="<td colspan=3 style='text-align:right'> $remove_roles_area </td>";
316   // add a new role
317   $footers[]="<td colspan=3 style='text-align:right'> $add_role_area </td>";
318  }
319 plc_table_end("person_roles",array("footers"=>$footers));
320
321 //////////////////////////////
322 plc_form_end();
323 $peers->block_end($peer_id);
324   
325 // Print footer
326 include 'plc_footer.php';
327
328
329 ?>