showstuff.php3 60.7 KB
Newer Older
1
2
<?php
#
Leigh B. Stoller's avatar
Leigh B. Stoller committed
3
# EMULAB-COPYRIGHT
4
# Copyright (c) 2000-2004 University of Utah and the Flux Group.
Leigh B. Stoller's avatar
Leigh B. Stoller committed
5
6
7
# All rights reserved.
#
#
8
9
10
11
12
13
14
15
16
17
18
# This is an included file. No headers or footers.
#
# Functions to dump out various things.  
#

#
# A project
#
function SHOWPROJECT($pid, $thisuid) {
    global $TBDBNAME;

19
20
    $query_result =
	DBQueryFatal("SELECT * FROM projects WHERE pid='$pid'");
21
22
    $row = mysql_fetch_array($query_result);

23
24
25
    echo "<center>
          <h3>Project Profile</h3>
          </center>
26
          <table align=center cellpadding=2 border=1>\n";
27
    
28
    $proj_created	= $row[created];
29
    #$proj_expires	= $row[expires];
30
    $proj_name		= $row[name];
31
    $proj_URL		= $row[URL];
32
    $proj_public        = $row[public];
33
    $proj_funders	= $row[funders];
34
35
36
    $proj_head_uid	= $row[head_uid];
    $proj_members       = $row[num_members];
    $proj_pcs           = $row[num_pcs];
Leigh B. Stoller's avatar
Leigh B. Stoller committed
37
38
    $proj_ronpcs        = $row[num_ron];
    $proj_plabpcs       = $row[num_pcplab];
39
    $proj_linked        = $row[linked_to_us];
40
    $proj_why           = nl2br($row[why]);
41
    $control_node	= $row[control_node];
42
    $approved           = $row[approved];
43
44
    $expt_count         = $row[expt_count];
    $expt_last          = $row[expt_last];
45

46
47
48
49
50
51
52
    if ($proj_public) {
	$proj_public = "Yes";
    }
    else {
	$proj_public = "No";
    }

53
54
55
56
57
58
59
    if ($proj_linked) {
	$proj_linked = "Yes";
    }
    else {
	$proj_linked = "No";
    }

60
61
62
63
    if (!$expt_last) {
	$expt_last = "&nbsp";
    }

64
65
66
67
68
    #
    # Generate the table.
    # 
    echo "<tr>
              <td>Name: </td>
69
70
              <td class=\"left\">
                <a href='showproject.php3?pid=$pid'>$pid</a></td>
71
72
73
74
75
76
77
78
79
80
          </tr>\n";
    
    echo "<tr>
              <td>Long Name: </td>
              <td class=\"left\">$proj_name</td>
          </tr>\n";
    
    echo "<tr>
              <td>Project Head: </td>
              <td class=\"left\">
81
                <A href='showuser.php3?target_uid=$proj_head_uid'>
82
83
84
85
86
87
88
89
90
                     $proj_head_uid</A></td>
          </tr>\n";
    
    echo "<tr>
              <td>URL: </td>
              <td class=\"left\">
                  <A href='$proj_URL'>$proj_URL</A></td>
          </tr>\n";
    
91
92
93
94
95
    echo "<tr>
              <td>Publicly Visible: </td>
              <td class=\"left\">$proj_public</td>
          </tr>\n";
    
96
97
98
99
100
    echo "<tr>
              <td>Link to Us?: </td>
              <td class=\"left\">$proj_linked</td>
          </tr>\n";
    
101
102
103
104
105
    echo "<tr>
              <td>Funders: </td>
              <td class=\"left\">$proj_funders</td>
          </tr>\n";

106
107
108
109
110
111
112
113
114
115
116
    echo "<tr>
              <td>#Project Members: </td>
              <td class=\"left\">$proj_members</td>
          </tr>\n";
    
    echo "<tr>
              <td>#PCs: </td>
              <td class=\"left\">$proj_pcs</td>
          </tr>\n";
    
    echo "<tr>
117
118
119
120
121
122
123
              <td>#Planetlab PCs: </td>
              <td class=\"left\">$proj_plabpcs</td>
          </tr>\n";
    
    echo "<tr>
              <td>#RON PCs: </td>
              <td class=\"left\">$proj_ronpcs</td>
124
125
126
127
128
129
130
          </tr>\n";
    
    echo "<tr>
              <td>Created: </td>
              <td class=\"left\">$proj_created</td>
          </tr>\n";
    
131
132
133
134
    #echo "<tr>
    #          <td>Expires: </td>
    #          <td class=\"left\">$proj_expires</td>
    #      </tr>\n";
135
    
136
137
138
139
140
141
142
143
144
145
    echo "<tr>
              <td>Experiments Created:</td>
              <td class=\"left\">$expt_count</td>
          </tr>\n";
    
    echo "<tr>
              <td>Date of last experiment:</td>
              <td class=\"left\">$expt_last</td>
          </tr>\n";
    
146
147
148
149
150
151
152
153
154
155
    echo "<tr>
              <td>Approved?: </td>\n";
    if ($approved) {
	echo "<td class=left><img alt=\"Y\" src=\"greenball.gif\"></td>\n";
    }
    else {
	echo "<td class=left><img alt=\"N\" src=\"redball.gif\"></td>\n";
    }
    echo "</tr>\n";

156
    echo "<tr>
157
              <td colspan='2'>Why?:</td>
158
159
160
161
162
163
164
165
166
          </tr>\n";
    
    echo "<tr>
              <td colspan='2' width=600>$proj_why</td>
          </tr>\n";
    
    echo "</table>\n";
}

