<?php
/*
 * lcdproc_client.php
 *
 * part of pfSense (https://www.pfsense.org/)
 * Copyright (c) 2016-2023 Rubicon Communications, LLC (Netgate)
 * Copyright (c) 2016 Treer
 * Copyright (c) 2011 Michele Di Maria
 * Copyright (c) 2007-2009 Seth Mos <seth.mos@dds.nl>
 * All rights reserved.
 *
 * Licensed under the Apache License, Version 2.0 (the "License");
 * you may not use this file except in compliance with the License.
 * You may obtain a copy of the License at
 *
 * http://www.apache.org/licenses/LICENSE-2.0
 *
 * Unless required by applicable law or agreed to in writing, software
 * distributed under the License is distributed on an "AS IS" BASIS,
 * WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
 * See the License for the specific language governing permissions and
 * limitations under the License.
 */
require_once("config.inc");
require_once("functions.inc");
require_once("interfaces.inc");
require_once("pfsense-utils.inc");
require_once("pkg-utils.inc");
require_once("ipsec.inc");
require_once("includes/functions.inc.php");
require_once("/usr/local/pkg/lcdproc.inc");
require_once("system.inc");

/* Calculates non-idle CPU time and returns as a percentage */
function lcdproc_cpu_usage() {
	$duration = 250000;
	$diff = array('user', 'nice', 'sys', 'intr', 'idle');
	$cpuTicks = array_combine($diff, explode(" ", get_single_sysctl("kern.cp_time")));
	usleep($duration);
	$cpuTicks2 = array_combine($diff, explode(" ", get_single_sysctl("kern.cp_time")));

	$totalStart = array_sum($cpuTicks);
	$totalEnd = array_sum($cpuTicks2);

	// Something wrapped ?!?!
	if ($totalEnd <= $totalStart) {
		return 0;
	}

	// Calculate total cycles used
	$totalUsed = ($totalEnd - $totalStart) - ($cpuTicks2['idle'] - $cpuTicks['idle']);

	// Calculate the percentage used
	$cpuUsage = floor(100 * ($totalUsed / ($totalEnd - $totalStart)));

	return $cpuUsage;
}

function get_uptime_stats() {
	exec("/usr/bin/uptime", $output, $ret);
	$temp = explode(",", $output[0]);
	if (stristr($output[0], "day")) {
		$status = "$temp[0] $temp[1]";
	} else {
		$status = "$temp[0] ";
	}
	$status = trim(str_replace("  ", " ", $status));
	$status = substr($status, strpos($status, "up ") + 3);

	return($status);
}

function get_loadavg_stats() {
	exec("/usr/bin/uptime", $output, $ret);

	$temp = preg_split("/ /", $output[0], -1, PREG_SPLIT_NO_EMPTY);
	$count = count($temp);
	return ($count >= 3) ? "{$temp[$count - 3]} {$temp[$count - 2]} {$temp[$count - 1]}" : "Not available";
}

function lcdproc_get_mbuf_stats() {
	$mbuf = "";
	$mbufpercent = "";
	get_mbuf($mbuf, $mbufpercent);
	return($mbuf);
}

function lcdproc_get_package_summary() {
	$total = 0;
	$needsupdating = 0;
	$broken = 0;

	$package_list = get_pkg_info('all', true, true);
	$installed_packages = array_filter($package_list, function($v) {
		return (isset($v['installed']) || isset($v['broken']));
	});
	if (!empty($installed_packages) || is_array($installed_packages)) {
		$total = count($installed_packages);
	}

	foreach ($installed_packages as $pkg) {
		if (isset($pkg['broken'])) {
			$broken += 1;
		} else if (isset($pkg['installed_version']) && isset($pkg['version'])) {
			$version_compare = pkg_version_compare(
			    $pkg['installed_version'], $pkg['version']);
			if ($version_compare == '<') {
				// we're running an older version of the package
				$needsupdating += 1;
			}
		}
	}
	if ($total > 0) {
		$result = "T: {$total}";
		if ($needsupdating > 0) {
			$result .= " NU: {$needsupdating}";
		}
		if ($broken > 0) {
			$result .= " B!: {$broken}";
		}
	} else {
		$result = "None Installed";
	}
	return $result;
}

// Returns CPU temperature if available from the system
function lcdproc_get_cpu_temperature() {
	global $config;
	$unit = config_get_path('installedpackages/lcdprocscreens/config/0/scr_cputemperature_unit', []);

	$temp_out = "";
	$temp_out = get_temp(); // Use function from includes/functions.inc.php
	if ($temp_out !== "") {
		switch ($unit) {
			case "f":
				$cputemperature = ($temp_out * 1.8) + 32;
				return $cputemperature . "F";
				break;
			case "c":
			default:
				return $temp_out . "C";
				break;
		}
	} else {
		// sysctl probably returned "unknown oid"
		return 'CPU Temp N/A';
	}
}

// NTP Status
function lcdproc_get_ntp_status() { // https://github.com/pfsense/pfsense/blob/master/src/usr/local/www/widgets/widgets/ntp_status.widget.php#L36
	global $config;
	if (config_path_enabled('ntpd')) {
		if (config_path_enabled('system', 'ipv6allow')) {
			$inet_version = "";
		} else {
			$inet_version = " -4";
		}
		exec('/usr/local/sbin/ntpq -pnw ' . $inet_version . ' | /usr/bin/tail +3 | /usr/bin/awk -v RS= \'{gsub(/\n[[:space:]][[:space:]]+/," ")}1\'', $ntpq_output);
		return $ntpq_output;
	} else {
		return false;
	}
}

function lcdproc_get_ntp_gps_sat_count() {
	global $config;
 	if (config_path_enabled('ntpd/gps', 'extstatus')) {
		$lookfor['GPGSV'] = config_get_path('ntpd/gps/nmeaset/gpgsv');
		$lookfor['GPGGA'] = !isset($gps_sat) && config_path_enabled('ntpd/gps/nmeaset', 'gpgga');
		$gpsport = fopen('/dev/gps0', 'r+');
		while ($gpsport && ($lookfor['GPGSV'] || $lookfor['GPGGA'])) {
			$buffer = fgets($gpsport);
			if ($lookfor['GPGSV'] && substr($buffer, 0, 6) == '$GPGSV') {
				$gpgsv = explode(',', $buffer);
				$gps_satview = (int)$gpgsv[3];
				return ("Sats: " . $gps_satview . " in view");
			} elseif ($lookfor['GPGGA'] && substr($buffer, 0, 6) == '$GPGGA') {
				$gpgga = explode(',', $buffer);
				$gps_sat = (int)$gpgga[7];
				return ("Sats: " . $gps_sat . " in use");
			}
		}
	} else {
		return false;
	}

}

function get_version() {
	$version = @file_get_contents("/etc/version");
	$version = trim($version);
	return(g_get('product_name') . " " . $version);
}

// Returns the max frequency in Mhz, or false if powerd is not supported.
// powerd is not supported on all systems - "no cpufreq(4) support" https://redmine.pfsense.org/issues/5739
function get_cpu_maxfrequency() {
	$cpufreqs = get_single_sysctl("dev.cpu.0.freq_levels");

	if (!empty($cpufreqs)) {
		$cpufreqs = explode(" ", trim($cpufreqs));
		$maxfreqs = explode("/", array_shift($cpufreqs));
		return array_shift($maxfreqs);
	} else {
		// sysctrl probably returned "unknown oid 'dev.cpu.0.freq_levels'",
		// see https://redmine.pfsense.org/issues/5739
		return false;
	}
}

// Returns the current frequency in Mhz, or false if powerd is not supported.
// powerd is not supported on all systems - "no cpufreq(4) support" https://redmine.pfsense.org/issues/5739
function get_cpu_currentfrequency() {
	$curfreq = get_single_sysctl("dev.cpu.0.freq");

	if (!empty($curfreq)) {
		return trim($curfreq);
	} else {
		// sysctrl probably returned "unknown oid 'dev.cpu.0.freq'",
		// see https://redmine.pfsense.org/issues/5739
		return false;
	}
}

function get_cpufrequency() {
	$maxfreq = get_cpu_maxfrequency();
	if ($maxfreq === false) {
		return "no cpufreq(4) support";
	} else {
		$curfreq = get_cpu_currentfrequency();
		return "{$curfreq}\/{$maxfreq} Mhz";
	}
}

function get_interfaces_stats() {
	$ifstatus = [];
	$ifdescrs = get_configured_interface_with_descr();

	foreach ($ifdescrs as $ifdescr => $ifname) {
		$ifinfo = get_interface_info($ifdescr);
		if ($ifinfo['status'] == "up") {
			$online = "Up";
		} else {
			$online = "Down";
		}
		if (!empty($ifinfo['ipaddr'])) {
			$ip = htmlspecialchars($ifinfo['ipaddr']);
		} else {
			$ip = "-";
		}
		$ifstatus[] = htmlspecialchars($ifname) ." [$online]";
	}
	$status = " ". implode(", ", $ifstatus);
	return($status);
}

function get_carp_stats() {
	if (get_carp_status()) {
		$initcount = 0;
		$mastercount = 0;
		$backupcount = 0;
		foreach (config_get_path('virtualip/vip', []) as $carp) {
			if (!is_array($carp) ||
			    empty($carp) ||
			    $carp['mode'] != "carp") {
				continue;
			}
			$ipaddress = $carp['subnet'];
			$password = $carp['password'];
			$netmask = $carp['subnet_bits'];
			$vhid = $carp['vhid'];
			$advskew = $carp['advskew'];
			$status = get_carp_interface_status("_vip{$carp['uniqid']}");
			switch ($status) {
				case "MASTER":
					$mastercount++;
					break;
				case "BACKUP":
					$backupcount++;
					break;
				case "INIT":
					$initcount++;
					break;
			}
		}
		$status = "";
		if (config_path_enabled('/','virtualip_carp_maintenancemode')) {
			$status .= "CARP is in Maintenance Mode. ";
		}
		$status .= "M/B/I {$mastercount}/{$backupcount}/{$initcount}";
	} else {
		$status = "CARP Disabled";
	}
	return($status);
}

