menu.php3 17 KB
Newer Older
1
<?php
Leigh B. Stoller's avatar
Leigh B. Stoller committed
2 3 4 5 6
#
# EMULAB-COPYRIGHT
# Copyright (c) 2000-2002 University of Utah and the Flux Group.
# 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
}

Leigh B. Stoller's avatar
Leigh B. Stoller committed
35 36
function WRITESIDEBARBUTTON_ABS($text, $base, $link ) {
    $link = "$link";
Chad Barb's avatar
 
Chad Barb committed
37
    echo "<tr><td class=\"menuopt\"><a href=\"$link\">$text</a></td></tr>\n";
Leigh B. Stoller's avatar
Leigh B. Stoller committed
38 39
}

Chad Barb's avatar
 
Chad Barb committed
40 41 42 43 44
# 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
45
    echo "<tr><td class=\"menuoptb\"><a href=\"$link\">$text</a></td></tr>\n";
Chad Barb's avatar
 
Chad Barb committed
46 47 48 49
}

# writes a message to the sidebar, without clickability.
function WRITESIDEBARNOTICE($text) {
Chad Barb's avatar
 
Chad Barb committed
50
    echo "<tr><td class=\"menuopt\"><b>$text</b></td></tr>\n";
51 52 53 54 55 56 57
}

#
# WRITESIDEBAR(): Write the menu. The actual menu options the user
# sees depends on the login status and the DB status.
#
function WRITESIDEBAR() {
58 59
    global $login_status, $login_uid;
    global $TBBASE, $TBDOCBASE, $BASEPATH;
60
    global $THISHOMEBASE;
61 62 63

    #
    # The document base cannot be a mix of secure and nonsecure.
64
    #
Chad Barb's avatar
 
Chad Barb committed
65 66 67 68 69 70 71 72
    
    # create the main menu table, which also happens to reside in a form
    # (for search.)
?>
<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
73
    WRITESIDEBARBUTTON("Home", $TBDOCBASE, "index.php3");
74
    WRITESIDEBARBUTTON_ABS("Univ. Kentucky Emulab", $TBDOCBASE,
Leigh B. Stoller's avatar
Leigh B. Stoller committed
75 76
			   "http://www.uky.emulab.net");
    
77 78
    WRITESIDEBARBUTTON_NEW("Join Netbed (CD)",
			   $TBDOCBASE, "cdrom.php");
Chad Barb's avatar
 
Chad Barb committed
79

Jay Lepreau's avatar
Jay Lepreau committed
80
    WRITESIDEBARBUTTON("News (August&nbsp;15)", $TBDOCBASE,
81
		       "docwrapper.php3?docname=news.html");
82
    WRITESIDEBARBUTTON("Documentation", $TBDOCBASE, "doc.php3");
Chad Barb's avatar
 
Chad Barb committed
83
    WRITESIDEBARBUTTON_NEW("Papers", $TBDOCBASE, "pubs.php3");
84
    WRITESIDEBARBUTTON("People", $TBDOCBASE, "people.php3");
85
    WRITESIDEBARBUTTON("Photo Gallery", $TBDOCBASE, "gallery/gallery.php3");
Chad Barb's avatar
 
Chad Barb committed
86
    WRITESIDEBARBUTTON("Projects on Emulab", $TBDOCBASE,
87
		       "projectlist.php3");
Chad Barb's avatar
 
Chad Barb committed
88
    WRITESIDEBARLASTBUTTON("Sponsors", $TBDOCBASE,
Mike Hibler's avatar
Mike Hibler committed
89
		       "docwrapper.php3?docname=sponsors.html");
90

Chad Barb's avatar
 
Chad Barb committed
91 92 93 94 95 96
    # 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
97 98
      <a href="<?php echo "$TBDOCBASE/search.php3"; ?>">Advanced 
      Search</a> ]</td></tr>
Chad Barb's avatar
 
Chad Barb committed
99 100 101 102 103 104
    </td></tr>  
  </table>
</form>
<br>
<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
105
<?php # BACK TO PHP
106

107
    if ($login_status & CHECKLOGIN_LOGGEDIN) {
Chad Barb's avatar
 
Chad Barb committed
108 109
         $freepcs = TBFreePCs();
	 WRITESIDEBARNOTICE( "($freepcs Free PCs.)" );
110
    }
111