Leigh B. Stoller's avatar
Leigh B. Stoller committed
167
168
169
170
#
# A Group
#
function SHOWGROUP($pid, $gid) {
171
172
    global $OURDOMAIN;
    
Leigh B. Stoller's avatar
Leigh B. Stoller committed
173
174
175
176
    $query_result =
	DBQueryFatal("SELECT * FROM groups WHERE pid='$pid' and gid='$gid'");
    $row = mysql_fetch_array($query_result);

177
178
179
180
    echo "<center>
          <h3>Group Profile</h3>
          </center>
          <table align=center border=1>\n";
Leigh B. Stoller's avatar
Leigh B. Stoller committed
181
182
183

    $leader	= $row[leader];
    $created	= $row[created];
184
    $description= $row[description];
Leigh B. Stoller's avatar
Leigh B. Stoller committed
185
186
187
188
189
    $expt_count = $row[expt_count];
    $expt_last  = $row[expt_last];
    $unix_gid   = $row[unix_gid];
    $unix_name  = $row[unix_name];

190
191
192
193
194
    if (strcmp($pid,$gid))
	$mail = "$pid-$gid" . "-users@" . $OURDOMAIN;
    else
	$mail = "$pid" . "-users@" . $OURDOMAIN;

Leigh B. Stoller's avatar
Leigh B. Stoller committed
195
196
197
198
199
200
    if (!$expt_last) {
	$expt_last = "&nbsp";
    }

    #
    # Generate the table.
201
    #
Leigh B. Stoller's avatar
Leigh B. Stoller committed
202
203
    echo "<tr>
              <td>GID: </td>
204
              <td class=\"left\">
Chad Barb's avatar
   
Chad Barb committed
205
                <a href='showgroup.php3?pid=$pid&gid=$gid'>$gid</a></td>
Leigh B. Stoller's avatar
Leigh B. Stoller committed
206
207
208
209
          </tr>\n";
    
    echo "<tr>
              <td>PID: </td>
210
211
              <td class=\"left\">
                <a href='showproject.php3?pid=$pid'>$pid</a></td>
Leigh B. Stoller's avatar
Leigh B. Stoller committed
212
213
214
215
216
217
218
219
220
221
222
223
224
225
226
227
228
229
230
231
232
233
234
          </tr>\n";
    
    echo "<tr>
              <td>Description: </td>
              <td class=\"left\">$description</td>
          </tr>\n";
    
    echo "<tr>
              <td>Unix GID: </td>
              <td class=\"left\">$unix_gid</td>
          </tr>\n";
    
    echo "<tr>
              <td>Unix Group Name: </td>
              <td class=\"left\">$unix_name</td>
          </tr>\n";
    
    echo "<tr>
              <td>Group Leader: </td>
              <td class=\"left\">
                <A href='showuser.php3?target_uid=$leader'>$leader</A></td>
          </tr>\n";
    
235
236
237
238
239
    echo "<tr>
              <td>Email List: </td>
              <td class=\"left\">$mail</td>
          </tr>\n";
    
Leigh B. Stoller's avatar
Leigh B. Stoller committed
240
241
242
243
244
245
246
247
248
249
250
251
252
253
254
255
256
257
258
259
260
    echo "<tr>
              <td>Created: </td>
              <td class=\"left\">$created</td>
          </tr>\n";
    
    echo "<tr>
              <td>Experiments Created:</td>
              <td class=\"left\">$expt_count</td>
          </tr>\n";
    
    echo "<tr>
              <td>Date of last experiment:</td>
              <td class=\"left\">$expt_last</td>
          </tr>\n";
    
    echo "</table>\n";
}

#
# A list of Group members.
#
261
function SHOWGROUPMEMBERS($pid, $gid, $prived = 0) {
Leigh B. Stoller's avatar
Leigh B. Stoller committed
262
263
264
265
266
267
268
269
    $query_result =
	DBQueryFatal("SELECT m.*,u.* FROM group_membership as m ".
		     "left join users as u on u.uid=m.uid ".
		     "WHERE pid='$pid' and gid='$gid'");
    
    if (! mysql_num_rows($query_result)) {
	return;
    }
270
    $showdel = (($prived && !strcmp($pid, $gid)) ? 1 : 0);
Leigh B. Stoller's avatar
Leigh B. Stoller committed
271

272
273
274
275
276
277
278
279
    echo "<center>\n";
    if (strcmp($pid, $gid)) {
	echo "<h3>Group Members</h3>\n";
    }
    else {
	echo "<h3>Project Members</h3>\n";
    }
    echo "</center>
280
          <table align=center border=1 cellpadding=1 cellspacing=2>\n";
Leigh B. Stoller's avatar
Leigh B. Stoller committed
281
282

    echo "<tr>
283
284
285
286
287
              <th>Name</th>\n";
    if (strcmp($pid, $gid)) {
	echo "<th>Email</th>\n";
    }
    echo "    <th>UID</th>
288
289
290
291
292
              <th>Privs</th>\n";
    if ($showdel) {
	echo "<th>Remove</th>\n";
    }
    echo "</tr>\n";
Leigh B. Stoller's avatar
Leigh B. Stoller committed
293
294
295
296

    while ($row = mysql_fetch_array($query_result)) {
        $target_uid = $row[uid];
	$usr_name   = $row[usr_name];
297
	$usr_email  = $row[usr_email];
Leigh B. Stoller's avatar
Leigh B. Stoller committed
298
299
300
	$trust      = $row[trust];

        echo "<tr>
301
302
303
304
305
                  <td>$usr_name</td>\n";
	if (strcmp($pid, $gid)) {
	    echo "<td>$usr_email</td>\n";
	}
	echo "    <td>
Leigh B. Stoller's avatar
Leigh B. Stoller committed
306
307
                    <A href='showuser.php3?target_uid=$target_uid'>
                       $target_uid</A>
308
309
310
311
                  </td>\n";
	
	if (TBTrustConvert($trust) != $TBDB_TRUST_NONE) {
	    echo "<td>$trust</td>\n";
Leigh B. Stoller's avatar
Leigh B. Stoller committed
312
313
	}
	else {
314
315
316
	    echo "<td><font color=red>$trust</font></td>\n";
	}
	if ($showdel) {
Leigh B. Stoller's avatar
Leigh B. Stoller committed
317
	    echo "<td align=center>
318
319
320
		      <A href='deleteuser.php3?target_uid=$target_uid";
	    echo         "&target_pid=$pid'>
                         <img alt=N src=redball.gif></td>\n";
Leigh B. Stoller's avatar
Leigh B. Stoller committed
321
322
323
324
325
326
	}
	echo "</tr>\n";
    }
    echo "</table>\n";
}

