From: Michael Tremer <michael.tremer@ipfire.org>
Date: Sat, 27 Apr 2024 11:50:31 +0000 (+0200)
Subject: connections.cgi: Use &General::formatBytes() for format usage
X-Git-Url: http://git.ipfire.org/?a=commitdiff_plain;h=69dcb9bd659bbde4e738b6db24795c5646dcbf48;p=people%2Fmfischer%2Fipfire-2.x.git

connections.cgi: Use &General::formatBytes() for format usage

Signed-off-by: Michael Tremer <michael.tremer@ipfire.org>
---

diff --git a/html/cgi-bin/connections.cgi b/html/cgi-bin/connections.cgi
index 055fc3cbc..b8a27a28f 100644
--- a/html/cgi-bin/connections.cgi
+++ b/html/cgi-bin/connections.cgi
@@ -474,8 +474,9 @@ foreach my $line (<CONNTRACK>) {
 		$dserv = uc(getservbyport($dport, lc($l4proto)));
 	}
 
-	my $bytes_in = format_bytes($bytes[0]);
-	my $bytes_out = format_bytes($bytes[1]);
+	# Format bytes
+	my $bytes_in  = &General::formatBytes($bytes[0]);
+	my $bytes_out = &General::formatBytes($bytes[1]);
 
 	# enumerate location information
 	my $srcccode = &Location::Functions::lookup_country_code($sip_ret);
@@ -579,21 +580,6 @@ print "</table>";
 &Header::closebigbox();
 &Header::closepage();
 
-sub format_bytes($) {
-	my $bytes = shift;
-	my @units = ("B", "k", "M", "G", "T");
-
-	foreach my $unit (@units) {
-		if ($bytes < 1024) {
-			return sprintf("%d%s", $bytes, $unit);
-		}
-
-		$bytes /= 1024;
-	}
-
-	return sprintf("%d%s", $bytes, $units[$#units]);
-}
-
 sub format_time($) {
 	my $time = shift;