Skip to content

GitLab

Switch branch/tag
Find file Normal viewHistoryPermalink
quickvm_sup.php 10 KB
Newer Older
Leigh B Stoller's avatar
First working APT code.  
Leigh B Stoller committed
1
2 
<?php
#
Leigh B Stoller's avatar
Checkpoint a slew of changes to the APT code. New signup page,  
Leigh B Stoller committed
3 
# Copyright (c) 2000-2014 University of Utah and the Flux Group.
Leigh B Stoller's avatar
First working APT code.  
Leigh B Stoller committed
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23 
# 
# {{{EMULAB-LICENSE
# 
# This file is part of the Emulab network testbed software.
# 
# This file is free software: you can redistribute it and/or modify it
# under the terms of the GNU Affero General Public License as published by
# the Free Software Foundation, either version 3 of the License, or (at
# your option) any later version.
# 
# This file is distributed in the hope that it will be useful, but WITHOUT
# ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
# FITNESS FOR A PARTICULAR PURPOSE.  See the GNU Affero General Public
# License for more details.
# 
# You should have received a copy of the GNU Affero General Public License
# along with this file.  If not, see <http://www.gnu.org/licenses/>.
# 
# }}}
#
Leigh B Stoller's avatar
Checkpoint a slew of changes to the APT code. New signup page,  
Leigh B Stoller committed
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42 
$APTHOST	= "$WWWHOST";
$APTBASE	= "$TBBASE/apt";

#
# Global flag to disable accounts. We do this on some pages which
# should not display login/account info.
#
$disable_accounts = 0;

