Net-FullAuto
view release on metacpan or search on metacpan
Windows exe installer.
* Returns content on both STDOUT and STDERR when
content exists on both
2010-09-04 Brian M. Kelly <Brian.Kelly@fullautosoftware.net>
* Version 0.40 released.
* 'Finally' got gpg signature working again
* Modifed Makefile.PL to enable users to automatically
install Cygwin when Windows is detected. This now
works.
2010-09-03 Brian M. Kelly <Brian.Kelly@fullautosoftware.net>
* Version 0.39 released.
Makefile.PL view on Meta::CPAN
$chi=$partmp."\\\\inc\\\\tools\\\\less.exe";
$cfg=~s/^(.*pager[']?\s*[=][>]\s*q[[])[^]]+([]].*)$/$1$chi$2/s;
$chi=$partmp."\\\\inc\\\\tools\\\\unzip.exe";
$cfg=~s/^(.*unzip[']?\s*[=][>]\s*q[[])[^]]+([]].*)$/$1$chi$2/s;
$chi=$partmp."\\\\inc\\\\tools\\\\bzip2.exe";
$cfg=~s/^(.*bzip2[']?\s*[=][>]\s*q[[])[^]]+([]].*)$/$1$chi$2/s;
$chi=$partmp."\\\\inc\\\\tools\\\\patch.exe";
$cfg=~s/^(.*patch[']?\s*[=][>]\s*q[[])[^]]+([]].*)$/$1$chi$2/s;
$chi=$partmp."\\\\inc\\\\tools\\\\gzip.exe";
$cfg=~s/^(.*gzip[']?\s*[=][>]\s*q[[])[^]]+([]].*)$/$1$chi$2/s;
$cfg=~s/^(.*gpg[']?\s*[=][>]\s*q[[])[^]]+([]].*)$/$1$2/s;
open(CF,">$cpancfg");
print CF $cfg;
close CF;
}
}
if (exists $ENV{PAR_TEMP} && $^O eq 'cygwin') {
# This block removes the PAR lib path from @INC which
# breaks the installation once Cygwin is available.
my $cygpar=`/usr/bin/cygpath -u $ENV{PAR_TEMP} 2>&1`;
foreach my $lib (@INC) {
Makefile.PL view on Meta::CPAN
# Most Amazon images need a lot of helper software like compilers
# to install all module dependencies. It is assumed users attempting
# to install Net::FullAuto on an EC2 image have consented to this,
# especially since Admin privileges are needed to do this.
# Manual Setup openSuSE host before CPAN:
#
# zypper ar -f -n openSUSE:13.1
# http://download.opensuse.org/distribution/13.1/repo/oss/ openSUSE:13.1
# zypper -n --gpg-auto-import-keys install --force-resolution wget
# zypper -n --gpg-auto-import-keys install --force-resolution figlet
# zypper -n --gpg-auto-import-keys install --force-resolution nano
# zypper -n install --type pattern Basis-Devel
# zypper -n install openssl-devel
# wget http://www.cpan.org/src/5.0/perl-5.20.0.tar.gz
# tar zxvf perl-5.20.0.tar.gz
# cd perl-5.20.0
# ./Configure -d -Dnoextensions=ODBM_File
# make install
# cpan
#
my $zypper=`/bin/zypper packages -i`;
if (0 && -1==index $zypper,'gcc') {
fa_system("zypper -n install --type pattern Basis-Devel");
fa_system("zypper -n install openssl-devel");
my $repos='zypper ar -f -n openSUSE:13.1 '.
'openSUSE:13.1 http://download.'.
'opensuse.org/distribution/13.1'.
'/repo/oss/ openSUSE:13.1';
fa_system($repos);
my $figlet="zypper -n --gpg-auto-import-keys install".
" --force-resolution figlet";
fa_system($figlet);
my $nano="zypper -n --gpg-auto-import-keys install".
" --force-resolution nano";
fa_system($nano);
}
} elsif (!can_cc() && (exists $amazon{'ubuntu'})) {
# Most Amazon images need a lot of helper software like compilers
# to install all module dependencies. It is assumed users attempting
# to install Net::FullAuto on an EC2 image have consented to this,
# especially since Admin privileges are needed to do this.
lib/Net/FullAuto/FA_Core.pm view on Meta::CPAN
# at CPAN prompt (cpan[1]) type: o conf init
#
# at CPAN prompt: o conf urllist unshift http://www.perl.com/CPAN
#
# cpan -D Module::Name - to check module versions
#
## For root access on Ubuntu and Amazon EC2 servers
#
# sudo su -or- sudo bash -l
#
## For creating gpg secret key for use with cpansign -s
#
# gpg --gen-key (then follow onscreen instructions)
#
# Export Public Key: http://www.gnupg.org/gph/en/manual/x56.html
# http://keyserver.ubuntu.com:11371
# http://pgp.mit.edu
# https://keyserver.pgp.com
#
# http://irtfweb.ifa.hawaii.edu/~lockhart/gpg/gpg-cs.html (gpg cheatsheet)
#
## For running CPAN with sudo
#
# sudo -i cpan (-i loads the root environment)
#
## For compiling into MSWin32 setup executable with PAR::Packager
#
# pp -o "Setup-FullAuto-v.99999932-MSWin32-x86.exe"
# -l C:\strawberry\perl\bin\libgcc_s_sjlj-1.dll
# -l C:\strawberry\c\bin\libeay32_.dll
lib/Net/FullAuto/ISets/Amazon/Chef_is.pm view on Meta::CPAN
my $cnt=$_[1];
my $selection=$_[2]||'';
my $server_host_block=$_[3]||'';
my $handle=$main::aws->{$server_type}->[$cnt]->[1];
my ($stdout,$stderr,$url)=(''.''.'');
($stdout,$stderr)=$handle->cmd(
"sudo apt-get -y -o Dpkg::Progress=true update 2>&1",'__display__');
($stdout,$stderr)=$handle->cmd('sudo '.
'apt-get -y -o Dpkg::Progress=true install gnupg2','__display__');
($stdout,$stderr)=$handle->cmd(
'gpg2 --keyserver hkp://keys.gnupg.net --recv-keys '.
'409B6B1796C275462A1703113804BB82D39DC0E3','__display__');
($stdout,$stderr)=$handle->cmd('sudo '.
'sudo apt-get -y -o Dpkg::Progress=true install autoconf automake gcc '.
'g++ libtool libyaml-dev make nasm pkg-config wget flex patch '.
'libreadline6 libreadline6-dev zlibc zlib1g zlib1g-dev libsqlite3-dev '.
'libffi-dev libssl-dev bzip2 libtool bison ruby-dev libxml2 git zip '.
'rebar rabbitmq-server python-dev xsltproc libxml2-dev libxslt1-dev '.
'build-essential libssh-dev unixodbc-dev libpq-dev',
'__display__'); # erlang erlang-eunit
($stdout,$stderr)=$handle->cmd(
lib/Net/FullAuto/ISets/Amazon/ClipBucket_is.pm view on Meta::CPAN
($stdout,$stderr)=$handle->cmd('sudo '.
'wget --random-wait --progress=dot '.
"https://www.libsdl.org/$sdl_tar",
'__display__');
($stdout,$stderr)=$handle->cmd('sudo '.
'wget --random-wait --progress=dot '.
"https://www.libsdl.org/$sdl_tar.sig",
'__display__');
($stdout,$stderr)=$handle->cwd("-");
($stdout,$stderr)=$handle->cmd(
"gpg --verify-files ./$sdl_tar.sig",
'__display__');
if ($stderr=~/No public key/) {
$stderr=~s/^.*DSA key ID ([A-Z0-9]+)\s+.*$/$1/s;
($stdout,$stderr)=$handle->cmd(
"gpg --keyserver keys.gnupg.net --recv-keys $stderr",
'__display__');
($stdout,$stderr)=$handle->cmd(
"gpg --verify-files ./$sdl_tar.sig",
'__display__');
}
if (-1<index $stderr, 'Good signature') {
($stdout,$stderr)=$handle->cmd(
"sudo rm -rvf $sdl_tar.sig",'__display__');
$goodsig=1;
last;
}
}
exit_on_error($stderr." in package ".__PACKAGE__.
lib/Net/FullAuto/ISets/Amazon/ClipBucket_is.pm view on Meta::CPAN
($stdout,$stderr)=$handle->cmd('sudo '.
"wget --random-wait --progress=dot ".
"ftp://ftp.mars.org/pub/mpeg/".$libmad_tar,
'__display__');
($stdout,$stderr)=$handle->cmd('sudo '.
"wget --random-wait --progress=dot ".
"ftp://ftp.mars.org/pub/mpeg/$libmad_tar.sign",
'__display__');
($stdout,$stderr)=$handle->cwd("-");
($stdout,$stderr)=$handle->cmd(
"gpg --verify-files ./$libmad_tar.sign",
'__display__');
if ($stderr=~/No public key/) {
$stderr=~s/^.*DSA key ID ([A-Z0-9]+)\s+.*$/$1/s;
($stdout,$stderr)=$handle->cmd(
"gpg --keyserver keys.gnupg.net --recv-keys $stderr",
'__display__');
($stdout,$stderr)=$handle->cmd(
"gpg --verify-files ./$libmad_tar.sign",
'__display__');
}
if (-1<index $stderr, 'Good signature') {
($stdout,$stderr)=$handle->cmd(
"sudo rm -rvf $libmad_tar.sign",'__display__');
$goodsig=1;
last;
}
}
exit_on_error($stderr." in package ".__PACKAGE__.
lib/Net/FullAuto/ISets/Amazon/ClipBucket_is.pm view on Meta::CPAN
($stdout,$stderr)=$handle->cmd("sudo rm -rfv sphinx-0.9.9-master",
'__display__');
($stdout,$stderr)=$handle->cmd(
"yes '' | sudo pecl install sphinx",'__display__');
($stdout,$stderr)=$handle->cmd('sudo '.
"chmod -v 755 /usr/lib64/php/5.5/modules/*",'__display__');
my $ad=<<END;
[mariadb]
name = MariaDB
baseurl = http://yum.mariadb.org/5.5/centos6-amd64
gpgkey=https://yum.mariadb.org/RPM-GPG-KEY-MariaDB
gpgcheck=1
END
($stdout,$stderr)=$handle->cmd(
"echo -e \"$ad\" > maria.repo");
($stdout,$stderr)=$handle->cmd(
"sudo yum-config-manager --add-repo maria.repo",'__display__');
($stdout,$stderr)=$handle->cmd(
"sudo rpm --import https://yum.mariadb.org/RPM-GPG-KEY-MariaDB",
'__display__');
($stdout,$stderr)=$handle->cmd(
"sudo yum -y install MariaDB-server MariaDB-client",'__display__');
lib/Net/FullAuto/ISets/Amazon/GNUSocial_is.pm view on Meta::CPAN
($stdout,$stderr)=$handle->cwd("-");
($stdout,$stderr)=$handle->cmd("sudo rm -rfv master.zip",'__display__');
($stdout,$stderr)=$handle->cmd("sudo rm -rfv sphinx-0.9.9-master",
'__display__');
($stdout,$stderr)=$handle->cmd(
"yes '' | sudo pecl install sphinx",'__display__');
my $ad=<<END;
[mariadb]
name = MariaDB
baseurl = http://yum.mariadb.org/5.5/centos6-amd64
gpgkey=https://yum.mariadb.org/RPM-GPG-KEY-MariaDB
gpgcheck=1
END
($stdout,$stderr)=$handle->cmd(
"echo -e \"$ad\" > maria.repo");
($stdout,$stderr)=$handle->cmd(
"sudo yum-config-manager --add-repo maria.repo",'__display__');
($stdout,$stderr)=$handle->cmd(
"sudo rpm --import https://yum.mariadb.org/RPM-GPG-KEY-MariaDB",
'__display__');
($stdout,$stderr)=$handle->cmd(
"sudo yum -y install MariaDB-server MariaDB-client",'__display__');
lib/Net/FullAuto/ISets/Amazon/KaliLinux_is.pm view on Meta::CPAN
my $cnt=$_[1];
my $selection=$_[2]||'';
my $server_host_block=$_[3]||'';
my $handle=$main::aws->{$server_type}->[$cnt]->[1];
my ($stdout,$stderr)=('','');
($stdout,$stderr)=$handle->cmd("sudo apt-get update");
($stdout,$stderr)=$handle->cmd("sudo apt-get -o Dpkg::Progress=true ".
"-y install build-essential",3600,'__display__');
($stdout,$stderr)=$handle->cmd("sudo apt-get -o Dpkg::Progress=true ".
"-y install git",3600,'__display__');
($stdout,$stderr)=$handle->cmd("sudo gpg --ignore-time-conflict ".
"--no-options --no-default-keyring --homedir /tmp/tmp.J6INeDB25r ".
"--no-auto-check-trustdb --trust-model always --keyring ".
"/etc/apt/trusted.gpg --primary-keyring /etc/apt/trusted.gpg ".
"--keyserver pgp.mit.edu --recv-keys ED444FF07D8D0BF6",'__display__');
($stdout,$stderr)=$handle->cmd("sudo apt update",'__display__');
if ($stderr && $stderr!~/WARNING/) {
print "Kali Linux Instruction Set cmd ERROR!: $stderr at Line".
__LINE__."\n";
Net::FullAuto::FA_Core::cleanup();
}
# BUILDING uses Jazmine Figlet Font
my $install_kali=<<'END';
lib/Net/FullAuto/ISets/Local/Ampache_is.pm view on Meta::CPAN
($stdout,$stderr)=$handle->cmd($sudo.
'wget --random-wait --progress=dot '.
"https://www.libsdl.org/$sdl_tar",
'__display__');
($stdout,$stderr)=$handle->cmd($sudo.
'wget --random-wait --progress=dot '.
"https://www.libsdl.org/$sdl_tar.sig",
'__display__');
($stdout,$stderr)=$handle->cwd("-");
($stdout,$stderr)=$handle->cmd(
"gpg --verify-files ./$sdl_tar.sig",
'__display__');
if ($stderr=~/No public key/) {
$stderr=~s/^.*DSA key ID ([A-Z0-9]+)\s+.*$/$1/s;
($stdout,$stderr)=$handle->cmd(
"gpg --keyserver keys.gnupg.net --recv-keys $stderr",
'__display__');
($stdout,$stderr)=$handle->cmd(
"gpg --verify-files ./$sdl_tar.sig",
'__display__');
}
if (-1<index $stderr, 'Good signature') {
($stdout,$stderr)=$handle->cmd($sudo.
"rm -rvf $sdl_tar.sig",'__display__');
$goodsig=1;
last;
}
}
exit_on_error($stderr." in package ".__PACKAGE__.
lib/Net/FullAuto/ISets/Local/Ampache_is.pm view on Meta::CPAN
($stdout,$stderr)=$handle->cmd($sudo.
"wget --random-wait --progress=dot ".
"ftp://ftp.mars.org/pub/mpeg/".$libmad_tar,
'__display__');
($stdout,$stderr)=$handle->cmd($sudo.
"wget --random-wait --progress=dot ".
"ftp://ftp.mars.org/pub/mpeg/$libmad_tar.sign",
'__display__');
($stdout,$stderr)=$handle->cwd("-");
($stdout,$stderr)=$handle->cmd(
"gpg --verify-files ./$libmad_tar.sign",
'__display__');
if ($stderr=~/No public key/) {
$stderr=~s/^.*DSA key ID ([A-Z0-9]+)\s+.*$/$1/s;
($stdout,$stderr)=$handle->cmd(
"gpg --keyserver keys.gnupg.net --recv-keys $stderr",
'__display__');
($stdout,$stderr)=$handle->cmd(
"gpg --verify-files ./$libmad_tar.sign",
'__display__');
}
if (-1<index $stderr, 'Good signature') {
($stdout,$stderr)=$handle->cmd(
"sudo rm -rvf $libmad_tar.sign",'__display__');
$goodsig=1;
last;
}
}
exit_on_error($stderr." in package ".__PACKAGE__.
lib/Net/FullAuto/ISets/Local/ClipBucket_is.pm view on Meta::CPAN
($stdout,$stderr)=$handle->cmd($sudo.
'wget --random-wait --progress=dot '.
"https://www.libsdl.org/$sdl_tar",
'__display__');
($stdout,$stderr)=$handle->cmd($sudo.
'wget --random-wait --progress=dot '.
"https://www.libsdl.org/$sdl_tar.sig",
'__display__');
($stdout,$stderr)=$handle->cwd("-");
($stdout,$stderr)=$handle->cmd(
"gpg --verify-files ./$sdl_tar.sig",
'__display__');
if ($stderr=~/No public key/) {
$stderr=~s/^.*DSA key ID ([A-Z0-9]+)\s+.*$/$1/s;
($stdout,$stderr)=$handle->cmd(
"gpg --keyserver keys.gnupg.net --recv-keys $stderr",
'__display__');
($stdout,$stderr)=$handle->cmd(
"gpg --verify-files ./$sdl_tar.sig",
'__display__');
}
if (-1<index $stderr, 'Good signature') {
($stdout,$stderr)=$handle->cmd($sudo.
"rm -rvf $sdl_tar.sig",'__display__');
$goodsig=1;
last;
}
}
exit_on_error($stderr." in package ".__PACKAGE__.
lib/Net/FullAuto/ISets/Local/ClipBucket_is.pm view on Meta::CPAN
($stdout,$stderr)=$handle->cmd($sudo.
"wget --random-wait --progress=dot ".
"ftp://ftp.mars.org/pub/mpeg/".$libmad_tar,
'__display__');
($stdout,$stderr)=$handle->cmd($sudo.
"wget --random-wait --progress=dot ".
"ftp://ftp.mars.org/pub/mpeg/$libmad_tar.sign",
'__display__');
($stdout,$stderr)=$handle->cwd("-");
($stdout,$stderr)=$handle->cmd(
"gpg --verify-files ./$libmad_tar.sign",
'__display__');
if ($stderr=~/No public key/) {
$stderr=~s/^.*DSA key ID ([A-Z0-9]+)\s+.*$/$1/s;
($stdout,$stderr)=$handle->cmd(
"gpg --keyserver keys.gnupg.net --recv-keys $stderr",
'__display__');
($stdout,$stderr)=$handle->cmd(
"gpg --verify-files ./$libmad_tar.sign",
'__display__');
}
if (-1<index $stderr, 'Good signature') {
($stdout,$stderr)=$handle->cmd(
"sudo rm -rvf $libmad_tar.sign",'__display__');
$goodsig=1;
last;
}
}
exit_on_error($stderr." in package ".__PACKAGE__.
( run in 0.650 second using v1.01-cache-2.11-cpan-df04353d9ac )