menu.php3 30.7 KB
Newer Older
1
<?php
Leigh B. Stoller's avatar
Leigh B. Stoller committed
2
3
#
# EMULAB-COPYRIGHT
4
# Copyright (c) 2000-2005 University of Utah and the Flux Group.
Leigh B. Stoller's avatar
Leigh B. Stoller committed
5
6
# All rights reserved.
#
7

8
$login_status     = CHECKLOGIN_NOTLOGGEDIN;
9
$login_uid        = 0;
10
$drewheader       = 0;
11
$autorefresh      = 0;
12

13
14
15
16
17
18
#
# This has to be set so we can spit out http or https paths properly!
# Thats because browsers do not like a mix of secure and nonsecure.
# 
$BASEPATH	  = "";

19
#
20
21
# TOPBARCELL - Make a cell for the topbar. Actually, the name lies, it can be
# used for cells in a bottombar too.
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
#
function TOPBARCELL($contents) {
    echo "<td class=\"topbaropt\">";
    echo "<span class=\"topbaroption\">&nbsp;";
    echo $contents;
    echo "&nbsp;</span>";
    echo "</td>";
    echo "\n";
}

#
# SIDEBARCELL - Make a cell for the sidebar
#
function SIDEBARCELL($contents, $last = 0) {
    echo "<tr>";
    if ($last) {
	echo "<td class=\"menuoptb\">";
    } else {
	echo "<td class=\"menuopt\">";
    }
42
    echo "$contents";
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
    echo "</td>";
    echo "</tr>";
    echo "\n";
}

#
# WRITETOPBARBUTTON(text, base, link): Write a button in the topbar
#
function WRITETOPBARBUTTON($text, $base, $link ) {
    $link = "$base/$link";
    TOPBARCELL("<a href=\"$link\">$text</a>");
}
# same as above with "new" gif next to it.
function WRITETOPBARBUTTON_NEW($text, $base, $link ) {
    $link = "$base/$link";
    TOPBARCELL("<a href=\"$link\">$text</a>&nbsp;<img src=\"/new.gif\" />");
}

61
62
63
64
65
66
67
#
# WRITESIDEBARDIVIDER(): Put a bit of whitespace in the sidebar
#
function WRITESIDEBARDIVIDER() {
    global $BASEPATH;
    echo "<tr>";
    echo "<td class=\"menuoptdiv\">";
68
    # We have to put something in this cell, or IE ignores it. But, we do not
69
70
71
72
73
74
75
    # want to make the table row full line-height, so a space will not do.
    echo "<img src=\"$BASEPATH/1px.gif\" border=0 height=1 width=1 />";
    echo "</td>";
    echo "</tr>";
    echo "\n";
}

76
77
78
79
80
#
# WRITESIDEBARBUTTON(text, link): Write a button on the sidebar menu.
# We do not currently try to match the current selection so that its
# link looks different. Not sure its really necessary.
#
Chad Barb's avatar
   
Chad Barb committed
81
function WRITESIDEBARBUTTON($text, $base, $link ) {
82
83
    if ($base)
	$link = "$base/$link";
84
    SIDEBARCELL("<a href=\"$link\">$text</a>");
Chad Barb's avatar
   
Chad Barb committed
85
}
86

Chad Barb's avatar
   
Chad Barb committed
87
88
89
# same as above with "new" gif next to it.
function WRITESIDEBARBUTTON_NEW($text, $base, $link ) {
    $link = "$base/$link";
90
    SIDEBARCELL("<a href=\"$link\">$text</a>&nbsp;<img src=\"/new.gif\" />");
Chad Barb's avatar
   
Chad Barb committed
91
92
}

Chad Barb's avatar
   
Chad Barb committed
93
94
95
# same as above with "cool" gif next to it.
function WRITESIDEBARBUTTON_COOL($text, $base, $link ) {
    $link = "$base/$link";
96
    SIDEBARCELL("<a href=\"$link\">$text</a>&nbsp;<img src=\"/cool.gif\" />");
Chad Barb's avatar
   
Chad Barb committed
97
98
}

Leigh B. Stoller's avatar
Leigh B. Stoller committed
99
100
function WRITESIDEBARBUTTON_ABS($text, $base, $link ) {
    $link = "$link";
101
    SIDEBARCELL("<a href=\"$link\">$text</a>\n");
Leigh B. Stoller's avatar
Leigh B. Stoller committed
102
103
}

Chad Barb's avatar
   
Chad Barb committed
104
105
function WRITESIDEBARBUTTON_ABSCOOL($text, $base, $link ) {
    $link = "$link";
106
    SIDEBARCELL("<a href=\"$link\">$text</a>&nbsp;<img src=\"/cool.gif\" />");
Chad Barb's avatar
   
Chad Barb committed
107
108
}

Chad Barb's avatar
   
Chad Barb committed
109
110
111
112
113
# same as above, but uses a slightly different style sheet so there
# is more padding below the last button.
# The devil is, indeed, in the details.
function WRITESIDEBARLASTBUTTON($text, $base, $link) {
    $link = "$base/$link";
114
    SIDEBARCELL("<a href=\"$link\">$text</a>",1);
Chad Barb's avatar
   
Chad Barb committed
115
116
}

Chad Barb's avatar
Chad Barb committed
117
118
function WRITESIDEBARLASTBUTTON_COOL($text, $base, $link) {
    $link = "$base/$link";
119
    SIDEBARCELL("<a href=\"$link\">$text</a>&nbsp;<img src=\"/cool.gif\" />",1);
Chad Barb's avatar
Chad Barb committed
120
121
}

Chad Barb's avatar
   
Chad Barb committed
122
123
# writes a message to the sidebar, without clickability.
function WRITESIDEBARNOTICE($text) {
124
125
126
127
128
129
130
131
132
133
134
135
136
137
    SIDEBARCELL("<b>$text</b>");
}