#
# So, we could be coming in on the alternate APT address (virtual server)
# which causes cookie problems. I need to look into avoiding this problem
# but for now, just change the global value of the TBAUTHDOMAIN when we do.
# The downside is that users will have to log in twice if they switch back
# and forth.
#
if ($TBMAINSITE && $_SERVER["SERVER_NAME"] == "www.aptlab.net") {
    $TBAUTHDOMAIN = ".aptlab.net";
    $APTHOST      = "www.aptlab.net";
Leigh B Stoller's avatar
Minor fixups for cookie handling and login/logout buttons.  
Leigh B Stoller committed
43 
    $WWWHOST      = "www.aptlab.net";
Leigh B Stoller's avatar
Checkpoint a slew of changes to the APT code. New signup page,  
Leigh B Stoller committed
44
45
46 
    $APTBASE      = "https://www.aptlab.net";
}
Leigh B Stoller's avatar
First working APT code.  
Leigh B Stoller committed
47
48 
function SPITHEADER($thinheader = 0)
{
Leigh B Stoller's avatar
Google analytics code.  
Leigh B Stoller committed
49 
    global $TBMAINSITE;
Leigh B Stoller's avatar
Checkpoint a slew of changes to the APT code. New signup page,  
Leigh B Stoller committed
50
51 
    global $login_user, $login_status;
    global $disable_accounts;
Leigh B Stoller's avatar
Google analytics code.  
Leigh B Stoller committed
52
Leigh B Stoller's avatar
First working APT code.  
Leigh B Stoller committed
53 
    $height = ($thinheader ? 150 : 250);
Leigh B Stoller's avatar
Checkpoint a slew of changes to the APT code. New signup page,  
Leigh B Stoller committed
54
55
56
57
58
59
60
61
62 

    #
    # Figure out who is logged in, if anyone.
    #
    if (($login_user = CheckLogin($status)) != null) {
	$login_status = $status;
	$login_uid    = $login_user->uid();
    }
Leigh B Stoller's avatar
First working APT code.  
Leigh B Stoller committed
63
64 
    echo "<html>
      <head>
Leigh B Stoller's avatar
Checkpoint.  
Leigh B Stoller committed
65 
        <title>AptLab</title>
Leigh B Stoller's avatar
Convert to bootstrap V3.0, remove all UIKIT code.  
Leigh B Stoller committed
66 
        <link rel='stylesheet' href='bootstrap/css/bootstrap.css'>
Leigh B Stoller's avatar
First working APT code.  
Leigh B Stoller committed
67 
        <link rel='stylesheet' href='quickvm.css'>
Jonathon Duerig's avatar
Better organization of Apt JS client-side code. Checkpoint.  
Jonathon Duerig committed
68 
	<script src='js/common.js'></script>
Leigh B Stoller's avatar
Minor fix.  
Leigh B Stoller committed
69 
        <script src='https://www.emulab.net/emulab_sup.js'></script>
Leigh B Stoller's avatar
First working APT code.  
Leigh B Stoller committed
70 
      </head>
Jonathon Duerig's avatar
Refactored Apt initialization code into 'main.js' module.  
Jonathon Duerig committed
71 
    <body style='display: none'>\n";
Leigh B Stoller's avatar
Google analytics code.  
Leigh B Stoller committed
72
73
74
75 
    
    if ($TBMAINSITE && file_exists("../google-analytics.php")) {
	readfile("../google-analytics.php");
    }
Leigh B Stoller's avatar
First cut a new page to create new profiles, plus backend scripts  
Leigh B Stoller committed
76
Leigh B Stoller's avatar
Google analytics code.  
Leigh B Stoller committed
77 
    echo "
Leigh B Stoller's avatar
First working APT code.  
Leigh B Stoller committed
78 
    <!-- Container for body, needed for sticky footer -->
Leigh B Stoller's avatar
Convert to bootstrap V3.0, remove all UIKIT code.  
Leigh B Stoller committed
79 
    <div id='wrap'>
Leigh B Stoller's avatar
First cut a new page to create new profiles, plus backend scripts  
Leigh B Stoller committed
80
81
82
83
84
85 
         <div class='navbar navbar-static-top' role='navigation'>
           <div class='navbar-inner'>
             <div class='brand'>
                 <img src='aptlogo.png'/>
             </div>
             <ul class='nav navbar-nav navbar-right'>";
Leigh B Stoller's avatar
Checkpoint a slew of changes to the APT code. New signup page,  
Leigh B Stoller committed
86
87 
    if (!$disable_accounts) {
	if ($login_user) {
Leigh B Stoller's avatar
Minor fixups for cookie handling and login/logout buttons.  
Leigh B Stoller committed
88 
	    echo "<li><a id='loginbutton'>$login_uid logged in</a></li>\n";
Leigh B Stoller's avatar
Checkpoint a slew of changes to the APT code. New signup page,  
Leigh B Stoller committed
89
90 
	}
	elseif (!NOLOGINS()) {
Leigh B Stoller's avatar
First cut a new page to create new profiles, plus backend scripts  
Leigh B Stoller committed
91 
	    echo "<li><a class='btn btn-primary navbar-btn'
Leigh B Stoller's avatar
Minor fixups for cookie handling and login/logout buttons.  
Leigh B Stoller committed
92 
                           id='loginbutton'
Leigh B Stoller's avatar
First cut a new page to create new profiles, plus backend scripts  
Leigh B Stoller committed
93
94
95
96
97 
	                   data-toggle='modal'
                           href='#quickvm_login_modal'
                           data-target='#quickvm_login_modal'>
                        Login</a></li>
                  \n";
Leigh B Stoller's avatar
Checkpoint a slew of changes to the APT code. New signup page,  
Leigh B Stoller committed
98
99 
	}
    }
Leigh B Stoller's avatar
First cut a new page to create new profiles, plus backend scripts  
Leigh B Stoller committed
100
101
102
103 
    echo "   </ul>
             <ul class='nav navbar-nav navbar-left'>
                <li><a href='quickvm.php'>Home</a></li>\n";
    if (!$disable_accounts && $login_user) {
Leigh B Stoller's avatar
Minor fixups for cookie handling and login/logout buttons.  
Leigh B Stoller committed
104 
	echo "  <li><a href='#' id='logoutbutton'>Logout</a></li>\n";
Leigh B Stoller's avatar
First cut a new page to create new profiles, plus backend scripts  
Leigh B Stoller committed
105
106
107
108
109 
    }
    echo "   </ul>
           </div>
         </div>\n";
Leigh B Stoller's avatar
Checkpoint a slew of changes to the APT code. New signup page,  
Leigh B Stoller committed
110 
    SpitLoginModal("quickvm_login_modal");
Leigh B Stoller's avatar
First cut a new page to create new profiles, plus backend scripts  
Leigh B Stoller committed
111
112 
    echo " <!-- Page content -->
           <div class='container'>\n";
Leigh B Stoller's avatar
First working APT code.  
Leigh B Stoller committed
113
114
115
116
117 
}

