RE: [Bastille-linux-discuss] Red Hat version numbers and names
This tool locks down Linux and UNIX systems.
Brought to you by:
jay
From: <Zie...@re...> - 2003-03-31 16:40:41
|
Well, here is my updated source code. Fixed my spelling errors and added recognition of Red Hat 9. From what I know it should be similar to Red Hat 8. What are we going to do next about this source code? API.pm: Replaced code around lines 378: elsif ( -e "/etc/redhat-release" ) { open(*REDHAT_RELEASE,"/etc/redhat-release"); $release = <REDHAT_RELEASE>; my %version; if ($release =~ /^Red Hat Linux .*\((.*)\).*/) { %version = ('Zoot'=>'RH6.2' 'Guinness'=>'RH7.0', 'Seawolf'=>'RH7.1', 'Enigma'=>'RH7.2', 'Pensacola'=>'RHAS2.1', 'Valhalla'=>'RH7.3', 'Psyche'=>'RH8.0', 'Shrike'=>'RH9.0'); } unless ($distro = $version{$1}) { print STDERR "Couldn't determine Red Hat version! Setting to 6.2!\n"; $distro = 'RH6.2'; # I would get rid of defaults } close(REDHAT_RELEASE); } Added RHAS2.1 flag around line 483: sub get_supported_OS_list () { my @list = ( "DB2.2", "DB3.0", "RH6.0","RH6.1","RH6.2","RH7.0","RH7.1","RH7.2","RH7.3","RH8.0","RHAS2.1", "MN6.0","MN6.1","MN7.0","MN7.1","MN7.2","MN8.0","MN8.1","MN8.2", "HP-UX11.00","HP-UX11.11", "HP-UX11.22", "HP-UX11.23", "SE7.2","SE7.3", "SE8.0","TB7.0" ); return \@list; } Added RHAS2.1 so it is executed also: if (($distro eq 'RH7.2') or ($distro eq 'RHAS2.1')) { $GLOBAL_FILE{"banners_makefile"}="/usr/share/doc/tcp_wrappers-7.6/Banners.Makefile"; } IOLoader.pm: Added RHAS2.1 flag to line 267: my $supported_versions = 'RH6.0 RH6.1 RH6.2 RH7.0 RH7.1 RH7.2 RHAS2.1 RH7.3 RH8.0'; ----------------------------------------------------------------- Visit our Internet site at http://www.reuters.com Get closer to the financial markets with Reuters Messaging - for more information and to register, visit http://www.reuters.com/messaging Any views expressed in this message are those of the individual sender, except where the sender specifically states them to be the views of Reuters Ltd. |