6 require_once 'plc_login.php';
8 // Get session and API handles
9 require_once 'plc_session.php';
13 require_once 'plc_drupal.php';
14 include 'plc_header.php';
17 require_once 'plc_functions.php';
18 require_once 'plc_minitabs.php';
19 require_once 'plc_tables.php';
20 require_once 'plc_details.php';
21 require_once 'plc_forms.php';
23 // --------------------
24 // recognized URL arguments
25 $person_id=intval($_GET['id']);
27 plc_error('Malformed URL - id not set');
32 // Get all columns as we focus on only one entry
33 $persons= $api->GetPersons( array($person_id));
35 if (empty($persons)) {
36 drupal_set_message ("Person " . $person_id . " not found");
42 $enabled= $person['enabled'];
43 $first_name= $person['first_name'];
44 $last_name= $person['last_name'];
45 $email= $person['email'];
47 $phone= $person['phone'];
48 $title= $person['title'];
50 $peer_id=$person['peer_id'];
53 $role_ids= $person['role_ids'];
54 $roles= $person['roles'];
55 $site_ids= $person['site_ids'];
56 $slice_ids= $person['slice_ids'];
57 $key_ids= $person['key_ids'];
59 // gets more data from API calls
60 $site_columns=array( "site_id", "name", "login_base" );
61 $sites= $api->GetSites( $site_ids, $site_columns);
62 $slices= $api->GetSlices( $slice_ids, array( "slice_id", "name" ) );
63 $keys= $api->GetKeys( $key_ids );
65 drupal_set_title("Details for account " . $first_name . " " . $last_name);
67 $plc_hash=plc_peer_global_hash($api);
69 $local_peer = plc_peer_block_start ($peer_hash,$peer_id);
70 $is_my_account = plc_my_person_id() == $person_id;
71 $privileges = plc_is_admin () || ( plc_in_site($site_id) && plc_is_pi());
76 if ($privileges || $is_my_account)
77 $tabs['Update'] = array('url'=>'/db/persons/update.php',
78 'values'=>array('id'=>$person_id),
79 'bubble'=>"Update $first_name $last_name");
82 if ($local_peer && $privileges)
84 $tabs['Disable'] = array ('method'=>'POST',
86 'values'=> array ('person_id'=>$person_id,
87 'action'=>'disable-person'),
88 'bubble'=>"Disable $first_name $last_name",
89 'confirm'=>"Are you sure you want to disable $first_name $last_name");
91 $tabs['Enable'] = array ('method'=>'POST',
93 'values'=> array ('person_id'=>$person_id,
94 'action'=>'enable-person'),
95 'bubble'=>"Enable $first_name $last_name",
96 'confirm'=>"Are you sure you want to enable $first_name $last_name");
99 if (plc_is_admin() && ! $is_my_account)
100 $tabs['Become'] = array('method'=>'POST',
102 'values'=>array('action'=>'become-person',
103 'person_id'=>$person_id),
104 'bubble'=>"Become $first_name $last_name",
105 'confirm'=>"Are you sure you want to su $first_name $last_name");
108 if ($local_peer && $privileges)
109 $tabs['Delete'] = array ('method'=>'POST',
111 'values'=> array ('person_id'=>$person_id,
112 'action'=>'delete-person'),
113 'bubble'=>"Delete $first_name $last_name",
114 'confirm'=>"Are you sure to delete $first_name $last_name");
115 // events for that person
117 $tabs['Events'] = array('url'=>l_events(),
118 'values'=>array('type'=>'Person','person'=>$person_id),
119 'bubble'=>"Events about $first_name $last_name",
120 'image'=>'/planetlab/icons/event.png',
124 $tabs['All Users'] = array ('url'=>l_persons(),
125 'bubble'=>'Back to the Users page');
129 if ($local_peer && $privileges && ! $enabled )
130 drupal_set_message ("$first_name $last_name is not enabled yet, you can enable her/him with the 'Enable' button below");
132 $enabled_text="Enabled";
133 if ( ! $enabled ) $enabled_text = plc_warning_div("Disabled");
136 plc_details_line("Enabled",$enabled_text);
137 plc_details_line("First Name",$first_name);
138 plc_details_line("Last Name",$last_name);
139 plc_details_line("Email",href("mailto:$email",$email));
140 plc_details_line("URL",$url);
141 plc_details_line("Phone",$phone);
142 plc_details_line("Title",$title);
143 plc_details_line("Bio",wordwrap($bio,50,"<br/>"));
146 //////////////////// slices
147 plc_section('Slices');
150 plc_warning ("User has no slice");
152 $headers=array('Slice name'=>'string');
153 $table_options=array('notes_area'=>false,
155 plc_table_start("person_slices",$headers,1,$table_options);
157 foreach( $slices as $slice ) {
158 $slice_name= $slice['name'];
159 $slice_id= $slice['slice_id'];
160 plc_table_row_start();
161 plc_table_cell(l_slice_t($slice_id,$slice_name));
164 plc_table_end("person_slices");
167 // we don't set 'action', but use the submit button name instead
168 plc_form_start(l_actions(),
169 array("person_id"=>$person_id,
170 // uncomment this to run the 'debug' action
174 //////////////////// keys
175 plc_section ("Keys");
177 $can_manage_keys = ( $local_peer && ( plc_is_admin() || $is_my_account) );
178 if ( empty( $key_ids ) ) {
179 plc_warning("This user has no known key");
183 $headers=array("Type"=>"string",
185 if ($can_manage_keys) $headers['Remove']="none";
186 // table overall options
187 $table_options=array("search_area"=>false,"notes_area"=>false);
188 plc_table_start("person_keys",$headers,"1",$table_options);
190 if ($keys) foreach ($keys as $key) {
191 $key_id=$key['key_id'];
192 plc_table_row_start($key_id);
193 plc_table_cell ($key['key_type']);
194 plc_table_cell(wordwrap( $key['key'], 60, "<br />\n", 1 ));
195 if ($can_manage_keys)
196 plc_table_cell (plc_form_checkbox_text('key_ids[]',$key_id));
199 // the footer area is used for displaying key-management buttons
201 // add the 'remove keys' button and key upload areas as the table footer
202 if ($can_manage_keys) {
203 $remove_keys_area=plc_form_submit_text ("delete-keys","Remove keys");
204 $upload_key_left_area= plc_form_label_text("key","Upload new key") . plc_form_file_text("key",60);
205 $upload_key_right_area=plc_form_submit_text("upload-key","Upload key");
206 // no need to remove if there's no key
208 $footers[]="<td colspan=3 style='text-align:right'> $remove_keys_area </td>";
210 $footers []="<td colspan=2 style='text-align:right'> $upload_key_left_area </td>".
211 "<td> $upload_key_right_area </td>";
214 plc_table_end("person_keys",array("footers"=>$footers));
216 //////////////////// sites
217 plc_section('Sites');
220 if (empty( $sites ) ) {
221 plc_warning('This user is not affiliated with a site !!');
223 $can_manage_sites = $local_peer && plc_is_admin() || $is_my_account;
225 $headers['Login_base']="string";
226 $headers['Name']="string";
227 if ($can_manage_sites)
228 $headers['Remove']="string";
229 $table_options = array('notes_area'=>false,'search_area'=>false);
230 plc_table_start ("person_sites",$headers,0,$table_options);
231 foreach( $sites as $site ) {
232 $site_name= $site['name'];
233 $site_id= $site['site_id'];
234 $login_base=$site['login_base'];
235 plc_table_row_start();
236 plc_table_cell ($login_base);
237 plc_table_cell (l_site_t($site_id,$site_name));
238 if ($can_manage_sites)
239 plc_table_cell (plc_form_checkbox_text('site_ids[]',$site_id));
240 plc_table_row_end ();
242 // footers : the remove and add buttons
244 if ($can_manage_sites) {
245 // remove selected sites
246 $remove_sites_area = plc_form_submit_text("remove-person-from-sites","Remove Sites");
248 // add a site : the button
249 $add_site_left_area=plc_form_submit_text("add-person-to-site","Add in site");
250 // get list of local sites that the person is not in
251 $person_site_ids=array_map("get_site_id",$sites);
252 $relevant_sites= $api->GetSites( array("peer_id"=>NULL,"~site_id"=>$person_site_ids), $site_columns);
254 // xxx cannot use onchange=submit() - would need to somehow pass action name
256 foreach ($relevant_sites as $site)
257 $selector[]= array('display'=>$site['name'],"value"=>$site['site_id']);
258 $add_site_right_area=plc_form_select_text("site_id",$selector,"Choose a site to add");
260 $footers[]="<td colspan=3 style='text-align:right'> $remove_sites_area </td>";
262 $footers []="<td style='text-align:right'> $add_site_left_area </td>".
263 "<td colspan=2> $add_site_right_area </td>";
265 plc_table_end("person_sites",array("footers"=>$footers));
267 //////////////////// roles
268 plc_section("Roles");
269 if (! $roles) plc_warning ("This user has no role !");
271 $can_manage_roles= ($local_peer && plc_is_admin());
272 $table_options=array("search_area"=>false,"notes_area"=>false);
274 $headers=array("Role"=>"none");
275 if ($can_manage_roles) $headers ["Remove"]="none";
277 plc_table_start("person_roles",$headers,0,$table_options);
279 // construct array of role objs
281 for ($n=0; $n<count($roles); $n++) {
282 $role_objs[]= array('role_id'=>$role_ids[$n], 'name'=>$roles[$n]);
285 if ($role_objs) foreach ($role_objs as $role_obj) {
286 plc_table_row_start();
287 plc_table_cell($role_obj['name']);
288 if ($can_manage_roles) plc_table_cell (plc_form_checkbox_text('role_ids[]',$role_obj['role_id']));
292 // footers : the remove and add buttons
294 if ($can_manage_roles) {
295 // remove selected roles
296 $remove_roles_area = plc_form_submit_text("remove-roles-from-person","Remove Roles");
298 // add a role : the button
299 $add_role_left_area=plc_form_submit_text("add-role-to-person","Add role");
300 // get list of local roles that the person has not yet
301 // xxx this does not work because GetRoles does not support filters
302 $relevant_roles = $api->GetRoles( array("~role_id"=>$role_ids));
305 foreach ($relevant_roles as $role)
306 $selector[]= array('display'=>$role['name'],"value"=>$role['role_id']);
307 $add_role_right_area=plc_form_select_text("role_id",$selector,"Choose a role to add");
309 $footers[]="<td colspan=3 style='text-align:right'> $remove_roles_area </td>";
311 $footers []="<td style='text-align:right'> $add_role_left_area </td>".
312 "<td colspan=2> $add_role_right_area </td>";
314 plc_table_end("person_roles",array("footers"=>$footers));
316 //////////////////////////////
318 plc_peer_block_end();
321 include 'plc_footer.php';