function SPITFOOTER()
{
    echo "</div>
Leigh B Stoller's avatar
Checkpoint a slew of changes to the APT code. New signup page,  
Leigh B Stoller committed
118
119 
      </div>\n";
    echo "
Leigh B Stoller's avatar
First working APT code.  
Leigh B Stoller committed
120 
      <!--- Footer -->
Leigh B Stoller's avatar
Convert to bootstrap V3.0, remove all UIKIT code.  
Leigh B Stoller committed
121
122
123 
      <div>
       <div id='footer'>
        <div class='pull-left'>Powered by
Leigh B Stoller's avatar
First working APT code.  
Leigh B Stoller committed
124 
             <img src='emulab-whiteout.png' id='elabpower'></div>
Leigh B Stoller's avatar
Convert to bootstrap V3.0, remove all UIKIT code.  
Leigh B Stoller committed
125
126 
        <div class='pull-right'>&copy; 2013 The University of Utah</div>
       </div>
Leigh B Stoller's avatar
First working APT code.  
Leigh B Stoller committed
127 
      </div>
Leigh B Stoller's avatar
Convert to bootstrap V3.0, remove all UIKIT code.  
Leigh B Stoller committed
128 
      <!-- Placed at the end of the document so the pages load faster -->
Leigh B Stoller's avatar
First working APT code.  
Leigh B Stoller committed
129
130
131 
     </body></html>\n";
}
Leigh B Stoller's avatar
Checkpoint a slew of changes to the APT code. New signup page,  
Leigh B Stoller committed
132
133
134
135
136 
function SPITUSERERROR($msg)
{
    echo "<b>$msg</b>\n";
}
Leigh B Stoller's avatar
First working APT code.  
Leigh B Stoller committed
137
138
139
140
141
142
143
144
145
146
147
148 
#
# Does not return; page exits.
#
function SPITAJAX_RESPONSE($value)
{
    $results = array(
	'code'  => 0,
	'value' => $value
	);
    echo json_encode($results);
}
Leigh B Stoller's avatar
Checkpoint.  
Leigh B Stoller committed
149 
function SPITAJAX_ERROR($code, $msg)
Leigh B Stoller's avatar
First working APT code.  
Leigh B Stoller committed
150
151 
{
    $results = array(
Leigh B Stoller's avatar
Checkpoint.  
Leigh B Stoller committed
152 
	'code'  => code,
Leigh B Stoller's avatar
First working APT code.  
Leigh B Stoller committed
153
154
155
156
157 
	'value' => $msg
	);
    echo json_encode($results);
}
Leigh B Stoller's avatar
Checkpoint  
Leigh B Stoller committed
158
159
160
161
162 
#
# Spit out an info tooltip.
#
function SpitToolTip($info)
{
Leigh B Stoller's avatar
Convert to bootstrap V3.0, remove all UIKIT code.  
Leigh B Stoller committed
163
164
165
166 
    echo "<a href='#' class='btn btn-xs' data-toggle='popover' ".
	"data-content='$info'> ".
        "<span class='glyphicon glyphicon-question-sign'></span> ".
        "</a>\n";
Leigh B Stoller's avatar
Checkpoint  
Leigh B Stoller committed
167
168 
}
Leigh B Stoller's avatar
Checkpoint a slew of changes to the APT code. New signup page,  
Leigh B Stoller committed
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
206
207
208
209 
#
# Spit out the verify modal. We are not using real password authentication
# like the rest of the Emulab website. Assumed to be inside of a form
# that handles a create button.
#
function SpitVerifyModal($id, $label)
{
    echo "<!-- This is the user verify modal -->
          <div id='$id' class='modal fade'>
            <div class='modal-dialog'>
            <div class='modal-content'>
               <div class='modal-header'>
                <button type='button' class='close' data-dismiss='modal'
                   aria-hidden='true'>&times;</button>
                <h3>Important</h3>
               </div>
               <div class='modal-body'>
                    <p>Check your email for a verification code, and
                       enter it here:</p>
                       <div class='form-group'>
                        <input name='verify' class='form-control'
                               placeholder='Verification code'
                               autofocus type='text' />
                       </div>
                       <div class='form-group'>
                        <button class='btn btn-primary form-control'
                            type='submit' name='create'>
                            $label</button>
                       </div>
               </div>
            </div>
            </div>
         </div>\n";
}

