#!/usr/bin/perl
# cpanel - checklibssl                            Copyright(c) 2010 cPanel, Inc.
#                                                           All Rights Reserved.
# copyright@cpanel.net                                         http://cpanel.net
# This code is subject to the cPanel license. Unauthorized copying is prohibited

BEGIN { unshift @INC, '/usr/local/cpanel'; }

use Cpanel::Sys::OS ();

exit if !-e '/etc/redhat-release';

my ($version) = Cpanel::Sys::OS::getversionfromfile('/etc/redhat-release');

if ( $version && $version eq '9' ) {
    if ( -e '/usr/lib/libcrypto.so.0.9.6' ) {
        symlink 'libcrypto.so.0.9.6', '/usr/lib/libcrypto.so.0';
    }
    if ( -e '/usr/lib/libssl.so.0.9.6' ) {
        symlink 'libssl.so.0.9.6', '/usr/lib/libssl.so.0';
    }
    if ( -e '/lib/libcrypto.so.0.9.6b' ) {
        symlink 'libcrypto.so.0.9.6b', '/lib/libcrypto.so.0';
    }
    if ( -e '/lib/libssl.so.0.9.6b' ) {
        symlink 'libssl.so.0.9.6b', '/lib/libssl.so.0';
    }
}

foreach my $lib (qw( libssl.so libcrypto.so )) {
    foreach my $dir (qw( /lib /lib64 /usr/lib /usr/lib64 )) {
        if ( !-e $dir . '/' . $lib . '.4' && -e $dir . '/' . $lib . '.6' ) {
            chdir $dir or next;
            symlink $lib . '.6', $lib . '.4';
        }
    }
}