#
# Something like the sidebar, but across the top, with only a few options.
# Think Google. For PlanetLab users, but it would be easy enough to make
# others. Still a work in progress.
#
function WRITEPLABTOPBAR() {
    echo "<table class=\"topbar\" width=\"100%\" cellpadding=\"2\" cellspacing=\"0\" align=\"center\">\n";
    global $login_status, $login_uid;
    global $TBBASE, $TBDOCBASE, $BASEPATH;
    global $THISHOMEBASE;

138
139
    WRITETOPBARBUTTON("Create a Slice",
        $TBBASE, "plab_ez.php3");
140

141
    WRITETOPBARBUTTON("Nodes",
142
143
144
145
146
147
148
149
        $TBBASE, "plabmetrics.php3");

    WRITETOPBARBUTTON("My Testbed",
	$TBBASE,
	"showuser.php3?target_uid=$login_uid");


    WRITETOPBARBUTTON("Advanced Experiment",
150
        $TBBASE, "beginexp_html.php3");
151

152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
    if ($login_status & CHECKLOGIN_TRUSTED) {
	# Only project/group leaders can do these options
	# Show a "new" icon if there are people waiting for approval
	$query_result =
	DBQueryFatal("select g.* from group_membership as authed ".
		     "left join group_membership as g on ".
		     " g.pid=authed.pid and g.gid=authed.gid ".
		     "left join users as u on u.uid=g.uid ".
		     "where u.status!='".
		     TBDB_USERSTATUS_UNVERIFIED . "' and ".
		     " u.status!='" . TBDB_USERSTATUS_NEWUSER . 
		     "' and g.uid!='$login_uid' and ".
		     "  g.trust='". TBDB_TRUSTSTRING_NONE . "' ".
		     "  and authed.uid='$login_uid' and ".
		     "  (authed.trust='group_root' or ".
		     "   authed.trust='project_root') ".
		     "ORDER BY g.uid,g.pid,g.gid");
	if (mysql_num_rows($query_result) > 0) {
	     WRITETOPBARBUTTON_NEW("Approve Users",
				   $TBBASE, "approveuser_form.php3");
	} else {
	    WRITETOPBARBUTTON("Approve Users",
			       $TBBASE, "approveuser_form.php3");
	}
    }

    WRITETOPBARBUTTON("Log Out", $TBBASE, "logout.php3?next_page=" .
	urlencode($TBBASE . "/login_plab.php3"));

181
182
183
    echo "</table>\n";
    echo "<br>\n";

184
185
}

186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202

#
# Put a few things that PlanetLab users should see, but are non-essential,
# across the bottom of the page rather than the top
#
function WRITEPLABBOTTOMBAR() {
    global $login_status, $login_uid;
    global $TBBASE, $TBDOCBASE, $BASEPATH;
    global $THISHOMEBASE;

    if ($login_uid) {
	$newsBase = $TBBASE; 
    } else {
	$newsBase = $TBDOCBASE;
    }

    echo "
203
204
205
	   <center>
	   <br>
	   <font size=-1>
206
	   <form method=get action=$TBDOCBASE/search.php3>
207
208
209
210
	   [ <a href='$TBDOCBASE/doc.php3'>
		Documentation</a> : <input name=query size = 15/>
		  <input type=submit style='font-size:10px;' value='Search' /> ]
	   [ <a href='$newsBase/news.php3'>
211
		News</a> ]
212
213
214
215
	   </form>
	   </font>
	   <br>
	   </center>\n";
216
217
218

}

