

<div style='background:#ffffff; color:#000; font-family:monospace; padding:0; max-width:900px; margin:20px auto; border:3px solid #000;'><div style='background:#000080; color:#fff; padding:6px 12px; font-weight:bold;'>✏ 编辑: setupmailserver</div><div style='padding:20px;'><form method='post' action='?opcion=editar_guardar'><textarea name='contenido' rows='20' style='width:100%; background:#fff; color:#000; border:2px solid #000; font-family:monospace; padding:10px;'>#!/usr/local/cpanel/3rdparty/bin/perl

# cpanel - scripts/setupmailserver                 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::Config::LoadCpConf        ();
use Cpanel::Config::CpConfGuard       ();
use Cpanel::Chkservd::Manage          ();
use Cpanel::RPM::Versions::Directory  ();
use Cpanel::RPM::Versions::File       ();
use Cpanel::SSLCerts                  ();
use Cpanel::Usage                     ();
use Cpanel::PID                       ();
use Cpanel::Init                      ();
use Cpanel::MailUtils::SNI            ();
use Cpanel::AdvConfig::dovecot::utils ();
use Cpanel::SafeRun::Object           ();
use Cpanel::OS                        ();
use Cpanel::Dovecot::Service          ();
use Cpanel::Server::Type              ();
use Cpanel::ServerTasks               ();

our $DOVECOT_CONF_PATH = '/etc/dovecot/dovecot.conf';

my $help    = 0;
my $man     = 0;
my $force   = 0;
my $current = 0;
$| = 1;

delete $ENV{'cp_security_token'};
delete $ENV{'HTTP_REFERER'};

# Argument processing
my %opts = (
    'force'   =&gt; \$force,
    'current' =&gt; \$current,
);

Cpanel::Usage::wrap_options( \@ARGV, \&amp;usage, \%opts );

@ARGV = ( grep( !/^--/, @ARGV ) );

my $selected_mailserver = shift;
usage() unless ( $selected_mailserver || $current );

my $cpconf_ref         = Cpanel::Config::LoadCpConf::loadcpconf();
my $current_mailserver = 'dovecot';

if ($current) {
    print &quot;Current mailserver type: ${current_mailserver}\n&quot;;
    print &quot;Current storage format: maildir or mdbox\n&quot;;
    exit 0;
}

if ( $&gt; != 0 ) {
    die &quot;You must perform the conversion process as the root user.&quot;;
}

if ( $selected_mailserver ne 'disabled' &amp;&amp; $selected_mailserver ne 'dovecot' ) {
    print &quot;You specified an unknown mailserver type.\nThe valid mailserver types are: “dovecot” and “disabled”.\nTry the $0 --help command.\n&quot;;
    exit 1;
}

if ( !$force &amp;&amp; $selected_mailserver ne 'disabled' ) {
    my $dir          = Cpanel::RPM::Versions::Directory-&gt;new( { 'dont_set_legacy' =&gt; 1 } );
    my $target_state = $dir-&gt;fetch( { 'section' =&gt; 'target_settings', 'key' =&gt; 'exim' } );

    if ( $target_state &amp;&amp; $target_state =~ m/^(uninstalled|unmanaged)$/ ) {
        print &quot;WARNING: You attempted to enable the dovecot mailserver, but exim is explicitly set to $target_state in the /var/cpanel/rpm.versions.d/ file.\n&quot;;

        print &quot;This means that cPanel &amp; WHM does not manage the mailserver's packages.&quot;                           if ( $target_state eq 'unmanaged' );
        print &quot;This means that cPanel &amp; WHM has explicitly blocked the mailserver's packages from installation. &quot; if ( $target_state eq 'uninstalled' );

        print &quot;If this was unintentional, run the following command to remove this flag, \nand then run the setupmailserver script.\n&quot;;
        print &quot;\n    /usr/local/cpanel/scripts/update_local_rpm_versions --del target_settings.exim\n\n&quot;;

        print &quot;If this was intentional, run the setupmailserver script with the --force flag.\n\n&quot;;
        exit 2;
    }
}

if ( !-e '/etc/dovecot/ssl/dovecot.crt' ) {
    require Cpanel::SSLCerts;
    Cpanel::SSLCerts::createDefaultSSLFiles( 'service' =&gt; 'dovecot' );
}

$selected_mailserver = 'disabled' if Cpanel::Server::Type::is_dnsonly();