function get_ipsec_tunnel_src($tunnel) {
	global $sad;
	$if = "WAN";
	if ($tunnel['interface']) {
		$if = $tunnel['interface'];
		$realinterface = convert_friendly_interface_to_real_interface_name($if);
		$interfaceip = find_interface_ip($realinterface);
	}
	return $interfaceip;
}

function output_ipsec_tunnel_status($tunnel) {
	global $sad;
	$if = "WAN";
	$interfaceip = get_ipsec_tunnel_src($tunnel);
	$foundsrc = false;
	$founddst = false;

	if (!is_array($sad)) {
		/* we have no sad array, bail */
		return(false);
	}
	foreach ($sad as $sa) {
		if ($sa['src'] == $interfaceip) {
			$foundsrc = true;
		}
		if ($sa['dst'] == $tunnel['remote-gateway']) {
			$founddst = true;
		}
	}
	if ($foundsrc && $founddst) {
		/* tunnel is up */
		$iconfn = "pass";
		return(true);
	} else {
		/* tunnel is down */
		$iconfn = "reject";
		return(false);
	}
}

function get_ipsec_stats() {
	global $sad;
	$sad = array();
	$sad = ipsec_dump_sad();

	$activecounter = 0;
	$inactivecounter = 0;

	foreach (config_get_path('ipsec/phase1', []) as $tunnel) {
		if (!is_array($tunnel) || empty($tunnel)) {
			continue;
		}

		$tun_disabled = "false";
		$foundsrc = false;
		$founddst = false;

		if (isset($tunnel['disabled'])) {
			$tun_disabled = "true";
			continue;
		}

		if (output_ipsec_tunnel_status($tunnel)) {
			/* tunnel is up */
			$iconfn = "true";
			$activecounter++;
		} else {
			/* tunnel is down */
			$iconfn = "false";
			$inactivecounter++;
		}
	}

	if (ipsec_enabled()) {
		$status = "Up/Down {$activecounter}/{$inactivecounter}";
	} else {
		$status = "IPsec Disabled";
	}
	return($status);
}

function send_lcd_commands($lcd, $lcd_cmds) {
	if (!is_array($lcd_cmds) || (empty($lcd_cmds))) {
		lcdproc_warn("Failed to interpret lcd commands");
		return;
	}
	get_lcd_messages($lcd);
	foreach ($lcd_cmds as $lcd_cmd) {
		if (! fwrite($lcd, "$lcd_cmd\n")) {
			lcdproc_warn("Connection to LCDd process lost {$errstr} ({$errno})");
			$lcdproc_connect_errors++;
			return false;
		}
	}
	return true;
}

function get_lcd_messages($lcd) {
	while (($cmd_output = fgets($lcd, 8000)) !== false) {
		if (preg_match("/^huh?/", $cmd_output)) {
			lcdproc_notice("LCDd output: \"{$cmd_output}\". Executed \"{$lcd_cmd}\"");
		}
		if (cmenu_enabled()) {
			if (preg_match("/^menuevent select cm_ask_enter/", $cmd_output)) {
				lcdproc_notice("Entering CARP Maintenance Mode");
				interfaces_carp_set_maintenancemode(true);
			}
			if (preg_match("/^menuevent select p_ask_yes/", $cmd_output)) {
				lcdproc_notice("Restarting PHP and GUI!");
				exec("/etc/rc.php-fpm_restart");
				exec("/etc/rc.restart_webgui");
			}
			if (preg_match("/^menuevent select cm_ask_leave/", $cmd_output)) {
				lcdproc_notice("Leaving CARP Maintenance Mode");
				interfaces_carp_set_maintenancemode(false);
			}
			if (preg_match("/^menuevent select r_ask_yes/", $cmd_output)) {
				lcdproc_notice("init REBOOT!");
				system_reboot();
			}
			if (preg_match("/^menuevent select s_ask_yes/", $cmd_output)) {
				lcdproc_notice("init SHUTDOWN!");
				system_halt();
			}
		}
	}
}

function get_lcdpanel_width() {
	$lcdproc_size = config_get_path('installedpackages/lcdproc/config/0/size');
	if (is_null($lcdproc_size)) {
		return "16";
	} else {
		$dimensions = explode("x", $lcdproc_size);
		return $dimensions[0];
	}
}

function get_lcdpanel_height() {
	$lcdproc_size = config_get_path('installedpackages/lcdproc/config/0/size');
	if (is_null($lcdproc_size)) {
		return "2";
	} else {
		$dimensions = explode("x", $lcdproc_size);
		return $dimensions[1];
	}
}

function get_lcdpanel_refresh_frequency() {
	return config_get_path('installedpackages/lcdproc/config/0/refresh_frequency', 5);
}

function outputled_enabled_CFontzPacket() {
	$driver = config_get_path('installedpackages/lcdproc/config/0/driver');
	$outputleds = config_get_path('installedpackages/lcdproc/config/0/outputleds');
	if (is_null($outputleds)) {
		return false;
	} else {
		if ($outputleds && ($driver == "CFontzPacket")) {
			return true;
		} else {
			return false;
		}
	}
}

function cmenu_enabled() {
	return config_path_enabled('installedpackages/lcdproc/config/0', 'controlmenu');
}

function outputled_carp() {
	/* Returns the status of CARP for the box.
	Assumes ALL CARP status are the same for all the interfaces.
		-1 = CARP Disabled
		0  = CARP on Backup
		1  = CARP on Master */

	if (get_carp_status()) {
		foreach (config_get_path('virtualip/vip', []) as $carp) {
			if (!is_array($carp) ||
			    empty($carp) ||
			    $carp['mode'] != "carp") {
				continue;
			}
			$status = get_carp_interface_status("_vip{$carp['uniqid']}");
			switch($status) {
				case "MASTER":
					return 1;
					break;
				case "BACKUP":
				default:
					return 0;
					break;
			}
		}
	} else {
		return -1;
	}
}

function outputled_gateway() {
	/* Returns the status of the gateways.
		-1 = No gateway defined
		0  = At least 1 gateway down or with issues
		1  = All gateway up */
	$gateways_status = return_gateways_status(true);
	if (empty($gateways_status)) {
		return -1;
	}
	foreach ($gateways_status as $gw) {
		if ($gw['status'] != 'online') {
			return 0;
		}
	}
	return 1;
}

function build_interface_link_list() {
	// Returns a dictionary of all the interfaces along with their
	// link and address information, keyed on the interface description.
	$result = array();
	$ifList = get_configured_interface_with_descr();

	foreach($ifList as $ifdescr => $ifname) {
		// get the interface link infos
		$ifinfo = get_interface_info($ifdescr);

		$entry = array();
		$entry['name'] = $ifname;
		$entry['mac'] = $ifinfo['macaddr'];

		if (($ifinfo['status'] == "up") ||
		    ($ifinfo['status'] == "associated")) {
			$entry['status'] = "up";
		} else {
			$entry['status'] = "down";
		}

		if (($ifinfo['pppoelink'] == "up") ||
		    ($ifinfo['pptplink']  == "up") ||
		    ($ifinfo['l2tplink']  == "up")) {
			$entry['link'] = sprintf(gettext("Uptime %s"), $ifinfo['ppp_uptime']);
		} else {
			$entry['link'] = $ifinfo['media'];
		}

		$entry['v4addr'] = (empty($ifinfo['ipaddr'])) ?
			"n/a" : $ifinfo['ipaddr'];

		$entry['v6addr'] = (empty($ifinfo['ipaddrv6'])) ?
			"n/a" : $ifinfo['ipaddrv6'];

		$result[$ifdescr] = $entry;
	}
	return $result;
}

function build_interface_traffic_stats_list() {
	// Returns a dictionary of all the interfaces along with their in/out
	// traffic stats, keyed on the interface name.
	global $config;

	$result = array();
	$interfaceList = get_configured_interface_with_descr();

	foreach($interfaceList as $key => $description) {
		// get the interface stats (code from ifstats.php)
		$interface      = $config['interfaces'][$key];
		$interfaceName  = $interface['if'];
		$interfaceStats = pfSense_get_interface_stats($interfaceName);

		calculate_interfaceBytesPerSecond_sinceLastChecked($interfaceName, $interfaceStats, $in_Bps, $out_Bps);
		calculate_bytesToday($interfaceName, $interfaceStats, $in_bytesToday, $out_bytesToday);

		$entry = array();
		$entry['descr']       = $description;

		$entry['in_Bps']      = $in_Bps;
		$entry['out_Bps']     = $out_Bps;
		$entry['total_Bps']   = $in_Bps + $out_Bps;

		$entry['in_bytes']    = $interfaceStats['inbytes'];
		$entry['out_bytes']   = $interfaceStats['outbytes'];
		$entry['total_bytes'] = $interfaceStats['inbytes'] + $interfaceStats['outbytes'];

		$entry['in_bytes_today']    = $in_bytesToday;
		$entry['out_bytes_today']   = $out_bytesToday;
		$entry['total_bytes_today'] = $in_bytesToday + $out_bytesToday;

		$result[$interface['if']] = $entry;
	}
	return $result;
}

function sort_interface_list_by_bytes_today(&$interfaceTrafficStatsList) {
	uasort($interfaceTrafficStatsList, "cmp_total_bytes_today");
}

function sort_interface_list_by_total_bytes(&$interfaceTrafficStatsList) {
	uasort($interfaceTrafficStatsList, "cmp_total_bytes");
}

function sort_interface_list_by_bps(&$interfaceTrafficStatsList) {
	uasort($interfaceTrafficStatsList, "cmp_total_Bps");
}

function cmp_total_Bps($a, $b) {
	if ($a['total_Bps'] == $b['total_Bps']) return 0;
	return ($a['total_Bps'] < $b['total_Bps']) ? 1 : -1;
}

function cmp_total_bytes($a, $b) {
	if ($a['total_bytes'] == $b['total_bytes']) return 0;
	return ($a['total_bytes'] < $b['total_bytes']) ? 1 : -1;
}

