#!/usr/bin/perl
# cpanel - checksyspkgsetup                       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 strict;
use Cpanel::SysPkgs ();
use Cpanel::Sys::OS ();

my $os = Cpanel::Sys::OS::getos();
if ( $os !~ /mandrake/i ) { exit(); }

my $syspkgobj = Cpanel::SysPkgs->new();

if ( !$syspkgobj ) {
    die "Could not create SysPkgs object\n";
}

if ( !$syspkgobj->checkconfig() ) {
    $syspkgobj->setup();
    $syspkgobj->check();
}

if ( !$syspkgobj->checkconfig() ) {
    die 'checksyspkgsetup: setup failed';
}

print "checksyspkgsetup: setup ok\n";