#
# Spit out the login modal. 
#
function SpitLoginModal($id, $embedded = 0)
{
    echo "<!-- This is the login modal -->
Leigh B Stoller's avatar
First cut a new page to create new profiles, plus backend scripts  
Leigh B Stoller committed
210 
          <div id='$id' class='modal fade' role='dialog'>
Leigh B Stoller's avatar
Checkpoint a slew of changes to the APT code. New signup page,  
Leigh B Stoller committed
211
212
213
214
215
216
217
218
219
220
221
222
223
224
225
226
227
228
229
230
231
232
233
234
235
236
237
238
239
240
241
242
243
244
245
246
247
248
249
250
251
252
253
254
255
256
257
258
259 
            <div class='modal-dialog'>
            <div class='modal-content'>
               <div class='modal-header'>
                <button type='button' class='close' data-dismiss='modal'
                   aria-hidden='true'>&times;</button>
                  Please login to your account.
               </div>
               <div class='modal-body'>\n";
    echo "     <div class='row'>
               <div class='col-lg-4 col-lg-offset-4
                           col-md-6 col-md-offset-3
                           col-sm-8 col-sm-offset-2
                           col-xs-12'>\n";
    if (!$embedded) {
	echo "   <form id='quickvm_login_form'
		       role='form'
                       method='post' action='login.php'>";
	echo "<input type=hidden name=refer value=1>\n";
	echo "<div id='quickvm_login_form_error'
			class='align-center'></div>\n";
    }
    echo "             <div class='form-group'>
                        <input name='uid' class='form-control'
                               placeholder='Email or Username'
                               autofocus type='text'>
                       </div>
                       <div class='form-group'>
                        <input name='password' class='form-control'
                               placeholder='Password'
                               type='password'>
                       </div>
                       <div class='form-group'>
                        <button class='btn btn-primary btn-sm'
                            id='quickvm_login_modal_button'
                            class='form-control'
                            type='submit' name='login'>
                            Login</button>
                       </div>\n";
    if (!$embedded) {
	echo "   </form>";
    }
    echo "     </div>
               </div>
               </div>
            </div>
            </div>
         </div>\n";
}
Leigh B Stoller's avatar
First checkin of shellinabox support for APT.  
Leigh B Stoller committed
260
261
262
263
264
265
266
267 
#
# Generate an authentication object to pass to the browser that
# is passed to the web server on boss. This is used to grant
# permission to the user to invoke ssh to a local node using their
# emulab generated (no passphrase) key. This is basically a clone
# of what GateOne does, but that code was a mess. 
#
function SSHAuthObject($uid, $nodeid)
Leigh B Stoller's avatar
First working APT code.  
Leigh B Stoller committed
268 
{
Leigh B Stoller's avatar
First checkin of shellinabox support for APT.  
Leigh B Stoller committed
269
270
271
272 
    global $USERNODE;
	
    $file = "/usr/testbed/etc/sshauth.key";
Leigh B Stoller's avatar
First working APT code.  
Leigh B Stoller committed
273
274
275 
    #
    # We need the secret that is shared with ops.
    #
Leigh B Stoller's avatar
First checkin of shellinabox support for APT.  
Leigh B Stoller committed
276 
    $fp = fopen($file, "r");
Leigh B Stoller's avatar
First working APT code.  
Leigh B Stoller committed
277 
    if (! $fp) {
Leigh B Stoller's avatar
First checkin of shellinabox support for APT.  
Leigh B Stoller committed
278 
	TBERROR("Error opening $file", 0);
Leigh B Stoller's avatar
First working APT code.  
Leigh B Stoller committed
279
280 
	return null;
    }
Leigh B Stoller's avatar
First checkin of shellinabox support for APT.  
Leigh B Stoller committed
281 
    $key = fread($fp, 128);
Leigh B Stoller's avatar
First working APT code.  
Leigh B Stoller committed
282 
    fclose($fp);
Leigh B Stoller's avatar
First checkin of shellinabox support for APT.  
Leigh B Stoller committed
283
284 
    if (!$key) {
	TBERROR("Could not get key from $file", 0);
Leigh B Stoller's avatar
First working APT code.  
Leigh B Stoller committed
285
286 
	return null;
    }
Leigh B Stoller's avatar
First checkin of shellinabox support for APT.  
Leigh B Stoller committed
287
288
289 
    $key   = chop($key);
    $stuff = GENHASH();
    $now   = time();
Leigh B Stoller's avatar
First working APT code.  
Leigh B Stoller committed
290
291
Leigh B Stoller's avatar
First checkin of shellinabox support for APT.  
Leigh B Stoller committed
292
293
294
295
296
297
298
299
300
301
302
303 
    $authobj = array('uid'       => $uid,
		     'stuff'     => $stuff,
		     'nodeid'    => $nodeid,
		     'timestamp' => $now,
		     'baseurl'   => "https://${USERNODE}",
		     'signature_method' => 'HMAC-SHA1',
		     'api_version' => '1.0',
		     'signature' => hash_hmac('sha1',
					      $uid . $stuff . $nodeid . $now,
					      $key),
    );
    return json_encode($authobj);
Leigh B Stoller's avatar
First working APT code.  
Leigh B Stoller committed
304
305
306
307
308
309
310
311
312
313
314
315
316
317
318
319
320
321
322
323
324
325
326
327
328
329
330 
}

