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

# cpanel - scripts/userdirctl                      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::LoadUserDomains ();
use Cpanel::Config::CpConfGuard     ();
use Cpanel::Config::LoadConfig      ();
use Cpanel::ConfigFiles::Apache &#039;apache_paths_facade&#039;;    # see POD for import specifics
use Cpanel::ConfigFiles::Apache::Config  ();
use Cpanel::SafeFile                     ();
use Cpanel::Logger                       ();
use Cpanel::WildcardDomain               ();
use Cpanel::HttpUtils::ApRestart::BgSafe ();

my $logger = Cpanel::Logger-&gt;new();

my $ctl = lc shift @ARGV;
if ( $ctl !~ /^o(n|ff)$/ ) {
    die &quot;$0: usage: $0 &lt;on|off&gt;&quot;;
}

exit if ( !-e apache_paths_facade-&gt;bin_httpd() );

my $apache_conf = Cpanel::ConfigFiles::Apache::Config::get_config();

my $bad_mod;
if ( $apache_conf-&gt;{&#039;supported&#039;}{&#039;mpm_itk&#039;} || $apache_conf-&gt;{&#039;supported&#039;}{&#039;itk&#039;} ) {
    $bad_mod = &#039;Apache MPM-ITK&#039;;
}
elsif ( $apache_conf-&gt;{&#039;supported&#039;}{&#039;mod_ruid2&#039;} ) {
    $bad_mod = &#039;mod_ruid2&#039;;
}
elsif ( $apache_conf-&gt;{&#039;supported&#039;}{&#039;mod_passenger&#039;} ) {
    $bad_mod = &#039;mod_passenger&#039;;
}

#Do not allow use of mod_userdir if running apache mpm-itk or ruid2 or mod_passenger due to security implications
if ( $ctl eq &#039;on&#039; &amp;&amp; $bad_mod ) {
    print &quot;Detected $bad_mod in use.\n&quot;;
    print &quot;Using both mod_userdir and $bad_mod is not a supported configuration.\n&quot;;
    print &quot;Changes were not saved.\n&quot;;
    exit;
}

my $cpconf_guard = Cpanel::Config::CpConfGuard-&gt;new();
$cpconf_guard-&gt;{&#039;data&#039;}-&gt;{&#039;userdirprotect&#039;} = $ctl eq &#039;on&#039; ? 1 : 0;
$cpconf_guard-&gt;save();

my $UDS = Cpanel::Config::LoadConfig::loadConfig( &#039;/var/cpanel/moddirdomains&#039;, {}, &#039;\s*[:]\s*&#039;, &#039;^\s*[#]&#039; );

my $userdomains = Cpanel::Config::LoadUserDomains::loaduserdomains( {}, 1 );

my $httplock = Cpanel::SafeFile::safeopen( \*HC, &quot;+&lt;&quot;, apache_paths_facade-&gt;file_conf() );
if ( !$httplock ) {
    $logger-&gt;die( &#039;Could not edit &#039; . apache_paths_facade-&gt;file_conf() );
}

my @CFILE;
while (&lt;HC&gt;) {
    push( @CFILE, $_ );
}
seek( HC, 0, 0 );

my ( $bh, $ivh, $iuserdir, $userdirl, $killuserdir );
foreach (@CFILE) {
    my $line = $_;
    if ( !( $line =~ /^#/ ) ) {
        if ( $line =~ /&lt;virtualhost/i ) {
            $bh  = 1;
            $ivh = 1;
        }
        if ( $line =~ /&lt;ifmodule\s*mod_userdir/i &amp;&amp; $ivh ) {
            $iuserdir    = 1;
            $userdirl    = &#039;&#039;;
            $killuserdir = 0;
        }
        if ( $line =~ /^\s*userdir\s+/i &amp;&amp; !$ivh ) {
            print HC $line;
            next;
        }
        if ( $iuserdir &amp;&amp; $line =~ /&lt;\/ifmodule/i &amp;&amp; $ivh ) {
            $iuserdir = 0;
            if ($killuserdir) {
                $userdirl = &#039;&#039;;
                next;
            }
            else {
                print HC $userdirl;
                $userdirl = &#039;&#039;;
            }
        }
        if ( $line =~ /&lt;\/virtualhost/i ) {
            $ivh = 0;
        }
        if ( $ivh &amp;&amp; $ctl eq &quot;on&quot; ) {
            if ( $line =~ /^\s*Userdir\s*disabled/i ) {
                $bh = 0;
            }
            if ( $line =~ /ServerName\s*(\S+)/i ) {
                my $sn = $1;
                $sn =~ s/^www\.//g;

                # decode servername to match against userdomains
                $sn = Cpanel::WildcardDomain::decode_wildcard_domain($sn);
                if ($bh) {
                    my $owner = $userdomains-&gt;{$sn} || &#039;&#039;;
                    if ( $owner ne &quot;&quot; &amp;&amp; $owner ne &quot;root&quot; &amp;&amp; $owner ne &quot;*&quot; &amp;&amp; getpwnam($owner) ) {
                        if ( $UDS-&gt;{$sn} ne &quot;-1&quot; ) {
                            print HC &quot;    &lt;IfModule mod_userdir.c&gt;\n&quot;;
                            print HC &quot;        UserDir disabled\n&quot;;
                            print HC &quot;        UserDir enabled ${owner} $UDS-&gt;{$sn}\n&quot;;
                            print HC &quot;    &lt;/IfModule&gt;\n&quot;;
                        }
                    }
                    else {
                        if ( $UDS-&gt;{&quot;DefaultHost&quot;} ne &quot;-1&quot; ) {
                            print HC &quot;    &lt;IfModule mod_userdir.c&gt;\n&quot;;
                            print HC &quot;        UserDir disabled\n&quot;;
                            print HC &quot;        UserDir enabled &quot; . $UDS-&gt;{&quot;DefaultHost&quot;} . &quot;\n&quot; if ( $UDS-&gt;{&#039;DefaultHost&#039;} );
                            print HC &quot;    &lt;/IfModule&gt;\n&quot;;
                        }
                    }
                }
            }
        }
        if ( $ivh &amp;&amp; $ctl eq &quot;off&quot; ) {
            $killuserdir = 1;
            if ( $line =~ /^\s*Userdir\s*disable/i ) {
                next;
            }
        }
    }
    if ($iuserdir) {
        $userdirl .= $line;
    }
    elsif ( $line =~ /^\s*userdir/i ) {
        next;
    }
    else {
        print HC $line;
    }
}

truncate( HC, tell(HC) );
Cpanel::SafeFile::safeclose( \*HC, $httplock );

Cpanel::HttpUtils::ApRestart::BgSafe::restart();

print &quot;Your changes have been saved.\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>