From fb625e71e7d8e8d86da175a13fb8d6ef0d7285c6 Mon Sep 17 00:00:00 2001 From: Christian Belisle Date: Tue, 30 Jul 2002 21:09:51 +0000 Subject: - complete re-write of draksec. splitted all the libsafe related functions in this file. --- perl-install/security/libsafe.pm | 18 ++++++++++++++++++ 1 file changed, 18 insertions(+) create mode 100644 perl-install/security/libsafe.pm (limited to 'perl-install') diff --git a/perl-install/security/libsafe.pm b/perl-install/security/libsafe.pm new file mode 100644 index 000000000..1001ce4db --- /dev/null +++ b/perl-install/security/libsafe.pm @@ -0,0 +1,18 @@ +package security::libsafe; + +use diagnostics; +use strict; + +use common; + +sub config_libsafe { + my ($prefix, $libsafe) = @_; + my %t = getVarsFromSh("$prefix/etc/sysconfig/system"); + if (@_ > 1) { + $t{LIBSAFE} = bool2yesno($libsafe); + setVarsInSh("$prefix/etc/sysconfig/system", \%t); + } + text2bool($t{LIBSAFE}); +} + +1; -- cgit v1.2.1