From 2e5124ab68366f53c7ad7cf8069fc5f01eced979 Mon Sep 17 00:00:00 2001
From: mudler <mudler@dark-lab.net>
Date: Mon, 31 Aug 2015 17:05:19 +0200
Subject: [PATCH] [Dockerfile] adding entrypoint to builder script

---
 Dockerfile     |  8 +++++---
 script/builder | 55 ++++++++++++++++++++++++++++++++++++++++++++++++++
 2 files changed, 60 insertions(+), 3 deletions(-)
 create mode 100755 script/builder

diff --git a/Dockerfile b/Dockerfile
index 3810f20..bae6f02 100644
--- a/Dockerfile
+++ b/Dockerfile
@@ -12,7 +12,9 @@ ENV HOME /root
 # Define working directory.
 WORKDIR /root
 
+# Adding our builder script that will run also as entrypoint
+ADD ./script/builder /builder
+
 # Define default command.
-CMD ["/usr/bin/emerge"]
-
-
+#CMD ["/usr/bin/emerge"]
+CMD ["/builder"]
diff --git a/script/builder b/script/builder
new file mode 100755
index 0000000..8131970
--- /dev/null
+++ b/script/builder
@@ -0,0 +1,55 @@
+#!/usr/bin/env perl
+
+my $profile = $ENV{BUILDER_PROFILE} // 3;
+my $jobs    = $ENV{BUILDER_JOBS}    // 1;
+
+$ENV{LC_ALL} = "en_US.UTF-8";    #here be dragons
+
+sub depgraph {
+    map { $_ =~ s/^.*\]|\s|\n//g; $_ }
+        grep {/\]/} qx/emerge -poq --color n @_/;
+}
+
+sub depgraph_atom {
+    map { $_ =~ s/^.*\]|\s|\n//g; &atom($_); $_ } grep {/\]/}
+        qx/emerge -poq --color n @_/;    #depth=0 it's all
+}
+
+# Input : complete gentoo package ($P)
+sub atom { s/-[0-9]{1,}.*$//; }
+
+sub say { print join( "\n", @_ ) . "\n"; }
+
+say "* Syncing stuff for you";
+
+# Syncronizing Portage and Entropy
+system("echo 'en_US.UTF-8 UTF-8' > /etc/locale.gen"); #be sure about that.
+system("cd /etc/portage/;git checkout master; git pull");
+system("eix-sync");
+qx|eselect profile set $profile|;
+qx{ls /usr/portage/licenses -1 | xargs -0 > /etc/entropy/packages/license.accept}
+    ;    #HAHA
+system("equo up && equo u"); # Better don't be behind
+qx|echo 'ACCEPT_LICENSE="*"' >> /etc/portage/make.conf|;    #just plain evil.
+
+say "* Ready to compile, finger crossed";
+
+# Separating packages from args
+my @args;
+my @packages;
+foreach my $value (@ARGV) {
+    if ( $value =~ /^\-/ ) {
+        push( @args, $value );
+    }
+    else {
+        push( @packages, $value );
+    }
+}
+
+my @packages_deps = depgraph(@packages);
+say @packages_deps;
+
+system("equo i $_") for @packages_deps;
+
+system("emerge @args -j $jobs --buildpkg @packages");
+