219
220
221
222
223
#
# WRITESIDEBAR(): Write the menu. The actual menu options the user
# sees depends on the login status and the DB status.
#
function WRITESIDEBAR() {
224
225
    global $login_status, $login_uid, $pid, $gid;
    global $TBBASE, $TBDOCBASE, $BASEPATH, $WIKISUPPORT, $MAILMANSUPPORT;
226
    global $BUGDBSUPPORT, $BUGDBURL, $CVSSUPPORT, $CHATSUPPORT;
227
    global $CHECKLOGIN_WIKINAME;
228
    global $THISHOMEBASE;
229
    $firstinitstate = TBGetFirstInitState();
230
231
232

    #
    # The document base cannot be a mix of secure and nonsecure.
233
    #
Chad Barb's avatar
   
Chad Barb committed
234
235
236
    
    # create the main menu table, which also happens to reside in a form
    # (for search.)
Chad Barb's avatar
   
Chad Barb committed
237
238
239
240
241
242
243
244
245

    #
    # get post time of most recent news;
    # get both displayable version and age in days.
    #
    $query_result = 
	DBQueryFatal("SELECT DATE_FORMAT(date, '%M&nbsp;%e') AS prettydate, ".
		     " (TO_DAYS(NOW()) - TO_DAYS(date)) AS age ".
		     "FROM webnews ".
246
		     "WHERE archived=0 ".
Chad Barb's avatar
   
Chad Barb committed
247
248
249
250
251
252
253
254
255
256
257
258
259
260
261
262
263
264
265
266
267
		     "ORDER BY date DESC ".
		     "LIMIT 1");
    $newsDate = "";
    $newNews  = 0;

    #
    # This is so an admin can use the editing features of news.
    #
    if ($login_uid) { # && ISADMIN($login_uid)) { 
	$newsBase = $TBBASE; 
    } else {
	$newsBase = $TBDOCBASE;
    }

    if ($row = mysql_fetch_array($query_result)) {
	$newsDate = "(".$row[prettydate].")";
	if ($row[age] < 7) {
	    $newNews = 1;
	}
    }

268
    echo "<FORM method=get ACTION=$TBDOCBASE/search.php3>\n";
Chad Barb's avatar
   
Chad Barb committed
269
?>
270
  <table class="menu" width=210 cellpadding="0" cellspacing="0">
Chad Barb's avatar
   
Chad Barb committed
271
272
    <tr><td class="menuheader"><b>Information</b></td></tr>
<?php
Chad Barb's avatar
   
Chad Barb committed
273
274
275
276
277
278
    if (0 == strcasecmp($THISHOMEBASE, "emulab.net")) {
	$rootEmulab = 1;
    } else {
	$rootEmulab = 0;
    }

279
    WRITESIDEBARBUTTON("Home", $TBDOCBASE, "index.php3?stayhome=1");
280

Chad Barb's avatar
   
Chad Barb committed
281
282

    if ($rootEmulab) {
283
	WRITESIDEBARBUTTON("Other Emulabs", $TBDOCBASE,
Chad Barb's avatar
   
Chad Barb committed
284
285
286
287
288
289
			       "docwrapper.php3?docname=otheremulabs.html");
    } else {
	WRITESIDEBARBUTTON_ABS("Utah Emulab", $TBDOCBASE,
			       "http://www.emulab.net/");

    }
Chad Barb's avatar
   
Chad Barb committed
290

Chad Barb's avatar
   
Chad Barb committed
291
292
293
294
295
296
    if ($newNews) {
	WRITESIDEBARBUTTON_NEW("News $newsDate", $newsBase, "news.php3");
    } else {
	WRITESIDEBARBUTTON("News $newsDate", $newsBase, "news.php3");
    }

297
    WRITESIDEBARBUTTON("Documentation", $TBDOCBASE, "doc.php3");
Chad Barb's avatar
   
Chad Barb committed
298
299

    if ($rootEmulab) {
Jay Lepreau's avatar
Jay Lepreau committed
300
	WRITESIDEBARBUTTON("Papers (Sep 14)", $TBDOCBASE, "pubs.php3");
301
	WRITESIDEBARBUTTON("Software (Jul 18)",
302
			       $TBDOCBASE, "software.php3");
303
304
	#WRITESIDEBARBUTTON("Add Widearea Node (CD)",
	#		    $TBDOCBASE, "cdrom.php");
305
306
307
308
309
310
311
312

	SIDEBARCELL("<a href=\"$TBDOCBASE/people.php3\">People</a> and " .
	            "<a href=\"$TBDOCBASE/gallery/gallery.php3\">Photos</a>");

	SIDEBARCELL("Emulab <a href=\"$TBDOCBASE/doc/docwrapper.php3? " .
		    "docname=users.html\">Users</a> and " .
	            "<a href=\"$TBDOCBASE/docwrapper.php3? " .
		    "docname=sponsors.html\">Sponsors</a>",1);
Chad Barb's avatar
   
Chad Barb committed
313
    } else {
314
	# Link ALWAYS TO UTAH
315
316
	#WRITESIDEBARBUTTON_ABSCOOL("Add Widearea Node (CD)",
	#		       $TBDOCBASE, "http://www.emulab.net/cdrom.php");
Chad Barb's avatar
   
Chad Barb committed
317
318
319
	WRITESIDEBARLASTBUTTON("Projects on Emulab", $TBDOCBASE,
			       "projectlist.php3");
    }
320

321
322
323
324
325
326
327
328
329
330
331
332
333
334
335
336
337
338
339
340
341
342
343
344
345
346
347
348
349
350
351
352
353
354
355
356
357
358
359
360
361
362
363
364
365
366
367
368
369
370
371
372
373
374
375
376
377
378
379
380
381
382
383
384
385
386
387
388
389
390
391
392
393
394
395
396
    # The actual search box. Form starts above ...
    echo "<tr><td class=menuoptst><b>".
	"Search Documentation:</b></td></tr>".
	"<tr><td class=menuoptsb><input name=query size = 15/>".
	"<input type=submit style='font-size:10px;' value=Go /><br>".
	"</td></tr>\n";

    #
    # Cons up a nice message.
    # 
    switch ($login_status & CHECKLOGIN_STATUSMASK) {
    case CHECKLOGIN_LOGGEDIN:
	$login_message = 0;
	    
	if ($login_status & CHECKLOGIN_PSWDEXPIRED)
	    $login_message = "$login_message<br>(Password Expired!)";
	elseif ($login_status & CHECKLOGIN_UNAPPROVED)
	    $login_message = "$login_message<br>(Unapproved!)";
	break;
    case CHECKLOGIN_TIMEDOUT:
	$login_message = "Login Timed out.";
	break;
    default:
	$login_message = 0;
	break;
    }

    if ($login_message) {
      echo "<tr>";
      echo "<td class=menuoptst style='padding-top: 6px;' ><center><b>";
      echo "$login_message</b></center></td>";
      echo "</tr>";
    }

    #
    # Now the login/logout box. Remember, already inside a table.
    # We want the links to the login/logout pages to always be https,
    # but the images path depends on whether the page was loaded as
    # http or https, since we do not want to mix them, since they
    # cause warnings.
    # 
    if ($login_status & (CHECKLOGIN_LOGGEDIN|CHECKLOGIN_MAYBEVALID)) {
      echo "<tr>";
      echo "<td class=\"menuoptst\" align=center valign=center>";
      echo "<a href=\"$TBBASE/logout.php3?target_uid=$login_uid\">";
      echo "<img alt=\"logoff\" border=0 ";
      echo "src=\"$BASEPATH/logoff.gif\"></a>\n";
      echo "</td></tr>\n";
    }
    elseif (!NOLOGINS()) {
	echo "<tr>";
	echo "<td class=\"menuoptst\" align=center valign=center>";

	if (!$firstinitstate) {
	    echo "<a href=\"$TBBASE/reqaccount.php3\">";
	    echo "<img alt=\"Request Account\" border=0 ";
	    echo "src=\"$BASEPATH/requestaccount.gif\"></a>";

	    echo "<br /><b>or</b><br />";
	}

	echo "<a href=\"$TBBASE/login.php3\">";
	echo "<img alt=\"logon\" border=0 ";
	echo "src=\"$BASEPATH/logon.gif\"></a>\n";

	echo "</td></tr>\n";
    }

    #
    # Login message. Set via 'web/message' site variable
    #
    $message = TBGetSiteVar("web/message");
    if (0 != strcmp($message,"")) {
	WRITESIDEBARNOTICE($message);    	
    }

397
398
    echo "</table>\n";
    echo "</form>\n";
399

400
401
402
403
404
405
406
407
    # Start Interaction section if going to spit out interaction options.
    if ($login_status & (CHECKLOGIN_LOGGEDIN|CHECKLOGIN_MAYBEVALID)) {
	echo "<table class=menu width=210 cellpadding=0 cellspacing=0>".
	    "<tr><td class=menuheader>".
	    "<b>Experimentation</b>".
	    "</td></tr>\n";
    }

408
409
410
411
412
413
414
415
    #
    # Basically, we want to let admin people continue to use
    # the web interface even when nologins set. But, we want to make
    # it clear its disabled.
    # 
    if (NOLOGINS()) {
        WRITESIDEBARBUTTON("<font color=red> ".
			   "Web Interface Temporarily Unavailable</font>",
416
417
			   $TBDOCBASE, "nologins.php3");

Chad Barb's avatar
   
Chad Barb committed
418
419
420
        if (!$login_uid || !ISADMIN($login_uid)) {	
	    WRITESIDEBARNOTICE("Please Try Again Later");
        }
421
    }
Chad Barb's avatar
   
Chad Barb committed
422

423
    if ($login_status & (CHECKLOGIN_LOGGEDIN|CHECKLOGIN_MAYBEVALID)) {
424
425
426
427
428
429
430
431
432
433
434
435
436
437
438
	if ($firstinitstate != null) {    
	    if ($firstinitstate == "createproject") {
		WRITESIDEBARBUTTON("Create First Project",
				   $TBBASE, "newproject.php3");
	    }
	    elseif ($firstinitstate == "approveproject") {
		$firstinitpid = TBGetFirstInitPid();
		
		WRITESIDEBARBUTTON("Approve First Project",
				   $TBBASE,
				   "approveproject.php3?pid=$firstinitpid".
				   "&approval=approve");
	    }
	}
	elseif ($login_status & CHECKLOGIN_ACTIVE) {
439
	    if ($login_status & CHECKLOGIN_PSWDEXPIRED) {
440
		WRITESIDEBARBUTTON("Change Your Password",
441
				   $TBBASE, "moduserinfo.php3");
442
	    }
Leigh B. Stoller's avatar
Leigh B. Stoller committed
443
	    elseif ($login_status & (CHECKLOGIN_WEBONLY|CHECKLOGIN_WIKIONLY)) {
444
445
446
		WRITESIDEBARBUTTON("My Emulab",
				   $TBBASE,
				   "showuser.php3?target_uid=$login_uid");
447
448
449
450
451

		if ($WIKISUPPORT && $CHECKLOGIN_WIKINAME != "") {
		    $wikiname = $CHECKLOGIN_WIKINAME;
		
		    WRITESIDEBARBUTTON_ABSCOOL("My Wikis",
452
453
			       "gotowiki.php3?redurl=Main/$wikiname",
			       "gotowiki.php3?redurl=Main/$wikiname");
454
		}
455

456
457
458
		WRITESIDEBARBUTTON("Update User Information",
				   $TBBASE, "moduserinfo.php3");
	    }
459
	    else {
Leigh B. Stoller's avatar
Leigh B. Stoller committed
460
		WRITESIDEBARBUTTON("My Emulab",
461
462
				   $TBBASE,
				   "showuser.php3?target_uid=$login_uid");
463

464
		#
465
466
467
468
                # Since a user can be a member of more than one project,
                # display this option, and let the form decide if the 
                # user is allowed to do this.
                #
469
470
 		WRITESIDEBARBUTTON("Begin an Experiment",
				   $TBBASE, "beginexp_html.php3");
471
	
472
473
		# Put _NEW back when Plab is working again.
		WRITESIDEBARBUTTON("Create a PlanetLab Slice",
474
475
476
477
478
479
480
				       $TBBASE, "plab_ez.php3");

		WRITESIDEBARBUTTON("Experiment List",
				   $TBBASE, "showexp_list.php3");

		WRITESIDEBARDIVIDER();

Leigh B. Stoller's avatar
Leigh B. Stoller committed
481
482
483
484
485
486
                # Free PCs. Silly.
		$freepcs = TBFreePCs();

		WRITESIDEBARBUTTON("Node Status ".
				   "<b><font color=black>($freepcs free PCs)".
				   "</font></b>",
487
488
				   $TBBASE, "nodecontrol_list.php3");

489
490
491
492
493
		SIDEBARCELL("List <a " .
			"href=\"$TBBASE/showimageid_list.php3\">" .
	        	"ImageIDs</a> or <a " .
	                "href=\"$TBBASE/showosid_list.php3\">OSIDs</a>");

494
		if ($login_status & CHECKLOGIN_TRUSTED) {
495
		  WRITESIDEBARDIVIDER();
496
497
498
                  # Only project/group leaders can do these options
                  # Show a "new" icon if there are people waiting for approval
		  $query_result =
499
500
501
		    DBQueryFatal("select g.* from group_membership as authed ".
				 "left join group_membership as g on ".
				 " g.pid=authed.pid and g.gid=authed.gid ".
502
				 "left join users as u on u.uid=g.uid ".
503
				 "where u.status!='".
504
				 TBDB_USERSTATUS_UNVERIFIED . "' and ".
505
506
507
508
509
510
				 " u.status!='" . TBDB_USERSTATUS_NEWUSER . 
				 "' and g.uid!='$login_uid' and ".
				 "  g.trust='". TBDB_TRUSTSTRING_NONE . "' ".
				 "  and authed.uid='$login_uid' and ".
				 "  (authed.trust='group_root' or ".
				 "   authed.trust='project_root') ".
511
512
513
514
515
				 "ORDER BY g.uid,g.pid,g.gid");
		  if (mysql_num_rows($query_result) > 0) {
		    WRITESIDEBARBUTTON_NEW("New User Approval",
					   $TBBASE, "approveuser_form.php3");
		  } else {
516
517

		      WRITESIDEBARBUTTON("New User Approval",
518
				       $TBBASE, "approveuser_form.php3");
519
		  }
520
		}
521
	    }
522
	}
523
	elseif ($login_status & (CHECKLOGIN_UNVERIFIED|CHECKLOGIN_NEWUSER)) {
524
525
	    WRITESIDEBARBUTTON("New User Verification",
			       $TBBASE, "verifyusr_form.php3");
526
	    WRITESIDEBARBUTTON("Update User Information",
527
			       $TBBASE, "moduserinfo.php3");
528
	}
529
	elseif ($login_status & (CHECKLOGIN_UNAPPROVED)) {
530
	    WRITESIDEBARBUTTON("Update User Information",
531
			       $TBBASE, "moduserinfo.php3");
532
	}
533
534
	#
	# Standard options for logged in users!
535
536
537
538
539
540
541
	#
	if (!$firstinitstate) {
	    WRITESIDEBARDIVIDER();
	    SIDEBARCELL("<a href=\"$TBBASE/newproject.php3\">Start</a> or " .
	             "<a href=\"$TBBASE/joinproject.php3\">Join</a> a Project",
			1);
	}
542
    }
543

544
545
    #WRITESIDEBARLASTBUTTON_COOL("Take our Survey",
    #    $TBDOCBASE, "survey.php3");
546

547
    # Terminate Interaction menu.
548
    if ($login_status & (CHECKLOGIN_LOGGEDIN|CHECKLOGIN_MAYBEVALID)) {
549
	echo "</table>\n";
550
    }
Chad Barb's avatar
Chad Barb committed
551

552
    # And now the Collaboration menu.
Leigh B. Stoller's avatar
Leigh B. Stoller committed
553
554
555
    if (($login_status & (CHECKLOGIN_LOGGEDIN|CHECKLOGIN_MAYBEVALID)) &&
	($WIKISUPPORT || $MAILMANSUPPORT || $BUGDBSUPPORT ||
	 $CVSSUPPORT  || $CHATSUPPORT)) {
556
557
558
559
560
561
562
563
564
565
	echo "<table class=menu width=210 cellpadding=0 cellspacing=0>".
	    "<tr><td class=menuheader>".
	    "<b>Collaboration</b>".
	    "</td></tr>\n";
     
	if ($WIKISUPPORT && $CHECKLOGIN_WIKINAME != "") {
	    $wikiname = $CHECKLOGIN_WIKINAME;
		
	    WRITESIDEBARBUTTON("My Wikis", $TBBASE,
			       "gotowiki.php3?redurl=Main/$wikiname");
566
	}
567
568
569
570
571
572
573
574
575
576
577
578
579
580
581
582
583
584
585
586
587
588
589
590
591
592
593
594
595
	if ($MAILMANSUPPORT || $BUGDBSUPPORT) {
	    if (!isset($pid) || $pid == "") {
		$query_result =
		    DBQueryFatal("select pid from group_membership where ".
				 "uid='$login_uid' and pid=gid and ".
				 "trust!='none' ".
				 "order by date_approved asc limit 1");
		if (mysql_num_rows($query_result)) {
		    $row = mysql_fetch_array($query_result);
		    $firstpid = $row[pid];
		}
	    }
	}
	if ($MAILMANSUPPORT) {
	    $mmurl  = "showmmlists.php3?target_uid=$login_uid";
	    WRITESIDEBARBUTTON("My Mailing Lists", $TBBASE, $mmurl);
	}
	if ($BUGDBSUPPORT) {
	    $bugdburl = "gotobugdb.php3";
		    
	    if (isset($pid) && !empty($pid)) {
		$bugdburl .= "?project_title=$pid";
	    }
	    elseif (isset($firstpid)) {
		$bugdburl .= "?project_title=$firstpid";
	    }
	    WRITESIDEBARBUTTON("My Bug Databases", $TBBASE, $bugdburl);
	}
	if ($CVSSUPPORT) {
596
597
	    WRITESIDEBARBUTTON("My CVS Repositories", $TBBASE,
			       "listrepos.php3?target_uid=$login_uid");
598
	}
599
600
	if ($CHATSUPPORT) {
	    WRITESIDEBARBUTTON("My Chat Buddies", $TBBASE,
601
602
603
			       "mychat.php3?target_uid=$login_uid");
	}
	WRITESIDEBARDIVIDER();
604
	echo "</table>\n";
605
    }
606

607
608
609
610
611
612
613
614
615
616
617
618
619
620
621
622
623
624
625
626
627
628
629
630
631
632
633
634
635
636
637
638
639
640
641
    # Optional ADMIN menu.
    if ($login_status & CHECKLOGIN_LOGGEDIN && ISADMIN($login_uid)) {
	echo "<table class=menu width=210 cellpadding=0 cellspacing=0>".
	    "<tr><td class=menuheader>".
	    "<b>Administration</b>".
	    "</td></tr>\n";
	
	SIDEBARCELL("List <a " .
		    " href=\"$TBBASE/showproject_list.php3\">" .
		    "Projects</a> or <a " .
		    "href=\"$TBBASE/showuser_list.php3\">Users</a>");

	WRITESIDEBARBUTTON("View Testbed Stats",
			   $TBBASE, "showstats.php3");

	WRITESIDEBARBUTTON("Approve New Projects",
			   $TBBASE, "approveproject_list.php3");

	WRITESIDEBARBUTTON("Edit Site Variables",
			   $TBBASE, "editsitevars.php3");

	WRITESIDEBARBUTTON("Edit Knowledge Base",
			   $TBBASE, "kb-manage.php3");
		    
	$query_result = DBQUeryFatal("select new_node_id from new_nodes");
	if (mysql_num_rows($query_result) > 0) {
	    WRITESIDEBARBUTTON_NEW("Add Testbed Nodes",
				   $TBBASE, "newnodes_list.php3");
	}
	else {
	    WRITESIDEBARBUTTON("Add Testbed Nodes",
			       $TBBASE, "newnodes_list.php3");
	}
	WRITESIDEBARBUTTON("Approve Widearea User",
			   $TBBASE, "approvewauser_form.php3");
Chad Barb's avatar
   
Chad Barb committed
642

643
644
645
646
647
	# Link ALWAYS TO UTAH
	WRITESIDEBARLASTBUTTON("Add Widearea Node (CD)",
			       $TBDOCBASE, "http://www.emulab.net/cdrom.php");
	echo "</table>\n";
    }
648
649
}

