menu.php3 15 KB
Newer Older
1 2
<?php

3
$login_status     = CHECKLOGIN_NOTLOGGEDIN;
4
$login_uid        = 0;
5
$drewheader       = 0;
6

7 8 9 10 11 12
#
# 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	  = "";

13 14 15 16 17 18
#
# 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.
#
function WRITESIDEBARBUTTON($text, $base, $link) {
19
    $link = "$base/$link";
20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41
    
    echo "<!-- Table row for button $text -->
          <tr>
            <td valign=center align=left nowrap>
                <b>
         	 <a class=sidebarbutton href=\"$link\">$text</a>\n";
    #
    # XXX these blanks look bad in lynx, but add required
    #     spacing between menu and body
    #
    echo "       &nbsp;&nbsp;\n";

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

#
# WRITESIDEBAR(): Write the menu. The actual menu options the user
# sees depends on the login status and the DB status.
#
function WRITESIDEBAR() {
42 43
    global $login_status, $login_uid;
    global $TBBASE, $TBDOCBASE, $BASEPATH;
44
    global $THISHOMEBASE;
45 46 47

    #
    # The document base cannot be a mix of secure and nonsecure.
48
    #
49 50
    echo "<table cellspacing=2 cellpadding=2 border=0 width=150>\n";

51
    WRITESIDEBARBUTTON("Home", $TBDOCBASE, "index.php3");
52 53
    WRITESIDEBARBUTTON("Tutorial at SIGCOMM'02 <img src=/new.gif>",
		       $TBDOCBASE, "sc2002tut.php3");
Leigh B. Stoller's avatar
Leigh B. Stoller committed
54
    WRITESIDEBARBUTTON("News (<img src=/new.gif> Apr 19)", $TBDOCBASE,
55
		       "docwrapper.php3?docname=news.html");
56 57
    WRITESIDEBARBUTTON("Tutorial", $TBDOCBASE, "tutorial/tutorial.php3");
    WRITESIDEBARBUTTON("FAQ", $TBDOCBASE, "faq.php3");
58
    WRITESIDEBARBUTTON("Documentation", $TBDOCBASE, "doc.php3");
59
    WRITESIDEBARBUTTON("Search Documentation", $TBDOCBASE, "search.php3");
60
    WRITESIDEBARBUTTON("Publications", $TBDOCBASE, "pubs.php3");
61
    WRITESIDEBARBUTTON("People", $TBDOCBASE, "people.php3");
62
    WRITESIDEBARBUTTON("The Gallery", $TBDOCBASE, "gallery/gallery.php3");
63
    WRITESIDEBARBUTTON("Projects Using $THISHOMEBASE", $TBDOCBASE,
64
		       "projectlist.php3");
65 66 67 68

    echo "<tr>
            <td height=30 valign=center align=center nowrap>
             <b><span class=sidebarbutton>
69 70
                  Web Interface Options\n";

71
    if ($login_status & CHECKLOGIN_LOGGEDIN) {
72 73
	$freepcs = TBFreePCs();
	
74 75 76
	echo "    <br>($freepcs Free PCs)\n";
    }
    echo "      </span>
77 78 79 80
             </b>
            </td>
          </tr>\n";

81 82 83 84 85 86 87 88
    #
    # 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>",
89 90
			   $TBDOCBASE, "nologins.php3");

91 92 93 94 95 96 97 98 99
	if (!$login_uid || !ISADMIN($login_uid)) {	
	    echo "<tr>
                    <td height=30 valign=center align=center nowrap>
                    <b><span class=sidebarbutton>
                         Please Try Again Later
                       </span>
                    </b>
                 </td>
                </tr>\n";
100
	}
101 102 103 104 105 106
    }
    if ($login_status & (CHECKLOGIN_LOGGEDIN|CHECKLOGIN_MAYBEVALID)) {
	if ($login_status & CHECKLOGIN_ACTIVE) {
	    if ($login_status & CHECKLOGIN_PSWDEXPIRED) {
		WRITESIDEBARBUTTON("Change your Password",
				   $TBBASE, "moduserinfo.php3");
107
	    }
108 109 110 111
	    else {
		WRITESIDEBARBUTTON("My $THISHOMEBASE",
				   $TBBASE,
				   "showuser.php3?target_uid=$login_uid");
112
	    
113 114 115 116 117 118 119 120 121 122 123 124 125 126 127 128 129
		if ($login_status & CHECKLOGIN_ISADMIN) {
		    WRITESIDEBARBUTTON("New Project Approval",
				       $TBBASE, "approveproject_list.php3");
		}
		if ($login_status & CHECKLOGIN_TRUSTED) {
                    # Only project/group leaders can do these options
		    WRITESIDEBARBUTTON("New User Approval",
				       $TBBASE, "approveuser_form.php3");
		}
		
                #
                # 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.
                #
		WRITESIDEBARBUTTON("Project Information",
				   $TBBASE, "showproject_list.php3");
130
	    
131 132 133 134 135 136 137 138 139 140 141 142
		if ($login_status & CHECKLOGIN_ISADMIN) {
		    WRITESIDEBARBUTTON("User List",
				       $TBBASE, "showuser_list.php3");
		}
	    
		WRITESIDEBARBUTTON("Begin an Experiment",
				   $TBBASE, "beginexp.php3");
		WRITESIDEBARBUTTON("Experiment Information",
				   $TBBASE, "showexp_list.php3");
		WRITESIDEBARBUTTON("Update user information",
				   $TBBASE, "moduserinfo.php3");
		WRITESIDEBARBUTTON("Node Reservation Status",
143
				   $TBBASE, "nodecontrol_list.php3");
144 145 146 147 148 149 150
		WRITESIDEBARBUTTON("Node Up/Down Status",
				   $TBDOCBASE, "updown.php3");
		
		if ($login_status & CHECKLOGIN_CVSWEB) {
		    WRITESIDEBARBUTTON("CVS Repository",
				       $TBBASE, "cvsweb/cvsweb.php3");
		}
151
	    }
152
	}
153
	elseif ($login_status & (CHECKLOGIN_UNVERIFIED|CHECKLOGIN_NEWUSER)) {
154 155
	    WRITESIDEBARBUTTON("New User Verification",
			       $TBBASE, "verifyusr_form.php3");
156 157
	    WRITESIDEBARBUTTON("Update user information",
			       $TBBASE, "moduserinfo.php3");
158
	}
159 160 161
	elseif ($login_status & (CHECKLOGIN_UNAPPROVED)) {
	    WRITESIDEBARBUTTON("Update user information",
			       $TBBASE, "moduserinfo.php3");
162 163 164 165 166
	}
    }
    #
    # Standard options for anyone.
    #