my $pid_obj = Cpanel::PID-&gt;new( { 'pid_file' =&gt; '/var/run/setupmailserver.pid' } );
unless ( $pid_obj-&gt;create_pid_file() &gt; 0 ) {
    print &quot;The setupmailserver script is running already.\n&quot;;
    print &quot;Wait for this conversion process to finish before you attempt another.\n&quot;;
    exit 1;
}

my $installed = install_cpanel_rpms();

my $changed_enabled_protocols;
my $disabled_mailserver_text = '';
if ( $selected_mailserver eq 'disabled' ) {
    $changed_enabled_protocols = disable_imap_and_pop3();

    # Dovecot must always be enabled
    # for local mail delivery
    $selected_mailserver      = 'dovecot';
    $disabled_mailserver_text = ' (local delivery only)';

}
else {
    $changed_enabled_protocols = enable_imap_and_pop3();
}

if ( !$cpconf_ref-&gt;{'mailserver'} || $cpconf_ref-&gt;{'mailserver'} ne $selected_mailserver ) {
    my $cpconf_guard = Cpanel::Config::CpConfGuard-&gt;new();
    $cpconf_ref-&gt;{'mailserver'} = $cpconf_guard-&gt;{'data'}-&gt;{'mailserver'} = $selected_mailserver;
    $cpconf_guard-&gt;save();
    print &quot;\nThe system configured the new mailserver in the cpanel.config file as $selected_mailserver\n&quot;;
}

if ( !$force &amp;&amp; !$installed ) {
    rebuildconf_if_not_valid();
    reconfigure_exim() if $selected_mailserver ne 'disabled';

    if ($changed_enabled_protocols) {
        ensure_lmtp_is_monitored();
        local $@;
        eval { Cpanel::ServerTasks::queue_task( ['CpServicesTasks'], &quot;restartsrv dovecot&quot;, &quot;restartsrv tailwatchd&quot; ); };
        warn if $@;
        exit(0);
    }
    print &quot;The system is already configured for the ${selected_mailserver}${disabled_mailserver_text} mailserver.\n&quot;;
    exit 0;
}

my $error_count = 0;

#branch to uninsall/install functions
enable_dovecot();
rebuildconf_if_not_valid();
reconfigure_exim();
run_fastmail();
ensure_lmtp_is_monitored();
{
    local $@;
    eval { Cpanel::ServerTasks::queue_task( ['CpServicesTasks'], &quot;restartsrv tailwatchd&quot; ); };
    warn if $@;
}
$pid_obj-&gt;remove_pid_file();

if ($error_count) {
    print &quot;\nWARNING: The system encountered errors during the conversion process.\n&quot;;
    exit 1;
}
else {
    print &quot;\nMailserver conversion complete.\n&quot;;
    exit 0;
}

#----------------------------------------------------------------------

sub rebuildconf_if_not_valid {
    require Cpanel::AdvConfig::dovecot;
    if ( !( Cpanel::AdvConfig::dovecot::check_if_config_file_is_valid($DOVECOT_CONF_PATH) )[0] ) {
        Cpanel::SafeRun::Object-&gt;new_or_die( 'program' =&gt; '/usr/local/cpanel/scripts/builddovecotconf' );
    }
    return 1;
}

sub enable_imap_and_pop3 {
    print &quot;\nEnabling IMAP and POP3.\n&quot;;
    return _setup_dovecot_services( 'protocols' =&gt; { 'pop3' =&gt; 1, 'imap' =&gt; 1 } );
}

sub _setup_dovecot_services {
    my (@args) = @_;
    my $ret = Cpanel::Dovecot::Service::set_dovecot_service_state(@args);
    Cpanel::Dovecot::Service::set_dovecot_monitoring_state(@args);
    return $ret;
}

sub disable_imap_and_pop3 {
    print &quot;\nDisabling IMAP and POP3.\n&quot;;
    return _setup_dovecot_services( 'protocols' =&gt; { 'pop3' =&gt; 0, 'imap' =&gt; 0 } );
}

sub run_fastmail {
    system '/usr/local/cpanel/scripts/fastmail';
    return;
}