function cmp_total_bytes_today($a, $b) {
	if ($a['total_bytes_today'] == $b['total_bytes_today']) return 0;
	return ($a['total_bytes_today'] < $b['total_bytes_today']) ? 1 : -1;
}

function calculate_interfaceBytesPerSecond_sinceLastChecked($interfaceName, $interfaceStats, &$in_Bps, &$out_Bps) {
	// calculates the average bytes-per-second (in & out) for the interface
	// during the interval between now and the last time this method was invoked for
	// the interface. So avoid invoking this method needlessly, or you'll end up
	// measuring meaningless periods.

	global $traffic_last_ugmt, $traffic_last_ifin, $traffic_last_ifout;

	// get the current time (code from ifstats.php)
	$temp = gettimeofday();
	$timing = (double)$temp["sec"] + (double)$temp["usec"] / 1000000.0;

	// calculate the traffic stats
	$deltatime = $timing - $traffic_last_ugmt[$interfaceName];
	$in_Bps  = ((double)$interfaceStats['inbytes']  - $traffic_last_ifin[$interfaceName])  / $deltatime;
	$out_Bps = ((double)$interfaceStats['outbytes'] - $traffic_last_ifout[$interfaceName]) / $deltatime;

	$traffic_last_ugmt[$interfaceName]  = $timing;
	$traffic_last_ifin[$interfaceName]  = (double)$interfaceStats['inbytes'];
	$traffic_last_ifout[$interfaceName] = (double)$interfaceStats['outbytes'];
}

function calculate_bytesToday($interfaceName, $interfaceStats, &$in_bytesToday, &$out_bytesToday) {
	global $traffic_last_hour, $traffic_startOfDay_ifin, $traffic_startOfDay_ifout;

	$hourOfDay = getdate()['hours'];

	if (!isset($traffic_last_hour[$interfaceName]) || ($hourOfDay < $traffic_last_hour[$interfaceName])) {
		$traffic_startOfDay_ifin[$interfaceName]  = (double)$interfaceStats['inbytes'];
		$traffic_startOfDay_ifout[$interfaceName] = (double)$interfaceStats['outbytes'];
	}
	$traffic_last_hour[$interfaceName] = $hourOfDay;

	$in_bytesToday  = ((double)$interfaceStats['inbytes']  - $traffic_startOfDay_ifin[$interfaceName]);
	$out_bytesToday = ((double)$interfaceStats['outbytes'] - $traffic_startOfDay_ifout[$interfaceName]);
}

function format_interface_string($interfaceEntry, $in_key, $out_key, $output_in_bits, $outputLength) {
	if ($output_in_bits) {
		$speed = " " . format_toSpeedInBits_shortForm($interfaceEntry[$in_key]) . "/" . format_toSpeedInBits_shortForm($interfaceEntry[$out_key]);
	} else {
		$speed = " " . format_toSizeInBytes_shortForm($interfaceEntry[$in_key]) . "/" . format_toSizeInBytes_shortForm($interfaceEntry[$out_key]);
	}

	$nameLength = $outputLength - strlen($speed);

	if ($nameLength < 0) {
		// owch - speed doesn't even fit on the lcd
		$speed = substr(trim($speed), 0, $outputLength);
		$name = '';
	} else {
		$name = substr($interfaceEntry['descr'], 0, $nameLength);
		$name = str_pad($name, $nameLength);
	}

	return $name . $speed;
}

function format_toSizeInBytes_shortForm($size_in_bytes) {
	// format a byte count into a string with two significant figures or more and a unit
	//
	// Data sizes are normally specified in KB - powers of 1024, so return KB rather than kB

	if ($size_in_bytes < (1024 * 1024)) {
		$unit = "K";
		$unitSize = $size_in_bytes / 1024;
	} else if ($size_in_bytes < (1024 * 1024 * 1024)) {
		$unit = "M";
		$unitSize = $size_in_bytes / (1024 * 1024);
	} else {
		$unit = "G";
		$unitSize = $size_in_bytes / (1024 * 1024 * 1024);
	}

	$showDecimalPlace = $unitSize < 10 && round($unitSize, 1) != round($unitSize);

	return sprintf($showDecimalPlace ? "%1.1f" : "%1.0f", $unitSize) . $unit;
}

function format_toSpeedInBits_shortForm($speed_in_bytes) {
	// format a byte-count into a bit-count string with two significant figures or more, and a unit.
	//
	// The decimal SI kilobot definition of 1 kbit/s = 1000 bit/s, is used uniformly in the
	// context of telecommunication transmission, so return kb rather than Kb

	if ($speed_in_bytes < 125000) {
		$unit = "k";
		$unitSpeed = $speed_in_bytes / 125;
	} else if ($speed_in_bytes < 125000000) {
		$unit = "m";
		$unitSpeed = $speed_in_bytes / 125000;
	} else {
		$unit = "g";
		$unitSpeed = $speed_in_bytes / 125000000;
	}

	$showDecimalPlace = $unitSpeed < 10 && round($unitSpeed, 1) != round($unitSpeed);

	return sprintf($showDecimalPlace ? "%1.1f" : "%1.0f", $unitSpeed) . $unit;
}

function format_toSpeedInBits_longForm($speed_in_bytes) {
	/* format speed in bits/sec, input: bytes/sec
	Code from: graph.php ported to PHP

	The decimal SI kilobot definition of 1 kbit/s = 1000 bit/s, is used uniformly in the
	context of telecommunication transmission, so return kb rather than Kb */

	if ($speed_in_bytes < 125000) {
		return sprintf("%5.1f kbps", $speed_in_bytes / 125);
	}
	if ($speed_in_bytes < 125000000) {
		return sprintf("%5.1f mbps", $speed_in_bytes / 125000);
	}

	return sprintf("%5.1f gbps", $speed_in_bytes / 125000000);
}

function get_traffic_stats($interface_traffic_list, &$in_data, &$out_data){
	$ifnum = config_get_path('installedpackages/lcdprocscreens/config/0/scr_traffic_interface');
	/* get the real interface name (code from ifstats.php)*/
	$realif = get_real_interface($ifnum);
	if (!$realif) {
		$realif = $ifnum; // Need for IPsec case interface.
	}

	$interfaceEntry = $interface_traffic_list[$realif];

	$in_data  = "IN:  " . format_toSpeedInBits_longForm($interfaceEntry['in_Bps']);
	$out_data = "OUT: " . format_toSpeedInBits_longForm($interfaceEntry['out_Bps']);
}

function get_top_interfaces_by_bps($interfaceTrafficList, $lcdpanel_width, $lcdpanel_height) {
	$result = [];

	if (count($interfaceTrafficList) < $lcdpanel_height) {
		// All the interfaces will fit on the screen, so use the same sort order as
		// the bytes_today screen, so that the interfaces stay in one place (much easier to read)
		sort_interface_list_by_total_bytes($interfaceTrafficList);
	} else {
		// We can't show all the interfaces, so show the ones with the most traffic
		sort_interface_list_by_bps($interfaceTrafficList);
	}

	foreach($interfaceTrafficList as $interfaceEntry) {
		$result[] = format_interface_string($interfaceEntry, 'in_Bps', 'out_Bps', true, $lcdpanel_width);
	}
	return $result;
}

function get_top_interfaces_by_bytes_today($interfaceTrafficList, $lcdpanel_width) {
	$result = [];

	if (count($interfaceTrafficList) < $lcdpanel_height) {
		// All the interfaces will fit on the screen, so use the same sort order as
		// the bytes_today screen and the bps screen, so that the interfaces stay in
		// one place (much easier to read)
		sort_interface_list_by_total_bytes($interfaceTrafficList);
	} else {
		// We can't show all the interfaces, so show the ones with the most traffic	today
		sort_interface_list_by_bytes_today($interfaceTrafficList);
	}

	foreach($interfaceTrafficList as $interfaceEntry) {
		$result[] = format_interface_string($interfaceEntry, 'in_bytes_today', 'out_bytes_today', false, $lcdpanel_width);
	}
	return $result;
}

function get_top_interfaces_by_total_bytes($interfaceTrafficList, $lcdpanel_width) {
	$result = [];

	sort_interface_list_by_total_bytes($interfaceTrafficList);

	foreach($interfaceTrafficList as $interfaceEntry) {
		$result[] = format_interface_string($interfaceEntry, 'in_bytes', 'out_bytes', false, $lcdpanel_width);
	}
	return $result;
}


function convert_bandwidth_to_shortform($bytes_string) {
	// Shorten values from bandwidth_by_ip.php, which have the form
	// "168.16k", "10.31k", "0.00".
	// The unit is preserved, but decimal point is dropped for 10 or
	// higher, and only 1 decimal place is kept for lower than 10.
	// So "168.16k", "10.31k", "0.00" becomes "168k", "10k", "0"

	if ($bytes_string == "0.00") {
		return "0";
	}

	$decimalPos = strpos($bytes_string, '.');
	if ($decimalPos == 1) {
		// allow 1 decimal place
		return substr($bytes_string, 0, 3) . substr($bytes_string, 4);
	} elseif ($decimalPos > 1) {
		// remove the decimal places
		return substr($bytes_string, 0, $decimalPos) . substr($bytes_string, $decimalPos + 3);
	} else {
		// Our format assumptions are wrong
		return $bytes_string;
	}
}

