Skip to content

Commit

Permalink
Added missing plugin entry point (second part)
Browse files Browse the repository at this point in the history
Small fixes
  • Loading branch information
nuxwin committed Jul 3, 2014
1 parent 67855cc commit 8a62018
Show file tree
Hide file tree
Showing 7 changed files with 27 additions and 13 deletions.
7 changes: 4 additions & 3 deletions autoinstaller/Adapter/DebianAdapter.pm
Expand Up @@ -180,7 +180,7 @@ sub uninstallPackages
}

my $rs = execute(
"$command -y remove @{$self->{'packagesToUninstall'}} --auto-remove --purge --no-install-recommends",
"$command -y remove @{$self->{'packagesToUninstall'}} --auto-remove --purge",
($preseed || $main::noprompt) ? \$stdout : undef, \$stderr
);
debug($stdout) if $stdout;
Expand Down Expand Up @@ -221,9 +221,10 @@ sub installPackages
unshift @command, ('UCF_FORCE_CONFFMISS=1 '); # Force installation of missing conffile which are managed by UCF

push @command, "apt-get -y -o DPkg::Options::='--force-confnew' -o Dpkg::Options::='--force-confask' " .
"--reinstall install @{$self->{'packagesToInstall'}} --auto-remove --purge";
"--reinstall install @{$self->{'packagesToInstall'}} --auto-remove --purge --no-install-recommends";
} else {
push @command, "apt-get -y install @{$self->{'packagesToInstall'}} --auto-remove --purge";
push @command, "apt-get -y -o DPkg::Options::='--force-confnew' DPkg::Options::='--force-confmiss' " .
"install @{$self->{'packagesToInstall'}} --no-install-recommends --auto-remove --purge";
}

my ($stdout, $stderr);
Expand Down
2 changes: 1 addition & 1 deletion configs/debian/init.d/imscp_panel
Expand Up @@ -100,7 +100,7 @@ case "$1" in
reload|force-reload)
log_warning_msg "Reloading not supported"
;;
restart)
restart)
log_daemon_msg "Restarting $DESC" "$NAME"
do_stop
case "$?" in
Expand Down
1 change: 1 addition & 0 deletions configs/debian/nginx/00_master.conf
Expand Up @@ -55,6 +55,7 @@ server {
}

location ~ \.php$ {
try_files $uri $uri/ /plugins.php$is_args$args;
include imscp_fastcgi.conf;
}

Expand Down
1 change: 1 addition & 0 deletions configs/debian/nginx/00_master_ssl.conf
Expand Up @@ -65,6 +65,7 @@ server {
}

location ~ \.php$ {
try_files $uri $uri/ /plugins.php$is_args$args;
include imscp_fastcgi.conf;
fastcgi_param HTTPS on;
}
Expand Down
3 changes: 1 addition & 2 deletions docs/Debian/packages-squeeze.xml
Expand Up @@ -28,7 +28,7 @@
<package>libapache2-mod-php5</package>
</apache_itk>
<apache_php_fpm
repository="deb http://packages.dotdeb.org squeeze all"
repository="deb http://packages.dotdeb.org squeeze-php54 all"
repository_origin="packages.dotdeb.org"
repository_key_uri="http://www.dotdeb.org/dotdeb.gpg"
>
Expand Down Expand Up @@ -190,7 +190,6 @@
<package>php5-intl</package>
<package>php5-mcrypt</package>
<package>php5-mysql</package>
<package>php5-suhosin</package>
</php>
<perl>
<package>perl</package>
Expand Down
17 changes: 11 additions & 6 deletions engine/PerlLib/Package/FrontEnd.pm
Expand Up @@ -107,8 +107,7 @@ sub postinstall
my $rs = $self->{'hooksManager'}->trigger('beforeFrontEndPostInstall');
return $rs if $rs;

$rs = $self->start();
return $rs if $rs;
$self->{'start'} = 1;

$self->{'hooksManager'}->trigger('afterFrontEndPostInstall');
}
Expand Down Expand Up @@ -256,8 +255,10 @@ sub start
error("Unable to start $self->{'config'}->{'HTTPD_SNAME'} service") if $rs;
return $rs if $rs;

