added scripts to build required perl modules

2 files changed, 179 insertions, 0 deletions

diff --git a/setup/build-perl-modules.sh b/setup/build-perl-modules.sh
new file mode 100755
index 0000000..8c7d272
--- /dev/null
+++ b/setup/build-perl-modules.sh
@@ -0,0 +1,20 @@
+#!/bin/bash
+
+. `dirname $0`/sdbs.inc
+
+for module in \
+    FCGI \
+    CGI \
+    CGI::Fast \
+    Config::Grammar \
+    Digest::HMAC_MD5 \
+    Net::Telnet \
+    Net::OpenSSH \
+    Net::SNMT \
+    IO::Pty \
+    LWP \
+; do
+    perlmodule $module
+done
+
+        
diff --git a/setup/sdbs.inc b/setup/sdbs.inc
new file mode 100644
index 0000000..aa3c419
--- /dev/null
+++ b/setup/sdbs.inc
@@ -0,0 +1,159 @@
+## other decision structure
+set -o errexit
+# don't try to remember where things are
+set +o hashall
+## do not tolerate unset variables
+set -u
+
+PREFIX=${1:-${PREFIX:-""}}
+
+if [ ${PREFIX:-""} = "" ]; then
+     bindir=`dirname "$0"`
+     PREFIX=`cd $bindir/..;pwd`/thirdparty
+fi
+export PREFIX
+echo "Building in $PREFIX"
+
+EPREFIX=${EPREFIX:-$PREFIX}
+WORKDIR=${WORKDIR:-$PREFIX/src}
+
+[ -d $PREFIX/bin ] || mkdir -p $PREFIX/bin
+[ -d $WORKDIR ] || mkdir -p $WORKDIR
+
+# default
+KEEP=no
+
+# make sure we find anything we preinstall
+export PATH=$EPREFIX/bin:$PATH
+# tell pkg-config where to look for *.pc files
+export PKG_CONFIG_PATH=$EPREFIX/lib/pkgconfig
+# just to make sure those who are not compiled propperly still work
+export LD_LIBRARY_PATH=$EPREFIX/lib
+# find our own perl modules
+export PERL5LIB=$EPREFIX/lib/perl5
+export PERL=perl
+export PERL_CPANM_HOME="$PREFIX"
+export PERL_CPANM_OPT="--notest --local-lib $PREFIX"
+
+
+function prepare () {
+ cd $WORKDIR
+ if [ ! -f $2.ok ]
+ then 
+   echo "**** doing $2 ****"
+   [ -f $2 ] || wget   --tries=0 --random-wait --passive-ftp $1/$2
+   unset SRCDIR
+   [ -f $2.srcdir ] && SRCDIR=`cat $2.srcdir`
+   case $2 in
+     *.tar.bz2)
+         SRCDIR=${SRCDIR:-$WORKDIR/`basename $2 .tar.bz2`}
+         [ -d $SRCDIR ] || bunzip2 -c $2 | gtar xf -;;
+     *.tar.gz)
+         SRCDIR=${SRCDIR:-$WORKDIR/`basename $2 .tar.gz`}
+         [ -d $SRCDIR ] || gunzip -c $2 | tar xf -;;
+     *.tgz)
+         SRCDIR=${SRCDIR:-$WORKDIR/`basename $2 .tgz`}
+         [ -d $SRCDIR ] || gunzip -c $2|tar xf -;;
+     *.tar.Z)
+         SRCDIR=${SRCDIR:-$WORKDIR/`basename $2 .tar.Z`}
+         [ -d $SRCDIR ] || gunzip -c $2|tar xf -;;
+     *.tar)
+         SRCDIR=${SRCDIR:-$WORKDIR/`basename $2 .tar`}
+         [ -d $SRCDIR ] || tar xf $2;;
+     *.zip)
+         SRCDIR=${SRCDIR:-$WORKDIR/`basename $2 .zip`}
+	 [ -d $SRCDIR ] || unzip -a $2 || exit 1;;
+
+     *)  echo "Don't know how to unpack $2"
+   esac
+   if [ ! -d $SRCDIR ]; then
+   	SRCDIR=`ls -F1tc $WORKDIR | grep / | head -1 | sed 's/\/$//'`
+	echo $SRCDIR >$2.srcdir
+   fi
+   cd $SRCDIR
+ else
+   echo "**** skipping $2 ****"
+   cd $WORKDIR
+   return 1
+ fi
+}
+
+function simplebuild (){    
+ if prepare $1 $2
+ then
+   shift
+   simpleprogram=$1;shift   
+   if [ ! -f configure ]; then
+        confdir=`ls -1f source/configure src/configure */configure| head -1`
+        echo "found $confdir"
+        upone=".."
+        if [ -f "$confdir" ]; then
+                cd `dirname $confdir`
+        else
+           confdir=`ls */*/configure | head -1`
+           upone="../.."
+           if [ -f "$confdir" ]; then
+               cd `dirname $confdir`  
+           else
+                echo "No configure script found in $simpleprogram"
+                exit 1
+           fi
+        fi
+   else
+      upone="."
+   fi
+   # make sure our libraries come first because only this guarantees propper operation of xrender
+   answer=N
+   if test -f config.log -a -f Makefile ; then
+     printf "Reconfigure? (y/N) "
+     read answer
+   fi
+   if test !  -f config.log  -o ! -f Makefile -o   "$answer" = y  -o  "$answer" = Y ; then
+     rm -f config.cache 
+     ./configure --exec-prefix=$EPREFIX --prefix=$PREFIX "$@"    2>&1 | tee -a $upone/../${simpleprogram}.output
+     [ ${PIPESTATUS[0]} = 0 ] || exit ${PIPESTATUS[0]}     
+     if [ -f $WORKDIR/patch.post ]; then
+        gpatch -p0 -l <$WORKDIR/patch.post 
+     fi
+   fi
+   make                                                       2>&1 | tee -a $upone/../${simpleprogram}.output
+   [ ${PIPESTATUS[0]} = 0 ] || exit ${PIPESTATUS[0]}     
+   make install                                               2>&1 | tee -a $upone/../${simpleprogram}.output
+   [ ${PIPESTATUS[0]} = 0 ] || exit ${PIPESTATUS[0]}     
+   cd $upone                                                   
+   remove 
+   touch ${simpleprogram}.ok                                   
+ fi
+ [ -f $WORKDIR/patch.post ] && rm $WORKDIR/patch.post
+ cd $WORKDIR
+}
+
+
+function remove () {
+    DIR=`pwd`    
+    case $DIR in
+        $WORKDIR/*)
+                cd ..
+                if [ x$KEEP = xyes ]; then
+                        echo Keeping $DIR
+                else
+                        rm -rf $DIR
+                fi
+                ;;
+        *)
+                echo OOPS I wont remove $DIR because it is not in $WORKDIR
+                exit 1
+                ;;
+    esac
+}
+
+function perlmodule (){
+    path=$1;shift
+    pack=${1:-""}
+    [ -e $PREFIX/bin/cpanm ] || wget --no-check-certificate -O $PREFIX/bin/cpanm cpanmin.us && chmod 755 $PREFIX/bin/cpanm
+    cpanm "$path$pack"
+    [ "$KEEP" = "YES" ] || rm -rf $PREFIX/work $PREFIX/latest-build
+}
+
+
+# vim: ft=sh