function get_bandwidth_by_ip() {
	$result       = [];

	/* Ideally this would use /usr/local/www/bandwidth_by_ip.php, but that requires a
	 * logged-in authenticated user session, so use a local copy instead that's outside
	 * the www directory and doesn't require an authenticated user session.
	 */

	/* Start with parameter name and '=' */
	$lan          = 'if=';
	$sort         = 'sort=';
	$filter       = 'filter=';
	$hostipformat = 'hostipformat=';

	/* Add config value */
	$lan          .= config_get_path('installedpackages/lcdprocscreens/config/0/scr_traffic_by_address_if');
	$sort         .= config_get_path('installedpackages/lcdprocscreens/config/0/scr_traffic_by_address_sort');
	$filter       .= config_get_path('installedpackages/lcdprocscreens/config/0/scr_traffic_by_address_filter');
	$hostipformat .= config_get_path('installedpackages/lcdprocscreens/config/0/scr_traffic_by_address_hostipformat');

	/* Escape before using in shell */
	$lan          = escapeshellarg($lan);
	$sort         = escapeshellarg($sort);
	$filter       = escapeshellarg($filter);
	$hostipformat = escapeshellarg($hostipformat);

	$output = shell_exec("/usr/local/bin/php-cgi -f /usr/local/pkg/lcdproc_bandwidth_by_ip.php {$lan} {$sort} {$filter} {$hostipformat}");

	$hostLines = explode("|", $output);
	foreach($hostLines as $hostLine) {
		$hostData = explode(";", $hostLine);
		if (count($hostData) == 3) {
			$host = array();
			$host['name']   = $hostData[0];
			$host['in']     = convert_bandwidth_to_shortform($hostData[1]);
			$host['out']    = convert_bandwidth_to_shortform($hostData[2]);
			$host['in/out'] = $host['in'] . '/' . $host['out'];
			$result[] = $host;
		}
	}
	if (count($result) === 0 && strlen($output) > 1) {
		$result['error'] = $output;
	}

	return $result;
}

function add_summary_declaration(&$lcd_cmds, $name) {
	$lcdpanel_height = get_lcdpanel_height();
	$lcdpanel_width = get_lcdpanel_width();
	if ($lcdpanel_height >= "4") {
		$lcd_cmds[] = "widget_add {$name} title_summary string";
		$lcd_cmds[] = "widget_add {$name} text_summary string";
		if ($lcdpanel_width > "16") {
			$lcd_cmds[] = "widget_set {$name} title_summary 1 3 \"CPU MEM STATES FREQ\"";
		} else {
			$lcd_cmds[] = "widget_set {$name} title_summary 1 3 \"CPU MEM STATES\"";
		}
	}
}

function add_summary_values(&$lcd_cmds, $name, $lcd_summary_data) {
	if ($lcd_summary_data != "") {
		$lcd_cmds[] = "widget_set {$name} text_summary 1 4 \"{$lcd_summary_data}\"";
	}
}