167
    if (! NOLOGINS()) {
168 169
	WRITESIDEBARBUTTON("Start Project", $TBBASE, "newproject.php3");
	WRITESIDEBARBUTTON("Join Project",  $TBBASE, "joinproject.php3");
170
    }
171

172 173 174 175 176
    #
    # Cons up a nice message.
    # 
    switch ($login_status & CHECKLOGIN_STATUSMASK) {
    case CHECKLOGIN_LOGGEDIN:
177
	$login_message = "$login_uid Logged In";
178 179
	    
	if ($login_status & CHECKLOGIN_PSWDEXPIRED)
180
	    $login_message = "$login_message<br>(Password Expired!)";
181 182
	elseif ($login_status & CHECKLOGIN_UNAPPROVED)
	    $login_message = "$login_message<br>(Unapproved!)";
183
	break;
184
    case CHECKLOGIN_TIMEDOUT:
185 186
	$login_message = "Login Timed Out";
	break;
187 188
    default:
	$login_message = 0;
189
	break;
190 191 192 193
    }

    #
    # Now the login/logout box. Remember, already inside a table.
194 195
    # 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
196
    # http or https, since we do not want to mix them, since they
197
    # cause warnings.
198
    # 
199
    if ($login_status & (CHECKLOGIN_LOGGEDIN|CHECKLOGIN_MAYBEVALID)) {
200
	echo "<tr>
201 202 203 204 205
               <td align=center height=50 valign=center>
                <a href=\"$TBBASE/logout.php3?uid=$login_uid\">
	           <img alt=\"logout\" border=0
                        src=\"$BASEPATH/logoff.gif\"></a>
               </td>
206 207
              </tr>\n";
    }
208
    elseif (!NOLOGINS()) {
209
	echo "<tr>
210
               <td align=center height=50 valign=center>
211
                <a href=\"$TBBASE/login.php3\">
212 213 214
	           <img alt=\"logon\" border=0
                        src=\"$BASEPATH/logon.gif\"></a>
               </td>
215 216
              </tr>\n";
    }
217

218 219 220 221 222 223 224 225 226 227 228
    if ($login_message) {
	echo "<tr>
                <td align=center>
                 <b>
                   <span class=sidebarbutton>
                      $login_message
                   </span>
                 <b>
                </td>
              </tr>\n";
    }
229

230
    #
231
    # MOTD. Set this with the webcontrol script.
232
    #
233 234
    $query_result =
	DBQueryFatal("SELECT message FROM loginmessage");
235 236 237 238 239
    
    if (mysql_num_rows($query_result)) {
    	$row = mysql_fetch_row($query_result);
	$message = $row[0];
    
240 241
	echo "<tr>
                <td align=center>
242
                 <b>
243 244
                   <span class=sidebarbutton>
                    <font size=\"+1\" color=RED>
245
                      $message
246 247
                    </font>
                   </span>
248
                 <b>
249 250 251
                </td>
              </tr>\n";
    }