650
651
652
653
654
655
656
657
658
659
660
661
662
663
664
665
666
667
668
669
#
# Simple version of above, that just writes the given menu.
# 
function WRITESIMPLESIDEBAR($menudefs) {
    $menutitle = $menudefs['title'];
    
    echo "<table class=menu width=210 cellpadding=0 cellspacing=0>
           <tr><td class=menuheader>\n";

    echo "<b>$menutitle</b>";
    echo " </td>";
    echo "</tr>\n";

    each($menudefs);    
    while (list($key, $val) = each($menudefs)) {
	WRITESIDEBARBUTTON("$key", null, "$val");
    }
    echo "</table>\n";
}

Chad Barb's avatar
   
Chad Barb committed
670
671
672
#
# spits out beginning part of page
#
673
function PAGEBEGINNING( $title, $nobanner = 0 ) {
674
    global $BASEPATH, $TBMAINSITE, $THISHOMEBASE, $ELABINELAB;
Chad Barb's avatar
Chad Barb committed
675
    global $TBDIR, $WWW;
Chad Barb's avatar
   
Chad Barb committed
676
    global $MAINPAGE;
677
    global $TBDOCBASE;
678
    global $autorefresh;
Chad Barb's avatar
   
Chad Barb committed
679

680
681
    $MAINPAGE = !strcmp($TBDIR, "/usr/testbed/");

Chad Barb's avatar
   
Chad Barb committed
682
683
684
685
686
    echo "<!DOCTYPE HTML PUBLIC '-//W3C//DTD HTML 4.01 Transitional//EN' 
          'http://www.w3.org/TR/html4/loose.dtd'>
	<html>
	  <head>
	    <title>$THISHOMEBASE - $title</title>
687
688
            <!--<link rel=\"SHORTCUT ICON\" HREF=\"netbed.ico\">-->
            <link rel=\"SHORTCUT ICON\" HREF=\"netbed.png\" TYPE=\"image/png\">
Chad Barb's avatar
   
Chad Barb committed
689
690
    	    <!-- dumbed-down style sheet for any browser that groks (eg NS47). -->
	    <link REL='stylesheet' HREF='$BASEPATH/common-style.css' TYPE='text/css' />
691
692
    	    <!-- do not import full style sheet into NS47, since it does bad job
            of handling it. NS47 does not understand '@import'. -->
Chad Barb's avatar
   
Chad Barb committed
693
694
695
696
697
698
699
    	    <style type='text/css' media='all'>
            <!-- @import '$BASEPATH/style.css'; -->";

    if (!$MAINPAGE) {
	echo "<!-- @import '$BASEPATH/style-nonmain.css'; -->";
    } 

Leigh B. Stoller's avatar
Leigh B. Stoller committed
700
    echo "</style>\n";
Chad Barb's avatar
   
Chad Barb committed
701
702

    if ($TBMAINSITE) {
Leigh B. Stoller's avatar
Leigh B. Stoller committed
703
	echo "<meta NAME=\"keywords\" ".
Leigh B. Stoller's avatar
Leigh B. Stoller committed
704
705
	           "CONTENT=\"network, emulation, internet, emulator, ".
	           "mobile, wireless, robotic\">\n";
Leigh B. Stoller's avatar
Leigh B. Stoller committed
706
707
708
709
710
	echo "<meta NAME=\"robots\" ".
	           "CONTENT=\"NOARCHIVE\">\n";
	echo "<meta NAME=\"description\" ".
                   "CONTENT=\"emulab - network emulation testbed home\">\n";
    }
Chad Barb's avatar
   
Chad Barb committed
711
712
    echo "</head>
            <body bgcolor='#FFFFFF' 
713
             topmargin='0' leftmargin='0' marginheight='0' marginwidth='0'>\n";
714
715
716
717
    
    if ($autorefresh) {
	echo "<meta HTTP-EQUIV=\"Refresh\" CONTENT=\"$autorefresh\">\n";
    }
718
    if (! $nobanner ) {
719
720
721
722
723
724
	echo "<map name=overlaymap>
                 <area shape=rect coords=\"100,60,369,100\"
                       href='http://www.emulab.net/index.php3'>
                 <area shape=rect coords=\"0,0,369,100\"
                       href='$TBDOCBASE/index.php3'>
              </map>
Chad Barb's avatar
   
Chad Barb committed
725
            <table cellpadding='0' cellspacing='0' width='100%'>
726
727
728
            <tr valign='top'>
              <td valign='top' class='bannercell'
                  background='$BASEPATH/headerbgbb.jpg'
Leigh B. Stoller's avatar
Leigh B. Stoller committed
729
                  bgcolor=#3D627F>
730
731
732
733
734
735
736
737
738
              <img width=369 height=100 border=0 usemap=\"#overlaymap\" ";

	if ($ELABINELAB) {
	    echo "src='$BASEPATH/overlay.elabinelab.gif' ";
	}
	else {
	    echo "src='$BASEPATH/overlay.".strtolower($THISHOMEBASE).".gif' ";
	}
	echo "alt='$THISHOMEBASE - the network testbed'>\n";
739
740
741
742
        if (!$MAINPAGE) {
	     echo "<font size='+1' color='#CCFFCC'>&nbsp;<b>$WWW</b></font>";
	}
	echo "</td></tr></table>\n";
Chad Barb's avatar
   
Chad Barb committed
743
744
745
746
747
748
    }

    echo "<table cellpadding='8' cellspacing='0' height='100%' width='100%'>
            <tr height='100%'>
              <td valign='top' class='leftcell' bgcolor='#ccddee'>
              <!-- sidebar begins -->";
Chad Barb's avatar
   
Chad Barb committed
749
750
751
752
753
754
755
}