function build_interface($lcd) {
	$lcdproc_screens_config = config_get_path('installedpackages/lcdprocscreens/config/0', []);
	$lcdpanel_width  = get_lcdpanel_width();
	$lcdpanel_height = get_lcdpanel_height();
	$refresh_frequency = get_lcdpanel_refresh_frequency() * 8;

	$lcd_cmds = array();
	$lcd_cmds[] = "hello";
	$lcd_cmds[] = "client_set name pfSense";

	/* setup pfsense control menu */
	if (cmenu_enabled()) {
		$lcd_cmds[] = 'menu_add_item "" carpmaint_menu menu "CARP Maintenance"';
		$lcd_cmds[] = 'menu_add_item "carpmaint_menu" cm_ask_no action "Cancel" -next _close_';
		$lcd_cmds[] = 'menu_add_item "carpmaint_menu" cm_ask_enter action "Enter Maint. Mode" -next _quit_';
		$lcd_cmds[] = 'menu_add_item "carpmaint_menu" cm_ask_leave action "Leave Maint. Mode" -next _quit_';

		$lcd_cmds[] = 'menu_add_item "" restartphp_menu menu "Restart PHP+GUI"';
		$lcd_cmds[] = 'menu_add_item "restartphp_menu" p_ask_no action "No" -next _close_';
		$lcd_cmds[] = 'menu_add_item "restartphp_menu" p_ask_yes action "Yes" -next _quit_';

		$lcd_cmds[] = 'menu_add_item "" reboot_menu menu "Reboot"';
		$lcd_cmds[] = 'menu_add_item "reboot_menu" r_ask_no action "No" -next _close_';
		$lcd_cmds[] = 'menu_add_item "reboot_menu" r_ask_yes action "Yes" -next _quit_';

		$lcd_cmds[] = 'menu_add_item "" shutdown_menu menu "Shutdown"';
		$lcd_cmds[] = 'menu_add_item "shutdown_menu" s_ask_no action "No" -next _close_';
		$lcd_cmds[] = 'menu_add_item "shutdown_menu" s_ask_yes action "Yes" -next _quit_';
	}

	/* process screens to display */
	foreach ($lcdproc_screens_config as $name => $screen) {
		if ($screen == "on" || $screen == "yes" ) {
			$includeSummary = true;
			switch($name) {
				case "scr_version":
					$lcd_cmds[] = "screen_add {$name}";
					$lcd_cmds[] = "screen_set {$name} heartbeat off";
					$lcd_cmds[] = "screen_set {$name} name {$name}";
					$lcd_cmds[] = "screen_set {$name} duration {$refresh_frequency}";
					$lcd_cmds[] = "widget_add {$name} title_wdgt string";
					$lcd_cmds[] = "widget_add {$name} text_wdgt scroller";
					$lcd_cmds[] = "widget_set {$name} title_wdgt 1 1 \"Welcome to\"";
					break;
				case "scr_time":
					$lcd_cmds[] = "screen_add {$name}";
					$lcd_cmds[] = "screen_set {$name} heartbeat off";
					$lcd_cmds[] = "screen_set {$name} name {$name}";
					$lcd_cmds[] = "screen_set {$name} duration {$refresh_frequency}";
					$lcd_cmds[] = "widget_add {$name} title_wdgt string";
					$lcd_cmds[] = "widget_add {$name} text_wdgt scroller";
					$lcd_cmds[] = "widget_set {$name} title_wdgt 1 1 \"System Time\"";
					break;
				case "scr_uptime":
					$lcd_cmds[] = "screen_add {$name}";
					$lcd_cmds[] = "screen_set {$name} heartbeat off";
					$lcd_cmds[] = "screen_set {$name} name {$name}";
					$lcd_cmds[] = "screen_set {$name} duration {$refresh_frequency}";
					$lcd_cmds[] = "widget_add {$name} title_wdgt string";
					$lcd_cmds[] = "widget_add {$name} text_wdgt scroller";
					$lcd_cmds[] = "widget_set {$name} title_wdgt 1 1 \"System Uptime\"";
					break;
				case "scr_hostname":
					$lcd_cmds[] = "screen_add {$name}";
					$lcd_cmds[] = "screen_set {$name} heartbeat off";
					$lcd_cmds[] = "screen_set {$name} name {$name}";
					$lcd_cmds[] = "screen_set {$name} duration {$refresh_frequency}";
					$lcd_cmds[] = "widget_add {$name} title_wdgt string";
					$lcd_cmds[] = "widget_add {$name} text_wdgt scroller";
					$lcd_cmds[] = "widget_set {$name} title_wdgt 1 1 \"System Name\"";
					break;
				case "scr_system":
					$lcd_cmds[] = "screen_add {$name}";
					$lcd_cmds[] = "screen_set {$name} heartbeat off";
					$lcd_cmds[] = "screen_set {$name} name {$name}";
					$lcd_cmds[] = "screen_set {$name} duration {$refresh_frequency}";
					$lcd_cmds[] = "widget_add {$name} title_wdgt string";
					$lcd_cmds[] = "widget_add {$name} text_wdgt scroller";
					$lcd_cmds[] = "widget_set {$name} title_wdgt 1 1 \"System Stats\"";
					break;
				case "scr_disk":
					$lcd_cmds[] = "screen_add {$name}";
					$lcd_cmds[] = "screen_set {$name} heartbeat off";
					$lcd_cmds[] = "screen_set {$name} name {$name}";
					$lcd_cmds[] = "screen_set {$name} duration {$refresh_frequency}";
					$lcd_cmds[] = "widget_add {$name} title_wdgt string";
					$lcd_cmds[] = "widget_add {$name} text_wdgt scroller";
					$lcd_cmds[] = "widget_set {$name} title_wdgt 1 1 \"Disk Use\"";
					break;
				case "scr_load":
					$lcd_cmds[] = "screen_add {$name}";
					$lcd_cmds[] = "screen_set {$name} heartbeat off";
					$lcd_cmds[] = "screen_set {$name} name {$name}";
					$lcd_cmds[] = "screen_set {$name} duration {$refresh_frequency}";
					$lcd_cmds[] = "widget_add {$name} title_wdgt string";
					$lcd_cmds[] = "widget_add {$name} text_wdgt scroller";
					$lcd_cmds[] = "widget_set {$name} title_wdgt 1 1 \"Load Averages\"";
					break;
				case "scr_states":
					$lcd_cmds[] = "screen_add {$name}";
					$lcd_cmds[] = "screen_set {$name} heartbeat off";
					$lcd_cmds[] = "screen_set {$name} name {$name}";
					$lcd_cmds[] = "screen_set {$name} duration {$refresh_frequency}";
					$lcd_cmds[] = "widget_add {$name} title_wdgt string";
					$lcd_cmds[] = "widget_add {$name} text_wdgt scroller";
					$lcd_cmds[] = "widget_set {$name} title_wdgt 1 1 \"Traffic States\"";
					break;
				case "scr_carp":
					$lcd_cmds[] = "screen_add {$name}";
					$lcd_cmds[] = "screen_set {$name} heartbeat off";
					$lcd_cmds[] = "screen_set {$name} name {$name}";
					$lcd_cmds[] = "screen_set {$name} duration {$refresh_frequency}";
					$lcd_cmds[] = "widget_add {$name} title_wdgt string";
					$lcd_cmds[] = "widget_add {$name} text_wdgt scroller";
					$lcd_cmds[] = "widget_set {$name} title_wdgt 1 1 \"CARP State\"";
					break;
				case "scr_ipsec":
					$lcd_cmds[] = "screen_add {$name}";
					$lcd_cmds[] = "screen_set {$name} heartbeat off";
					$lcd_cmds[] = "screen_set {$name} name {$name}";
					$lcd_cmds[] = "screen_set {$name} duration {$refresh_frequency}";
					$lcd_cmds[] = "widget_add {$name} title_wdgt string";
					$lcd_cmds[] = "widget_add {$name} text_wdgt scroller";
					$lcd_cmds[] = "widget_set {$name} title_wdgt 1 1 \"IPsec Tunnels\"";
					break;
				case "scr_interfaces":
					$lcd_cmds[] = "screen_add {$name}";
					$lcd_cmds[] = "screen_set {$name} heartbeat off";
					$lcd_cmds[] = "screen_set {$name} name {$name}";
					$lcd_cmds[] = "screen_set {$name} duration {$refresh_frequency}";
					$lcd_cmds[] = "widget_add {$name} title_wdgt string";
					$lcd_cmds[] = "widget_add {$name} text_wdgt scroller";
					$lcd_cmds[] = "widget_set {$name} title_wdgt 1 1 \"Interfaces\"";
					break;
				case "scr_gwsum":
					$lcd_cmds[] = "screen_add {$name}";
					$lcd_cmds[] = "screen_set {$name} heartbeat off";
					$lcd_cmds[] = "screen_set {$name} name {$name}";
					$lcd_cmds[] = "screen_set {$name} duration {$refresh_frequency}";
					$lcd_cmds[] = "widget_add {$name} title_wdgt string";
					$lcd_cmds[] = "widget_add {$name} text_wdgt scroller";
					$lcd_cmds[] = "widget_set {$name} title_wdgt 1 1 \"GW Summary\"";
					break;
				case "scr_mbuf":
					$lcd_cmds[] = "screen_add {$name}";
					$lcd_cmds[] = "screen_set {$name} heartbeat off";
					$lcd_cmds[] = "screen_set {$name} name {$name}";
					$lcd_cmds[] = "screen_set {$name} duration {$refresh_frequency}";
					$lcd_cmds[] = "widget_add {$name} title_wdgt string";
					$lcd_cmds[] = "widget_add {$name} text_wdgt scroller";
					$lcd_cmds[] = "widget_set {$name} title_wdgt 1 1 \"MBuf Usage\"";
					break;
				case "scr_packages":
					$lcd_cmds[] = "screen_add {$name}";
					$lcd_cmds[] = "screen_set {$name} heartbeat off";
					$lcd_cmds[] = "screen_set {$name} name {$name}";
					$lcd_cmds[] = "screen_set {$name} duration {$refresh_frequency}";
					$lcd_cmds[] = "widget_add {$name} title_wdgt string";
					$lcd_cmds[] = "widget_add {$name} text_wdgt scroller";
					break;
				case "scr_cpufrequency":
					$lcd_cmds[] = "screen_add {$name}";
					$lcd_cmds[] = "screen_set {$name} heartbeat off";
					$lcd_cmds[] = "screen_set {$name} name {$name}";
					$lcd_cmds[] = "screen_set {$name} duration {$refresh_frequency}";
					$lcd_cmds[] = "widget_add {$name} title_wdgt string";
					$lcd_cmds[] = "widget_add {$name} text_wdgt scroller";
					$lcd_cmds[] = "widget_set {$name} title_wdgt 1 1 \"CPU Frequency\"";
					break;
				case "scr_cputemperature":
					$lcd_cmds[] = "screen_add {$name}";
					$lcd_cmds[] = "screen_set {$name} heartbeat off";
					$lcd_cmds[] = "screen_set {$name} name {$name}";
					$lcd_cmds[] = "screen_set {$name} duration {$refresh_frequency}";
					$lcd_cmds[] = "widget_add {$name} title_wdgt string";
					$lcd_cmds[] = "widget_add {$name} text_wdgt scroller";
					break;
				case "scr_ntp":
					$lcd_cmds[] = "screen_add {$name}";
					$lcd_cmds[] = "screen_set {$name} heartbeat off";
					$lcd_cmds[] = "screen_set {$name} name $name";
					$lcd_cmds[] = "screen_set {$name} duration {$refresh_frequency}";
					$lcd_cmds[] = "widget_add {$name} source_wdgt scroller";
					$lcd_cmds[] = "widget_add {$name} delay_wdgt scroller";
					$lcd_cmds[] = "widget_add {$name} offset_wdgt scroller";
					$lcd_cmds[] = "widget_add {$name} jitter_wdgt scroller";
					$includeSummary = false; // this screen needs all the lines
					break;				
				case "scr_traffic":
					$lcd_cmds[] = "screen_add {$name}";
					$lcd_cmds[] = "screen_set {$name} heartbeat off";
					$lcd_cmds[] = "screen_set {$name} name {$name}";
					$lcd_cmds[] = "screen_set {$name} duration {$refresh_frequency}";
					$lcd_cmds[] = "widget_add {$name} title_wdgt string";
					$lcd_cmds[] = "widget_add {$name} text_wdgt string";
					break;
				case "scr_top_interfaces_by_bps":
				case "scr_top_interfaces_by_total_bytes":
				case "scr_top_interfaces_by_bytes_today":
					$lcd_cmds[] = "screen_add {$name}";
					$lcd_cmds[] = "screen_set {$name} heartbeat off";
					$lcd_cmds[] = "screen_set {$name} name {$name}";
					$lcd_cmds[] = "screen_set {$name} duration {$refresh_frequency}";
					$lcd_cmds[] = "widget_add {$name} title_wdgt string";

					for($i = 0; $i < ($lcdpanel_height - 1); $i++) {
						$lcd_cmds[] = "widget_add {$name} text_wdgt{$i} string";
					}
					$includeSummary = false; // this screen needs all the lines
					break;
				case "scr_gwstatus":
					$gateway_status = return_gateways_status(true);
					foreach ($gateway_status as $gwname => $gw) {
						$s_name = $name . $gwname;
						$lcd_cmds[] = "screen_add {$s_name}";
						$lcd_cmds[] = "screen_set {$s_name} heartbeat off";
						$lcd_cmds[] = "screen_set {$s_name} name \"{$name}.{$gwname}\"";
						$lcd_cmds[] = "screen_set {$s_name} duration {$refresh_frequency}";
						$lcd_cmds[] = "widget_add {$s_name} gwname_wdgt string";
						$lcd_cmds[] = "widget_set {$s_name} gwname_wdgt 1 1 \"{$gwname}\"";
						$lcd_cmds[] = "widget_add {$s_name} stata_wdgt scroller";
						$lcd_cmds[] = "widget_add {$s_name} lossl_wdgt string";
						$lcd_cmds[] = "widget_set {$s_name} lossl_wdgt 1 3 \"Loss:\"";
						$lcd_cmds[] = "widget_add {$s_name} lossa_wdgt scroller";
						$lcd_cmds[] = "widget_add {$s_name} rttl_wdgt string";
						$lcd_cmds[] = "widget_set {$s_name} rttl_wdgt 1 4 \"Delay:\"";
						$lcd_cmds[] = "widget_add {$s_name} rtta_wdgt scroller";
						$includeSummary = false; // this screen needs all the lines
					}
					break;
				case "scr_interfaces_link":
					$ifLinkList = build_interface_link_list();
					foreach ($ifLinkList as $ifdescr => $iflink) {
						$s_name = $name . $ifdescr;
						$ifname = $iflink['name'] . ":";
						$lcd_cmds[] = "screen_add {$s_name}";
						$lcd_cmds[] = "screen_set {$s_name} heartbeat off";
						$lcd_cmds[] = "screen_set {$s_name} name \"{$name}.{$ifdescr}\"";
						$lcd_cmds[] = "screen_set {$s_name} duration {$refresh_frequency}";
						$lcd_cmds[] = "widget_add {$s_name} ifname_wdgt string";
						$lcd_cmds[] = "widget_set {$s_name} ifname_wdgt 1 1 \"{$ifname}\"";
						$lcd_cmds[] = "widget_add {$s_name} link_wdgt scroller";
						$lcd_cmds[] = "widget_add {$s_name} v4l_wdgt string";
						$lcd_cmds[] = "widget_set {$s_name} v4l_wdgt 1 2 \"v4:\"";
						$lcd_cmds[] = "widget_add {$s_name} v4a_wdgt scroller";
						$lcd_cmds[] = "widget_add {$s_name} v6l_wdgt string";
						$lcd_cmds[] = "widget_set {$s_name} v6l_wdgt 1 3 \"v6:\"";
						$lcd_cmds[] = "widget_add {$s_name} v6a_wdgt scroller";
						$lcd_cmds[] = "widget_add {$s_name} macl_wdgt string";
						$lcd_cmds[] = "widget_set {$s_name} macl_wdgt 1 4 \"m:\"";
						$lcd_cmds[] = "widget_add {$s_name} maca_wdgt scroller";
						$includeSummary = false; // this screen needs all the lines
					}
					break;
				case "scr_traffic_by_address":
					$lcd_cmds[] = "screen_add {$name}";
					$lcd_cmds[] = "screen_set {$name} heartbeat off";
					$lcd_cmds[] = "screen_set {$name} name {$name}";
					$lcd_cmds[] = "screen_set {$name} duration {$refresh_frequency}";
					$lcd_cmds[] = "widget_add {$name} title_wdgt string";
					$lcd_cmds[] = "widget_add {$name} heart_wdgt icon";

					for($i = 0; $i < ($lcdpanel_height - 1); $i++) {
						$lcd_cmds[] = "widget_add {$name} descr_wdgt{$i} scroller";
						$lcd_cmds[] = "widget_add {$name} data_wdgt{$i} string";
					}
					$includeSummary = false; // this screen needs all the lines
					break;
				case "scr_apcupsd":
					if (file_exists("/usr/local/pkg/apcupsd.inc")) {
						$lcd_cmds[] = "screen_add {$name}";
						$lcd_cmds[] = "screen_set {$name} heartbeat off";
						$lcd_cmds[] = "screen_set {$name} name {$name}";
						$lcd_cmds[] = "screen_set {$name} duration {$refresh_frequency}";
						$lcd_cmds[] = "widget_add {$name} apctitlel_wdgt string";
						$lcd_cmds[] = "widget_set {$name} apctitlel_wdgt 1 1 \"APC UPS:\"";
						$lcd_cmds[] = "widget_add {$name} apcname_wdgt scroller";
						$lcd_cmds[] = "widget_add {$name} apcstatus_wdgt scroller";
						$lcdpanel_height = get_lcdpanel_height();
						$lcdpanel_width = get_lcdpanel_width();
						if ($lcdpanel_height >= "4") {
							$lcd_cmds[] = "widget_add {$name} apctitle_summary string";
							$lcd_cmds[] = "widget_add {$name} apc_summary string";
							if ($lcdpanel_width > "16") {
								$lcd_cmds[] = "widget_set {$name} apctitle_summary 1 3 \"LINE CHRG TIMEL LOAD\"";
							} else {
								$lcd_cmds[] = "widget_set {$name} apctitle_summary 1 3 \"LINE CHRG TIMEL\"";
							}
						}
					}
					$includeSummary = false; // this screen needs all the lines
					break;
				case "scr_nutups":
					if (file_exists("/usr/local/pkg/nut/nut.inc")) {
						$lcd_cmds[] = "screen_add {$name}";
						$lcd_cmds[] = "screen_set {$name} heartbeat off";
						$lcd_cmds[] = "screen_set {$name} name {$name}";
						$lcd_cmds[] = "screen_set {$name} duration {$refresh_frequency}";
						$lcd_cmds[] = "widget_add {$name} nuttitlel_wdgt string";
						$lcd_cmds[] = "widget_set {$name} nuttitlel_wdgt 1 1 \"NUT UPS:\"";
						$lcd_cmds[] = "widget_add {$name} nutname_wdgt scroller";
						$lcd_cmds[] = "widget_add {$name} nutstatus_wdgt scroller";
						$lcdpanel_height = get_lcdpanel_height();
						$lcdpanel_width = get_lcdpanel_width();
						if ($lcdpanel_height >= "4") {
							$lcd_cmds[] = "widget_add {$name} nuttitle_summary string";
							$lcd_cmds[] = "widget_add {$name} nut_summary string";
							if ($lcdpanel_width > "16") {
								$lcd_cmds[] = "widget_set {$name} nuttitle_summary 1 3 \"LIN CHRG RUNTHMS LOD\"";
							} else {
								$lcd_cmds[] = "widget_set {$name} nuttitle_summary 1 3 \"LIN CHRG RUNTHMS\"";
							}
						}
					}
					$includeSummary = false; // this screen needs all the lines
					break;
				default:
					break;
			}
			if ($includeSummary) add_summary_declaration($lcd_cmds, $name);
		}
	}
	send_lcd_commands($lcd, $lcd_cmds);
}

