menu.php3 20.5 KB
Newer Older
1
<?php
Leigh B. Stoller's avatar
Leigh B. Stoller committed
2 3
#
# EMULAB-COPYRIGHT
4
# Copyright (c) 2000-2003 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

12 13 14 15 16 17
#
# 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	  = "";

18 19 20 21 22
#
# 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
23
function WRITESIDEBARBUTTON($text, $base, $link ) {
24
    $link = "$base/$link";
Chad Barb's avatar
 
Chad Barb committed
25
    echo "<tr><td class=\"menuopt\"><a href=\"$link\">$text</a></td></tr>\n";
Chad Barb's avatar
 
Chad Barb committed
26
}
27

Chad Barb's avatar
 
Chad Barb committed
28 29 30
# same as above with "new" gif next to it.
function WRITESIDEBARBUTTON_NEW($text, $base, $link ) {
    $link = "$base/$link";
Chad Barb's avatar
 
Chad Barb committed
31 32
    echo "<tr><td class=\"menuopt\"><a href=\"$link\">$text</a>&nbsp;";
    echo "<img src=\"/new.gif\" /></td></tr>\n";
Chad Barb's avatar
 
Chad Barb committed
33 34
}

Chad Barb's avatar
 
Chad Barb committed
35 36 37 38 39 40 41
# same as above with "cool" gif next to it.
function WRITESIDEBARBUTTON_COOL($text, $base, $link ) {
    $link = "$base/$link";
    echo "<tr><td class=\"menuopt\"><a href=\"$link\">$text</a>&nbsp;";
    echo "<img src=\"/cool.gif\" /></td></tr>\n";
}

Leigh B. Stoller's avatar
Leigh B. Stoller committed
42 43
function WRITESIDEBARBUTTON_ABS($text, $base, $link ) {
    $link = "$link";
Chad Barb's avatar
 
Chad Barb committed
44
    echo "<tr><td class=\"menuopt\"><a href=\"$link\">$text</a></td></tr>\n";
Leigh B. Stoller's avatar
Leigh B. Stoller committed
45 46
}

Chad Barb's avatar
 
Chad Barb committed
47 48 49 50 51 52
function WRITESIDEBARBUTTON_ABSCOOL($text, $base, $link ) {
    $link = "$link";
    echo "<tr><td class=\"menuopt\"><a href=\"$link\">$text</a>&nbsp;";
    echo "<img src=\"/cool.gif\" /></td></tr>\n";
}

Chad Barb's avatar
 
Chad Barb committed
53 54 55 56 57
# 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";
Chad Barb's avatar
 
Chad Barb committed
58
    echo "<tr><td class=\"menuoptb\"><a href=\"$link\">$text</a></td></tr>\n";
Chad Barb's avatar
 
Chad Barb committed
59 60
}

Chad Barb's avatar
Chad Barb committed
61 62 63 64 65 66
function WRITESIDEBARLASTBUTTON_COOL($text, $base, $link) {
    $link = "$base/$link";
    echo "<tr><td class=\"menuoptb\"><a href=\"$link\">$text</a>&nbsp;";
    echo "<img src=\"/cool.gif\" /></td></tr>\n";
}

Chad Barb's avatar
 
Chad Barb committed
67 68
# writes a message to the sidebar, without clickability.
function WRITESIDEBARNOTICE($text) {
Chad Barb's avatar
 
Chad Barb committed
69
    echo "<tr><td class=\"menuopt\"><b>$text</b></td></tr>\n";
70 71 72 73 74 75 76
}

#
# WRITESIDEBAR(): Write the menu. The actual menu options the user
# sees depends on the login status and the DB status.
#
function WRITESIDEBAR() {
77 78
    global $login_status, $login_uid;
    global $TBBASE, $TBDOCBASE, $BASEPATH;
79
    global $THISHOMEBASE;
80 81 82

    #
    # The document base cannot be a mix of secure and nonsecure.
83
    #
Chad Barb's avatar
 
Chad Barb committed
84 85 86
    
    # create the main menu table, which also happens to reside in a form
    # (for search.)
Chad Barb's avatar
 
Chad Barb committed
87 88 89 90 91 92 93 94 95 96 97 98 99 100 101 102 103 104 105 106 107 108 109 110 111 112 113 114 115 116

    #
    # 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 ".
		     "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;
	}
    }

Chad Barb's avatar
 
Chad Barb committed
117 118 119 120 121
?>
<FORM method=get ACTION="/cgi-bin/webglimpse/usr/testbed/webglimpse">
  <table class="menu" width=220 cellpadding="0" cellspacing="0">
    <tr><td class="menuheader"><b>Information</b></td></tr>
<?php
Chad Barb's avatar
 
Chad Barb committed
122 123 124 125 126 127
    if (0 == strcasecmp($THISHOMEBASE, "emulab.net")) {
	$rootEmulab = 1;
    } else {
	$rootEmulab = 0;
    }

128
    WRITESIDEBARBUTTON("Home", $TBDOCBASE, "index.php3");
129

Chad Barb's avatar
 
Chad Barb committed
130 131

    if ($rootEmulab) {
132
	WRITESIDEBARBUTTON("Other Emulabs", $TBDOCBASE,
Chad Barb's avatar
 
Chad Barb committed
133 134 135 136 137 138 139 140 141 142 143
			       "docwrapper.php3?docname=otheremulabs.html");
	WRITESIDEBARBUTTON_COOL("Join Netbed (CD)",
				$TBDOCBASE, "cdrom.php");
    } else {
	WRITESIDEBARBUTTON_ABS("Utah Emulab", $TBDOCBASE,
			       "http://www.emulab.net/");
	# Link ALWAYS TO UTAH
	WRITESIDEBARBUTTON_ABSCOOL("Join Netbed (CD)",
			       $TBDOCBASE, "http://www.emulab.net/cdrom.php");

    }
Chad Barb's avatar
 
Chad Barb committed
144

Chad Barb's avatar
 
Chad Barb committed
145 146 147 148 149 150
    if ($newNews) {
	WRITESIDEBARBUTTON_NEW("News $newsDate", $newsBase, "news.php3");
    } else {
	WRITESIDEBARBUTTON("News $newsDate", $newsBase, "news.php3");
    }

151
    WRITESIDEBARBUTTON("Documentation", $TBDOCBASE, "doc.php3");
Chad Barb's avatar
 
Chad Barb committed
152 153

    if ($rootEmulab) {
154
	WRITESIDEBARBUTTON("Papers (May 1)", $TBDOCBASE, "pubs.php3");
155 156 157
	WRITESIDEBARBUTTON_NEW("Software <font size=-1> ".
			       "(June 14)</font>",
			       $TBDOCBASE, "software.php3");
Chad Barb's avatar
 
Chad Barb committed
158 159
	WRITESIDEBARBUTTON("People", $TBDOCBASE, "people.php3");
	WRITESIDEBARBUTTON("Photo Gallery", $TBDOCBASE, "gallery/gallery.php3");
Chad Barb's avatar
 
Chad Barb committed
160 161
	WRITESIDEBARBUTTON_NEW("Emulab Users", $TBDOCBASE,
			   "doc/docwrapper.php3?docname=users.html");
Chad Barb's avatar
 
Chad Barb committed
162 163 164 165 166 167
	WRITESIDEBARLASTBUTTON("Sponsors", $TBDOCBASE,
			       "docwrapper.php3?docname=sponsors.html");
    } else {
	WRITESIDEBARLASTBUTTON("Projects on Emulab", $TBDOCBASE,
			       "projectlist.php3");
    }
168

Chad Barb's avatar
 
Chad Barb committed
169 170 171 172 173 174
    # create the search bit, then the second table for the Web Interface.
?>
    <tr><td class="menuoptst"><b>Search Documentation:</b></td></tr>
    <tr><td class="menuopts"><input name=query />
      <input type=submit style="font-size:10px;" value="Go" /></td></tr>
      <tr><td class="menuoptsb" style="font-size:12px;" >[
Chad Barb's avatar
 
Chad Barb committed
175 176
      <a href="<?php echo "$TBDOCBASE/search.php3"; ?>">Advanced 
      Search</a> ]</td></tr>
Chad Barb's avatar
 
Chad Barb committed
177 178 179 180 181
    </td></tr>  
  </table>
</form>
<table class="menu" width=220 cellpadding="0" cellspacing="0">
    <tr><td class="menuheader"><b>Interaction</b></td></tr>