#
# finishes sidebar td
#
function FINISHSIDEBAR()
{
Chad Barb's avatar
   
Chad Barb committed
756
    echo "<!-- sidebar ends -->
Chad Barb's avatar
   
Chad Barb committed
757
        </td>
Chad Barb's avatar
   
Chad Barb committed
758
        <td valign='top' width='100%' class='rightcell'>
759
          <!-- content body table -->
Chad Barb's avatar
   
Chad Barb committed
760
          <table class='content' width='100%' cellpadding='0' cellspacing='0'>
Chad Barb's avatar
   
Chad Barb committed
761
            <tr>
Chad Barb's avatar
   
Chad Barb committed
762
              <td class='contentheader'>";
Chad Barb's avatar
   
Chad Barb committed
763
764
}

765
766
767
#
# Spit out a vanilla page header.
#
768
function PAGEHEADER($title, $view = NULL) {
769
    global $login_status, $login_uid, $TBBASE, $TBDOCBASE, $THISHOMEBASE;
770
    global $BASEPATH, $SSL_PROTOCOL, $drewheader, $autorefresh;
771
    global $TBMAINSITE;
772
773

    $drewheader = 1;
774
775
776
    if (isset($_GET['refreshrate']) && is_numeric($_GET['refreshrate'])) {
	$autorefresh = $_GET['refreshrate'];
    }
777
778
779
780
781
782
783
784
785
786
787
788
789
790
791
792

    #
    # Determine the proper basepath, which depends on whether the page
    # was loaded as http or https. This lets us be consistent in the URLs
    # we spit back, so that users do not get those pesky warnings. These
    # warnings are generated when a page *loads* (say, images, style files),
    # a mix of http and https. Links can be mixed, and in fact when there
    # is no login active, we want to spit back http for the documentation,
    # but https for the start/join pages.
    #
    if (isset($SSL_PROTOCOL)) {
	$BASEPATH = $TBBASE;
    }
    else {
	$BASEPATH = $TBDOCBASE;
    }
793

794
    #
795
    # Figure out who is logged in, if anyone.
796
    # 
797
798
799
800
    if (($known_uid = GETUID()) != FALSE) {
        #
        # Check to make sure the UID is logged in (not timed out).
        #
801
802
803
        $login_status = CHECKLOGIN($known_uid);
	if ($login_status & (CHECKLOGIN_LOGGEDIN|CHECKLOGIN_MAYBEVALID)) {
	    $login_uid = $known_uid;
804
805
806
	}
    }

807
808
809
810
811
812
813
    #
    # If no view options were specified, get the ones for the current user
    #
    if (!$view) {
	$view = GETUSERVIEW();
    }

814
    #
815
816
    # Check for NOLOGINS. 
    # We want to allow admin types to continue using the web interface,
817
818
    # and logout anyone else that is currently logged in!
    #
819
820
821
822
    if (NOLOGINS() && $login_uid && !ISADMIN($login_uid)) {
	DOLOGOUT($login_uid);
	$login_status = CHECKLOGIN_NOTLOGGEDIN;
	$login_uid    = 0;
823
    }
824
    
825
826
    header("Last-Modified: " . gmdate("D, d M Y H:i:s") . " GMT");
    
827
    if (1) {
828
829
830
831
832
833
834
	header("Expires: Mon, 26 Jul 1997 05:00:00 GMT");
	header("Cache-Control: no-cache, must-revalidate");
	header("Pragma: no-cache");
    }
    else {
	header("Expires: " . gmdate("D, d M Y H:i:s", time() + 300) . " GMT"); 
    }
Chad Barb's avatar
   
Chad Barb committed
835

836
837
838
839
840
841
842
843
844
    if (isset($view['hide_banner'])) {
	$nobanner = 1;
    } else {
	$nobanner = 0;
    }
    PAGEBEGINNING( $title, $nobanner );
    if (!isset($view['hide_sidebar'])) {
	WRITESIDEBAR();
    }
845
846
847
    elseif (isset($view['menu'])) {
	WRITESIMPLESIDEBAR($view['menu']);
    }
Chad Barb's avatar
   
Chad Barb committed
848
    FINISHSIDEBAR();
849
    echo "<h2 class=\"nomargin\">\n";
Chad Barb's avatar
   
Chad Barb committed
850

851
    if ($login_uid && ISADMINISTRATOR()) {
Chad Barb's avatar
   
Chad Barb committed
852
	if (ISADMIN($login_uid)) {
853
	    echo "<a href=$TBBASE/toggle.php?target_uid=$login_uid&type=adminoff&value=1>
Chad Barb's avatar
   
Chad Barb committed
854
855
856
857
	             <img src='/redball.gif'
                          border=0 alt='Admin On'></a>\n";
	}
	else {
858
	    echo "<a href=$TBBASE/toggle.php?target_uid=$login_uid&type=adminoff&value=0>
Chad Barb's avatar
   
Chad Barb committed
859
860
861
	             <img src='/greenball.gif'
                          border=0 alt='Admin Off'></a>\n";
	}
862
    }
863
864
865
866
    $major = "";
    $minor = "";
    $build = "";
    TBGetVersionInfo($major, $minor, $build);
867
868
869
870
    if ($view['hide_versioninfo'] == 1)
	$versioninfo = "";
    else
	$versioninfo = "Vers: $major.$minor Build: $build";
871
    
872
873
    $now = date("D M d g:ia T");
    echo "$title</h2></td>\n";
874
    echo "<td class=contentheader align=right>\n";
875
876
    echo "<table border='0' cellpadding='0' cellspacing='0'>";
    echo "  <tr>";
877
    echo "  <td class=contentheader><font size=-2>$versioninfo</font></td>";
878
879
    echo "  <td class=contentheader>&nbsp&nbsp</td>";
    echo "  <td class=contentheader align=right>";
Robert Ricci's avatar
Robert Ricci committed
880
881
    if ($login_uid) {
	echo "<font size=-1>'<b>$login_uid</b>' Logged in.<br>$now</font>\n";
882
883
    }
    else {
Robert Ricci's avatar
Robert Ricci committed
884
	echo "$now";
Chad Barb's avatar
   
Chad Barb committed
885
886
    }
    echo "</td>";
887
888
889
    echo "</tr>";
    echo "</table>";
    echo "</td>";
Chad Barb's avatar
   
Chad Barb committed
890
891
    echo "</tr>\n";
    echo "<tr><td colspan=3 class=\"contentbody\" width=*>";
Chad Barb's avatar
   
Chad Barb committed
892
    echo "<!-- begin content -->\n";
893
894
895
    if ($view['show_topbar'] == "plab") {
	WRITEPLABTOPBAR();
    }
896
897
898
899
900
901
}