function loop_status($lcd) {
	global $g;
	global $lcdproc_connect_errors;
	$lcdproc_screens_config = config_get_path('installedpackages/lcdprocscreens/config/0', []);
	$lcdpanel_width = get_lcdpanel_width();
	$lcdpanel_height = get_lcdpanel_height();
	if (empty($g['product_name'])) {
		$g['product_name'] = "pfSense";
	}

	$refresh_frequency = get_lcdpanel_refresh_frequency();
	/* keep a counter to see how many times we can loop */
	$loopCounter = 1;
	while ($loopCounter) {
		/* prepare the summary data */
		if ($lcdpanel_height >= "4") {
			$summary_states = explode("/", get_pfstate());
			$lcd_summary_data = sprintf("%02d%% %02d%% %6d", lcdproc_cpu_usage(), mem_usage(), $summary_states[0]);
			if ($lcdpanel_width > "16") {
				/* Include the CPU frequency as a percentage */
				$maxfreq = get_cpu_maxfrequency();
				if ($maxfreq === false || $maxfreq == 0) {
					$lcd_summary_data .= "  N/A"; // powerd not available on all systems - https://redmine.pfsense.org/issues/5739
				} else {
					$lcd_summary_data .= sprintf(" %3d%%", get_cpu_currentfrequency() / $maxfreq * 100);
				}
			}
		} else {
			$lcd_summary_data = "";
		}

		$lcd_cmds = array();
		$interfaceTrafficList = null;
		$ifLinkList = null;
		$gateway_status = null;

		/* initializes the widget counter */
		$widget_counter = 0;

		/* controls the output leds */
		if (outputled_enabled_CFontzPacket()) {
			$led_output_value = 0;
			/* LED 1: Interface status */
			if (substr_count(get_interfaces_stats(), "Down") > 0 ) {
				$led_output_value = $led_output_value + pow(2, 4);
			} else {
				$led_output_value = $led_output_value + pow(2, 0);
			}
			/* LED 2: CARP status */
			switch (outputled_carp()) {
				/* CARP disabled */
				case -1:
					break;
				/* CARP on Backup */
				case 0:
					$led_output_value = $led_output_value + pow(2, 5);
					break;
				/* CARP on Master */
				case 1:
				default:
					$led_output_value = $led_output_value + pow(2, 1);
			}
			/* LED 3: CPU Usage */
			if (lcdproc_cpu_usage() > 50) {
				$led_output_value = $led_output_value + pow(2, 6);
			} else {
				$led_output_value = $led_output_value + pow(2, 2);
			}
			/* LED 4: Gateway status */
			switch (outputled_gateway()) {
				/* Gateways not configured */
				case -1:
					break;
				/* Gateway down or with issues */
				case 0:
					$led_output_value = $led_output_value + pow(2, 7);
					break;
				/* All Gateways up */
				case 1:
					$led_output_value = $led_output_value + pow(2, 3);
			}
			/* Sends the command to the panel */
			$lcd_cmds[] = "output {$led_output_value}";
		}

		/* process screens to display */
		foreach ($lcdproc_screens_config as $name => $screen) {
			if (($screen != "on") && ($screen != "yes")) {
				continue;
			}

			$updateSummary = true;

			switch($name) {
				case "scr_version":
					$version = get_version();
					$lcd_cmds[] = "widget_set {$name} text_wdgt 1 2 {$lcdpanel_width} 2 h 4 \"{$version}\"";
					break;
				case "scr_time":
					$time = date("n/j/Y H:i");
					$lcd_cmds[] = "widget_set {$name} text_wdgt 1 2 {$lcdpanel_width} 2 h 4 \"{$time}\"";
					break;
				case "scr_uptime":
					$uptime = get_uptime_stats();
					$lcd_cmds[] = "widget_set {$name} text_wdgt 1 2 {$lcdpanel_width} 2 h 4 \"{$uptime}\"";
					break;
				case "scr_hostname":
					exec("/bin/hostname", $output, $ret);
					$hostname = $output[0];
					$lcd_cmds[] = "widget_set {$name} text_wdgt 1 2 {$lcdpanel_width} 2 h 4 \"{$hostname}\"";
					break;
				case "scr_system":
					$processor = lcdproc_cpu_usage();
					$memory = mem_usage();
					$lcd_cmds[] = "widget_set {$name} text_wdgt 1 2 {$lcdpanel_width} 2 h 4 \"CPU {$processor}%, Mem {$memory}%\"";
					break;
				case "scr_disk":
					$disk = disk_usage();
					$lcd_cmds[] = "widget_set {$name} text_wdgt 1 2 {$lcdpanel_width} 2 h 4 \"Disk {$disk}%\"";
					break;
				case "scr_load":
					$loadavg = get_loadavg_stats();
					$lcd_cmds[] = "widget_set {$name} text_wdgt 1 2 {$lcdpanel_width} 2 h 4 \"{$loadavg}\"";
					break;
				case "scr_states":
					$states = get_pfstate();
					$lcd_cmds[] = "widget_set {$name} text_wdgt 1 2 {$lcdpanel_width} 2 h 4 \"Cur/Max {$states}\"";
					break;
				case "scr_carp":
					$carp = get_carp_stats();
					$lcd_cmds[] = "widget_set {$name} text_wdgt 1 2 {$lcdpanel_width} 2 h 4 \"{$carp}\"";
					break;
				case "scr_ipsec":
					$ipsec = get_ipsec_stats();
					$lcd_cmds[] = "widget_set {$name} text_wdgt 1 2 {$lcdpanel_width} 2 h 4 \"{$ipsec}\"";
					break;
				case "scr_interfaces":
					$interfaces = get_interfaces_stats();
					$lcd_cmds[] = "widget_set {$name} text_wdgt 1 2 {$lcdpanel_width} 2 h 4 \"{$interfaces}\"";
					break;
				case "scr_gwsum":
					if ($gateway_status === null) {
						$gateway_status = return_gateways_status(true);
					}
					$gwup = 0;
					$gwdown = 0;
					foreach ($gateway_status as $idx => $gw) {
						if ($gw['status'] == 'online') {
							$gwup += 1;
						} else {
							$gwdown += 1;
						}
					}
					$lcd_cmds[] = "widget_set {$name} text_wdgt 1 2 {$lcdpanel_width} 2 h 4 \"Up: {$gwup} / Down: {$gwdown}\"";
					break;
				case "scr_mbuf":
					$mbufstats = lcdproc_get_mbuf_stats();
					$lcd_cmds[] = "widget_set {$name} text_wdgt 1 2 {$lcdpanel_width} 2 h 4 \"{$mbufstats}\"";
					break;
				case "scr_packages":
					$packages = lcdproc_get_package_summary();
					$title = ($lcdpanel_width >= 20) ? "Installed Packages" : "Packages";
					$lcd_cmds[] = "widget_set {$name} title_wdgt 1 1 \"{$title}\"";
					$lcd_cmds[] = "widget_set {$name} text_wdgt 1 2 {$lcdpanel_width} 2 h 4 \"{$packages}\"";
					break;
				case "scr_cpufrequency":
					$cpufreq = get_cpufrequency();
					$lcd_cmds[] = "widget_set {$name} text_wdgt 1 2 {$lcdpanel_width} 2 h 4 \"{$cpufreq}\"";
					break;
				case "scr_cputemperature":
					$cputemperature = lcdproc_get_cpu_temperature();
					$title = ($lcdpanel_width >= 20) ? "CPU Temperature" : "CPU Temp";
					$lcd_cmds[] = "widget_set {$name} title_wdgt 1 1 \"{$title}\"";
					$lcd_cmds[] = "widget_set {$name} text_wdgt 1 2 {$lcdpanel_width} 2 h 4 \"{$cputemperature}\"";
					break;
				case "scr_ntp":
					$ntpq_output = lcdproc_get_ntp_status();
					
					if ($ntpq_output != false) {
						$ntpq_counter = 0;
						foreach ($ntpq_output as $line) {
							if (substr($line, 0, 1) == "*") {
								//Active NTP Peer
								$line = substr($line, 1);
								$peerinfo = preg_split("/[\s\t]+/", $line);
								if ($peerinfo[2] == "0") {
									// When local GPS is used. Show the IP of the source and the stratum. Also append how many satellites are in use or in view
									$gps_sat_count = lcdproc_get_ntp_gps_sat_count();
									$lcd_cmds[] = "widget_set {$name} source_wdgt 1 1 {$lcdpanel_width} 2 h 4 \"{$peerinfo[1]} (stratum {$peerinfo[2]}) " . (($gps_sat_count == false) ? "" : "{$gps_sat_count}") . "\"";
									$lcd_cmds[] = "widget_set {$name} delay_wdgt 1 2 {$lcdpanel_width} 2 h 4 \"Delay: {$peerinfo[7]}\"";
									$lcd_cmds[] = "widget_set {$name} offset_wdgt 1 3 {$lcdpanel_width} 2 h 4 \"Offset: {$peerinfo[8]}\"";
									$lcd_cmds[] = "widget_set {$name} jitter_wdgt 1 4 {$lcdpanel_width} 2 h 4 \"Jitter: {$peerinfo[9]}\"";
								} else {
									// Show IP of the source and the stratum
									$lcd_cmds[] = "widget_set {$name} source_wdgt 1 1 {$lcdpanel_width} 2 h 4 \"{$peerinfo[0]} (stratum {$peerinfo[2]})\"";
									$lcd_cmds[] = "widget_set {$name} delay_wdgt 1 2 {$lcdpanel_width} 2 h 4 \"Delay: {$peerinfo[7]}\"";
									$lcd_cmds[] = "widget_set {$name} offset_wdgt 1 3 {$lcdpanel_width} 2 h 4 \"Offset: {$peerinfo[8]}\"";
									$lcd_cmds[] = "widget_set {$name} jitter_wdgt 1 4 {$lcdpanel_width} 2 h 4 \"Jitter: {$peerinfo[9]}\"";
								}
								$ntpq_counter++;
							} elseif (substr($line, 0, 1) == "o") {
								//Local PPS Peer
								$line = substr($line, 1);
								$peerinfo = preg_split("/[\s\t]+/", $line);
								$lcd_cmds[] = "widget_set {$name} source_wdgt 1 1 {$lcdpanel_width} 2 h 4 \"{$peerinfo[1]} (stratum {$peerinfo[2]}, PPS)\"";
								$lcd_cmds[] = "widget_set {$name} delay_wdgt 1 2 {$lcdpanel_width} 2 h 4 \"Delay: {$peerinfo[7]}\"";
								$lcd_cmds[] = "widget_set {$name} offset_wdgt 1 3 {$lcdpanel_width} 2 h 4 \"Offset: {$peerinfo[8]}\"";
								$lcd_cmds[] = "widget_set {$name} jitter_wdgt 1 4 {$lcdpanel_width} 2 h 4 \"Jitter: {$peerinfo[9]}\"";
								$ntpq_counter++;
							}
						}
						if ($ntpq_counter == 0) {
							$lcd_cmds[] = "widget_set {$name} source_wdgt 1 1 {$lcdpanel_width} 2 h 4 \"No active peers available\"";
							$lcd_cmds[] = "widget_set {$name} delay_wdgt 1 2 {$lcdpanel_width} 2 h 4 \"\"";
							$lcd_cmds[] = "widget_set {$name} offset_wdgt 1 3 {$lcdpanel_width} 2 h 4 \"\"";
							$lcd_cmds[] = "widget_set {$name} jitter_wdgt 1 4 {$lcdpanel_width} 2 h 4 \"\"";
						} 
					} else {
						$lcd_cmds[] = "widget_set {$name} source_wdgt 1 1 {$lcdpanel_width} 2 h 4 \"NTP Server is Disabled\"";
						$lcd_cmds[] = "widget_set {$name} delay_wdgt 1 2 {$lcdpanel_width} 2 h 4 \"\"";
						$lcd_cmds[] = "widget_set {$name} offset_wdgt 1 3 {$lcdpanel_width} 2 h 4 \"\"";
						$lcd_cmds[] = "widget_set {$name} jitter_wdgt 1 4 {$lcdpanel_width} 2 h 4 \"\"";
					}

					$updateSummary = false;
					break;				
				case "scr_traffic":
					if ($interfaceTrafficList == null) $interfaceTrafficList = build_interface_traffic_stats_list(); // We only want build_interface_traffic_stats_list() to be called once per loop, and only if it's needed
					get_traffic_stats($interfaceTrafficList, $in_data, $out_data);
					$lcd_cmds[] = "widget_set {$name} title_wdgt 1 1 \"{$in_data}\"";
					$lcd_cmds[] = "widget_set {$name} text_wdgt 1 2 \"{$out_data}\"";
					break;
				case "scr_top_interfaces_by_bps":
					if ($interfaceTrafficList == null) {
						// We only want build_interface_traffic_stats_list() to be called once per loop, and only if it's needed
						$interfaceTrafficList = build_interface_traffic_stats_list();
					}
					$interfaceTrafficStrings = get_top_interfaces_by_bps($interfaceTrafficList, $lcdpanel_width, $lcdpanel_height);

					$title = ($lcdpanel_width >= 20) ? "Interface bps IN/OUT" : "Intf. bps IN/OUT";
					$lcd_cmds[] = "widget_set {$name} title_wdgt 1 1 \"{$title}\"";

					for($i = 0; $i < ($lcdpanel_height - 1) && $i < count($interfaceTrafficStrings); $i++) {

						$lcd_cmds[] = "widget_set {$name} text_wdgt{$i} 1 " . ($i + 2) . " \"{$interfaceTrafficStrings[$i]}\"";
					}
					$updateSummary = false;
					break;
				case "scr_top_interfaces_by_bytes_today":
					if ($interfaceTrafficList == null) $interfaceTrafficList = build_interface_traffic_stats_list(); // We only want build_interface_traffic_stats_list() to be called once per loop, and only if it's needed
					$interfaceTrafficStrings = get_top_interfaces_by_bytes_today($interfaceTrafficList, $lcdpanel_width);

					$title = ($lcdpanel_width >= 20) ? "Total today   IN/OUT" : "Today   IN / OUT";
					$lcd_cmds[] = "widget_set {$name} title_wdgt 1 1 \"{$title}\"";

					for($i = 0; $i < ($lcdpanel_height - 1) && $i < count($interfaceTrafficStrings); $i++) {

						$lcd_cmds[] = "widget_set {$name} text_wdgt{$i} 1 " . ($i + 2) . " \"{$interfaceTrafficStrings[$i]}\"";
					}
					$updateSummary = false;
					break;
				case "scr_top_interfaces_by_total_bytes":
					if ($interfaceTrafficList == null) $interfaceTrafficList = build_interface_traffic_stats_list(); // We only want build_interface_traffic_stats_list() to be called once per loop, and only if it's needed
					$interfaceTrafficStrings = get_top_interfaces_by_total_bytes($interfaceTrafficList, $lcdpanel_width);

					$title = ($lcdpanel_width >= 20) ? "Total         IN/OUT" : "Total   IN / OUT";
					$lcd_cmds[] = "widget_set {$name} title_wdgt 1 1 \"{$title}\"";

					for($i = 0; $i < ($lcdpanel_height - 1) && $i < count($interfaceTrafficStrings); $i++) {

						$lcd_cmds[] = "widget_set {$name} text_wdgt{$i} 1 " . ($i + 2) . " \"{$interfaceTrafficStrings[$i]}\"";
					}
					$updateSummary = false;
					break;
				case "scr_gwstatus":
					if ($gateway_status === null) {
						$gateway_status = return_gateways_status(true);
					}
					foreach ($gateway_status as $gwname => $gw) {
						$s_name = $name . $gwname;
						$lcd_cmds[] = "widget_set {$s_name} gwname_wdgt 1 1 \"{$gwname}\"";

						if ($gw['monitor_disable']) {
							$gw['substatus'] = 'assumed';
							$gw['loss'] = 'Disabled';
							$gw['delay'] = 'Disabled';
						}
						$statstring = ucwords($gw['status']);
						if (!empty($gw['substatus']) &&
						    ($gw['substatus'] != "none")) {
							$statstring .= " ({$gw['substatus']})";
						}
						$lcd_cmds[] = "widget_set $s_name stata_wdgt 1 2 " .
							$lcdpanel_width . " 2 h 4 \"" .
							$statstring . "\"";

						$lcd_cmds[] = "widget_set $s_name lossa_wdgt 7 3 " .
							$lcdpanel_width . " 3 h 4 \"" .
							$gw['loss'] . "\"";

						$lcd_cmds[] = "widget_set $s_name rtta_wdgt 8 4 " .
							$lcdpanel_width . " 4 h 4 \"" .
							$gw['delay'] . "\"";
					}
					$updateSummary = false;
					break;
				case "scr_interfaces_link":
					// We only want build_interface_link_list() to be
					// called once per loop, and only if it's needed
					if ($ifLinkList == null) {
						$ifLinkList = build_interface_link_list();
					}

					foreach ($ifLinkList as $ifdescr => $iflink) {
						$s_name = $name . $ifdescr;
						$ifname = $iflink['name'] . ":";
						$l_str = ($iflink['status'] == "down") ? "down" : $iflink['link'];

						$lcd_cmds[] = "widget_set $s_name ifname_wdgt 1 1 \"$ifname\"";

						$lcd_cmds[] = "widget_set $s_name link_wdgt " .
							(strlen($iflink['name']) + 3) . " 1 " .
							$lcdpanel_width . " 1 h 4 \"" . $l_str . "\"";

						$lcd_cmds[] = "widget_set $s_name v4a_wdgt 5 2 " .
							$lcdpanel_width . " 2 h 4 \"" .
							$iflink['v4addr'] . "\"";

						$lcd_cmds[] = "widget_set $s_name v6a_wdgt 5 3 " .
							$lcdpanel_width . " 3 h 4 \"" .
							$iflink['v6addr'] . "\"";

						$lcd_cmds[] = "widget_set $s_name maca_wdgt 4 4 " .
							$lcdpanel_width . " 4 h 4 \"" .
							$iflink['mac'] . "\"";
					}
					$updateSummary = false;
					break;
				case "scr_traffic_by_address":
					$title = ($lcdpanel_width >= 20) ? "Host       IN / OUT" : "Host   IN / OUT";
					$lcd_cmds[] = "widget_set {$name} title_wdgt 2 1 \"{$title}\"";
					$lcd_cmds[] = "widget_set {$name} heart_wdgt 1 1 \"" . (($loopCounter & 1) == 0 ? "HEART_OPEN" : "HEART_FILLED") . "\""; // Indicate each time the list has been updated

					$traffic = get_bandwidth_by_ip();
					$clearLinesFrom = 0;

					if (isset($traffic['error'])) {
						if ($traffic['error'] === "no info") {
							// not really an error - there's likely just no traffic
						} else {
							// traffic info not available, display the error message instead
							$lcd_cmds[] = "widget_set {$name} descr_wdgt0 1 2 {$lcdpanel_width} 2 h 2 \"Error: {$traffic['error']}\"";
							$lcd_cmds[] = "widget_set {$name} data_wdgt0 1 2 \"\"";
							$clearLinesFrom = 1;
						}
					} else {
						for ($i = 0; $i < ($lcdpanel_height - 1) && $i < count($traffic); $i++) {
							$speeds = $traffic[$i]['in/out'];
							$left = $lcdpanel_width - strlen($speeds);
							$lcd_cmds[] = "widget_set {$name} data_wdgt{$i} " . ($left + 1) . " " . ($i + 2) . " \"{$speeds}\"";
							$lcd_cmds[] = "widget_set {$name} descr_wdgt{$i} 1 " . ($i + 2) . " " . ($left - 1) . " " . ($i + 2) . " h 2 \"{$traffic[$i]['name']}\"";
							$clearLinesFrom = $i + 1;
						}
					}
					for($i = $clearLinesFrom; $i < ($lcdpanel_height - 1); $i++) {
						$lcd_cmds[] = "widget_set {$name} descr_wdgt{$i} 1 2 1 2 h 2 \"\"";
						$lcd_cmds[] = "widget_set {$name}  data_wdgt{$i} 1 2         \"\"";
					}
					$updateSummary = false;
					break;
				case "scr_apcupsd":
					if (file_exists("/usr/local/pkg/apcupsd.inc")) {
						require_once("/usr/local/pkg/apcupsd.inc");
						$results = [];
						$nis_server = check_nis_running_apcupsd();
						if ($nis_server) {
							$nisip = (check_nis_ip_apcupsd() != ''? check_nis_ip_apcupsd() : "localhost");
							$nisport = (check_nis_port_apcupsd() != '' ? check_nis_port_apcupsd() : "3551");
							$ph = popen("/usr/local/sbin/apcaccess -h " . escapeshellarg($nisip) . ":" . escapeshellarg($nisport) . " 2>&1", "r" );
							while ($v = fgets($ph)) {
								$results[trim(explode(': ', $v)[0])]=trim(explode(': ', $v)[1]);
							}
							pclose($ph);
							if ($results == null) {
								$results['UPSNAME'] = "Unknown";
								$results['STATUS'] = "Invalid Response";
							}
						} else {
							$results['UPSNAME'] = "Unknown";
							$results['STATUS'] = "Service Stopped";
						}
						if (empty($results['UPSNAME'])) {
							$results['UPSNAME'] = "No Name";
						}
						if (empty($results['STATUS'])) {
							$results['STATUS'] = "Unknown";
						}

						$lcdpanel_height = get_lcdpanel_height();
						$lcdpanel_width = get_lcdpanel_width();

						$lcd_cmds[] = "widget_set {$name} apcname_wdgt 10 1 {$lcdpanel_width} 2 h 4 \"{$results['UPSNAME']}\"";
						$lcd_cmds[] = "widget_set {$name} apcstatus_wdgt 1 2 {$lcdpanel_width} 2 h 4 \"{$results['STATUS']}\"";

						if ($lcdpanel_height >= "4") {
							if (!empty($results['LINEV'])) {
								$results['LINEV'] = str_replace(" Percent", "", $results['LINEV']);
							} else {
								$results['LINEV'] = 'N/A';
							}
							if (!empty($results['BCHARGE'])) {
								$results['BCHARGE'] = str_replace(" Percent", "", $results['BCHARGE']);
							} else {
								$results['BCHARGE'] = 'N/A';
							}
							if (!empty($results['TIMELEFT'])) {
								$results['TIMELEFT'] = str_replace(" Minutes", "", $results['TIMELEFT']);
							} else {
								$results['TIMELEFT'] = 'N/A';
							}
							$ups_summary_data = sprintf("%3dV %3d%% %4dM", $results['LINEV'], $results['BCHARGE'], $results['TIMELEFT']);
							if ($lcdpanel_width > "16") {
								if (!empty($results['LOADPCT'])) {
									$results['LOADPCT'] = str_replace(" Percent", "", $results['LOADPCT']);
								} else {
									$results['LOADPCT'] = 'N/A';
								}
								$ups_summary_data .= sprintf(" %3d%%", $results['LOADPCT']);
							}
							$lcd_cmds[] = "widget_set {$name} apc_summary 1 4 \"{$ups_summary_data}\"";
						}
					}
					$updateSummary = false;
					break;
				case "scr_nutups":
					if (file_exists("/usr/local/pkg/nut/nut.inc")) {
						require_once("/usr/local/pkg/nut/nut.inc");
						$results = nut_ups_status();
						if (!empty($results)) {
							if (empty($results['_summary'])) {
								$results['_summary'] = "Invalid Response";
							}
						} else {
							$results['_name'] = "Unknown";
							$results['_summary'] = "Service Stopped";
						}
						if (empty($results['_name'])) {
							$results['_name'] = "No Name";
						} else {
							[$nutupsname, $nutupshost] = explode('@', $results['_name']);
							$results['_name'] = $nutupsname;
						}
						if (empty($results['_summary'])) {
							$results['_summary'] = "Unknown";
						}

						$lcdpanel_height = get_lcdpanel_height();
						$lcdpanel_width = get_lcdpanel_width();

						$lcd_cmds[] = "widget_set {$name} nutname_wdgt 10 1 {$lcdpanel_width} 2 h 4 \"{$results['_name']}\"";
						$lcd_cmds[] = "widget_set {$name} nutstatus_wdgt 1 2 {$lcdpanel_width} 2 h 4 \"{$results['_summary']}\"";

						if ($lcdpanel_height >= "4") {
							if (empty($results['input.voltage'])) {
								$results['input.voltage'] = 'N/A';
							}
							if (empty($results['battery.charge'])) {
								$results['battery.charge'] = 'N/A';
							}
							if (empty($results['_hms'])) {
								$results['_hms'] = 'N/A';
							}
							$ups_summary_data = sprintf("%3d %3d%% %7s", $results['input.voltage'], $results['battery.charge'], $results['_hms']);
							if ($lcdpanel_width > "16") {
								if (empty($results['ups.load'])) {
									$results['ups.load'] = 'N/A';
								}
								$ups_summary_data .= sprintf(" %2d%%", $results['ups.load']);
							}
							$lcd_cmds[] = "widget_set {$name} nut_summary 1 4 \"{$ups_summary_data}\"";
						}
					}
					$updateSummary = false;
					break;
				default:
					break;
			}
			if ($name != "scr_traffic_interface" && substr($name, 0, 23) != 'scr_traffic_by_address_') {	// "scr_traffic_interface" isn't a real screen, it's a parameter for the "scr_traffic" screen
				$widget_counter++;
				if ($updateSummary) add_summary_values($lcd_cmds, $name, $lcd_summary_data);
			}
		}
		if (send_lcd_commands($lcd, $lcd_cmds)) {
			$lcdproc_connect_errors = 0; // Reset the error counter
		} else {
			//an error occurred
			return;
		}
		if (($refresh_frequency * $widget_counter) > 5) {
			// If LCD is waiting 10 seconds on each screen, for example, then we can update the data of
			// of a screen while its being displayed.
			sleep(5);
		} else {
			sleep($refresh_frequency * $widget_counter);
		}
		$loopCounter++;
	}
}