Chad Barb's avatar
 
Chad Barb committed
182
<?php # BACK TO PHP
183

184
    if ($login_status & CHECKLOGIN_LOGGEDIN) {
Chad Barb's avatar
 
Chad Barb committed
185 186
         $freepcs = TBFreePCs();
	 WRITESIDEBARNOTICE( "($freepcs Free PCs.)" );
187
    }
188

189 190 191 192 193 194 195 196
    #
    # 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>",
197 198
			   $TBDOCBASE, "nologins.php3");

Chad Barb's avatar
 
Chad Barb committed
199 200 201
        if (!$login_uid || !ISADMIN($login_uid)) {	
	    WRITESIDEBARNOTICE("Please Try Again Later");
        }
202
    }
Chad Barb's avatar
 
Chad Barb committed
203

204 205 206
    if ($login_status & (CHECKLOGIN_LOGGEDIN|CHECKLOGIN_MAYBEVALID)) {
	if ($login_status & CHECKLOGIN_ACTIVE) {
	    if ($login_status & CHECKLOGIN_PSWDEXPIRED) {
207
		WRITESIDEBARBUTTON("Change Your Password",
208
				   $TBBASE, "moduserinfo.php3");
209
	    }
210 211 212 213 214 215 216 217
	    elseif ($login_status & CHECKLOGIN_WEBONLY) {
		WRITESIDEBARBUTTON("My Emulab",
				   $TBBASE,
				   "showuser.php3?target_uid=$login_uid");
	    
		WRITESIDEBARBUTTON("Update User Information",
				   $TBBASE, "moduserinfo.php3");
	    }
218
	    else {
Leigh B. Stoller's avatar
Leigh B. Stoller committed
219
		WRITESIDEBARBUTTON("My Emulab",
220 221
				   $TBBASE,
				   "showuser.php3?target_uid=$login_uid");
222
	    
223
		if (ISADMIN($login_uid)) {
224 225
		    WRITESIDEBARBUTTON("New Project Approval",
				       $TBBASE, "approveproject_list.php3");
226 227 228

		    WRITESIDEBARBUTTON("Widearea User Approval",
				       $TBBASE, "approvewauser_form.php3");
229 230
		}
		if ($login_status & CHECKLOGIN_TRUSTED) {
231 232 233
                  # Only project/group leaders can do these options
                  # Show a "new" icon if there are people waiting for approval
		  $query_result =
234 235 236
		    DBQueryFatal("select g.* from group_membership as authed ".
				 "left join group_membership as g on ".
				 " g.pid=authed.pid and g.gid=authed.gid ".
237
				 "left join users as u on u.uid=g.uid ".
238
				 "where u.status!='".
239
				 TBDB_USERSTATUS_UNVERIFIED . "' and ".
240 241 242 243 244 245
				 " 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') ".
246 247 248 249 250
				 "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 {
251 252

		      WRITESIDEBARBUTTON("New User Approval",
253
				       $TBBASE, "approveuser_form.php3");
254
		  }
255
		}
256

257 258
                #
                # Since a user can be a member of more than one project,
259 260
                # display this option, and let the form decide if the 
                # user is allowed to do this.
261
                #
Leigh B. Stoller's avatar
Leigh B. Stoller committed
262
		WRITESIDEBARBUTTON("Project List",
263
				   $TBBASE, "showproject_list.php3");
264
	    
265
		if (ISADMIN($login_uid)) {
266 267 268 269
		    WRITESIDEBARBUTTON("User List",
				       $TBBASE, "showuser_list.php3");
		}
	    
Leigh B. Stoller's avatar
Leigh B. Stoller committed
270 271
		WRITESIDEBARBUTTON("Experiment List",
				   $TBBASE, "showexp_list.php3");
272 273
		WRITESIDEBARBUTTON("Begin an Experiment",
				   $TBBASE, "beginexp.php3");
274 275
		WRITESIDEBARBUTTON("ImageIDs and OSIDs",
				   $TBBASE, "showimageid_list.php3");
276
		WRITESIDEBARBUTTON("Update User Information",
277 278
				   $TBBASE, "moduserinfo.php3");
		WRITESIDEBARBUTTON("Node Reservation Status",
279
				   $TBBASE, "nodecontrol_list.php3");
280 281
		WRITESIDEBARBUTTON("Node Up/Down Status",
				   $TBDOCBASE, "updown.php3");
282 283 284
		WRITESIDEBARBUTTON("View Testbed Stats",
				   $TBBASE, "showstats.php3");
		
Chad Barb's avatar
 
Chad Barb committed
285 286 287 288
		if (ISADMIN($login_uid)) {
		    WRITESIDEBARBUTTON("Edit Site Variables",
				       $TBBASE, "editsitevars.php3");
		}
289 290 291 292 293
		
		if ($login_status & CHECKLOGIN_CVSWEB) {
		    WRITESIDEBARBUTTON("CVS Repository",
				       $TBBASE, "cvsweb/cvsweb.php3");
		}
294
	    }
295
	}
296
	elseif ($login_status & (CHECKLOGIN_UNVERIFIED|CHECKLOGIN_NEWUSER)) {
297 298
	    WRITESIDEBARBUTTON("New User Verification",
			       $TBBASE, "verifyusr_form.php3");
299
	    WRITESIDEBARBUTTON("Update User Information",
300
			       $TBBASE, "moduserinfo.php3");
301
	}
302
	elseif ($login_status & (CHECKLOGIN_UNAPPROVED)) {
303
	    WRITESIDEBARBUTTON("Update User Information",
304
			       $TBBASE, "moduserinfo.php3");
305
	}
306 307 308
	#
	# Standard options for logged in users!
	# 
309
	WRITESIDEBARBUTTON("Start Project", $TBBASE, "newproject.php3");
Chad Barb's avatar
 
Chad Barb committed
310
	WRITESIDEBARLASTBUTTON("Join Project",  $TBBASE, "joinproject.php3");
311
    }
312

Chad Barb's avatar
Chad Barb committed
313
    WRITESIDEBARLASTBUTTON_COOL("Take our Survey",
314 315
	    $TBDOCBASE, "survey.php3");

316 317 318 319 320
    #
    # Cons up a nice message.
    # 
    switch ($login_status & CHECKLOGIN_STATUSMASK) {
    case CHECKLOGIN_LOGGEDIN:
Chad Barb's avatar
Chad Barb committed
321
	$login_message = "'$login_uid' Logged in.";
322 323
	    
	if ($login_status & CHECKLOGIN_PSWDEXPIRED)
Chad Barb's avatar
Chad Barb committed
324
	    $login_message = "$login_message<br>(Password Expired!)";
325
	elseif ($login_status & CHECKLOGIN_UNAPPROVED)
Chad Barb's avatar
Chad Barb committed
326
	    $login_message = "$login_message<br>(Unapproved!)";
327
	break;
328
    case CHECKLOGIN_TIMEDOUT:
Chad Barb's avatar
Chad Barb committed
329
	$login_message = "Login Timed out.";
330
	break;
331 332
    default:
	$login_message = 0;
333
	break;
334 335
    }

Chad Barb's avatar
 
Chad Barb committed
336
    if ($login_message) {
Chad Barb's avatar
 
Chad Barb committed
337
      echo "<tr>";
Chad Barb's avatar
Chad Barb committed
338
      echo "<td class=\"menufooter\" style='padding-top: 6px;' ><center><b>";
Chad Barb's avatar
 
Chad Barb committed
339 340
      echo "$login_message</b></center></td>";
      echo "</tr>";
Chad Barb's avatar
 
Chad Barb committed
341 342
    }

343 344
    #
    # Now the login/logout box. Remember, already inside a table.
345 346
    # 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
347
    # http or https, since we do not want to mix them, since they
348
    # cause warnings.
349
    # 
350
    if ($login_status & (CHECKLOGIN_LOGGEDIN|CHECKLOGIN_MAYBEVALID)) {
Chad Barb's avatar
 
Chad Barb committed
351 352 353 354 355 356
      echo "<tr>";
      echo "<td class=\"menufooter\" align=center valign=center>";
      echo "<a href=\"$TBBASE/logout.php3?uid=$login_uid\">";
      echo "<img alt=\"logoff\" border=0 ";
      echo "src=\"$BASEPATH/logoff.gif\"></a>\n";
      echo "</td></tr>\n";
357
    }
