File: 1.00.4a/server/web/admin.php (View as HTML)

  1: <?php
  2: /* -------------------------------------------------------------
  3: This file is part of FreeNATS
  4: 
  5: FreeNATS is (C) Copyright 2008 PurplePixie Systems
  6: 
  7: FreeNATS is free software: you can redistribute it and/or modify
  8: it under the terms of the GNU General Public License as published by
  9: the Free Software Foundation, either version 3 of the License, or
 10: (at your option) any later version.
 11: 
 12: FreeNATS is distributed in the hope that it will be useful,
 13: but WITHOUT ANY WARRANTY; without even the implied warranty of
 14: MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
 15: GNU General Public License for more details.
 16: 
 17: You should have received a copy of the GNU General Public License
 18: along with FreeNATS.  If not, see www.gnu.org/licenses
 19: 
 20: For more information see www.purplepixie.org/freenats
 21: -------------------------------------------------------------- */
 22: 
 23: ob_start();
 24: require("include.php");
 25: $NATS->Start();
 26: if (!$NATS_Session->Check($NATS->DB))
 27: 	{
 28: 	header("Location: ./?login_msg=Invalid+Or+Expired+Session");
 29: 	exit();
 30: 	}
 31: if ($NATS_Session->userlevel<9) UL_Error("Admin Interface");
 32: 
 33: if (isset($_REQUEST['action']))
 34: 	{
 35: 	switch($_REQUEST['action'])
 36: 		{
 37: 		case "save_user":
 38: 		$q="UPDATE fnuser SET realname=\"".ss($_REQUEST['realname'])."\",userlevel=".ss($_REQUEST['userlevel']);
 39: 		if ((isset($_REQUEST['pword']))&&($_REQUEST['pword']!="_NOTTHIS_")) $q.=",password=MD5(\"".ss($_REQUEST['pword'])."\")";
 40: 		$q.=" WHERE username=\"".ss($_REQUEST['username'])."\"";
 41: 		$NATS->DB->Query($q);
 42: 		if ($NATS->DB->Affected_Rows()<=0) $amsg="Save User Failed or Nothing Changed";
 43: 		else $amsg="Save User ".$_REQUEST['username']." Succeeded";
 44: 		break;
 45: 		
 46: 		case "create_user":
 47: 		$q="INSERT INTO fnuser(username,password,realname,userlevel) VALUES(\"".ss($_REQUEST['username'])."\",";
 48: 		$q.="MD5(\"".ss($_REQUEST['pword'])."\"),\"".ss($_REQUEST['realname'])."\",".ss($_REQUEST['userlevel']).")";
 49: 		$NATS->DB->Query($q);
 50: 		//echo $q;
 51: 		if ($NATS->DB->Affected_Rows()<=0) $amsg="Create User Failed";
 52: 		else $amsg="User ".$_REQUEST['username']." Created";
 53: 		break;
 54: 		
 55: 		case "delete_user": 
 56: 		/* - disabled for 0.02.44 to allow duplicate deletion
 57: 		if ($_REQUEST['username']=="admin")
 58: 			{
 59: 			$amsg="Can't delete the admin user";
 60: 			break;
 61: 			}
 62: 		*/
 63: 		if (!isset($_REQUEST['confirmed']))
 64: 			{
 65: 			$back=urlencode("admin.php?action=delete_user&mode=users&username=".$_REQUEST['username']."&confirmed=1");
 66: 			$url="confirm.php?action=Delete+User+".$_REQUEST['username']."&back=".$back;
 67: 			header("Location: ".$url);
 68: 			exit();
 69: 			}
 70: 		$q="DELETE FROM fnuser WHERE username=\"".ss($_REQUEST['username'])."\"";
 71: 		$NATS->DB->Query($q);
 72: 		$amsg="User ".$_REQUEST['username']." Deleted";
 73: 		break;
 74: 		
 75: 		case "var_save":
 76: 		if ($_REQUEST['new_var']=="") // delete
 77: 			{
 78: 			$q="DELETE FROM fnconfig WHERE fnc_var=\"".ss($_REQUEST['orig_var'])."\"";
 79: 			}
 80: 		else // update
 81: 			{
 82: 			$q="UPDATE fnconfig SET fnc_var=\"".ss($_REQUEST['new_var'])."\",fnc_val=\"".ss($_REQUEST['new_val'])."\" ";
 83: 			$q.="WHERE fnc_var=\"".ss($_REQUEST['orig_var'])."\"";
 84: 			}
 85: 		$NATS->DB->Query($q);
 86: 		if ($NATS->DB->Affected_Rows()<=0) $amsg="Update/Delete Variable Failed";
 87: 		else $amsg="Updated/Deleted Variable";
 88: 		break;
 89: 		case "var_new":
 90: 		$q="INSERT INTO fnconfig(fnc_var,fnc_val) VALUES(\"".ss($_REQUEST['new_var'])."\",\"".ss($_REQUEST['new_val'])."\")";
 91: 		//echo $q;
 92: 		$NATS->DB->Query($q);
 93: 		if ($NATS->DB->Affected_Rows()<=0) $amsg="Create Variable Failed";
 94: 		else $amsg="Created Variable";
 95: 		break;
 96: 		
 97: 		case "save_aa":
 98: 		$q="UPDATE fnalertaction SET ";
 99: 		$q.="atype=\"".ss($_REQUEST['atype'])."\",";
100: 		$q.="ctrlimit=".ss($_REQUEST['ctrlimit']).",";
101: 		$q.="ctrtoday=".ss($_REQUEST['ctrtoday']).",";
102: 		$q.="aname=\"".ss($_REQUEST['aname'])."\",";
103: 		if (isset($_REQUEST['efrom'])) $q.="efrom=\"".ss($_REQUEST['efrom'])."\",";
104: 		$q.="etolist=\"".ss($_REQUEST['etolist'])."\",";
105: 		if (isset($_REQUEST['esubject'])) $q.="esubject=".ss($_REQUEST['esubject']).",";
106: 		$q.="etype=".ss($_REQUEST['etype']);
107: 		if (isset($_REQUEST['awarnings'])) $q.=",awarnings=".ss($_REQUEST['awarnings']);
108: 		else $q.=",awarnings=0";
109: 		if (isset($_REQUEST['adecrease'])) $q.=",adecrease=".ss($_REQUEST['adecrease']);
110: 		else $q.=",adecrease=0";
111: 		$q.=" WHERE aaid=".ss($_REQUEST['aaid']);
112: 		//echo $q;
113: 		$NATS->DB->Query($q);
114: 		if ($NATS->DB->Affected_Rows()<=0) $amsg="Action Update Failed or Nothing Changed";
115: 		else $amsg="Action Updated";
116: 		break;
117: 		
118: 		case "action_test":
119: 		$q="SELECT mdata FROM fnalertaction WHERE aaid=".ss($_REQUEST['aaid'])." LIMIT 0,1";
120: 		$r=$NATS->DB->Query($q);
121: 		$row=$NATS->DB->Fetch_Array($r);
122: 		$oldm=$row['mdata'];
123: 		$q="UPDATE fnalertaction SET mdata=\"** ACTION TEST **\" WHERE aaid=".ss($_REQUEST['aaid']);
124: 		$NATS->DB->Query($q);
125: 		$NATS->ActionFlush();
126: 		$q="UPDATE fnalertaction SET mdata=\"".ss($oldm)."\" WHERE aaid=".ss($_REQUEST['aaid']);
127: 		$NATS->DB->Query($q);
128: 		$amsg="Alert Action Tested &amp; Flushed";
129: 		break;
130: 		
131: 		case "action_create":
132: 		$q="INSERT INTO fnalertaction(atype) VALUES(\"\")";
133: 		$NATS->DB->Query($q);
134: 		$amsg="Created New Alert Action";
135: 		$_REQUEST['aaid']=$NATS->DB->Insert_Id();
136: 		break;
137: 		
138: 		case "action_delete":
139: 		if (!isset($_REQUEST['confirmed']))
140: 			{
141: 			$back=urlencode("admin.php?mode=alertactions&aaid_del=".$_REQUEST['aaid_del']."&action=action_delete&confirmed=1");
142: 			$url="confirm.php?action=Delete+alert+action&back=".$back;
143: 			header("Location: ".$url);
144: 			exit();
145: 			}
146: 		// otherwise confirmed
147: 		$q="DELETE FROM fnalertaction WHERE aaid=".ss($_REQUEST['aaid_del']);
148: 		$NATS->DB->Query($q);
149: 		if ($NATS->DB->Affected_Rows()>0) $amsg="Alert Action Deleted";
150: 		else $amsg="Alert Action Delete Failed";
151: 		$q="DELETE FROM fnnalink WHERE aaid=".ss($_REQUEST['aaid_del']);
152: 		$NATS->DB->Query($q);
153: 		break;
154: 		
155: 		case "optimize":
156: 		$q="OPTIMIZE TABLE ".ss($_REQUEST['table']);
157: 		$NATS->DB->Query($q);
158: 		$msg="Optimised Table ".$_REQUEST['table'];
159: 		break;
160: 		
161: 		}
162: 	}
163: 
164: ob_end_flush();
165: Screen_Header("Administration Interface",1,1,"","main","admin");
166: 
167: if (isset($_REQUEST['mode'])) $mode=$_REQUEST['mode'];
168: else $mode="";
169: 
170: if (isset($_REQUEST['message'])) echo "<br><b>".$_REQUEST['message']."</b><br>";
171: if (isset($amsg)) echo "<br><b>".$amsg."</b><br>";
172: 
173: echo "<br>";
174: if (isset($_REQUEST['updatecheck']))
175: 	{
176: 	// check for updates
177: 	$dq="?CheckVersion=".$NATS->Version."&JSMode=1";
178: 	$dl="http://www.purplepixie.org/freenats/download.php";
179: 	$du=$dl.$dq;
180: 	/* old method
181: 	$cp=@fopen($du,"r");
182: 	if ($cp>0)
183: 		{
184: 		$cs=@fgets($cp,128);
185: 		@fclose($cp);
186: 		if ($cs=="0") echo "System Up to Date<br>";
187: 		else echo "Update Available: <a href=http://www.purplepixie.org/freenats>".$cs."</a><br>";
188: 		}
189: 	else echo "Error Checking for Updates<br>";
190: 	*/
191: 	echo "Checking Version: ";
192: 	echo "<script type=\"text/javascript\" src=\"".$du."\"></script>\n";
193: 	echo "<br><br>";
194: 	}
195: else if ($mode=="")
196: 	{
197: 	echo "<a href=admin.php?updatecheck=1><b>Check for FreeNATS Updates</b></a><br><br>";
198: 	}
199: 	
200: function tul($l)
201: {
202: if ($l>9) return "Administrator";
203: if ($l>4) return "Power User";
204: if ($l>0) return "Normal User";
205: return "Disabled";
206: }
207: 
208: function aat_etype($type)
209: {
210: switch ($type)
211: 	{
212: 	case 0: return "Short";
213: 	case 1: return "Long";
214: 	default: return "Unknown";
215: 	}
216: }
217: 
218: function aat_esub($type)
219: {
220: switch ($type)
221: 	{
222: 	case 0: return "Blank";
223: 	case 1: return "Short";
224: 	case 2: return "Long";
225: 	default: return "Unknown";
226: 	}
227: }
228: 
229: function aat_atype($type)
230: {
231: switch($type)
232: 	{
233: 	case "": case "Disabled": return "Disabled";
234: 	case "email": return "EMail";
235: 	case "url": return "URL";
236: 	case "mqueue": return "Message Queue";
237: 	default: return "Unknown (".$type.")";
238: 	}
239: }
240: 
241: if ($mode=="users")
242: {
243: echo "<b class=\"subtitle\">Users</b><br><br>";
244: 
245: 
246: 
247: 
248: $q="SELECT username,realname,userlevel FROM fnuser";
249: $r=$NATS->DB->Query($q);
250: echo "<table border=0>";
251: echo "<tr><td><b>Username&nbsp;</b></td>";
252: echo "<td><b>Real Name</b></td><td><b>User Level</b></td><td><b>Password</b></td><td><b>Options</b></td></tr>";
253: while ($row=$NATS->DB->Fetch_Array($r))
254: 	{
255: 	echo "<form action=admin.php method=post>";
256: 	echo "<input type=hidden name=action value=save_user>";
257: 	echo "<input type=hidden name=mode value=users>";
258: 	echo "<input type=hidden name=username value=\"".$row['username']."\">";
259: 	echo "<tr><td>".$row['username']."</td>";
260: 	echo "<td><input type=text name=realname value=\"".$row['realname']."\" size=20 maxlength=120></td>";
261: 	echo "<td><select name=userlevel>";
262: 	echo "<option value=".$row['userlevel'].">".tul($row['userlevel'])."</option>";
263: 	echo "<option value=0>".tul(0)."</option>";
264: 	echo "<option value=1>".tul(1)."</option>";
265: 	echo "<option value=5>".tul(5)."</option>";
266: 	echo "<option value=10>".tul(10)."</option>";
267: 	echo "</select>";
268: 	echo "</td>";
269: 	echo "<td><input type=password name=pword value=\"_NOTTHIS_\" size=10 maxlength=128></td>";
270: 	echo "<td><input type=submit value=\"Save\"> <a href=admin.php?action=delete_user&username=".$row['username'].">Delete</a></td>";
271: 	echo "</tr>";
272: 	echo "</form>";
273: 	}
274: echo "<form action=admin.php method=post>";
275: echo "<input type=hidden name=action value=create_user>";
276: echo "<input type=hidden name=mode value=users>";
277: echo "<tr><td><input type=text name=username size=20 maxlength=60></td>";
278: echo "<td><input type=text name=realname size=20 maxlength=120></td>";
279: echo "<td><select name=userlevel>";
280: echo "<option value=1>".tul(1)."</option>";
281: echo "<option value=0>".tul(0)."</option>";
282: echo "<option value=5>".tul(5)."</option>";
283: echo "<option value=10>".tul(10)."</option>";
284: echo "</select></td>";
285: echo "<td><input type=password name=pword size=10 maxlength=60></td>";
286: echo "<td><input type=submit value=\"Create User\"></td>";
287: echo "</tr></form>";
288: echo "</table><br>";
289: echo "<br>";
290: $NATS->DB->Free($r);
291: }
292: else if ($mode=="nodetestsessions")
293: {
294: echo "<b class=\"subtitle\">Test Sessions for ".$_REQUEST['nodeid']."</b><br><br>";
295: echo "<b>Running Sessions for ".$_REQUEST['nodeid']."</b><br>";
296: $q="SELECT * FROM fntestrun WHERE fnode=\"".ss($_REQUEST['nodeid'])."\" AND finishx=0 ORDER BY trid DESC";
297: $r=$NATS->DB->Query($q);
298: if ($NATS->DB->Num_Rows($r)==0) echo "<i>No running test sessions</i><br>";
299: echo "<table border=0>";
300: while ($row=$NATS->DB->Fetch_Array($r))
301: 	{
302: 	echo "<tr><td><a href=testrun.php?trid=".$row['trid'].">run/".$row['trid']."</a></td>";
303: 	echo "<td>".nicedt($row['startx'])." - ";
304: 	if ($row['finishx']>0) echo nicedt($row['finishx']);
305: 	else echo "Still Running";
306: 	echo " (<a href=log.php?f_entry=Tester+".$row['trid'].">System Logs</a>)";
307: 	echo "</td></tr>";
308: 	}
309: echo "</table>";
310: $NATS->DB->Free($r);
311: echo "<br>";
312: echo "<br>";
313: 
314: echo "<b>Last 100 Previous Sessions for ".$_REQUEST['nodeid']."</b><br>";
315: $q="SELECT * FROM fntestrun WHERE fnode=\"".ss($_REQUEST['nodeid'])."\" ORDER BY trid DESC LIMIT 0,100";
316: $r=$NATS->DB->Query($q);
317: if ($NATS->DB->Num_Rows($r)==0) echo "<i>No previous test sessions</i><br>";
318: echo "<table border=0>";
319: while ($row=$NATS->DB->Fetch_Array($r))
320: 	{
321: 	echo "<tr><td><a href=testrun.php?trid=".$row['trid'].">run/".$row['trid']."</a></td>";
322: 	echo "<td>".nicedt($row['startx'])." - ";
323: 	if ($row['finishx']>0) echo nicedt($row['finishx']);
324: 	else echo "Still Running";
325: 	echo " (<a href=log.php?f_entry=Tester+".$row['trid'].">System Logs</a>)";
326: 	echo "</td></tr>";
327: 	}
328: echo "</table>";
329: $NATS->DB->Free($r);
330: echo "<br>";
331: echo "<br>";
332: 
333: }
334: else if ($mode=="testsessions")
335: {
336: echo "<b class=\"subtitle\">Running Test Sessions</b><br><br>";
337: $q="SELECT * FROM fntestrun WHERE finishx=0 ORDER BY trid DESC";
338: $r=$NATS->DB->Query($q);
339: if ($NATS->DB->Num_Rows($r)==0) echo "<i>No running test sessions</i><br>";
340: echo "<table border=0>";
341: while ($row=$NATS->DB->Fetch_Array($r))
342: 	{
343: 	echo "<tr><td><a href=testrun.php?trid=".$row['trid'].">run/".$row['trid']."</a></td>";
344: 	echo "<td>".nicedt($row['startx'])." - ";
345: 	if ($row['finishx']>0) echo nicedt($row['finishx']);
346: 	else echo "Still Running";
347: 	echo " (<a href=log.php?f_entry=Tester+".$row['trid'].">System Logs</a>)";
348: 	echo "</td></tr>";
349: 	}
350: echo "</table>";
351: $NATS->DB->Free($r);
352: echo "<br>";
353: echo "<form action=admin.php method=post>";
354: echo "<input type=hidden name=mode value=nodetestsessions>";
355: echo "<b>Last 100 Test Sessions for </b>";
356: $q="SELECT nodeid,nodename FROM fnnode ORDER BY weight ASC";
357: $r=$NATS->DB->Query($q);
358: echo "<select name=nodeid>";
359: while ($row=$NATS->DB->Fetch_Array($r))
360: 	{
361: 	echo "<option value=".$row['nodeid'].">".$row['nodename']." (".$row['nodeid'].")</option>";
362: 	}
363: echo "</select> <input type=submit value=Go></form><br>";
364: }
365: else if ($mode=="alertactions")
366: {
367: echo "<b class=\"subtitle\">Alert Actions</b><br><br>";
368: 
369: if (isset($_REQUEST['aaid']))
370: 	{ // view/edit aaid
371: 	$q="SELECT * FROM fnalertaction WHERE aaid=".ss($_REQUEST['aaid']);
372: 	$r=$NATS->DB->Query($q);
373: 	if (!$row=$NATS->DB->Fetch_Array($r))
374: 		{
375: 		echo "<b>Error Fetching AAID</b><br><br>";
376: 		Screen_Footer();
377: 		exit();
378: 		}
379: 	echo "<table border=0>";
380: 	echo "<form action=admin.php method=post>";
381: 	echo "<input type=hidden name=action value=save_aa>";
382: 	echo "<input type=hidden name=mode value=alertactions>";
383: 	echo "<input type=hidden name=aaid value=".$_REQUEST['aaid'].">";
384: 	echo "<tr><td>ID : </td><td>action/".$_REQUEST['aaid']."</td></tr>";
385: 	
386: 	echo "<tr><td>Action Name : </td>";
387: 	echo "<td>";
388: 	echo "<input type=text name=aname size=30 maxlength=120 value=\"".$row['aname']."\">";
389: 	echo "</td></tr>";
390: 	
391: 	echo "<tr><td>Type : </td><td>";
392: 	echo "<select name=atype>";
393: 	echo "<option value=".$row['atype'].">".aat_atype($row['atype'])."</option>";
394: 	echo "<option value=Disabled>Disabled</option>";
395: 	echo "<option value=email>EMail</option>";
396: 	echo "<option value=url>URL</option>";
397: 	echo "<option value=mqueue>Message Queue</option>";
398: 	echo "</select>";
399: 	echo "</td></tr>";
400: 	
401: 	echo "<tr><td>Warnings : </td>";
402: 	if ($row['awarnings']==1) $s=" checked";
403: 	else $s="";
404: 	echo "<td><input type=checkbox name=awarnings value=1".$s."> ".hlink("AAction:Warnings")."</td></tr>";
405: 	
406: 	echo "<tr><td>Decreases : </td>";
407: 	if ($row['adecrease']==1) $s=" checked";
408: 	else $s="";
409: 	echo "<td><input type=checkbox name=adecrease value=1".$s."> ".hlink("AAction:Decreases")."</td></tr>";
410: 	
411: 	echo "<tr><td>Action Limit : </td>";
412: 	echo "<td>";
413: 	echo "<input type=text name=ctrlimit size=3 maxlength=6 value=\"".$row['ctrlimit']."\"> ";
414: 	echo hlink("AAction:Limit");
415: 	echo "</td></tr>";
416: 	
417: 	echo "<tr><td>Action Counter : </td>";
418: 	echo "<td>";
419: 	echo "<input type=text name=ctrtoday size=3 maxlength=6 value=\"".$row['ctrtoday']."\"> ";
420: 	echo hlink("AAction:Counter");
421: 	echo " (for ";
422: 	if ($row['ctrdate']=="") echo "<i>unknown</i>";
423: 	else echo substr($row['ctrdate'],6,2)."/".substr($row['ctrdate'],4,2)."/".substr($row['ctrdate'],0,4);
424: 	echo ")";
425: 	echo "</td></tr>";
426: 	
427: if ($row['atype']!="url")
428: 	{
429: 	
430: 	echo "<tr><td>Email From : </td>";
431: 	echo "<td>";
432: 	echo "<input type=text name=efrom size=30 maxlength=120 value=\"".$row['efrom']."\">";
433: 	echo "</td></tr>";
434: 	
435: 	echo "<tr><td>Email Subject : </td><td>";
436: 	echo "<select name=esubject>";
437: 	echo "<option value=".$row['esubject'].">".aat_esub($row['esubject'])."</option>";
438: 	echo "<option value=0>Blank</option>";
439: 	echo "<option value=1>Short</option>";
440: 	echo "<option value=2>Long</option>";
441: 	echo "</select>";
442: 	echo "</td></tr>";
443: 	
444: 	}
445: 	
446: 	echo "<tr><td>Msg Type : </td><td>";
447: 	echo "<select name=etype>";
448: 	echo "<option value=".$row['etype'].">".aat_etype($row['etype'])."</option>";
449: 	echo "<option value=0>Short</option>";
450: 	echo "<option value=1>Long</option>";
451: 	echo "</select>";
452: 	echo "</td></tr>";
453: 	
454: 	echo "<tr><td valign=top>Email To<br>or URL : </td><td>";
455: 	echo "<textarea name=etolist cols=40 rows=6>".$row['etolist']."</textarea>";
456: 	echo "</td></tr>";
457: 	
458: 	echo "<tr><td colspan=2><input type=submit value=\"Update Action\"> &nbsp; <a href=admin.php>Cancel Update</a> | ";
459: 	echo "<a href=admin.php?aaid=".$_REQUEST['aaid']."&mode=alertactions&action=action_test>Test Action</a> | ";
460: 	echo "<a href=admin.php?aaid_del=".$_REQUEST['aaid']."&mode=alertactions&action=action_delete>Delete Action</a>";
461: 	echo "</td></tr>";
462: 	
463: 	echo "</form></table><br><br>";
464: 	$NATS->DB->Free($r);
465: 	}
466: 
467: $q="SELECT aaid,atype,aname FROM fnalertaction";
468: $r=$NATS->DB->Query($q);
469: echo "<table class=\"nicetable\"><tr>";
470: echo "<td><b>ID</b></td><td><b>Action Name</b></td><td><b>Action Type</b></td></tr>";
471: while ($row=$NATS->DB->Fetch_Array($r))
472: 	{
473: 	echo "<tr><td>";
474: 	echo "<a href=admin.php?mode=alertactions&aaid=".$row['aaid'].">".$row['aaid']."</a></td>";
475: 	echo "<td><a href=admin.php?mode=alertactions&aaid=".$row['aaid'].">".$row['aname']."</a></td><td>";
476: 	echo aat_atype($row['atype']);
477: 	echo "</td></tr>";
478: 	}
479: echo "</table>";
480: 
481: echo "<br><a href=admin.php?mode=alertactions&action=action_create><b>Create New Alert Action</b></a><br>";
482: echo "<br><br>";
483: }
484: else if ($mode=="logs")
485: {
486: echo "<b class=\"subtitle\">System Logs</b><br><br>";
487: echo "<a href=log.php>System Event Log</a><br><br>";
488: 
489: echo "<br><br>";
490: }
491: else if ($mode=="status")
492: {
493: // system healthcheck
494: 
495: // usage data
496: //$q="SELECT COUNT(fnnode.nodeid),COUNT(fngroup.groupid),COUNT( FROM fnnode,fngroup";
497: $q="SHOW TABLE STATUS LIKE \"fn%\"";
498: $r=$NATS->DB->Query($q);
499: 
500: echo "<b class=\"maintitle\">FreeNATS System Status</b><br><br>";
501: 
502: $tinfo=array();
503: 
504: echo "<b class=\"subtitle\">Table Sizes</b><br><br>";
505: 
506: echo "<table class=\"nicetable\">";
507: echo "<tr><td><b>Table Name</b></td><td><b>Size (Rows)</b></td><td><b>Size (kb)</b></td><td><b>Other Information</b></td></tr>";
508: while ($row=$NATS->DB->Fetch_Array($r))
509: 	{
510: 	echo "<tr><td>".$row['Name']."</td><td>".$row['Rows']."</td>";
511: 	echo "<td>".round($row['Data_length']/1024,0)."</td><td>";
512: 	if (isset($tinfo[$row['Name']])) echo $tinfo[$row['Name']];
513: 	else echo "&nbsp;";
514: 	if ($row['Data_free']>0)
515: 		{
516: 		echo " [".round($row['Data_free']/1024,0)."kb Free - <a href=admin.php?mode=status&action=optimize&table=".$row['Name'].">Optimise</a>]";
517: 		}
518: 	echo "</td></tr>";
519: 	}
520: echo "</table>";
521: $NATS->DB->Free($r);
522: echo "<br><br>";
523: 
524: echo "<b class=\"subtitle\">Test Sessions</b><br><br>";
525: $q="SELECT * FROM fntestrun WHERE finishx=0";
526: $r=$NATS->DB->Query($q);
527: echo "<b>".$NATS->DB->Num_Rows($r)." Open/Running Test Sessions</b><br><br>";
528: if ($NATS->DB->Num_Rows($r)>0)
529: 	{
530: 	echo "<table class=\"nicetable\">";
531: 	echo "<tr><td><b>ID</b></td><td><b>Node</b></td><td><b>Started</b></td><td><b>Notes</b></td></tr>";
532: 	$nowx=time();
533: 	$fifteenx=$nowx-(15*60);
534: 	$hourx=$nowx-(60*60);
535: 	while ($row=$NATS->DB->Fetch_Array($r))
536: 		{
537: 		echo "<tr><td><a href=testrun.php?trid=".$row['trid'].">";
538: 		echo $row['trid']."</a></td>";
539: 		echo "<td><a href=node.php?nodeid=".$row['fnode']."</a></td>";
540: 		echo "<td>".nicedt($row['startx'])." - ".dtago($row['startx'])."</td>";
541: 		echo "<td>";
542: 		if ($row['startx']<$hourx) echo "Error: Over an hour old";
543: 		else if($row['startx']<$fifteenx) echo "Warning: Over fifteen minutes old";
544: 		else echo "&nbsp;";
545: 		echo "</td></tr>";
546: 		}
547: 	echo "</table>";
548: 	}
549: $NATS->DB->Free($r);
550: echo "<br><br>";
551: 
552: 
553: echo "Please note this merely displays FreeNATS software status - not<br>the status of ";
554: echo "the underlying Virtual Machine (if applicable).<br><br> You should monitor disk space and ";
555: echo "performance for the VM via<br>the relevant system (such as the rPath interface).<br><br>";
556: 	
557: }
558: else if ($mode=="variables")
559: {
560: echo "<b class=\"subtitle\">Variables</b> ".hlink("Variable")."<br><br>";
561: $q="SELECT * FROM fnconfig ORDER BY fnc_var ASC";
562: $r=$NATS->DB->Query($q);
563: echo "<table border=0>";
564: while ($row=$NATS->DB->Fetch_Array($r))
565: 	{
566: 	echo "<form action=admin.php method=post>";
567: 	echo "<input type=hidden name=action value=var_save>";
568: 	echo "<input type=hidden name=mode value=variables>";
569: 	echo "<input type=hidden name=orig_var value=\"".$row['fnc_var']."\">";
570: 	echo "<input type=hidden name=orig_val value=\"".$row['fnc_val']."\">";
571: 	echo "<tr><td><input type=text size=20 maxlength=60 name=new_var value=\"".$row['fnc_var']."\"> ";
572: 	echo "</td>";
573: 	echo "<td>=</td>";
574: 	echo "<td><input type=text size=20 maxlength=60 name=new_val value=\"".$row['fnc_val']."\"></td>";
575: 	echo "<td><input type=submit value=\"Save\"> ";
576: 	echo hlink("Var:".$row['fnc_var']);
577: 	echo "</td>";
578: 	echo "</tr>";
579: 	echo "</form>";
580: 	}
581: echo "<form action=admin.php method=post>";
582: echo "<input type=hidden name=action value=var_new>";
583: echo "<input type=hidden name=mode value=variables>";
584: echo "<tr><td><input type=text size=20 maxlength=60 name=new_var value=\"\"></td>";
585: echo "<td>=</td>";
586: echo "<td><input type=text size=20 maxlength=60 name=new_val value=\"\"></td>";
587: echo "<td><input type=submit value=\"Create\"></td>";
588: echo "</tr>";
589: echo "</form>";
590: echo "</table>";
591: }
592: else // catch-all
593: {
594: echo "<img src=images/options/user.png style=\"vertical-align: bottom;\">&nbsp;&nbsp;";
595: echo "<a href=admin.php?mode=users>User Administration</a><br><br>";
596: echo "<img src=images/options/application.png style=\"vertical-align: bottom;\">&nbsp;&nbsp;";
597: echo "<a href=log.php>System Event Log</a><br><br>";
598: echo "<img src=images/options/letter_open.png style=\"vertical-align: bottom;\">&nbsp;&nbsp;";
599: echo "<a href=admin.php?mode=alertactions>Alert Actions</a><br><br>";
600: echo "<img src=images/options/action_add.png style=\"vertical-align: bottom;\">&nbsp;&nbsp;";
601: echo "<a href=admin.php?mode=variables>System Variables</a><br><br>";
602: echo "<img src=images/options/file.png style=\"vertical-align: bottom;\">&nbsp;&nbsp;";
603: echo "<a href=admin.php?mode=testsessions>Test Sessions</a><br><br>";
604: echo "<img src=images/options/time.png style=\"vertical-align: bottom;\">&nbsp;&nbsp;";
605: echo "<a href=schedule.php>Test Schedules</a><br><br>";
606: echo "<img src=images/options/folder_open.png style=\"vertical-align: bottom;\">&nbsp;&nbsp;";
607: echo "<a href=filemanager.php>File Manager</a><br><br>";
608: 
609: if ($NATS->Cfg->Get("site.enable.adminsql",0)==1)
610: 	{
611: 	echo "<img src=images/options/folder_files.png style=\"vertical-align: bottom;\">&nbsp;&nbsp;";
612: 	echo "<a href=admin.sql.php>SQL Console</a><br><br>";
613: 	}
614: echo "<img src=images/options/search.png style=\"vertical-align: bottom;\">&nbsp;&nbsp;";
615: echo "<a href=admin.dns.php>DNS Query Console</a><br><br>";
616: echo "<img src=images/options/reply.png style=\"vertical-align: bottom;\">&nbsp;&nbsp;";
617: echo "<a href=admin.php?mode=status>System Status Report</a><br><br>";
618: }
619: 
620: if ($mode!="") echo "<a href=admin.php>Back to Main Admin Menu</a><br><br>";
621: ?>
622: 
623: 
624: <?php
625: Screen_Footer();
626: ?>
627: