From bd3fd5d49ba032dd69251e027d3744fd2f14012b Mon Sep 17 00:00:00 2001 From: Jamie Cameron Date: Mon, 23 Feb 2026 20:58:55 -0800 Subject: [PATCH] Fix perl formatting --- mount/system_info.pl | 152 +++++++++++++++++++++---------------------- 1 file changed, 76 insertions(+), 76 deletions(-) diff --git a/mount/system_info.pl b/mount/system_info.pl index c989ca82b..bd4f54e1c 100644 --- a/mount/system_info.pl +++ b/mount/system_info.pl @@ -2,86 +2,86 @@ do 'mount-lib.pl'; sub list_system_info { - # Can we get list of disk with space? - my $can = &foreign_available($module_name) && $access{'sysinfo'}; - if ((length($config{'sysinfo'}) && !$config{'sysinfo'}) || !$can) { - return (); +# Can we get list of disk with space? +my $can = &foreign_available($module_name) && $access{'sysinfo'}; +if ((length($config{'sysinfo'}) && !$config{'sysinfo'}) || !$can) { + return (); + } +my (undef, undef, $disks, undef) = &local_disk_space(); +if (!@$disks) { + return (); + } + +my $desc = ucwords($text{'edit_usage'}); +my $html; +my $open = 0; +&load_theme_library(); +$html = &ui_columns_start([ + ucwords($text{'index_dir'}), ucwords($text{'index_type'}), + ucwords($text{'edit_free'}), ucwords($text{'index_used'}), + ucwords($text{'sysinfo_total'}), ucwords($text{'sysinfo_dev'}), + ]); +foreach my $disk (@$disks) { + my $total = $disk->{'total'}; + my $itotal = $disk->{'itotal'}; + next if (!$total); + my $dev_id = $disk->{'device'}; + my $dir = $disk->{'dir'}; + my $type = $disk->{'type'}; + my $total_nice = &nice_size($total); + my $free = $disk->{'free'}; + my $ifree = $disk->{'ifree'}; + my $used_nice = &nice_size($disk->{'used'} // $total - $free); + my $free_nice = &nice_size($free); + my $free_percent = 100 - ($disk->{'used_percent'} // int(($total - $free) / $total * 100)); + my $free_percent_html; + + # Inodes percent + my $ifree_percent_html; + my $itotal_full; + my $iused; + my $ifree_percent; + $ifree_percent = 100 - int(($itotal - $ifree) / $itotal * 100) + if ($itotal); + + # Calc percents + if ($free_percent > 49) { + $free_percent_html = &ui_text_color("$free_percent%", 'success'); + $ifree_percent_html = &ui_text_color("$ifree_percent%", 'success') + if ($itotal); } - my (undef, undef, $disks, undef) = &local_disk_space(); - if (!@$disks) { - return (); + elsif ($free_percent > 9) { + $free_percent_html = &ui_text_color("$free_percent%", 'warn'); + $ifree_percent_html = &ui_text_color("$ifree_percent%", 'warn') + if ($itotal); + } + else { + $open = 1; + $free_percent_html = &ui_text_color("$free_percent%", 'danger'); + $ifree_percent_html = &ui_text_color("$ifree_percent%", 'danger') + if ($itotal); } - my $desc = ucwords($text{'edit_usage'}); - my $html; - my $open = 0; - &load_theme_library(); - $html = &ui_columns_start([ - ucwords($text{'index_dir'}), ucwords($text{'index_type'}), - ucwords($text{'edit_free'}), ucwords($text{'index_used'}), - ucwords($text{'sysinfo_total'}), ucwords($text{'sysinfo_dev'}), - ]); - foreach my $disk (@$disks) { - my $total = $disk->{'total'}; - my $itotal = $disk->{'itotal'}; - next if (!$total); - my $dev_id = $disk->{'device'}; - my $dir = $disk->{'dir'}; - my $type = $disk->{'type'}; - my $total_nice = &nice_size($total); - my $free = $disk->{'free'}; - my $ifree = $disk->{'ifree'}; - my $used_nice = &nice_size($disk->{'used'} // $total - $free); - my $free_nice = &nice_size($free); - my $free_percent = 100 - ($disk->{'used_percent'} // int(($total - $free) / $total * 100)); - my $free_percent_html; - - # Inodes percent - my $ifree_percent_html; - my $itotal_full; - my $iused; - my $ifree_percent; - $ifree_percent = 100 - int(($itotal - $ifree) / $itotal * 100) - if ($itotal); - - # Calc percents - if ($free_percent > 49) { - $free_percent_html = &ui_text_color("$free_percent%", 'success'); - $ifree_percent_html = &ui_text_color("$ifree_percent%", 'success') - if ($itotal); - } - elsif ($free_percent > 9) { - $free_percent_html = &ui_text_color("$free_percent%", 'warn'); - $ifree_percent_html = &ui_text_color("$ifree_percent%", 'warn') - if ($itotal); - } - else { - $open = 1; - $free_percent_html = &ui_text_color("$free_percent%", 'danger'); - $ifree_percent_html = &ui_text_color("$ifree_percent%", 'danger') - if ($itotal); - } - - # Inodes total - if ($itotal) { - $ifree_percent_html = "
".$ifree_percent_html." ($ifree inodes)
"; - $itotal_full = "
$itotal inodes
"; - $iused = "
@{[$disk->{'iused'} // $disk->{'itotal'} - $disk->{'ifree'}]} inodes
"; - } - $html .= &ui_columns_row([ - $dir, $type, - $free_percent_html." ($free_nice)$ifree_percent_html", - $used_nice.$iused, - $total_nice.$itotal_full, - $dev_id]); + # Inodes total + if ($itotal) { + $ifree_percent_html = "
".$ifree_percent_html." ($ifree inodes)
"; + $itotal_full = "
$itotal inodes
"; + $iused = "
@{[$disk->{'iused'} // $disk->{'itotal'} - $disk->{'ifree'}]} inodes
"; } - $html .= &ui_columns_end(); - return ({ 'type' => 'html', - 'desc' => $desc, - 'open' => $open, - 'id' => $module_name . '_disks_info', - 'html' => $html - }); + $html .= &ui_columns_row([ + $dir, $type, + $free_percent_html." ($free_nice)$ifree_percent_html", + $used_nice.$iused, + $total_nice.$itotal_full, + $dev_id]); + } +$html .= &ui_columns_end(); +return ({ 'type' => 'html', + 'desc' => $desc, + 'open' => $open, + 'id' => $module_name . '_disks_info', + 'html' => $html + }); } sub ucwords