112 113 114 115 116 117 118 119
    #
    # 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>",
120 121
			   $TBDOCBASE, "nologins.php3");

Chad Barb's avatar
 
Chad Barb committed
122 123 124
        if (!$login_uid || !ISADMIN($login_uid)) {	
	    WRITESIDEBARNOTICE("Please Try Again Later");
        }
125
    }
Chad Barb's avatar
 
Chad Barb committed
126

127 128 129
    if ($login_status & (CHECKLOGIN_LOGGEDIN|CHECKLOGIN_MAYBEVALID)) {
	if ($login_status & CHECKLOGIN_ACTIVE) {
	    if ($login_status & CHECKLOGIN_PSWDEXPIRED) {
130
		WRITESIDEBARBUTTON("Change Your Password",
131
				   $TBBASE, "moduserinfo.php3");
132
	    }
133 134 135 136 137 138 139 140
	    elseif ($login_status & CHECKLOGIN_WEBONLY) {
		WRITESIDEBARBUTTON("My Emulab",
				   $TBBASE,
				   "showuser.php3?target_uid=$login_uid");
	    
		WRITESIDEBARBUTTON("Update User Information",
				   $TBBASE, "moduserinfo.php3");
	    }
141
	    else {
Leigh B. Stoller's avatar
Leigh B. Stoller committed
142
		WRITESIDEBARBUTTON("My Emulab",
143 144
				   $TBBASE,
				   "showuser.php3?target_uid=$login_uid");
145
	    
146
		if (ISADMIN($login_uid)) {
147 148
		    WRITESIDEBARBUTTON("New Project Approval",
				       $TBBASE, "approveproject_list.php3");
149 150 151

		    WRITESIDEBARBUTTON("Widearea User Approval",
				       $TBBASE, "approvewauser_form.php3");
152 153
		}
		if ($login_status & CHECKLOGIN_TRUSTED) {
154 155 156 157 158 159 160 161 162 163 164 165 166 167 168 169 170 171 172 173
                  # 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 g ".
				 "LEFT JOIN group_membership as authed ".
				 "ON g.pid=authed.pid and g.gid=authed.gid ".
				 "and g.uid!='$auth_usr' and g.trust='none' ".
				 "left join users as u on u.uid=g.uid ".
				 "WHERE u.status!='".
				 TBDB_USERSTATUS_UNVERIFIED . "' and ".
				 "u.status!='" . TBDB_USERSTATUS_NEWUSER .
				 "' 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) {
		    WRITESIDEBARBUTTON_NEW("New User Approval",
					   $TBBASE, "approveuser_form.php3");
		  } else {
174 175

		      WRITESIDEBARBUTTON("New User Approval",
176
				       $TBBASE, "approveuser_form.php3");
177
		  }
178
		}
179

180 181
                #
                # Since a user can be a member of more than one project,
182 183
                # display this option, and let the form decide if the 
                # user is allowed to do this.
184
                #
Leigh B. Stoller's avatar
Leigh B. Stoller committed
185
		WRITESIDEBARBUTTON("Project List",
186
				   $TBBASE, "showproject_list.php3");
187
	    
188
		if (ISADMIN($login_uid)) {
189 190 191 192
		    WRITESIDEBARBUTTON("User List",
				       $TBBASE, "showuser_list.php3");
		}
	    
Leigh B. Stoller's avatar
Leigh B. Stoller committed
193 194
		WRITESIDEBARBUTTON("Experiment List",
				   $TBBASE, "showexp_list.php3");
195 196
		WRITESIDEBARBUTTON("Begin an Experiment",
				   $TBBASE, "beginexp.php3");
Leigh B. Stoller's avatar
Leigh B. Stoller committed
197 198
		WRITESIDEBARBUTTON("OSIDs and ImageIDs",
				   $TBBASE, "showosid_list.php3");
199
		WRITESIDEBARBUTTON("Update User Information",
200 201
				   $TBBASE, "moduserinfo.php3");
		WRITESIDEBARBUTTON("Node Reservation Status",
202
				   $TBBASE, "nodecontrol_list.php3");
203 204 205 206 207 208 209
		WRITESIDEBARBUTTON("Node Up/Down Status",
				   $TBDOCBASE, "updown.php3");
		
		if ($login_status & CHECKLOGIN_CVSWEB) {
		    WRITESIDEBARBUTTON("CVS Repository",
				       $TBBASE, "cvsweb/cvsweb.php3");
		}
210
	    }
211
	}
