#  This software was derived from SATAN 1.1.1 by Dan Farmer and Wietse Venema
#  (http://www.porcupine.org/satan).
#
#
#  This code update is provided by the Advanced Research Corporation (r) to
#  further the utility of the SARA Report Writer.  We request that the
#  developers do not modify or reverse engineer this code for
#  their own gain.
#
#  Developed and distributed by the Advanced Research Corporation.
#
# Report vulnerability classes
#
sub sort_numeric {
	$severity_type_count{$b} <=> $severity_type_count{$a};
}

&make_severity_info();
if (sizeof(*severity_type_host_info) > 0) {
    for (sort sort_numeric keys %severity_type_host_info) {
#	($_type = $_) =~ tr / \//+!/;

	print CLIENT <<EOF;
	<li> 
	<a href="sara_severity_hosts.pl,$_type,">
	$_</a>
EOF
    }
}