#
# This is a little odd; since we are using our local CM to create
# the experiment, we can just ask for the graphic directly.
#
function GetTopoMap($uid, $pid, $eid)
{
    global $TBSUEXEC_PATH;
    $xmlstuff = "";
    
    if ($fp = popen("$TBSUEXEC_PATH nobody nobody webvistopology ".
		    "-x -s $uid $pid $eid", "r")) {

	while (!feof($fp) && connection_status() == 0) {
	    $string = fgets($fp);
	    if ($string) {
		$xmlstuff .= $string;
	    }
	}
	return $xmlstuff;
    }
    else {
	return "";
    }
}
Leigh B Stoller's avatar
Checkpoint a slew of changes to the APT code. New signup page,  
Leigh B Stoller committed
331
332
333
334
335
336
337
338
339
340
341
342
343 
#
# Redirect request to https
#
function RedirectSecure()
{
    global $APTHOST;

    if (!isset($_SERVER["SSL_PROTOCOL"])) {
	header("Location: https://$APTHOST". $_SERVER['REQUEST_URI']);
	exit();
    }
}
Leigh B Stoller's avatar
Minor tweaks.  
Leigh B Stoller committed
344
345
346
347
348
349
350
351
352
353
354 
#
# Redirect to the login page()
#
function RedirectLoginPage()
{
    # HTTP_REFERER will not work reliably when redirecting so
    # pass in the URI for this page as an argument
    header("Location: login.php?referrer=".
	   urlencode($_SERVER['REQUEST_URI']));
}
Leigh B Stoller's avatar
First working APT code.  
Leigh B Stoller committed
355 
?>