my $panelUName = $main::imscpConfig{'SYSTEM_USER_PREFIX'}.$main::imscpConfig{'SYSTEM_USER_MIN_UID'};

$rs = iMSCP::Service->getInstance()->start(
$main::imscpConfig{'IMSCP_PANEL_SNAME'}, $self->{'config'}->{'PHP_CGI_BIN'}
$main::imscpConfig{'IMSCP_PANEL_SNAME'}, "$self->{'config'}->{'PHP_CGI_BIN'} -u $panelUName"
);
error("Unable to start imscp_panel (FCGI manager) service") if $rs;
return $rs if $rs;
Expand All @@ -280,12 +281,14 @@ sub stop
my $rs = $self->{'hooksManager'}->trigger('beforeFrontEndStop');
return $rs if $rs;

$rs = iMSCP::Service->getInstance()->start("$self->{'config'}->{'HTTPD_SNAME'}");
$rs = iMSCP::Service->getInstance()->stop("$self->{'config'}->{'HTTPD_SNAME'}");
error("Unable to stop $self->{'config'}->{'HTTPD_SNAME'} service") if $rs;
return $rs if $rs;

my $panelUName = $main::imscpConfig{'SYSTEM_USER_PREFIX'}.$main::imscpConfig{'SYSTEM_USER_MIN_UID'};

$rs = iMSCP::Service->getInstance()->stop(
$main::imscpConfig{'IMSCP_PANEL_SNAME'}, $self->{'config'}->{'PHP_CGI_BIN'}
$main::imscpConfig{'IMSCP_PANEL_SNAME'}, "$self->{'config'}->{'PHP_CGI_BIN'} -u $panelUName"
);
error("Unable to stop imscp_panel (FCGI manager) service") if $rs;
return $rs if $rs;
Expand All @@ -312,8 +315,10 @@ sub restart
error("Unable to restart $self->{'config'}->{'HTTPD_SNAME'} service") if $rs;
return $rs if $rs;

my $panelUName = $main::imscpConfig{'SYSTEM_USER_PREFIX'}.$main::imscpConfig{'SYSTEM_USER_MIN_UID'};

$rs = iMSCP::Service->getInstance()->restart(
$main::imscpConfig{'IMSCP_PANEL_SNAME'}, $self->{'config'}->{'PHP_CGI_BIN'}
$main::imscpConfig{'IMSCP_PANEL_SNAME'}, "$self->{'config'}->{'PHP_CGI_BIN'} -u $panelUName"
);
error("Unable to restart imscp_panel (FCGI manager) service") if $rs;
return $rs if $rs;
Expand Down
9 changes: 8 additions & 1 deletion engine/PerlLib/iMSCP/Service.pm
Expand Up @@ -59,6 +59,7 @@ use parent 'Common::SingletonClass';
sub start($$;$)
{
my ($self, $serviceName, $processPattern) = @_;

$processPattern ||= $serviceName;

$self->_runCommand("$self->{'service_provider'} $serviceName start");
Expand All @@ -78,6 +79,7 @@ sub start($$;$)
sub stop($$;$)
{
my ($self, $serviceName, $processPattern) = @_;

$processPattern ||= $serviceName;

$self->_runCommand("$self->{'service_provider'} $serviceName stop");
Expand All @@ -90,7 +92,10 @@ sub stop($$;$)
$loopCount++;
} while($loopCount < 5);

1;
# Try with pkill in last resort
$self->_runCommand("$main::imscpConfig{'CMD_PKILL'} -KILL -f $processPattern");

! $self->status($processPattern);
}

=item restart($serviceName, [$processPattern = $serviceName])
Expand All @@ -106,6 +111,7 @@ sub stop($$;$)
sub restart($$;$)
{
my ($self, $serviceName, $processPattern) = @_;

$processPattern ||= $serviceName;

$self->_runCommand("$self->{'service_provider'} $serviceName restart");
Expand All @@ -125,6 +131,7 @@ sub restart($$;$)
sub reload($$;$)
{
my ($self, $serviceName, $processPattern) = @_;

$processPattern ||= $serviceName;

if($self->status($processPattern)) { # In case the service is not running, we start it
Expand Down

0 comments on commit 8a62018

Please sign in to comment.