/* Initialize the wan traffic counters */
$traffic_last_ugmt  = array();
$traffic_last_ifin  = array();
$traffic_last_ifout = array();

$traffic_last_hour        = array();
$traffic_startOfDay_ifin  = array();
$traffic_startOfDay_ifout = array();

/* Initialize the global error counter */
$lcdproc_connect_errors = 0;
$lcdproc_max_connect_errors = 3;
/* Connect to the LCDd port and interface with the LCD */
while ($lcdproc_connect_errors <= $lcdproc_max_connect_errors) {
	lcdproc_warn("Start client procedure. Error counter: ({$lcdproc_connect_errors})");
	sleep(1);
	$lcd = fsockopen(LCDPROC_HOST, LCDPROC_PORT, $errno, $errstr, 10);
	if (!$lcd) {
		lcdproc_warn("Failed to connect to LCDd process {$errstr} ({$errno})");
		$lcdproc_connect_errors++;
	} else {
		stream_set_timeout($lcd, 0 , 25000); // Sets the socket timeout as 25ms
		/* Allow the script to run forever (0) */
		set_time_limit(0);
		build_interface($lcd);
		loop_status($lcd);
		fclose($lcd);
	}
}
if ($lcdproc_connect_errors >= $lcdproc_max_connect_errors) {
	lcdproc_warn("Too many errors, stopping client.");
}
?>