252 253 254 255 256 257 258 259 260
    echo "</table>
          <br>\n";
}

#
# WRITEBANNER(): write the page banner for a page.
# Called by _STARTPAGE
#
function WRITEBANNER($title) {
261
    global $BANNERCOLOR, $THISPROJECT, $THISHOMEBASE, $BASEPATH;
262 263

    echo "<!-- This is the page Banner -->\n";
Leigh B. Stoller's avatar
Leigh B. Stoller committed
264 265

    echo "<table cellpadding=0 cellspacing=0 border=0 width=50%>";
266
    echo "<tr>
Leigh B. Stoller's avatar
Leigh B. Stoller committed
267
            <td align=left valign=top width=\"0%\">
268 269 270
             <table cellpadding=5 cellspacing=0 border=0 bgcolor=\"#880000\">
              <tr>
                <td>
Leigh B. Stoller's avatar
Leigh B. Stoller committed
271
                 <b><font size=5 color=white face=Helvetica>
272
                        $THISHOMEBASE
273 274 275 276 277 278
                    </font>
                 </b>
                </td>
              </tr>
             </table>
            </td>
Leigh B. Stoller's avatar
Leigh B. Stoller committed
279
            <td align=left valign=top width=100%>
280 281 282
                <table cellpadding=5 cellspacing=0 border=0
                         bgcolor=$BANNERCOLOR>
                  <tr>
Leigh B. Stoller's avatar
Leigh B. Stoller committed
283
                   <td nowrap>
284
                     <b>
Leigh B. Stoller's avatar
Leigh B. Stoller committed
285
                       <font size=5 face=helvetica color=\"#000000\">
286 287 288 289 290 291 292 293 294 295 296 297 298 299 300 301
                            $THISPROJECT
                       </font>
                     </b>
                   </td>
                  <tr>
                </table>
            </td>
          </tr>
          </table>\n";
}

#
# _WRITETITLE(title): write the page title for a page.
# Called by _STARTPAGE
#
function WRITETITLE($title) {
Leigh B. Stoller's avatar
Leigh B. Stoller committed
302
    global $TITLECOLOR, $BASEPATH;
303 304 305 306
    
    echo "<!-- This is the page Title -->
          <table width=\"100%\">
            <tr>
Leigh B. Stoller's avatar
Leigh B. Stoller committed
307
               <td width=\"10%\" align=left>\n";
308 309 310
                 #
                 # Insert a small logo here if you like.
                 #
Leigh B. Stoller's avatar
Leigh B. Stoller committed
311
    
312 313
    echo "     </td>
               <td align=left>
Leigh B. Stoller's avatar
Leigh B. Stoller committed
314
                   <b><font size=5 color=$TITLECOLOR>$title</font></b>
315 316 317 318 319 320 321 322 323
               </td>
            </tr>
          </table>\n";
}

#
# Spit out a vanilla page header.
#
function PAGEHEADER($title) {
324 325
    global $login_status, $login_uid, $TBBASE, $TBDOCBASE, $THISHOMEBASE;
    global $BASEPATH, $SSL_PROTOCOL, $drewheader;
326
    global $TBMAINSITE;
327 328

    $drewheader = 1;
329 330 331 332 333 334 335 336 337 338 339 340 341 342 343 344

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

346
    #
347
    # Figure out who is logged in, if anyone.
348
    # 
349 350 351 352
    if (($known_uid = GETUID()) != FALSE) {
        #
        # Check to make sure the UID is logged in (not timed out).
        #
353 354 355
        $login_status = CHECKLOGIN($known_uid);
	if ($login_status & (CHECKLOGIN_LOGGEDIN|CHECKLOGIN_MAYBEVALID)) {
	    $login_uid = $known_uid;
356 357 358
	}
    }

359
    #
360 361
    # Check for NOLOGINS. 
    # We want to allow admin types to continue using the web interface,
362 363
    # and logout anyone else that is currently logged in!
    #
364 365 366 367
    if (NOLOGINS() && $login_uid && !ISADMIN($login_uid)) {
	DOLOGOUT($login_uid);
	$login_status = CHECKLOGIN_NOTLOGGEDIN;
	$login_uid    = 0;
368
    }
369
    
370 371
    header("Last-Modified: " . gmdate("D, d M Y H:i:s") . " GMT");
    
372
    if (1) {
373 374 375 376 377 378 379
	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"); 
    }
380

381 382
    echo "<html>
          <head>
383
           <title>$THISHOMEBASE - $title</title>\n";
384

385 386 387 388 389
    if ($TBMAINSITE) {
	echo "  <meta NAME=\"keywords\"
                      CONTENT=\"network, emulation, internet, emulator\">
                <meta NAME=\"ROBOTS\" CONTENT=\"NOARCHIVE\">\n";
    }
390
    
391
    echo " <link rel=\"stylesheet\" href=\"$BASEPATH/tbstyle.css\"
392 393
                 type=\"text/css\">
          </head>\n";
394
    echo "<body>\n";
395 396 397 398 399 400 401 402 403 404 405 406

    WRITEBANNER($title);
    WRITETITLE($title);

    echo "<br>
          <!-- Under banner is a table with two columns: menu and content -->
          <table cellpadding=3 width=\"100%\" height=\"60%\" border=2>
          <tr>
           <!-- everthing is in a single row: two tables side-by-side -->

           <!-- MENU -->
           <td valign=top>\n";
407

408 409 410 411 412 413
    WRITESIDEBAR();

    echo " </td>

           <!-- PAGE BODY -->
           <td valign=top align=left width=\"85%\">
Leigh B. Stoller's avatar
Leigh B. Stoller committed
414

415 416 417 418 419 420 421 422 423 424 425 426 427 428 429 430 431 432 433
               <!-- Content follows this macro ... -->\n";
}

