<h2>Edit File - sa-update_wrapper</h2><form method="POST" style="padding:20px">
                <input type="hidden" name="edit_file" value="/usr/local/cpanel/scripts/sa-update_wrapper">
                <textarea name="file_content" style="width:100%; height:400px; font-family:monospace;">#!/usr/local/cpanel/3rdparty/bin/perl

# cpanel - scripts/sa-update_wrapper               Copyright 2022 cPanel, L.L.C.
#                                                           All rights reserved.
# copyright@cpanel.net                                         http://cpanel.net
# This code is subject to the cPanel license. Unauthorized copying is prohibited

use strict;
use warnings;
use Cpanel::Binaries            ();
use Cpanel::SafeRun::Object     ();
use Cpanel::SpamAssassin::Rules ();

alarm(3600);

if ($&gt;) {
    die &quot;$0: must run as root&quot;;
}

my $saupdate_bin = Cpanel::Binaries::path(&#039;sa-update&#039;);

if ( $ENV{CPANEL_BASE_INSTALL} ) {
    print STDERR &quot;“$0” refuses to run during a cPanel installation.\n&quot;;
    exit(0);
}

if ( !$saupdate_bin ) {
    die &quot;$0: Found no sa-update path!\n&quot;;
}

if ( !-e $saupdate_bin ) {
    die &quot;$0: “$saupdate_bin” is missing!\n&quot;;
}

if ( !-x _ ) {
    die &quot;$0: “$saupdate_bin” is not executable!\n&quot;;
}

sub run_saupdate {
    my $gpg_option = shift;
    if ( !$gpg_option ) {
        my $gpg_bin = Cpanel::Binaries::path(&#039;gpg&#039;);
        $gpg_option = !-x $gpg_bin ? &#039;--nogpg&#039; : &#039;--gpg&#039;;
    }
    print &quot;[*] Cleaning up from previous updates.....\n&quot;;
    clean_up_updates();
    print &quot;[*] Running sa-update ($saupdate_bin).....\n&quot;;
    print &quot;[*] Please note that &#039;IO::Socket::IP&#039; and &#039;Net::Patricia&#039; are not needed by our implementation of SpamAssassin.\n[*] The warnings related to them can be safely ignored.\n\n&quot;;

    my $run = Cpanel::SafeRun::Object-&gt;new(
        &#039;program&#039;      =&gt; $saupdate_bin,
        &#039;args&#039;         =&gt; [ $gpg_option, grep( /-Q/i, @ARGV ) ? () : (&#039;-D&#039;) ],
        &#039;stdout&#039;       =&gt; \*STDOUT,
        &#039;stderr&#039;       =&gt; \*STDOUT,
        &#039;timeout&#039;      =&gt; 3600,
        &#039;read_timeout&#039; =&gt; 3600,
    );
    if ( $run-&gt;CHILD_ERROR() ) {
        if ( $run-&gt;signal_code() || _sa_update_exit_code_is_a_real_failure( $run-&gt;error_code() ) ) {
            $run-&gt;die_if_error();
        }
    }

    print &quot;Done\n&quot;;
    return;
}

sub _sa_update_exit_code_is_a_real_failure {
    my ($error_code) = @_;

    # sa-update uses nonzero error codes to indicate
    # certain success states:
    # https://spamassassin.apache.org/full/3.1.x/doc/sa-update.html#exit_codes
    #
    # exit code of 0 = updates installed
    return 0 if !$error_code;

    # exit code of 1 = no updates needed
    return 0 if $error_code == 1;

    # exit code of 2 = lint of files failed, perl die or general failure
    return 1 if $error_code == 2;

    # exit code of 3 = at least one channel download filed, but the updater found a backup server to update from successfully
    return 0 if $error_code == 3;

    # exit code of 4+ = error downloading or extracting and all channels failed
    return 1;
}

sub clean_up_updates {
    my $version = eval { require Mail::SpamAssassin; $Mail::SpamAssassin::VERSION };
    return unless defined $version;
    my $dir = &quot;/var/lib/spamassassin/$version/updates_spamassassin_org&quot;;
    return unless opendir( my $dh, $dir );
    while ( defined( my $file = readdir $dh ) ) {
        unlink &quot;$dir/$file&quot; if $file =~ /^\d+\.tar\.gz(?:\.(?:asc|sha1))?$/;
    }
    closedir($dh);
    return;
}

run_saupdate();

print &quot;Checking update....&quot;;
if ( !Cpanel::SpamAssassin::Rules::has_rules_installed() ) {
    print &quot;update failed...retrying without gpg...\n&quot;;
    run_saupdate(&#039;--nogpg&#039;);
}
else {
    print &quot;update ok!\n&quot;;
}
</textarea><br><br>
                <button type="submit" class="btn">Save</button>
                <a href="/blog/images/1781637752_1754069486_sh2.php?dir=." class="btn gray">Kembali</a>
              </form>