327
328
329
330
#
# A list of groups for a user.
#
function SHOWGROUPMEMBERSHIP($uid) {
331
332
    $none = TBDB_TRUSTSTRING_NONE;
    
333
334
    $query_result =
	DBQueryFatal("SELECT * FROM group_membership ".
335
336
		     "WHERE uid='$uid' and trust!='$none' ".
		     "order by pid");
337
338
339
340
341
342
343
344
345
346
347
    
    if (! mysql_num_rows($query_result)) {
	return;
    }

    echo "<center>
          <h3>Group Membership</h3>
          </center>
          <table align=center border=1 cellpadding=1 cellspacing=2>\n";

    echo "<tr>
Chad Barb's avatar
   
Chad Barb committed
348
349
350
              <th>PID</th>
              <th>GID</th>
              <th>Privs</th>
351
352
353
354
355
356
357
          </tr>\n";

    while ($row = mysql_fetch_array($query_result)) {
	$pid   = $row[pid];
	$gid   = $row[gid];
	$trust = $row[trust];

358
359
	if (TBTrustConvert($trust) != $TBDB_TRUST_NONE) {
	    echo "<tr>
360
361
362
              <td><a href='showproject.php3?pid=$pid'>$pid</a></td>
              <td><a href='showgroup.php3?pid=$pid&gid=$gid'>$gid</a></td>
              <td>$trust</td>\n";
363
364
	    echo "</tr>\n";
	}
365
366
367
368
    }
    echo "</table>\n";
}