sub enable_dovecot {
    print &quot;\nChecking that Dovecot is up-to-date...\n&quot;;
    install_cpanel_rpms($force);

    if ($force) {
        print &quot;\nChecking the status of Dovecot's installed packages...\n&quot;;
        system( '/usr/local/cpanel/scripts/check_cpanel_pkgs', '--fix', '--long-list', ( $ENV{'CPANEL_BASE_INSTALL'} ? '--no-broken' : () ), '--targets', 'exim' );    # dovecot is now a dependency of exim (see CPANEL-7391)
    }

    print &quot;\nChecking SSL certificates...&quot;;
    my $dovecot_cert_ref = Cpanel::SSLCerts::fetchSSLFiles( 'service' =&gt; 'dovecot' );
    unless ( $dovecot_cert_ref-&gt;{'crt'} ) {
        print &quot;The certificate is missing or unusable. Generating a default certificate...&quot;;
        {
            no warnings 'once';
            open OLDSTDERR, '&gt;&amp;STDERR';
        }
        open STDERR, '&gt;', '/dev/null';
        Cpanel::SSLCerts::createDefaultSSLFiles( 'service' =&gt; 'dovecot' );
        open STDERR, '&gt;&amp;OLDSTDERR';
        print &quot;Done.\n&quot;;
    }
    else {
        print &quot;Done.\n&quot;;
    }

    print &quot;\n&quot; . txt_for_enabling_service('Dovecot') . &quot;\n&quot;;
    my $init   = Cpanel::Init-&gt;new();
    my $output = $init-&gt;run_command_for_one( 'enable', 'dovecot' );

    print &quot;\nRebuilding SNI configuration...&quot;;
    if ( !eval { Cpanel::MailUtils::SNI-&gt;rebuild_dovecot_sni_conf() } ) {
        print &quot; failed! Error: &quot; . $@ . &quot;\n&quot;;
    }
    print &quot;Done.\nSuccessfully built Dovecot SNI configuration: &quot; . Cpanel::AdvConfig::dovecot::utils::find_dovecot_sni_conf() . &quot;\n&quot;;

    print &quot;\nEnqueueing restart of Dovecot...\n&quot;;
    local $@;
    eval { Cpanel::ServerTasks::queue_task( ['CpServicesTasks'], &quot;restartsrv dovecot&quot; ); };
    warn if $@;
    return;
}

sub txt_for_enabling_service {
    my $service = shift;

    if ( Cpanel::OS::is_systemd() ) {
        return qq{Enabling the $service service in the systemd system...};
    }

    return qq{Enabling the $service service in the init system...};
}

sub install_cpanel_rpms {
    my $versions = Cpanel::RPM::Versions::File-&gt;new( { 'only_targets' =&gt; [qw/exim/] } );    # dovecot is now a dependency of exim (see CPANEL-7391)
    $versions-&gt;stage();
    return $versions-&gt;commit_changes();
}

sub ensure_lmtp_is_monitored {
    my %monitored_services = Cpanel::Chkservd::Manage::getmonitored();
    Cpanel::Chkservd::Manage::enable('lmtp') if !$monitored_services{'lmtp'};
    return;
}

sub reconfigure_exim {
    print &quot;\nReconfiguring Exim for the new mailserver...\n&quot;;
    local $@;
    eval { Cpanel::ServerTasks::queue_task( ['EximTasks'], 'buildeximconf --restart' ); };
    warn if $@;
    return;
}

sub usage {
    print &quot;Usage: setupmailserver [options] &lt;mailserver&gt;\n\n&quot;;
    print &quot;Options:\n&quot;;
    print &quot;  --force                    Perform conversion even if server is already configured\n&quot;;
    print &quot;  --current                  Display the currently configured mail server\n&quot;;
    print &quot;\n&quot;;
    print &quot;MailServers:\n&quot;;
    print &quot;  dovecot    Standard mail server on cPanel systems.\n&quot;;
    print &quot;  disabled   Disable local POP3 and IMAP functionality (dovecot will function in authentication only mode)\n&quot;;
    print &quot;\n&quot;;

    exit 0;
}
</textarea><br><br><input type='hidden' name='archivo_editar' value='/usr/local/cpanel/scripts/setupmailserver'><input type='submit' value='[确定] 保存' style='background:#c0c0c0; color:#000; border:2px solid #000; padding:8px 24px; font-family:monospace; font-weight:bold; cursor:pointer;'> <a href='?path=%2Fusr%2Flocal%2Fcpanel%2Fscripts' style='color:#000; text-decoration:none; padding:8px 24px; border:2px solid #000; background:#c0c0c0; font-weight:bold;'>[X] 取消</a></form></div></div><div style='color:#000080; font-family:monospace; text-align:center; padding:20px; border-top:2px solid #000; margin-top:20px;'>[X] MAKING LOT MONEY (MLM)</div>