212
	elseif ($login_status & (CHECKLOGIN_UNVERIFIED|CHECKLOGIN_NEWUSER)) {
213 214
	    WRITESIDEBARBUTTON("New User Verification",
			       $TBBASE, "verifyusr_form.php3");
215
	    WRITESIDEBARBUTTON("Update User Information",
216
			       $TBBASE, "moduserinfo.php3");
217
	}
218
	elseif ($login_status & (CHECKLOGIN_UNAPPROVED)) {
219
	    WRITESIDEBARBUTTON("Update User Information",
220
			       $TBBASE, "moduserinfo.php3");
221 222
	}
    }
Chad Barb's avatar
 
Chad Barb committed
223

224 225 226
    #
    # Standard options for anyone.
    #
227
    if (! NOLOGINS()) {
228
	WRITESIDEBARBUTTON("Start Project", $TBBASE, "newproject.php3");
Chad Barb's avatar
 
Chad Barb committed
229
	WRITESIDEBARLASTBUTTON("Join Project",  $TBBASE, "joinproject.php3");
230
    }
231

232 233 234 235 236
    #
    # Cons up a nice message.
    # 
    switch ($login_status & CHECKLOGIN_STATUSMASK) {
    case CHECKLOGIN_LOGGEDIN:
Chad Barb's avatar
 
Chad Barb committed
237
	$login_message = "&quot;$login_uid&quot; Logged In.";
238 239
	    
	if ($login_status & CHECKLOGIN_PSWDEXPIRED)
240
	    $login_message = "$login_message<br>(Password Expired!)";
241 242
	elseif ($login_status & CHECKLOGIN_UNAPPROVED)
	    $login_message = "$login_message<br>(Unapproved!)";
243
	break;
244
    case CHECKLOGIN_TIMEDOUT:
245 246
	$login_message = "Login Timed Out";
	break;
247 248
    default:
	$login_message = 0;
249
	break;
250 251
    }

Chad Barb's avatar
 
Chad Barb committed
252
    if ($login_message) {
Chad Barb's avatar
 
Chad Barb committed
253 254 255 256
      echo "<tr>";
      echo "<td class=\"menufooter\"><center><b>";
      echo "$login_message</b></center></td>";
      echo "</tr>";
Chad Barb's avatar
 
Chad Barb committed
257 258
    }

259 260
    #
    # Now the login/logout box. Remember, already inside a table.
261 262
    # 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
263
    # http or https, since we do not want to mix them, since they
264
    # cause warnings.
265
    # 
266
    if ($login_status & (CHECKLOGIN_LOGGEDIN|CHECKLOGIN_MAYBEVALID)) {
Chad Barb's avatar
 
Chad Barb committed
267 268 269 270 271 272
      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";
273
    }
274
    elseif (!NOLOGINS()) {
Chad Barb's avatar
 
Chad Barb committed
275 276 277 278 279 280
      echo "<tr>";
      echo "<td class=\"menufooter\" align=center valign=center>";
      echo "<a href=\"$TBBASE/login.php3\">";
      echo "<img alt=\"logon\" border=0 ";
      echo "src=\"$BASEPATH/logon.gif\"></a>\n";
      echo "</td></tr>\n";
281
    }
282

Chad Barb's avatar
 
Chad Barb committed
283

284
    #
285
    # MOTD. Set this with the webcontrol script.
286
    #
287 288
    $query_result =
	DBQueryFatal("SELECT message FROM loginmessage");
289 290 291 292
    
    if (mysql_num_rows($query_result)) {
    	$row = mysql_fetch_row($query_result);
	$message = $row[0];
293

Chad Barb's avatar
 
Chad Barb committed
294 295
	# XXX: make this red and big (like the old one)?
	WRITESIDEBARNOTICE($message);    
296
    }
Chad Barb's avatar
 
Chad Barb committed
297
    echo "</table>\n";
298 299
}

Chad Barb's avatar
 