#
# ENDPAGE(): This terminates the table started above.
# 
function ENDPAGE() {
Chad Barb's avatar
   
Chad Barb committed
902
903
  echo "</td></tr></table>";
  echo "</td></tr></table>";
904
905
906
907
908
}

#
# Spit out a vanilla page footer.
#
909
function PAGEFOOTER($view = NULL) {
910
    global $TBDOCBASE, $TBMAILADDR, $THISHOMEBASE;
Leigh B. Stoller's avatar
Leigh B. Stoller committed
911
    global $TBMAINSITE, $SSL_PROTOCOL;
912

913
914
915
916
    if (!$view) {
	$view = GETUSERVIEW();
    }

917
918
    $today = getdate();
    $year  = $today["year"];
Chad Barb's avatar
   
Chad Barb committed
919

920
921
922
923
924
925
    echo "<!-- end content -->\n";
    if ($view['show_bottombar'] == "plab") {
	WRITEPLABBOTTOMBAR();
    }

    echo "
Chad Barb's avatar
   
Chad Barb committed
926
              </td>
927
928
            </tr>
            <tr>
929
930
931
              <td colspan=2 class=contentbody>\n";
    if (!$view['hide_copyright']) {
	echo "
932
933
	        <center>
                <font size=-1>
934
		[ <a href=http://www.cs.utah.edu/flux/>
935
                    Flux&nbsp;Research&nbsp;Group</a> ]
936
937
938
		[ <a href=http://www.cs.utah.edu/>
                    School&nbsp;of&nbsp;Computing</a> ]
		[ <a href=http://www.utah.edu/>
939
                    University&nbsp;of&nbsp;Utah</a> ]
940
941
		</font>
		<br>
Chad Barb's avatar
   
Chad Barb committed
942
                <!-- begin copyright -->
943
                <font size=-2>
944
945
946
947
                <a href='$TBDOCBASE/docwrapper.php3?docname=copyright.html'>
                    Copyright &copy; 2000-$year The University of Utah</a>
                </font>
                <br>
948
949
950
		</center>\n";
    }
    echo "
951
                <p align=right>
Chad Barb's avatar
   
Chad Barb committed
952
953
		  <font size=-2>
                    Problems?
954
	            Contact $TBMAILADDR.
Chad Barb's avatar
   
Chad Barb committed
955
956
                  </font>
                </p>
957
                <!-- end copyright -->\n";
Chad Barb's avatar
   
Chad Barb committed
958
959

    ENDPAGE();
960

Leigh B. Stoller's avatar
Leigh B. Stoller committed
961
962
963
    # Plug the home site from all others.
    echo "\n<p><a href=\"www.emulab.net/netemu.php3\"></a>\n";

Chad Barb's avatar
   
Chad Barb committed
964
    echo "</body></html>\n";
965
}
966
967
968
969
970

