view release on metacpan or  search on metacpan

lib/Net/FullAuto/ISets/Amazon/ClipBucket_is.pm  view on Meta::CPAN

      }
      ($stdout,$stderr)=$handle->cmd("sudo rm -rvf $libtheora_tar",
         '__display__');
   }
   ($stdout,$stderr)=$handle->cmd('sudo '.
      "tar xzvf $libtheora_tar",'__display__');
   $libtheora_tar=~s/\.tar\.gz$//;
   ($stdout,$stderr)=$handle->cwd($libtheora_tar);
   ($stdout,$stderr)=$handle->cmd('sudo '.
      './configure --enable-shared','__display__');
   ($stdout,$stderr)=$handle->cmd('sudo make','__display__');
   ($stdout,$stderr)=$handle->cmd('sudo make install','__display__');
   #my $ffmpeg_tar='ffmpeg.static.64bit.2014-07-16.tar.gz';
   #my $ffmpeg_md5='965739cd5cfeb84401857dadea3af93c';
   #foreach my $count (1..3) {
   #   ($stdout,$stderr)=$handle->cmd('sudo '.
   #      "wget --random-wait --progress=dot ".
   #      "http://ffmpeg.gusari.org/static/64bit/$ffmpeg_tar",
   #      '__display__');
   #   ($stdout,$stderr)=$handle->cmd(
   #      "sudo md5sum -c - <<<\"$ffmpeg_md5 $ffmpeg_tar\"",
   #      '__display__');
   #   unless ($stderr) {
   #      print(qq{ + CHECKSUM Test for $ffmpeg_tar *PASSED* \n});
   #      last
   #   } elsif ($count>=3) {
   #      print "FATAL ERROR! : CHECKSUM Test for $ffmpeg_tar *FAILED* ",
   #            "after $count attempts\n";
   #      &Net::FullAuto::FA_Core::cleanup;
   #   }
   #   ($stdout,$stderr)=$handle->cmd("sudo rm -rvf $ffmpeg_tar",'__display__');
   #}
   #($stdout,$stderr)=$handle->cmd('sudo '.
   #   "tar zxvf $ffmpeg_tar",'__display__');
   #($stdout,$stderr)=$handle->cmd('sudo '."rm -rvf $ffmpeg_tar",'__display__');
   #($stdout,$stderr)=$handle->cmd("./ffmpeg -version",'__display__');
   #($stdout,$stderr)=$handle->cmd('sudo '.
   #   "ln -s /usr/local/bin/ffmpeg/ffmpeg /usr/bin/ffmpeg");
   # http://wiki.razuna.com/display/ecp/FFMpeg+Installation+on+CentOS+and+RedHat
   ($stdout,$stderr)=$handle->cwd('/opt/source/ffmpeg/');
   ($stdout,$stderr)=$handle->cmd('sudo '.
      'wget -qO- https://www.libsdl.org/download-2.0.php');
   $stdout=~s/^.*href=["](.*?[.]tar[.]gz[.]sig)["].*$/$1/s;
   my $sdl_tar=$stdout;
   $sdl_tar=~s/^(.*)[.]sig$/$1/;
   ($stdout,$stderr)=$handle->cmd('sudo '.
      "mkdir -pv release",'__display__');
   my $goodsig=0;
   foreach my $count (1..3) {
      ($stdout,$stderr)=$handle->cwd('release');
      ($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__.
      " line ".__LINE__."\n")
      if !$goodsig;
   ($stdout,$stderr)=$handle->cwd('release');
   ($stdout,$stderr)=$handle->cmd('sudo tar zxvf *','__display__');
   ($stdout,$stderr)=$handle->cwd('SDL2-2.0.5');
   ($stdout,$stderr)=$handle->cmd('sudo ./configure','__display__');
   ($stdout,$stderr)=$handle->cmd('sudo make','__display__');
   ($stdout,$stderr)=$handle->cmd('sudo make install','__display__');
   ($stdout,$stderr)=$handle->cmd('sudo cp -v sdl2.pc /usr/lib64/pkgconfig',
      '__display__');
   ($stdout,$stderr)=$handle->cwd('/opt/source/ffmpeg/');
   my $libvorbis_tar='libvorbis-1.3.3.tar.gz';
   my $libvorbis_md5='6b1a36f0d72332fae5130688e65efe1f';
   foreach my $count (1..3) {
      ($stdout,$stderr)=$handle->cmd('sudo '.
         "wget --random-wait --progress=dot ".
         "http://downloads.xiph.org/releases/vorbis/".
         $libvorbis_tar,'__display__');
      ($stdout,$stderr)=$handle->cmd(
         "sudo md5sum -c - <<<\"$libvorbis_md5 $libvorbis_tar\"",
         '__display__');
      unless ($stderr) {
         print(qq{ + CHECKSUM Test for $libvorbis_tar *PASSED* \n});
         last
      } elsif ($count>=3) {
         print "FATAL ERROR! : CHECKSUM Test for $libvorbis_tar *FAILED* ",
               "after $count attempts\n";
         &Net::FullAuto::FA_Core::cleanup;
      }
      ($stdout,$stderr)=$handle->cmd("sudo rm -rvf $libvorbis_tar",
         '__display__');
   }
   ($stdout,$stderr)=$handle->cmd('sudo '.
      "tar xzvf $libvorbis_tar",'__display__');
   $libvorbis_tar=~s/\.tar\.gz$//;
   ($stdout,$stderr)=$handle->cwd($libvorbis_tar);
   ($stdout,$stderr)=$handle->cmd('sudo '.
      './configure --enable-shared','__display__');
   ($stdout,$stderr)=$handle->cmd('sudo make','__display__');
   ($stdout,$stderr)=$handle->cmd('sudo make install','__display__');
   ($stdout,$stderr)=$handle->cwd('/opt/source/ffmpeg/');
   ($stdout,$stderr)=$handle->cmd('sudo '.
      'git clone https://chromium.googlesource.com/webm/libvpx',
      '__display__');
   ($stdout,$stderr)=$handle->cwd('libvpx');
   ($stdout,$stderr)=$handle->cmd('sudo '.
      './configure --enable-shared','__display__');
   ($stdout,$stderr)=$handle->cmd('sudo make','__display__');
   ($stdout,$stderr)=$handle->cmd('sudo make install','__display__');
   ($stdout,$stderr)=$handle->cwd('/opt/source/ffmpeg/');
   my $libmad_tar='libmad-0.15.1b.tar.gz';
   $goodsig=0;
   foreach my $count (1..3) {
      ($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__.
      " line ".__LINE__."\n")
      if !$goodsig;
   ($stdout,$stderr)=$handle->cmd('sudo tar zxvf '.$libmad_tar,'__display__');
   ($stdout,$stderr)=$handle->cwd("libmad-0.15.1b");
   ($stdout,$stderr)=$handle->cmd('sudo ./configure','__display__');
   ($stdout,$stderr)=$handle->cmd("sudo sed -i 's/-fforce-mem //' ".
      "Makefile");
   ($stdout,$stderr)=$handle->cmd('sudo make','__display__');
   ($stdout,$stderr)=$handle->cmd('sudo make install','__display__');
   ($stdout,$stderr)=$handle->cwd('/opt/source/ffmpeg/');
   ($stdout,$stderr)=$handle->cmd('sudo '.
      'git clone git://source.ffmpeg.org/ffmpeg','__display__');
   ($stdout,$stderr)=$handle->cwd('ffmpeg');
   ($stdout,$stderr)=$handle->cmd('sudo '.
      './configure --enable-gpl --enable-libfdk_aac --enable-libmp3lame '.
      '--enable-libtheora --enable-libvorbis --enable-libvpx --enable-libx264 '.
      '--enable-nonfree --disable-static --enable-shared','__display__');
   ($stdout,$stderr)=$handle->cmd('sudo make',300,'__display__');
   ($stdout,$stderr)=$handle->cmd('sudo make install',300,'__display__');
   ($stdout,$stderr)=$handle->cwd('/opt/source/');
   ($stdout,$stderr)=$handle->cmd('sudo '.
      "gem install flvtool2",'__display__');
   ($stdout,$stderr)=$handle->cmd('sudo '.
      'yum -y install freetype-devel freeglut-devel',
      '__display__');
   my $mediainfo_tar='MediaInfo_CLI_0.7.92.1_GNU_FromSource.tar.gz';
   ($stdout,$stderr)=$handle->cmd('sudo '.
      "wget --random-wait --progress=dot ".
      "https://mediaarea.net/download/binary/mediainfo/0.7.92.1/".
      $mediainfo_tar,300,
      '__display__');
   ($stdout,$stderr)=$handle->cmd('sudo '.
      "tar xvf $mediainfo_tar",'__display__');
   ($stdout,$stderr)=$handle->cwd('MediaInfo_CLI_GNU_FromSource');
   ($stdout,$stderr)=$handle->cmd('sudo '.
      './CLI_Compile.sh','__display__');
   ($stdout,$stderr)=$handle->cwd('MediaInfo/Project/GNU/CLI');
   ($stdout,$stderr)=$handle->cmd('sudo '.
      'make install','__display__');
   ($stdout,$stderr)=$handle->cmd('sudo '.
      'ln -s /usr/local/bin/mediainfo /usr/bin/mediainfo');
   ($stdout,$stderr)=$handle->cwd('/opt/source/');
   my $c='wget -qO- https://api.github.com/users/gpac/repos';
   ($stdout,$stderr)=$local->cmd($c);
   my @repos=();
   @repos=decode_json($stdout);
   my $default_branch=$repos[0]->[1]->{'default_branch'};
   my $updated=$repos[0]->[1]->{'updated_at'};
   my @branches=();
   $c='wget -qO- https://api.github.com/repos/gpac/gpac/branches';

lib/Net/FullAuto/ISets/Amazon/ClipBucket_is.pm  view on Meta::CPAN

   ($stdout,$stderr)=$handle->cmd('sudo '.
      'pear config-set php_ini /etc/php.ini','__display__');
   ($stdout,$stderr)=$handle->cmd(
      "yes '' | sudo pecl install imagick",'__display__');
   ($stdout,$stderr)=$handle->cmd(
      "yes '' | sudo pear install mail",'__display__');
   ($stdout,$stderr)=$handle->cmd(
      "yes '' | sudo pear install Net_SMTP",'__display__');
   ($stdout,$stderr)=$handle->cwd('~');
#   my $im=<<END;
#; Enable imagick extension module
#extension=/usr/lib64/php/5.5/modules/imagick.so
#END
#   ($stdout,$stderr)=$handle->cmd(
#      "echo -e \"$im\" > imagick.ini");
#   ($stdout,$stderr)=$handle->cmd('sudo '.
#      "mv -fv imagick.ini /etc/php.d",'__display__');
   ($stdout,$stderr)=$handle->cmd('sudo '.
      "mkdir -pv /opt/source/sourceguardian",'__display__');
   ($stdout,$stderr)=$handle->cwd(
      '/opt/source/sourceguardian');
   ($stdout,$stderr)=$handle->cmd('sudo '.
      "wget --random-wait --progress=dot ".
      "http://www.sourceguardian.com/loaders/download/".
      "loaders.linux-x86_64.tar.gz",'__display__');
   ($stdout,$stderr)=$handle->cmd('sudo '.
      "tar zxvf loaders.linux-x86_64.tar.gz",'__display__');
   ($stdout,$stderr)=$handle->cmd('sudo '.
      "cp -Rv ixed.5.5.lin /usr/lib64/php/5.5/modules",'__display__');
   ($stdout,$stderr)=$handle->cwd('~');
   my $zd=<<END;
[sourceguardian] 
zend_extension=/usr/lib64/php/5.5/modules/ixed.5.5.lin
END
   ($stdout,$stderr)=$handle->cmd(
      "echo -e \"$zd\" > sourceguardian.ini");
   ($stdout,$stderr)=$handle->cmd('sudo '.
      "mv -fv sourceguardian.ini /etc/php.d",'__display__');
   ($stdout,$stderr)=$handle->cwd('~');
   ($stdout,$stderr)=$handle->cmd('sudo '.
      "wget --random-wait --progress=dot ".
      "https://github.com/salimane/sphinx-0.9.9/archive/master.zip",
      '__display__');
   ($stdout,$stderr)=$handle->cmd("unzip master.zip",'__display__');
   ($stdout,$stderr)=$handle->cwd(
      "sphinx-0.9.9-master/api/libsphinxclient");
   ($stdout,$stderr)=$handle->cmd("./configure",'__display__');
   ($stdout,$stderr)=$handle->cmd("sudo make install",'__display__');
   ($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__');
   ($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__');
print "\n\n\n\n\n\n\nWE SHOULD HAVE INSTALLED MARIADB=$stdout<==\n\n\n\n\n\n\n";
   ($stdout,$stderr)=$handle->cmd("uname -a");
   if ($stdout=~/Ubuntu/i) {
      ($stdout,$stderr)=$handle->cmd(
         "sudo apt-get -y install git-all",'__display__');
   } else {
      ($stdout,$stderr)=$handle->cmd(
         "sudo yum -y -v install git-all",'__display__');
   }
   ($stdout,$stderr)=$handle->cwd('/opt/source/');
   ($stdout,$stderr)=$handle->cmd('sudo '.
      'git clone https://github.com/arslancb/clipbucket.git','__display__');
my $z=0;
if ($z==1) {
   my $cb_tar='clipbucket-2.8.v3354-stable.zip';
   my $cb_md5='7dc581a36120592035b18cf8b7111916';
   foreach my $count (1..3) {
      ($stdout,$stderr)=$handle->cmd('sudo '.
         "wget --random-wait --progress=dot ".
         "https://sourceforge.net/projects/clipbucket/files/ClipBucket%20v2/".
         $cb_tar,'__display__');
      ($stdout,$stderr)=$handle->cmd(
         "sudo md5sum -c - <<<\"$cb_md5 $cb_tar\"",
         '__display__');
      unless ($stderr) {
         print(qq{ + CHECKSUM Test for $cb_tar *PASSED* \n});
         last
      } elsif ($count>=3) {
         print "FATAL ERROR! : CHECKSUM Test for $cb_tar *FAILED* ",
               "after $count attempts\n";
         &Net::FullAuto::FA_Core::cleanup;
      }
      ($stdout,$stderr)=$handle->cmd("sudo rm -rvf $cb_tar",'__display__');
   }
   ($stdout,$stderr)=$handle->cmd('sudo '.
      "unzip $cb_tar",'__display__');
   $cb_tar=~s/\.zip$//;
   ($stdout,$stderr)=$handle->cmd('sudo '.
      "chmod -Rv 755 $cb_tar",'__display__');
   ($stdout,$stderr)=$handle->cwd("$cb_tar/upload");
}
   ($stdout,$stderr)=$handle->cwd("clipbucket");
   ($stdout,$stderr)=$handle->cmd(
      'git tag | sort -n | tail -1','__display__');
   chomp($stdout);
   # git ls-remote --tags git://github.com/arslancb/clipbucket
   ($stdout,$stderr)=$handle->cmd(
      "sudo git checkout $stdout",'__display__');
   ($stdout,$stderr)=$handle->cwd("upload");
   ($stdout,$stderr)=$handle->cmd(