Chad Barb committed
300 301 302 303
#
# spits out beginning part of page
#
function PAGEBEGINNING( $title ) {
Chad Barb's avatar
 
Chad Barb committed
304
    global $BASEPATH, $TBMAINSITE, $THISHOMEBASE;
Chad Barb's avatar
 
Chad Barb committed
305 306 307 308 309
?>
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN" 
 "http://www.w3.org/TR/html4/loose.dtd">
<html>
  <head>
Chad Barb's avatar
 
Chad Barb committed
310
    <title><?php echo "$THISHOMEBASE - $title"; ?></title>
Chad Barb's avatar
 
Chad Barb committed
311 312 313 314 315 316 317 318 319 320 321 322 323 324 325 326 327 328 329
    <!-- dumbed-down style sheet for any browser that groks (eg NS47). -->
    <link REL="stylesheet" HREF="<?php echo "$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 "<?php echo "$BASEPATH/style.css" ?>"; --></style>
<?php if ($TBMAINSITE) { ?>
    <meta NAME="keywords" CONTENT="network, emulation, internet, emulator">
    <meta NAME="ROBOTS" CONTENT="NOARCHIVE">
<?php } ?>
  </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="<?php echo "$BASEPATH/headerbgbb.jpg" ?>"
            bgcolor=#3D627F ><img width=369 height=100 
Chad Barb's avatar
 
Chad Barb committed
330 331 332
            src="<?php echo "$BASEPATH/overlay." . strtolower($THISHOMEBASE) 
                                                 . ".gif" ?>" 
            alt="<?php echo "$THISHOMEBASE" ?> - the network testbed" /></td>
Chad Barb's avatar
 
Chad Barb committed
333 334 335 336 337 338 339 340 341 342 343 344 345 346 347 348 349 350 351
      </tr>
    </table><table cellpadding="8" cellspacing="0" height="100%">
      <tr height=100%>
        <td valign="top" class="leftcell" bgcolor=#ccddee>
<!-- sidebar begins -->
<?php
}

#
# finishes sidebar td
#
function FINISHSIDEBAR()
{
?>
<!-- sidebar ends -->
        </td>
        <td valign="top" width=* class="rightcell">
          <table class="content" width=100% cellpadding="0" cellspacing="0">
            <tr>
352
              <td class="contentheader">
Chad Barb's avatar
 
Chad Barb committed
353 354 355
<?php
}