function PAGEERROR($msg) {
    global $drewheader;

    if (! $drewheader)
971
	PAGEHEADER("Page Error");
972
973
974
975
976
977

    echo "$msg\n";

    PAGEFOOTER();
    die("");
}
978
979
980
981

#
# Sub Page/Menu Stuff
#
982
function WRITESUBMENUBUTTON($text, $link, $target = "") {
Chad Barb's avatar
   
Chad Barb committed
983

984
985
986
987
988
989
    #
    # Optional 'target' agument, so that we can pop up new windows
    #
    if ($target) {
	$targettext = "target='$target'";
    }
Chad Barb's avatar
   
Chad Barb committed
990

991
992
993
994
    echo "<!-- Table row for button $text -->
          <tr>
            <td valign=center align=left nowrap>
                <b>
995
         	 <a class=sidebarbutton href='$link' $targettext>$text</a>\n";
996
997
998
999
1000
1001
1002
1003
1004
1005

    echo "      </b>
            </td>
          </tr>\n";
}

#
# Start/End a page within a page. 
#
function SUBPAGESTART() {
Chad Barb's avatar
   
Chad Barb committed
1006
    echo "<!-- begin subpage -->";
Chad Barb's avatar
   
Chad Barb committed
1007
    echo "<table class=\"stealth\"
1008
	  cellspacing='0' cellpadding='0' width='100%' border='0'>\n
1009
            <tr>\n
Chad Barb's avatar
   
Chad Barb committed
1010
              <td class=\"stealth\"valign=top>\n";
1011
1012
1013
1014
1015
1016
}

