currentusage.php3 6.98 KB
Newer Older
1 2 3
<?php
#
# EMULAB-COPYRIGHT
4
# Copyright (c) 2000-2007 University of Utah and the Flux Group.
5 6 7
# All rights reserved.
#
require("defs.php3");
8 9 10 11
#
# This script uses Sajax ... BEWARE!
#
require("Sajax.php");
12

Leigh B. Stoller's avatar
Leigh B. Stoller committed
13 14
#
# Get current user.
15 16
#
$this_user = CheckLogin($check_status);
17

Leigh B. Stoller's avatar
Leigh B. Stoller committed
18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52
#
# For anonymous users, show experiment stats.
#
function SHOWSTATS()
{
    $query_result =
	DBQueryFatal("select count(*) from experiments as e " .
	     "left join experiment_stats as s on s.exptidx=e.idx " .
	     "left join experiment_resources as rs on rs.idx=s.rsrcidx ".
	     "where state='active' and rs.pnodes>0 and " .
		     "      e.pid!='emulab-ops' and ".
		     "      not (e.pid='ron' and e.eid='all')");
    
    if (mysql_num_rows($query_result) != 1) {
	$active_expts = "ERR";
    }
    else {
	$row = mysql_fetch_array($query_result);
	$active_expts = $row[0];
    }

    $query_result =
	DBQueryFatal("select count(*) from experiments where ".
		     "state='swapped' and pid!='emulab-ops' and ".
		     "pid!='testbed'");
    if (mysql_num_rows($query_result) != 1) {
	$swapped_expts = "ERR";
    }
    else {
	$row = mysql_fetch_array($query_result);
	$swapped_expts = $row[0];
    }

    $query_result =
	DBQueryFatal("select count(*) from experiments where ".
53
		     "state='active' and swap_requests > 0 and idle_ignore=0 ".
Leigh B. Stoller's avatar
Leigh B. Stoller committed
54 55 56 57 58 59 60 61 62
		     "and pid!='emulab-ops' and pid!='testbed'");
    if (mysql_num_rows($query_result) != 1) {
	$idle_expts = "ERR";
    }
    else {
	$row = mysql_fetch_array($query_result);
	$idle_expts = $row[0];
    }
    $freepcs = TBFreePCs();
63

64 65 66 67 68 69 70 71 72 73 74 75 76
    $output = "<table valign=top align=center width=100% height=100% border=1>
                <tr><th nowrap colspan=2 class='usagetitle'>
	            Current Experiments</th></tr>
                <tr><td class=menuoptusage align=right>$active_expts</td>
                    <td align=left class=menuoptusage>
                        <a target=_parent href=explist.php3#active>Active</a>
                    </td></tr>
                <tr><td align=right class=menuoptusage>$idle_expts</td>
                    <td align=left  class=menuoptusage>Idle</td></tr>
                <tr><td align=right class=menuoptusage>$swapped_expts</td>
                    <td align=left  class=menuoptusage>
                        <a target=_parent href=explist.php3#swapped>Swapped</a>
                    </td></tr>
77 78 79 80
                <tr><td align=right class=menuoptusage>
                        <font size=+1>$freepcs</font></td>
                    <td align=left  class=menuoptusage>
                        <font size=+1>Free PCs</font></td>
81 82 83
                </tr>
               </table>\n";
    return $output;
84 85
}

