menu.php3 14.9 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
		if (ISADMIN($login_uid)) {
114
115
116
117
118
119
120
121
122
123
124
125
126
127
		    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.
                #
Leigh B. Stoller's avatar
Leigh B. Stoller committed
128
		WRITESIDEBARBUTTON("Project List",
129
				   $TBBASE, "showproject_list.php3");
130
	    
131
		if (ISADMIN($login_uid)) {
132
133
134
135
		    WRITESIDEBARBUTTON("User List",
				       $TBBASE, "showuser_list.php3");
		}
	    
Leigh B. Stoller's avatar
Leigh B. Stoller committed
136
137
		WRITESIDEBARBUTTON("Experiment List",
				   $TBBASE, "showexp_list.php3");
138
139
140
141
142
		WRITESIDEBARBUTTON("Begin an Experiment",
				   $TBBASE, "beginexp.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
?>