function SUBPAGEEND() {
    echo "    </td>\n
            </tr>\n
          </table>\n";
Chad Barb's avatar
   
Chad Barb committed
1017
    echo "<!-- end subpage -->";
1018
1019
1020
1021
1022
1023
1024
}

#
# Start/End a sub menu, located in the upper left of the main frame.
# Note that these cannot be used outside of the SUBPAGE macros above.
#
function SUBMENUSTART($title) {
Chad Barb's avatar
   
Chad Barb committed
1025
1026
?>
    <!-- begin submenu -->
1027
    <table class='menu' cellpadding="0" cellspacing="0"
Chad Barb's avatar
   
Chad Barb committed
1028
	style="margin-right: 6px;" >
Chad Barb's avatar
   
Chad Barb committed
1029
1030
1031
1032
      <tr>
        <td class="menuheader"><b><?php echo "$title";?></b></td>
      </tr>
<?php
1033
1034
1035
}

function SUBMENUEND() {
Chad Barb's avatar
   
Chad Barb committed
1036
1037
1038
1039
?>
    </table>
    <!-- end submenu -->
  </td>
1040
  <td class="stealth" valign=top align=left width='100%'>
Chad Barb's avatar
   
Chad Barb committed
1041
<?php
1042
1043
}

1044
1045
1046
1047
1048
1049
1050
1051
1052
1053
1054
1055
1056
1057
1058
1059
1060
1061
# Start a new section in an existing submenu
# This includes ending the one before it
function SUBMENUSECTION($title) {
    SUBMENUSECTIONEND();
?>
      <!-- new submenu section -->
      <tr>
        <td class="menuheader"><b><?php echo "$title";?></b></td>
      </tr>
<?php
}

# End a submenu section - only need this on the last one of the table.
function SUBMENUSECTIONEND() {
?>
      <tr height=5><td></td></tr>
<?php
}
Chad Barb's avatar
   
Chad Barb committed
1062
1063
1064
1065
1066
1067
1068
1069
1070
1071
1072
1073
1074
1075
1076
1077
1078

# These are here so you can wedge something else under the menu in the left column.

function SUBMENUEND_2A() {
?>
    </table>
    <!-- end submenu -->
<?php
}

function SUBMENUEND_2B() {
?>
  </td>
  <td class="stealth" valign=top align=left width='85%'>
<?php
}

1079
1080
1081
1082
1083
1084
1085
1086
1087
1088
1089
1090
1091
1092
#
# Get a view, for use with PAGEHEADER and PAGEFOOTER, for the current user
#
function GETUSERVIEW() {
    if (GETUID() && ISPLABUSER()) {
	return array('hide_sidebar' => 1, 'hide_banner' => 1,
	    'show_topbar' => "plab", 'show_bottombar' => 'plab',
	    'hide_copyright' => 1);
    } else {
	# Most users get the default view
	return array();
    }
}

1093
?>