356 357 358 359
#
# Spit out a vanilla page header.
#
function PAGEHEADER($title) {
360 361
    global $login_status, $login_uid, $TBBASE, $TBDOCBASE, $THISHOMEBASE;
    global $BASEPATH, $SSL_PROTOCOL, $drewheader;
362
    global $TBMAINSITE;
363 364

    $drewheader = 1;
365 366 367 368 369 370 371 372 373 374 375 376 377 378 379 380

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

382
    #
383
    # Figure out who is logged in, if anyone.
384
    # 
385 386 387 388
    if (($known_uid = GETUID()) != FALSE) {
        #
        # Check to make sure the UID is logged in (not timed out).
        #
389 390 391
        $login_status = CHECKLOGIN($known_uid);
	if ($login_status & (CHECKLOGIN_LOGGEDIN|CHECKLOGIN_MAYBEVALID)) {
	    $login_uid = $known_uid;
392 393 394
	}
    }

395
    #
396 397
    # Check for NOLOGINS. 
    # We want to allow admin types to continue using the web interface,
398 399
    # and logout anyone else that is currently logged in!
    #
400 401 402 403
    if (NOLOGINS() && $login_uid && !ISADMIN($login_uid)) {
	DOLOGOUT($login_uid);
	$login_status = CHECKLOGIN_NOTLOGGEDIN;
	$login_uid    = 0;
404
    }
405
    
406 407
    header("Last-Modified: " . gmdate("D, d M Y H:i:s") . " GMT");
    
408
    if (1) {
409 410 411 412 413 414 415
	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
416 417 418 419

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

Chad Barb's avatar
 
Chad Barb committed
422 423 424 425 426 427 428 429 430 431 432
    if ($login_uid && ISADMININSTRATOR()) {
	if (ISADMIN($login_uid)) {
	    echo "<a href=adminmode.php3?target_uid=$login_uid&adminoff=1>
	             <img src='/redball.gif'
                          border=0 alt='Admin On'></a>\n";
	}
	else {
	    echo "<a href=adminmode.php3?target_uid=$login_uid&adminoff=0>
	             <img src='/greenball.gif'
                          border=0 alt='Admin Off'></a>\n";
	}
433
    }
434 435 436 437
    $now = date("D M d g:ia T");
    echo "$title</h2></td>\n";
    echo "<td class=\"contentheader\" align=right>$now</td></tr>\n";
    echo "<tr><td colspan=2 class=\"contentbody\" width=*>";
Chad Barb's avatar
 
Chad Barb committed
438
    echo "<!-- begin content -->\n";
439 440 441 442 443 444
}

#
# ENDPAGE(): This terminates the table started above.
# 
function ENDPAGE() {
Chad Barb's avatar
 
Chad Barb committed
445 446
  echo "</td></tr></table>";
  echo "</td></tr></table>";
447 448 449 450 451 452
}

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

Chad Barb's avatar
 
Chad Barb committed
456 457 458 459 460 461 462
#    echo "<!-- Force full window! -->
#	  <base target=_top>

?>
<!-- end content -->
              </td>
            </tr><tr>
463
              <td colspan=2 class="contentbody">
464
	        <center><font size=-1>
465
		[&nbsp;<a href="http://www.cs.utah.edu/flux/"
466 467
                >The&nbsp;Flux&nbsp;Research&nbsp;Group</a>&nbsp;]
		[&nbsp;<a href="http://www.cs.utah.edu/"
468
                >School&nbsp;of&nbsp;Computing</a>&nbsp;]
469
		[&nbsp;<a href="http://www.utah.edu/"
470 471 472
                >The&nbsp;University&nbsp;of&nbsp;Utah</a>&nbsp;]
		</font>
		<br>
Chad Barb's avatar
 
Chad Barb committed
473
                <!-- begin copyright -->
474
                <font size=-2>
Chad Barb's avatar
 
Chad Barb committed
475
<a href="<?php echo "$TBDOCBASE"; ?>/docwrapper.php3?docname=copyright.html">
476
                    Copyright &copy; 2000-2002 The University of Utah</a>
Chad Barb's avatar
 
Chad Barb committed
477 478
                  </font>
                  <br />
479 480
		</center>
                <p align=right>
Chad Barb's avatar
 
Chad Barb committed
481 482 483 484 485 486 487 488 489
		  <font size=-2>
                    Problems?
	            Contact <?php echo "$TBMAILADDR\n"; ?>
                  </font>
                </p>
                <!-- end copyright -->
<?php

    ENDPAGE();
490 491 492

    if ($TBMAINSITE) {
	echo "<p>
Chad Barb's avatar
 
Chad Barb committed
493
              <a href=\"$TBDOCBASE/netemu.php3\"></a>\n";#
Leigh B. Stoller's avatar
Leigh B. Stoller committed
494 495 496 497 498 499 500 501

	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";
	}
502
    }
Chad Barb's avatar
 
Chad Barb committed
503
    echo "</body></html>\n";
504
}
505 506 507 508 509 510 511 512 513 514 515 516

function PAGEERROR($msg) {
    global $drewheader;

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

    echo "$msg\n";

    PAGEFOOTER();
    die("");
}
517 518 519 520 521

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


524 525 526 527 528 529 530 531 532 533 534 535 536 537 538
    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
539
    echo "<!-- begin subpage -->";
Chad Barb's avatar
 
Chad Barb committed
540 541
    echo "<table class=\"stealth\" cellspacing=0 cellpadding=0 width='85%' 
          border=0>\n
542
            <tr>\n
Chad Barb's avatar
 
Chad Barb committed
543
              <td class=\"stealth\"valign=top>\n";
544 545 546 547 548 549
}

function SUBPAGEEND() {
    echo "    </td>\n
            </tr>\n
          </table>\n";
Chad Barb's avatar
 
Chad Barb committed
550
    echo "<!-- end subpage -->";
551 552 553 554 555 556 557
}

#
# 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
558 559 560 561 562 563 564
?>
    <!-- begin submenu -->
    <table class="menu" width=200 cellpadding="0" cellspacing="0">
      <tr>
        <td class="menuheader"><b><?php echo "$title";?></b></td>
      </tr>
<?php
565 566 567
}

function SUBMENUEND() {
Chad Barb's avatar
 
Chad Barb committed
568 569 570 571 572 573
?>
    </table>
    <!-- end submenu -->
  </td>
  <td class="stealth" valign=top align=left width='85%'>
<?php
574 575
}

576
?>