Leigh B. Stoller's avatar
Leigh B. Stoller committed
86 87 88 89 90
#
# Logged in users, show free node counts.
#
function SHOWFREENODES()
{
91 92
    $freecounts = array();
    
93 94 95 96 97 98 99 100 101
    # Get typelist and set freecounts to zero.
    $query_result =
	DBQueryFatal("select n.type from nodes as n ".
		     "left join node_types as nt on n.type=nt.type ".
		     "where (role='testnode') and class='pc' ");
    while ($row = mysql_fetch_array($query_result)) {
	$type              = $row[0];
	$freecounts[$type] = 0;
    }
102 103 104 105 106

    if (!count($freecounts)) {
	return "";
    }
	
Leigh B. Stoller's avatar
Leigh B. Stoller committed
107 108 109 110 111 112
    # Get free totals by type.
    $query_result =
	DBQueryFatal("select n.eventstate,n.type,count(*) from nodes as n ".
		     "left join node_types as nt on n.type=nt.type ".
		     "left join reserved as r on r.node_id=n.node_id ".
		     "where (role='testnode') and class='pc' ".
113
		     "      and r.pid is null and n.reserved_pid is null ".
Leigh B. Stoller's avatar
Leigh B. Stoller committed
114 115 116 117 118 119 120 121 122 123 124 125 126
		     "group BY n.eventstate,n.type");

    while ($row = mysql_fetch_array($query_result)) {
	$type  = $row[1];
	$count = $row[2];
        # XXX Yeah, I'm a doofus and can't figure out how to do this in SQL.
	if (($row[0] == TBDB_NODESTATE_ISUP) ||
	    ($row[0] == TBDB_NODESTATE_PXEWAIT) ||
	    ($row[0] == TBDB_NODESTATE_ALWAYSUP) ||
	    ($row[0] == TBDB_NODESTATE_POWEROFF)) {
	    $freecounts[$type] = $count;
	}
    }
127
    $output = "";
128

129 130 131
    $freepcs   = TBFreePCs();
    $reloading = TBReloadingPCs();

132
    $output .= "<table valign=top align=center width=100% height=100% border=1>
133
                 <tr><td nowrap colspan=6 class=menuoptusage align=center>
134
 	           <font size=+1>$freepcs Free PCs</font></td></tr>\n";
Leigh B. Stoller's avatar
Leigh B. Stoller committed
135

136 137
    $pccount = count($freecounts);
    $newrow  = 1;
138 139 140 141
    $maxcols = (int) ($pccount / 3);
    if ($pccount % 3)
	$maxcols++;
    $cols    = 0;
Leigh B. Stoller's avatar
Leigh B. Stoller committed
142 143 144
    foreach($freecounts as $key => $value) {
	$freecount = $freecounts[$key];

145
	if ($newrow) {
146
	    $output .= "<tr>\n";
147
	}
Leigh B. Stoller's avatar
Leigh B. Stoller committed
148
	
149 150 151 152
	$output .= "<td class=menuoptusage align=right>
                     <a target=_parent href=shownodetype.php3?node_type=$key>
                        $key</a></td>
                    <td class=menuoptusage align=left>${freecount}</td>\n";
Leigh B. Stoller's avatar
Leigh B. Stoller committed
153

154 155 156 157 158 159 160 161
	$cols++;
	$newrow = 0;
	if ($cols == $maxcols || $pccount <= 3) {
	    $cols   = 0;
	    $newrow = 1;
	}

	if ($newrow) {
162
	    $output .= "</tr>\n";
Leigh B. Stoller's avatar
Leigh B. Stoller committed
163 164
	}
    }
165 166 167 168 169 170 171
    if (! $newrow) {
        # Fill out to $maxcols
	for ($i = $cols + 1; $i <= $maxcols; $i++) {
	    $output .= "<td class=menuoptusage>&nbsp</td>";
	    $output .= "<td class=menuoptusage>&nbsp</td>";
	}
	$output .= "</tr>\n";
Leigh B. Stoller's avatar
Leigh B. Stoller committed
172
    }
173 174 175
    # Fill in up to 3 rows.
    if ($pccount < 3) {
	for ($i = $pccount + 1; $i <= 3; $i++) {
176 177
	    $output .= "<tr><td class=menuoptusage>&nbsp</td>
                            <td class=menuoptusage>&nbsp</td></tr>\n";
178 179
	}
    }
180

181
    $output .= "<tr>
182 183
                 <td class=menuoptusage colspan=6 align=center>
                    <font size=+1>$reloading PCs reloading</font></td>
184 185 186 187 188 189 190 191 192
               </tr>\n";
    $output .= "</table>";
    return $output;
}

#
# This is for the Sajax request.
#
function FreeNodeHtml() {
193
    global $this_user;
194

195
    if ($this_user) {
196 197 198 199 200
	return SHOWFREENODES();
    }
    else {
	return SHOWSTATS();
    }
Leigh B. Stoller's avatar
Leigh B. Stoller committed
201
}
202 203 204 205 206 207 208 209 210 211 212

#
# We need all errors to come back this function so that the Sajax request
# fails and the timer is terminated. See below.
# 
function handle_error($message, $death)
{
    echo "failed:$message";
    # Always exit; ignore $death.
    exit(1);
}
Leigh B. Stoller's avatar
Leigh B. Stoller committed
213 214
     
#
215
# If user is anonymous, show experiment stats, otherwise useful info.
Leigh B. Stoller's avatar
Leigh B. Stoller committed
216
# 
217
if ($this_user) {
218 219
    sajax_init();
    sajax_export("FreeNodeHtml");
220 221 222 223 224 225 226 227

    # If this call is to client request function, then turn off
    # interactive mode; errors will cause the Sajax request to fail
    # and the timer to stop.
    if (sajax_client_request()) {
	$session_interactive  = 0;
	$session_errorhandler = 'handle_error';
    }
228 229 230 231 232 233 234 235 236
    sajax_handle_client_request();

    PAGEBEGINNING("Free Node Summary", 1, 1);
    echo "<script>\n";
    sajax_show_javascript();

    ?>
    function FreeNodeHtml_CB(stuff) {
	getObjbyName('usage').innerHTML = stuff;
237
	setTimeout('GetFreeNodeHtml()', 60000);
238 239 240
    }
    function GetFreeNodeHtml() {
	x_FreeNodeHtml(FreeNodeHtml_CB);
241
    }
242 243
    setTimeout('GetFreeNodeHtml()', 60000);
    
244 245 246 247 248 249 250
    <?php
    echo "</script>\n";
	  
    echo "<div id=usage>\n";
    echo   SHOWFREENODES();
    echo "</div>\n";
    echo "</body></html>";
Leigh B. Stoller's avatar
Leigh B. Stoller committed
251 252
}
else {
253 254 255 256 257
    PAGEBEGINNING("Current Usage", 1, 1);
    echo "<div id=usage>\n";
    echo   SHOWSTATS();
    echo "</div>\n";
    echo "</body></html>";
258
}