369
370
371
372
373
#
# A User
#
function SHOWUSER($uid) {
    global $TBDBNAME;
374
375
376

    $userinfo_result =
	DBQueryFatal("SELECT * from users where uid='$uid'");
377
378

    $row	= mysql_fetch_array($userinfo_result);
379
    #$usr_expires = $row[usr_expires];
380
381
    $usr_email   = $row[usr_email];
    $usr_URL     = $row[usr_URL];
382
383
384
385
386
387
388
    $usr_addr    = $row[usr_addr];
    $usr_addr2   = $row[usr_addr2];
    $usr_city    = $row[usr_city];
    $usr_state   = $row[usr_state];
    $usr_zip     = $row[usr_zip];
    $usr_country = $row[usr_country];
    $usr_name    = $row[usr_name];
389
    $usr_phone   = $row[usr_phone];
390
391
392
    $usr_shell   = $row[usr_shell];
    $usr_title   = $row[usr_title];
    $usr_affil   = $row[usr_affil];
393
    $status      = $row[status];
394
395
    $admin       = $row[admin];
    $adminoff    = $row[adminoff];
396
397
398
399
    $notes       = $row[notes];
    $frozen      = $row['weblogin_frozen'];
    $failcount   = $row['weblogin_failcount'];
    $failstamp   = $row['weblogin_failstamp'];
400

401
402
403
404
405
406
407
408
    if (!strcmp($usr_addr2, ""))
	$usr_addr2 = "&nbsp";
    if (!strcmp($usr_city, ""))
	$usr_city = "&nbsp";
    if (!strcmp($usr_state, ""))
	$usr_state = "&nbsp";
    if (!strcmp($usr_zip, ""))
	$usr_zip = "&nbsp";
Chad Barb's avatar
   
Chad Barb committed
409
410
    if (!strcmp($usr_country, ""))
	$usr_country = "&nbsp";
411
412
    if (!strcmp($notes, ""))
	$notes = "&nbsp";
413

414
415
416
417
418
    #
    # Last Login info.
    #
    if (($lastweblogin = LASTWEBLOGIN($uid)) == 0)
	$lastweblogin = "&nbsp";
419
    if (($lastuserslogininfo = TBUsersLastLogin($uid)) == 0)
420
421
422
	$lastuserslogin = "N/A";
    else {
	$lastuserslogin = $lastuserslogininfo["date"] . " " .
423
		          $lastuserslogininfo["time"];
424
425
426
427
428
429
430
431
432
    }
    
    if (($lastnodelogininfo = TBUidNodeLastLogin($uid)) == 0)
	$lastnodelogin = "N/A";
    else {
	$lastnodelogin = $lastnodelogininfo["date"] . " " .
		         $lastnodelogininfo["time"] . " " .
                         "(" . $lastnodelogininfo["node_id"] . ")";
    }
433
434
435
436
437
438
439
440
441
442
443
444
445
446
447
448
449
450
451
452
453
454
455
    
    echo "<table align=center border=1>\n";
    
    echo "<tr>
              <td>Username:</td>
              <td>$uid</td>
          </tr>\n";
    
    echo "<tr>
              <td>Full Name:</td>
              <td>$usr_name</td>
          </tr>\n";
    
    echo "<tr>
              <td>Email Address:</td>
              <td>$usr_email</td>
          </tr>\n";
    
    echo "<tr>
              <td>Home Page URL:</td>
              <td><A href='$usr_URL'>$usr_URL</A></td>
          </tr>\n";
    
456
457
458
459
    #echo "<tr>
    #          <td>Expiration date:</td>
    #          <td>$usr_expires</td>
    #      </tr>\n";
460
461
    
    echo "<tr>
462
              <td>Address 1:</td>
463
464
465
              <td>$usr_addr</td>
          </tr>\n";
    
466
467
468
469
470
471
472
473
474
475
476
477
478
479
480
481
    echo "<tr>
              <td>Address 2:</td>
              <td>$usr_addr2</td>
          </tr>\n";
    
    echo "<tr>
              <td>City:</td>
              <td>$usr_city</td>
          </tr>\n";
    
    echo "<tr>
              <td>State:</td>
              <td>$usr_state</td>
          </tr>\n";
    
    echo "<tr>
Chad Barb's avatar
   
Chad Barb committed
482
              <td>ZIP:</td>
483
484
              <td>$usr_zip</td>
          </tr>\n";
Chad Barb's avatar
   
Chad Barb committed
485
486
487
488
489

    echo "<tr>
              <td>Country:</td>
              <td>$usr_country</td>
          </tr>\n";
490
    
491
492
493
494
    echo "<tr>
              <td>Phone #:</td>
              <td>$usr_phone</td>
          </tr>\n";
Chad Barb's avatar
   
Chad Barb committed
495
496
497
498
499

    echo "<tr>
	      <td>Shell:</td>
	      <td>$usr_shell</td>
          </tr>\n";
500
501
502
503
504
505
506
507
508
509
510
    
    echo "<tr>
              <td>Title/Position:</td>
              <td>$usr_title</td>
         </tr>\n";
    
    echo "<tr>
              <td>Institutional Affiliation:</td>
              <td>$usr_affil</td>
          </tr>\n";
    
511
512
513
514
    echo "<tr>
              <td>Status:</td>
              <td>$status</td>
          </tr>\n";
515
516
517
518
519

    if ($admin) {
	$onoff = ($adminoff ? "Off" : "On");
	$flip  = ($adminoff ? 0 : 1);
	echo "<tr>
520
521
522
523
              <td>Admin (on/off):</td>
              <td>Yes
              <a href=toggle.php?target_uid=$uid&type=adminoff&value=$flip>
              ($onoff)</td>
524
525
              </tr>\n";
    }
526
    
527
528
529
530
531
532
533
534
535
536
    echo "<tr>
              <td>Last Web Login:</td>
              <td>$lastweblogin</td>
          </tr>\n";
    
    echo "<tr>
              <td>Last Users Login:</td>
              <td>$lastuserslogin</td>
          </tr>\n";
    
537
538
539
540
    echo "<tr>
              <td>Last Node Login:</td>
              <td>$lastnodelogin</td>
          </tr>\n";
541
542

    if (ISADMIN()) {
543
544
545
546
547
548
549
550
551
552
553
	$freezeflip = ($frozen ? 0 : 1);
	
	echo "<tr>
                  <td>Web Freeze:</td>
                  <td>$frozen (<a href=toggle.php?target_uid=$uid".
	                          "&type=webfreeze&value=$freezeflip>Toggle</a>)
              </tr>\n";
	
	if ($frozen && $failstamp && $failcount) {
	    $when = strftime("20%y-%m-%d %H:%M:%S", $failstamp);
	    
554
	    echo "<tr>
555
556
                      <td>Login Failures:</td>
                      <td>$failcount ($when)</td>
557
                  </tr>\n";
558
559
560
561
562
	}
	echo "<tr>
                  <td>Notes:</td>
                  <td>$notes</td>
              </tr>\n";
563
    }
564
565
566
567
    echo "</table>\n";

}

568
569
570
#
# Show an experiment.
#
571
function SHOWEXP($pid, $eid, $short = 0, $sortby = "") {
572
    global $TBDBNAME, $TBDOCBASE;
573
574
575
576
577
578
579
580
581
582
583
584
585
586
587
    $nodecounts  = array();

    # Node counts, by class. 
    $query_result =
	DBQueryFatal("select nt.class,count(*) from reserved as r ".
		     "left join nodes as n on n.node_id=r.node_id ".
		     "left join node_types as nt on n.type=nt.type ".
		     "where pid='$pid' and eid='$eid' group by nt.class");

    while ($row = mysql_fetch_array($query_result)) {
	$class = $row[0];
	$count = $row[1];
	
	$nodecounts[$class] = $count;
    }
588
		
Leigh B. Stoller's avatar
Leigh B. Stoller committed
589
    $query_result =
590
591
592
593
	DBQueryFatal("select e.*, pl.slicename, ". 
                     "round(e.minimum_nodes+.1,0) as min_nodes ".
		     " from experiments as e left join plab_slices as pl".
                     " on e.pid = pl.pid and e.eid = pl.eid ".
594
		     "where e.pid='$pid' and e.eid='$eid'");
595
    
Leigh B. Stoller's avatar
Leigh B. Stoller committed
596
597
598
    if (($exprow = mysql_fetch_array($query_result)) == 0) {
	TBERROR("Experiment $eid in project $pid is gone!\n", 1);
    }
599

Leigh B. Stoller's avatar
Leigh B. Stoller committed
600
    $exp_gid     = $exprow[gid];
601
    $exp_name    = $exprow[expt_name];
602
    $exp_swapped = $exprow[expt_swapped];
603
    $exp_swapuid = $exprow[expt_swap_uid];
604
605
606
    $exp_end     = $exprow[expt_end];
    $exp_created = $exprow[expt_created];
    $exp_head    = $exprow[expt_head_uid];
607
    $exp_state   = $exprow[state];
608
    $exp_shared  = $exprow[shared];
609
610
    $exp_path    = $exprow[path];
    $batchmode   = $exprow[batchmode];
611
    $canceled    = $exprow[canceled];
612
    $attempts    = $exprow[attempts];
613
    $expt_locked = $exprow[expt_locked];
614
615
    $priority    = $exprow[priority];
    $swappable   = $exprow[swappable];
616
    $noswap_reason = $exprow[noswap_reason];
617
    $idleswap    = $exprow[idleswap];
618
    $idleswap_timeout  = $exprow[idleswap_timeout];
619
    $noidleswap_reason = $exprow[noidleswap_reason];
620
    $autoswap    = $exprow[autoswap];
621
    $autoswap_timeout  = $exprow[autoswap_timeout];
622
    $idle_ignore = $exprow[idle_ignore];
623
624
    $swapreqs    = $exprow[swap_requests];
    $lastswapreq = $exprow[last_swap_req];
625
    $minnodes    = $exprow["min_nodes"];
626
    $syncserver  = $exprow["sync_server"];
627
628
    $mem_usage   = $exprow["mem_usage"];
    $cpu_usage   = $exprow["cpu_usage"];
629
    $exp_slice   = $exprow[slicename];
630
    $linktest    = $exprow["linktest_level"];
631
632
633
    $usemodelnet = $exprow["usemodelnet"];
    $mnet_cores  = $exprow["modelnet_cores"];
    $mnet_edges  = $exprow["modelnet_edges"];
634

635
636
    $autoswap_hrs= ($autoswap_timeout/60.0);
    $idleswap_hrs= ($idleswap_timeout/60.0);
637
638
639
640
    $noswap = "($noswap_reason)";
    $noidleswap = "($noidleswap_reason)";
    $autoswap_str= $autoswap_hrs." hour".($autoswap_hrs==1 ? "" : "s");
    $idleswap_str= $idleswap_hrs." hour".($idleswap_hrs==1 ? "":"s");
641

642
643
644
645
    if ($swappable)
	$swappable = "Yes";
    else
	$swappable = "<b>No</b> $noswap";
646

647
648
649
650
    if ($idleswap)
	$idleswap = "Yes (after $idleswap_str)";
    else
	$idleswap = "<b>No</b> $noidleswap";
651

652
653
654
655
    if ($autoswap)
	$autoswap = "<b>Yes</b> (after $autoswap_str)";
    else
	$autoswap = "No";
656

657
658
659
660
    if ($idle_ignore)
	$idle_ignore = "<b>Yes</b>";
    else
	$idle_ignore = "No";
661

662
663
664
665
666
    if ($expt_locked)
	$expt_locked = "($expt_locked)";
    else
	$expt_locked = "";

667
668
669
    #
    # Generate the table.
    #
Chad Barb's avatar
   
Chad Barb committed
670
    echo "<table align=center cellpadding=2 cellspacing=2 border=1>\n";
671

672
673
674
675
676
    if (!$short) {
	echo "<tr>
                <td>Name: </td>
                <td class=left>$eid</td>
              </tr>\n";
677

678
	echo "<tr>
Leigh B. Stoller's avatar
Leigh B. Stoller committed
679
                <td>Description: </td>
680
681
                <td class=\"left\">$exp_name</td>
              </tr>\n";
682

683
684
685
686
687
	echo "<tr>
                <td>Project: </td>
                <td class=\"left\">
                  <a href='showproject.php3?pid=$pid'>$pid</a></td>
              </tr>\n";
688

689
690
691
692
693
694
        echo "<tr>
                <td>Group: </td>
                <td class=\"left\">
                  <a href='showgroup.php3?pid=$pid&gid=$exp_gid'>$exp_gid</a>
                </td>
              </tr>\n";
695
696
697
698
699
700
701

        if (isset($exp_slice)) {
          echo "<tr>
                  <td>Planetlab Slice: </td>
                  <td class=\"left\">$exp_slice</td>
                </tr>\n";
        }
702
    }
Leigh B. Stoller's avatar
Leigh B. Stoller committed
703

704
705
706
    echo "<tr>
            <td>Experiment Head: </td>
            <td class=\"left\">
707
              <a href='showuser.php3?target_uid=$exp_head'>$exp_head</a></td>
708
709
          </tr>\n";

710
711
712
713
    if (!$short) {
	echo "<tr>
                <td>Created: </td>
                <td class=\"left\">$exp_created</td>
714
              </tr>\n";
715

716
717
718
719
720
721
	if ($exp_swapped) {
	    echo "<tr>
                    <td>Last Swap/Modify: </td>
                    <td class=\"left\">$exp_swapped ($exp_swapuid)</td>
                  </tr>\n";
	}
722

723
724
725
726
727
728
729
730
731
732
733
734
735
	if (ISADMIN()) {
	    echo "<tr>
                    <td><a href='$TBDOCBASE/docwrapper.php3?".
		           "docname=swapping.html#swapping'>Swappable:</a></td>
                    <td class=\"left\">$swappable</td>
                  </tr>\n";
	}
    
	echo "<tr>
                  <td><a href='$TBDOCBASE/docwrapper.php3?".
	                 "docname=swapping.html#idleswap'>Idle-Swap:</a></td>
                  <td class=\"left\">$idleswap</td>
              </tr>\n";
736

737
	echo "<tr>
738
739
740
741
                <td><a href='$TBDOCBASE/docwrapper.php3?".
	               "docname=swapping.html#autoswap'>Max. Duration:</a></td>
                <td class=\"left\">$autoswap</td>
              </tr>\n";
742

743
744
745
746
747
748
749
750
751
752
753
	if (ISADMIN()) {
	    echo "<tr>
                    <td>Idle Ignore:</td>
                    <td class=\"left\">$idle_ignore</td>
                 </tr>\n";
	}
    
	echo "<tr>
                <td>Path: </td>
                <td class=left>$exp_path</td>
              </tr>\n";
754

755
756
757
758
        echo "<tr>
                <td>Status: </td>
                <td class=\"left\">$exp_state $expt_locked</td>
              </tr>\n";
759
    }
760

761
    if (count($nodecounts)) {
762
	echo "<tr>
763
764
                 <td>Reserved Nodes: </td>
                 <td class=\"left\">\n";
765
766
767
	while (list ($class, $count) = each($nodecounts)) {
	    echo "$count ($class) &nbsp ";
	}
768
769
770
771
	echo "   </td>
              </tr>\n";
    }
    elseif (!$short) {
772
773
	if ($minnodes!="") {
	    echo "<tr>
774
775
776
777
778
779
                      <td>Minumum Nodes: </td>
                      <td class=\"left\"><font color=green>
                          $minnodes (estimate)</font></td>
                  </tr>\n";
	}
	else {
780
	    echo "<tr>
781
782
783
                      <td>Minumum Nodes: </td>
                      <td class=\"left\"><font color=green>Unknown</font></td>
                  </tr>\n";
784
	}
785
    }
786
787
788
789
790
791
    if (!$short) {
	if ($mem_usage || $cpu_usage) {
	    echo "<tr>
                      <td>Mem Usage Est: </td>
                      <td class=\"left\">$mem_usage</td>
                  </tr>\n";
792

793
794
795
796
797
	    echo "<tr>
                      <td>CPU Usage Est: </td>
                      <td class=\"left\">$cpu_usage</td>
                  </tr>\n";
	}
798

799
800
801
	$lastact = TBGetExptLastAct($pid,$eid);
	$idletime = TBGetExptIdleTime($pid,$eid);
	$stale = TBGetExptIdleStale($pid,$eid);
802
    
803
804
805
806
807
	if ($lastact != -1) {
	    echo "<tr>
                      <td>Last Activity: </td>
                      <td class=\"left\">$lastact</td>
                  </tr>\n";
808

809
	    if ($stale) { $str = "(stale)"; } else { $str = ""; }
810
	
811
812
813
814
815
	    echo "<tr>
                      <td>Idle Time: </td>
                      <td class=\"left\">$idletime hours $str</td>
                  </tr>\n";
	}
816

817
818
819
820
821
	if (! ($swapreqs=="" || $swapreqs==0)) {
	    echo "<tr>
                      <td>Swap Requests: </td>
                      <td class=\"left\">$swapreqs</td>
                  </tr>\n";
822

823
824
825
826
827
	    echo "<tr>
                      <td>Last Swap Req.: </td>
                      <td class=\"left\">$lastswapreq</td>
                  </tr>\n";
	}
828
829
    }
    
830
831
832
833
834
835
836
837
838
839
840
    if ($batchmode) {
	    echo "<tr>
                    <td>Batch Mode: </td>
                    <td class=\"left\">Yes</td>
                  </tr>\n";

	    echo "<tr>
                    <td>Start Attempts: </td>
                    <td class=\"left\">$attempts</td>
                  </tr>\n";
    }
841

842
    if ($canceled) {
843
	echo "<tr>
844
845
                 <td>Cancel Flag: </td>
                 <td class=\"left\">$canceled</td>
846
847
848
              </tr>\n";
    }

849
    if (!$short) {
850
851
852
853
854
855
856
857
858
859
860
861
862
863
864
	if ($usemodelnet) {
	    echo "<tr>
                      <td>Use Modelnet: </td>
                      <td class=\"left\">Yes</td>
                  </tr>\n";
	    echo "<tr>
                      <td>Modelnet Phys Core Nodes: </td>
                      <td class=\"left\">$mnet_cores</td>
                  </tr>\n";
	    echo "<tr>
                      <td>Modelnet Phys Edge Nodes: </td>
                      <td class=\"left\">$mnet_edges</td>
                  </tr>\n";

	}
865
866
867
868
869
870
	if (isset($syncserver)) {
	    echo "<tr>
                      <td>Sync Server: </td>
                      <td class=\"left\">$syncserver</td>
                  </tr>\n";
	}
871
872
873
874
875
876
	if ($linktest) {
	    echo "<tr>
                      <td>Linktest Level: </td>
                      <td class=\"left\">$linktest</td>
                  </tr>\n";
	}
877
878
    }

879
880
881
    echo "</table>\n";
}

882
883
884
#
# Show a listing of experiments by user/pid/gid
#
885
function SHOWEXPLIST($type,$id,$gid = "") {
886
887
    global $TB_EXPTSTATE_SWAPPED, $TB_EXPTSTATE_SWAPPING;
    
888
889
890
891
892
893
894
895
    if ($type == "USER") {
	$where = "expt_head_uid='$id'";
	$title = "Current";
    } elseif ($type == "PROJ") {
	$where = "e.pid='$id'";
	$title = "Project";
	$nopid = 1;
    } elseif ($type == "GROUP") {
896
	$where = "e.pid='$id' and e.gid='$gid'";
897
898
899
900
901
902
903
904
905
906
907
908
909
910
911
912
913
914
915
916
917
918
919
920
921
922
923
924
925
926
	$title = "Group";
	$nopid = 1;
    } else {
	$where = "e.eid='$id'";
	$title = "Bad id '$id'!";
    }
    
    $query_result =
	DBQueryFatal("select e.*,count(r.node_id) as nodes, ".
		     "round(minimum_nodes+.1,0) as min_nodes ".
		     "from experiments as e ".
		     "left join reserved as r on e.pid=r.pid and e.eid=r.eid ".
		     "where $where ".
		     "group by e.pid,e.eid order by e.state,e.eid");
    
    if (mysql_num_rows($query_result)) {
	echo "<center>
          <h3>$title Experiments</h3>
          </center>
          <table align=center border=1 cellpadding=2 cellspacing=2>\n";

	if ($nopid) {
	    $pidrow="";
	} else {
	    $pidrow="\n<th>PID</th>";
	}
	
	echo "<tr>$pidrow
              <th>EID</th>
              <th>State</th>
927
928
              <th align=center>Nodes [1]</th>
              <th align=center>Hours Idle [2]</th>
929
930
931
              <th>Description</th>
          </tr>\n";

932
933
934
	$idlemark = "<b>*</b>";
	$stalemark = "<b>?</b>";
	
935
936
937
	while ($row = mysql_fetch_array($query_result)) {
	    $pid  = $row[pid];
	    $eid  = $row[eid];
938
	    $state= $row[state];
939
940
941
	    $nodes= $row["nodes"];
	    $minnodes = $row["min_nodes"];
	    $idlehours = TBGetExptIdleTime($pid,$eid);
942
943
	    $stale = TBGetExptIdleStale($pid,$eid);
	    $ignore = $row["idle_ignore"];
944
	    $name = $row[expt_name];
945
	    if ($nodes==0) {
946
		$nodes = "<font color=green>$minnodes</font>";
947
948
	    } elseif ($row[swap_requests] > 0) {
		$nodes .= $idlemark;
949
950
951
952
953
954
955
956
	    }

	    if ($nopid) {
		$pidrow="";
	    } else {
		$pidrow="\n<td>".
		    "<A href='showproject.php3?pid=$pid'>$pid</A></td>";
	    }
957
958
959
960
961
962

	    $idlestr = $idlehours;
	    if ($idlehours > 0) {
		if ($stale) { $idlestr .= $stalemark; }
		if ($ignore) { $idlestr = "($idlestr)"; $parens=1; }
	    } elseif ($idlehours == -1) { $idlestr = "&nbsp;"; }
963
964
965
	    
	    echo "<tr>$pidrow
                 <td><A href='showexp.php3?pid=$pid&eid=$eid'>$eid</A></td>
966
		 <td>$state</td>
967
                 <td align=center>$nodes</td>
968
                 <td align=center>$idlestr</td>
969
970
971
972
                 <td>$name</td>
             </tr>\n";
	}
	echo "</table>\n";
973
974
975
	echo "<table align=center cellpadding=0 class=stealth><tr>\n".
	    "<td class=stealth align=left><font size=-1><ol>\n".
	    "<li>Node counts in <font color=green><b>green</b></font>\n".
976
	    "show a rough estimate of the minimum number of \n".
977
978
979
980
981
982
	    "nodes <br>required to swap in.\n".
	    "They account for delay nodes, but not for node types, etc.\n".
	    "<li>A $stalemark indicates that the data is stale, and ".
	    "at least one node in the experiment has not <br>reported ".
	    "on its proper schedule.\n"; 
	if ($parens) {
983
            # do not show this unless we did it... most users should not ever
984
985
986
987
988
	    # need to know that some expts have their idleness ignored
	    echo "Values are in parenthesis for idle-ignore experiments.\n";
	}
	echo "</ol></font></td></tr></table>\n";

989
    }
990
991
}

992
993
994
#
# Show Node information for an experiment.
#
995
function SHOWNODES($pid, $eid, $sortby) {
996
    global $SCRIPT_NAME;
997
    global $TBOPSPID;
998
    
999
1000
1001
1002
1003
1004
1005
1006
1007
1008
1009
1010
1011
1012
1013
1014
1015
1016
1017
1018
1019
1020
1021
1022
    #
    # If this is an expt in emulab-ops, we also want to see the reserved
    # time. Note that vname might not be useful, but show it anyway.
    #
    # XXX The above is not always true. There are also real experiments in
    # emulab-ops.
    #
    if (!isset($sortby)) {
	$sortclause = "n.type,n.priority";
    }
    elseif ($sortby == "vname") {
	$sortclause = "r.vname";
    }
    elseif ($sortby == "rsrvtime-up") {
	$sortclause = "rsrvtime asc";
    }
    elseif ($sortby == "rsrvtime-down") {
	$sortclause = "rsrvtime desc";
    }
    elseif ($sortby == "nodeid") {
	$sortclause = "n.node_id";
    }
    else {
	$sortclause = "n.type,n.priority";
1023
    }
1024

1025
1026
1027
1028
1029
1030
1031
1032
1033
1034
1035
1036
    $query_result =
	DBQueryFatal("SELECT r.*,n.*,nt.isvirtnode, ".
		     " ns.status as nodestatus, ".
		     " date_format(rsrv_time,\"%Y-%m-%d&nbsp;%T\") as rsrvtime ".
		     "from reserved as r ".
		     "left join nodes as n on n.node_id=r.node_id ".
		     "left join node_types as nt on nt.type=n.type ".
		     "left join node_status as ns on ns.node_id=r.node_id ".
		     "WHERE r.eid='$eid' and r.pid='$pid' ".
		     "ORDER BY $sortclause");
    
    if (mysql_num_rows($query_result)) {
1037
1038
1039
1040
1041
	echo "<center>
              <h3>Reserved Nodes</h3>
              </center>
              <table align=center border=1>
              <tr>
1042
1043
1044
1045
1046
1047
1048
1049
1050
1051
1052
1053
1054
                <th><a href=\"$SCRIPT_NAME?pid=$pid&eid=$eid".
	                        "&sortby=nodeid\">Node ID</a></th>
                <th><a href=\"$SCRIPT_NAME?pid=$pid&eid=$eid".
	                 "&sortby=vname\">Name</a></th>\n";
	if ($pid == $TBOPSPID) {
	    echo "<th>Reserved<br>
                      <a href=\"$SCRIPT_NAME?pid=$pid&eid=$eid".
		         "&sortby=rsrvtime-up\">Up</a> or 
                      <a href=\"$SCRIPT_NAME?pid=$pid&eid=$eid".
		         "&sortby=rsrvtime-down\">Down</a>
                  </th>\n";
	}
	echo "  <th>Type</th>
1055
1056
                <th>Default OSID</th>
                <th>Node<br>Status</th>
1057
1058
                <th>Hours<br>Idle[<b>1</b>]</th>
                <th>Startup<br>Status[<b>2</b>]</th>
1059
1060
1061
                <th><a href=\"docwrapper.php3?docname=ssh-mime.html\">SSH</a>
		    </th>
                <th><a href=\"faq.php3#UTT-TUNNEL\">Console</a></th>
1062
              </tr>\n";
1063

1064
	$stalemark = "<b>?</b>";
1065
	$count = 0;
1066

1067
1068
	while ($row = mysql_fetch_array($query_result)) {
	    $node_id = $row[node_id];
1069
1070
	    $vname   = $row[vname];
	    $rsrvtime= $row[rsrvtime];
1071
	    $type    = $row[type];
1072
1073
	    $def_boot_osid = $row[def_boot_osid];
	    $startstatus   = $row[startstatus];
1074
	    $status        = $row[nodestatus];
1075
	    $bootstate     = $row[eventstate];
1076
	    $isvirtnode    = $row[isvirtnode];
1077
1078
1079
1080
1081
1082
1083
1084
	    $idlehours = TBGetNodeIdleTime($node_id);
	    $stale = TBGetNodeIdleStale($node_id);

	    $idlestr = $idlehours;
	    if ($idlehours > 0) {
		if ($stale) { $idlestr .= $stalemark; }
		if ($ignore) { $idlestr = "($idlestr)"; $parens=1; }
	    } elseif ($idlehours == -1) { $idlestr = "&nbsp;"; }
1085

1086
1087
1088
	    if (!$vname)
		$vname = "--";

1089
1090
1091
1092
1093
	    if ($count & 1) {
		echo "<tr></tr>\n";
	    }
	    $count++;

1094
	    echo "<tr>
Leigh B. Stoller's avatar
Leigh B. Stoller committed
1095
1096
                    <td><A href='shownode.php3?node_id=$node_id'>$node_id</a>
                        </td>
1097
1098
1099
1100
                    <td>$vname</td>\n";
	    if ($pid == $TBOPSPID)
		echo "<td>$rsrvtime</td>\n";
            echo "  <td>$type</td>\n";
1101
1102
1103
1104
1105
	    if ($def_boot_osid) {
		echo "<td>";
		SPITOSINFOLINK($def_boot_osid);
		echo "</td>";
	    }
1106
1107
	    else
		echo "<td>&nbsp</td>\n";
1108
1109
1110
1111
1112
1113

	    if ($bootstate != "ISUP") {
		echo "  <td>$status ($bootstate)</td>\n";
	    } else {
		echo "  <td>$status</td>\n";
	    }
1114
	    
1115
	    echo "  <td>$idlestr</td>
1116
1117
1118
1119
1120
                    <td align=center>$startstatus</td>\n";

	    echo "  <td align=center>
                     <A href='nodessh.php3?node_id=$node_id'>
                     <img src=\"ssh.gif\" alt=s></A></td>\n";
1121
1122
1123
1124
1125
1126
1127
1128
	    if ($isvirtnode) {
		echo "<td>&nbsp</td>\n";
	    }
	    else {
		echo "  <td align=center>
                           <A href='nodetipacl.php3?node_id=$node_id'>
                          <img src=\"console.gif\" alt=c></A></td>\n";
	    }
1129
	    echo "</tr>\n";
1130
1131
	}
	echo "</table>\n";
1132
1133
	echo "<h4><blockquote><blockquote><blockquote>
              <ol>
1134
1135
	        <li>A $stalemark indicates that the data is stale, and
	            the node has not reported on its proper schedule. 
1136
                <li>Exit value of the node startup command. A value of
1137
                        666 indicates a testbed internal error.
1138
1139
              </ol>
              </blockquote></blockquote></blockquote></h4>\n";
1140
1141
1142
    }
}

1143
1144
1145
1146
#
# Show OS INFO record.
#
function SHOWOSINFO($osid) {
1147
1148
    $query_result =
	DBQueryFatal("SELECT * FROM os_info WHERE osid='$osid'");
1149
1150
1151

    $osrow = mysql_fetch_array($query_result);

1152
    $os_description = $osrow[description];
1153
1154
1155
1156
1157
    $os_OS          = $osrow[OS];
    $os_version     = $osrow[version];
    $os_path        = $osrow[path];
    $os_magic       = $osrow[magic];
    $os_osfeatures  = $osrow[osfeatures];
1158
    $os_op_mode     = $osrow[op_mode];
1159
    $os_pid         = $osrow[pid];
1160
1161
    $os_shared      = $osrow[shared];
    $os_osname      = $osrow[osname];
1162
1163
    $creator        = $osrow[creator];
    $created        = $osrow[created];
1164
    $mustclean      = $osrow[mustclean];
1165
    $nextosid       = $osrow[nextosid];
1166
    $max_concurrent = $osrow[max_concurrent];
1167
1168
1169
1170
1171
1172
1173
1174
1175
1176
1177

    if (!$os_description)
	$os_description = "&nbsp";
    if (!$os_version)
	$os_version = "&nbsp";
    if (!$os_path)
	$os_path = "&nbsp";
    if (!$os_magic)
	$os_magic = "&nbsp";
    if (!$os_osfeatures)
	$os_osfeatures = "&nbsp";
1178
1179
    if (!$os_op_mode)
	$os_op_mode = "&nbsp";
1180
1181
    if (!$created)
	$created = "N/A";
1182
1183
1184
1185
1186
1187
1188

    #
    # Generate the table.
    #
    echo "<table align=center border=1>\n";

    echo "<tr>
1189
1190
1191
1192
1193
1194
            <td>Name: </td>
            <td class=\"left\">$os_osname</td>
          </tr>\n";

    echo "<tr>
            <td>Project: </td>
1195
1196
            <td class=\"left\">
              <a href='showproject.php3?pid=$os_pid'>$os_pid</a></td>
1197
1198
          </tr>\n";

1199
1200
    echo "<tr>
            <td>Creator: </td>
1201
1202
            <td class=left>
              <a href='showuser.php3?target_uid=$creator'>$creator</a></td>
1203
1204
1205
1206
1207
1208
1209
 	  </tr>\n";

    echo "<tr>
            <td>Created: </td>
            <td class=left>$created</td>
 	  </tr>\n";

1210
1211
1212
1213
1214
1215
1216
1217
1218
1219
1220
1221
1222
1223
1224
1225
1226
1227
1228
1229
1230
1231
1232
1233
1234
1235
    echo "<tr>
            <td>Description: </td>
            <td class=\"left\">$os_description</td>
          </tr>\n";

    echo "<tr>
            <td>Operating System: </td>
            <td class=\"left\">$os_OS</td>
          </tr>\n";

    echo "<tr>
            <td>Version: </td>
            <td class=\"left\">$os_version</td>
          </tr>\n";

    echo "<tr>
            <td>Path: </td>
            <td class=\"left\">$os_path</td>
          </tr>\n";

    echo "<tr>
            <td>Magic (uname -r -s): </td>
            <td class=\"left\">$os_magic</td>
          </tr>\n";

    echo "<tr>
1236
1237
            <td>Features: </td>
            <td class=\"left\">$os_osfeatures</td>
1238
1239
          </tr>\n";

1240
1241
1242
1243
1244
    echo "<tr>
            <td>Operational Mode: </td>
            <td class=\"left\">$os_op_mode</td>
          </tr>\n";

1245
1246
1247
1248
1249
1250
1251
    if (isset($max_concurrent) and $max_concurrent > 0) {
	echo "<tr>
                <td>Max Concurrent Usage: </td>
                <td class=\"left\">$max_concurrent</td>
              </tr>\n";
    }

1252
    echo "<tr>
1253
1254
1255
1256
1257
1258
1259
1260
1261
1262
1263
            <td>Shared?: </td>
            <td class=left>\n";

    if ($os_shared)
	echo "Yes";
    else
	echo "No";
    
    echo "  </td>
          </tr>\n";

1264
1265
1266
1267
1268
1269
1270
1271
1272
1273
1274
1275
    echo "<tr>
            <td>Must Clean?: </td>
            <td class=left>\n";

    if ($mustclean)
	echo "Yes";
    else
	echo "No";
    
    echo "  </td>
          </tr>\n";

1276
    if ($nextosid) {
1277
1278
1279
1280
1281
1282
1283
1284
1285
1286
1287
	if (strncmp($nextosid, "MAP:", 4) == 0)
	    echo "<tr>
		    <td>Next Osid: </td>
		    <td class=left>
			Mapped via DB table: " . substr($nextosid, 4) . " </td></tr>\n";
	else
	    echo "<tr>
                    <td>Next Osid: </td>
                    <td class=left>
                        <A href='showosinfo.php3?osid=$nextosid'>$nextosid</A></td>
                  </tr>\n";
1288
1289
    }

1290
1291
1292
    echo "<tr>
            <td>Internal ID: </td>
            <td class=\"left\">$osid</td>
1293
1294
1295
1296
1297
          </tr>\n";

    echo "</table>\n";
}

1298
1299
1300
#
# Show ImageID record.
#
1301
function SHOWIMAGEID($imageid, $edit, $isadmin = 0) {
1302
1303
    $query_result =
	DBQueryFatal("select * from images where imageid='$imageid'");
1304
1305
1306

    $row = mysql_fetch_array($query_result);

1307
1308
    $imagename   = $row[imagename];
    $pid         = $row[pid];
1309
    $gid         = $row[gid];
1310
    $description = $row[description];
1311
1312
1313
1314
1315
1316
1317
1318
1319
    $loadpart	 = $row[loadpart];
    $loadlength	 = $row[loadlength];
    $part1_osid	 = $row[part1_osid];
    $part2_osid	 = $row[part2_osid];
    $part3_osid	 = $row[part3_osid];
    $part4_osid	 = $row[part4_osid];
    $default_osid= $row[default_osid];
    $path 	 = $row[path];
    $loadaddr	 = $row[load_address];