358
    elseif (!NOLOGINS()) {
Chad Barb's avatar
 
Chad Barb committed
359 360
      echo "<tr>";
      echo "<td class=\"menufooter\" align=center valign=center>";
Chad Barb's avatar
Chad Barb committed
361 362 363 364 365 366 367

      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 />";

Chad Barb's avatar
 
Chad Barb committed
368 369 370
      echo "<a href=\"$TBBASE/login.php3\">";
      echo "<img alt=\"logon\" border=0 ";
      echo "src=\"$BASEPATH/logon.gif\"></a>\n";
Chad Barb's avatar
Chad Barb committed
371

Chad Barb's avatar
 
Chad Barb committed
372
      echo "</td></tr>\n";
373
    }
374

375
    #
Chad Barb's avatar
 
Chad Barb committed
376
    # Login message. Set via 'web/message' site variable
377
    #
Chad Barb's avatar
 
Chad Barb committed
378 379 380
    $message = TBGetSiteVar("web/message");
    if (0 != strcmp($message,"")) {
	WRITESIDEBARNOTICE($message);    	
381
    }
Chad Barb's avatar
 
Chad Barb committed
382

Chad Barb's avatar
 
Chad Barb committed
383
    echo "</table>\n";
384 385
}

Chad Barb's avatar
 
Chad Barb committed
386 387 388 389
#
# spits out beginning part of page
#
function PAGEBEGINNING( $title ) {
Chad Barb's avatar
Chad Barb committed
390 391
    global $BASEPATH, $TBMAINSITE, $THISHOMEBASE;
    global $TBDIR, $WWW;
Chad Barb's avatar
 
Chad Barb committed
392 393
    global $MAINPAGE;

Chad Barb's avatar
Chad Barb committed
394
    $MAINPAGE = !strcmp($TBDIR, "/usr/testbed/"); 
Chad Barb's avatar
 
Chad Barb committed
395 396 397 398 399 400
  
    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>
401 402
            <!--<link rel=\"SHORTCUT ICON\" HREF=\"netbed.ico\">-->
            <link rel=\"SHORTCUT ICON\" HREF=\"netbed.png\" TYPE=\"image/png\">
Chad Barb's avatar
 
Chad Barb committed
403 404 405 406 407 408 409 410 411 412 413 414 415 416 417 418 419 420 421 422 423 424 425 426 427 428 429 430 431 432 433 434 435 436 437 438 439
    	    <!-- dumbed-down style sheet for any browser that groks (eg NS47). -->
	    <link REL='stylesheet' HREF='$BASEPATH/common-style.css' TYPE='text/css' />
    	    <!-- don't import full style sheet into NS47, since it does a bad job
            of handling it. NS47 doesn't understand '@import'. -->
    	    <style type='text/css' media='all'>
            <!-- @import '$BASEPATH/style.css'; -->";

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

    echo "</style>";

    if ($TBMAINSITE) {
	echo "<meta NAME='keywords' CONTENT='network, emulation, internet, emulator'>";
	echo "<meta NAME='ROBOTS' CONTENT='NOARCHIVE'>";
    }

    echo "</head>
            <body bgcolor='#FFFFFF' 
             topmargin='0' leftmargin='0' marginheight='0' marginwidth='0'>
            <table cellpadding='0' cellspacing='0' width='100%'>
            <tr>
              <td valign='top' class='bannercell' 
              background='$BASEPATH/headerbgbb.jpg'
              bgcolor=#3D627F ><img width=369 height=100 
              src='$BASEPATH/overlay.".strtolower($THISHOMEBASE).".gif' 
              alt='$THISHOMEBASE - the network testbed' />";
    if (!$MAINPAGE) {
	echo "<font size='+1' color='#CCFFCC'>&nbsp;<b>$WWW</b></font>";
    }
    echo "</td></tr></table>\n";

    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
440 441 442 443 444 445 446
}

#
# finishes sidebar td
#
function FINISHSIDEBAR()
{
Chad Barb's avatar
 
Chad Barb committed
447
    echo "<!-- sidebar ends -->
Chad Barb's avatar
 
Chad Barb committed
448
        </td>
Chad Barb's avatar
 
Chad Barb committed
449
        <td valign='top' width='100%' class='rightcell'>
450
          <!-- content body table -->
Chad Barb's avatar
 
Chad Barb committed
451
          <table class='content' width='100%' cellpadding='0' cellspacing='0'>
Chad Barb's avatar
 
Chad Barb committed
452
            <tr>
Chad Barb's avatar
 
Chad Barb committed
453
              <td class='contentheader'>";
Chad Barb's avatar
 
Chad Barb committed
454 455
}

