Skip to content

GitLab

emulab-devel
emulab-devel
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 
?>