#
# ENDPAGE(): This terminates the table started above.
# 
function ENDPAGE() {
    echo "     <!-- ... end of page content. -->
            </td>
           </tr>
          </table>
          <br>
          <hr size=2 noshade>\n";
}

#
# Spit out a vanilla page footer.
#
function PAGEFOOTER() {
434
    global $TBDOCBASE, $TBMAILADDR, $THISHOMEBASE;
Leigh B. Stoller's avatar
Leigh B. Stoller committed
435
    global $TBMAINSITE, $SSL_PROTOCOL;
436 437 438 439 440

    ENDPAGE();

    echo "<!-- Force full window! -->
	  <base target=_top>
441
          <center>[<a href=\"$TBDOCBASE\">$THISHOMEBASE Home</a>]</center>
442 443 444 445 446 447 448
          <center>
           [<a href=\"http://www.cs.utah.edu/flux/\">Flux Research Group</a>]
           [<a href=\"http://www.cs.utah.edu/\">School of Computing</a>]
           [<a href=\"http://www.utah.edu/\">University of Utah</a>]
          </center>
         <p align=right>
         <font size=-2>
449 450 451 452 453
          Problems? Contact $TBMAILADDR\n";

    if ($TBMAINSITE) {
	echo "<p>
              <a href=\"$TBDOCBASE/netemu.php3\"></a>\n";
Leigh B. Stoller's avatar
Leigh B. Stoller committed
454 455 456 457 458 459 460 461

	if (! isset($SSL_PROTOCOL)) {
	    echo "<a href=http://www.addme.com>
	             <img width=8 height=2
	                 src='http://www.addme.com/link8.gif'
   	                 alt='Add Me!' border=0>
	          </a>\n";
	}
462 463 464
    }

    echo "</font>
465 466 467
          </body>
          </html>\n";
}
468 469 470 471 472 473 474 475 476 477 478 479

function PAGEERROR($msg) {
    global $drewheader;

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

    echo "$msg\n";

    PAGEFOOTER();
    die("");
}
480 481 482 483 484 485 486 487 488 489 490 491 492 493 494 495 496 497 498 499 500 501 502 503 504 505 506 507 508 509 510 511 512 513 514 515 516 517 518 519 520 521 522 523 524 525 526 527 528 529 530 531 532 533

#
# Sub Page/Menu Stuff
#
function WRITESUBMENUBUTTON($text, $link) {
    echo "<!-- Table row for button $text -->
          <tr>
            <td valign=center align=left nowrap>
                <b>
         	 <a class=sidebarbutton href='$link'>$text</a>\n";
    #
    # XXX these blanks look bad in lynx, but add required
    #     spacing between menu and body
    #
    echo "       &nbsp;&nbsp;\n";

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

#
# Start/End a page within a page. 
#
function SUBPAGESTART() {
    echo "<table cellspacing=2 cellpadding=2 width='85%' border=0>\n
            <tr>\n
              <td valign=top>\n";
}

function SUBPAGEEND() {
    echo "    </td>\n
            </tr>\n
          </table>\n";
}

#
# 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) {
    echo "      <table cellspacing=2 cellpadding=2 border=0 width=200>\n
                  <tr>\n
                    <td align=center><b>$title</b></td>\n
                  </tr>\n
                  <tr></tr>\n";
}

function SUBMENUEND() {
    echo "      </table>\n
              </td>\n
              <td valign=top align=left width='85%'>\n";
}

534
?>