456 457 458 459
#
# Spit out a vanilla page header.
#
function PAGEHEADER($title) {
460 461
    global $login_status, $login_uid, $TBBASE, $TBDOCBASE, $THISHOMEBASE;
    global $BASEPATH, $SSL_PROTOCOL, $drewheader;
462
    global $TBMAINSITE;
463 464

    $drewheader = 1;
465 466 467 468 469 470 471 472 473 474 475 476 477 478 479 480

    #
    # 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;
    }
481

482
    #
483
    # Figure out who is logged in, if anyone.
484
    # 
485 486 487 488
    if (($known_uid = GETUID()) != FALSE) {
        #
        # Check to make sure the UID is logged in (not timed out).
        #
489 490 491
        $login_status = CHECKLOGIN($known_uid);
	if ($login_status & (CHECKLOGIN_LOGGEDIN|CHECKLOGIN_MAYBEVALID)) {
	    $login_uid = $known_uid;
492 493 494
	}
    }

495
    #
496 497
    # Check for NOLOGINS. 
    # We want to allow admin types to continue using the web interface,
498 499
    # and logout anyone else that is currently logged in!
    #
500 501 502 503
    if (NOLOGINS() && $login_uid && !ISADMIN($login_uid)) {
	DOLOGOUT($login_uid);
	$login_status = CHECKLOGIN_NOTLOGGEDIN;
	$login_uid    = 0;
504
    }
505
    
506 507
    header("Last-Modified: " . gmdate("D, d M Y H:i:s") . " GMT");
    
508
    if (1) {
509 510 511 512 513 514 515
	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
516 517 518 519

    PAGEBEGINNING( $title );
    WRITESIDEBAR();
    FINISHSIDEBAR();
520
    echo "<h2 class=\"nomargin\">\n";
Chad Barb's avatar
 
Chad Barb committed
521

522
    if ($login_uid && ISADMINISTRATOR()) {
Chad Barb's avatar
 
Chad Barb committed
523
	if (ISADMIN($login_uid)) {
524
	    echo "<a href=toggle.php?target_uid=$login_uid&type=adminoff&value=1>
Chad Barb's avatar
 
Chad Barb committed
525 526 527 528
	             <img src='/redball.gif'
                          border=0 alt='Admin On'></a>\n";
	}
	else {
529
	    echo "<a href=toggle.php?target_uid=$login_uid&type=adminoff&value=0>
Chad Barb's avatar
 
Chad Barb committed
530 531 532
	             <img src='/greenball.gif'
                          border=0 alt='Admin Off'></a>\n";
	}
533
    }
534 535
    $now = date("D M d g:ia T");
    echo "$title</h2></td>\n";
536
    echo "<td class=contentheader align=right>\n";
Chad Barb's avatar
 
Chad Barb committed
537
    if ($login_uid) {
Chad Barb's avatar
Chad Barb committed
538
	echo "<font size=-1>'<b>$login_uid</b>' Logged in.<br>$now</font>\n";
539 540 541
    }
    else {
	echo "$now";
Chad Barb's avatar
 
Chad Barb committed
542 543 544 545
    }
    echo "</td>";
    echo "</tr>\n";
    echo "<tr><td colspan=3 class=\"contentbody\" width=*>";
Chad Barb's avatar
 
Chad Barb committed
546
    echo "<!-- begin content -->\n";
547 548 549 550 551 552
}

#
# ENDPAGE(): This terminates the table started above.
# 
function ENDPAGE() {
Chad Barb's avatar
 
Chad Barb committed
553 554
  echo "</td></tr></table>";
  echo "</td></tr></table>";
555 556 557 558 559 560
}

#
# Spit out a vanilla page footer.
#
function PAGEFOOTER() {
561
    global $TBDOCBASE, $TBMAILADDR, $THISHOMEBASE;
Leigh B. Stoller's avatar
Leigh B. Stoller committed
562
    global $TBMAINSITE, $SSL_PROTOCOL;
563

564 565
    $today = getdate();
    $year  = $today["year"];
Chad Barb's avatar
 
Chad Barb committed
566

567
    echo "<!-- end content -->
Chad Barb's avatar
 
Chad Barb committed
568
              </td>
569 570 571 572 573
            </tr>
            <tr>
              <td colspan=2 class=contentbody>
	        <center>
                <font size=-1>
574 575 576 577 578 579
		[ <a href=http://www.cs.utah.edu/flux/>
                    The&nbsp;Flux&nbsp;Research&nbsp;Group</a> ]
		[ <a href=http://www.cs.utah.edu/>
                    School&nbsp;of&nbsp;Computing</a> ]
		[ <a href=http://www.utah.edu/>
                    The&nbsp;University&nbsp;of&nbsp;Utah</a> ]
580 581
		</font>
		<br>
Chad Barb's avatar
 
Chad Barb committed
582
                <!-- begin copyright -->
583
                <font size=-2>
584 585 586 587
                <a href='$TBDOCBASE/docwrapper.php3?docname=copyright.html'>
                    Copyright &copy; 2000-$year The University of Utah</a>
                </font>
                <br>
588 589
		</center>
                <p align=right>
Chad Barb's avatar
 
Chad Barb committed
590 591
		  <font size=-2>
                    Problems?
592
	            Contact $TBMAILADDR.
Chad Barb's avatar
 
Chad Barb committed
593 594
                  </font>
                </p>
595
                <!-- end copyright -->\n";
Chad Barb's avatar
 
Chad Barb committed
596 597

    ENDPAGE();
598 599 600

    if ($TBMAINSITE) {
	echo "<p>
601
              <a href=\"$TBDOCBASE/netemu.php3\"></a>\n";
602
    }
Chad Barb's avatar
 
Chad Barb committed
603
    echo "</body></html>\n";
604
}
605 606 607 608 609 610 611 612 613 614 615 616

function PAGEERROR($msg) {
    global $drewheader;

    if (! $drewheader)
	PAGEHEADER("");

    echo "$msg\n";

    PAGEFOOTER();
    die("");
}
617 618 619 620 621

#
# Sub Page/Menu Stuff
#
function WRITESUBMENUBUTTON($text, $link) {
Chad Barb's avatar
 
Chad Barb committed
622 623


624 625 626 627 628 629 630 631 632 633 634 635 636 637 638
    echo "<!-- Table row for button $text -->
          <tr>
            <td valign=center align=left nowrap>
                <b>
         	 <a class=sidebarbutton href='$link'>$text</a>\n";

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

#
# Start/End a page within a page. 
#
function SUBPAGESTART() {
Chad Barb's avatar
 
Chad Barb committed
639
    echo "<!-- begin subpage -->";
Chad Barb's avatar
 
Chad Barb committed
640
    echo "<table class=\"stealth\"
641
	  cellspacing='0' cellpadding='0' width='100%' border='0'>\n
642
            <tr>\n
Chad Barb's avatar
 
Chad Barb committed
643
              <td class=\"stealth\"valign=top>\n";
644 645 646 647 648 649
}

function SUBPAGEEND() {
    echo "    </td>\n
            </tr>\n
          </table>\n";
Chad Barb's avatar
 
Chad Barb committed
650
    echo "<!-- end subpage -->";
651 652 653 654 655 656 657
}

#
# 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
658 659
?>
    <!-- begin submenu -->
660
    <table class='menu' cellpadding="0" cellspacing="0"
Chad Barb's avatar
 
Chad Barb committed
661
	style="margin-right: 6px;" >
Chad Barb's avatar
 
Chad Barb committed
662 663 664 665
      <tr>
        <td class="menuheader"><b><?php echo "$title";?></b></td>
      </tr>
<?php
666 667 668
}

function SUBMENUEND() {
Chad Barb's avatar
 
Chad Barb committed
669 670 671 672
?>
    </table>
    <!-- end submenu -->
  </td>
673
  <td class="stealth" valign=top align=left width='100%'>
Chad Barb's avatar
 
Chad Barb committed
674
<?php
675 676
}

677 678 679 680 681 682 683 684 685 686 687 688 689 690 691 692 693 694
# 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
695 696 697 698 699 700 701 702 703 704 705 706 707 708 709 710 711

# 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
}

712
?>