From 710c3d8b8e5f93d93f8b748f901142db7b20082d Mon Sep 17 00:00:00 2001
From: Marius Tolzmann <tolzmann@molgen.mpg.de>
Date: Wed, 27 Mar 2013 12:20:41 +0100
Subject: [PATCH] bee-init: Add support for cran repository in url rewriting

---
 src/bee-init.sh.in | 40 ++++++++++++++++++++++++++++++++++++++++
 1 file changed, 40 insertions(+)

diff --git a/src/bee-init.sh.in b/src/bee-init.sh.in
index 6a43391..6e2a8e5 100644
--- a/src/bee-init.sh.in
+++ b/src/bee-init.sh.in
@@ -211,6 +211,46 @@ function initialize() {
             surl="${surl} ${pname}.tar.gz"
         fi
 
+        if [[ "${surl}" = http://cran.r-project.org/src/contrib/* ]] ; then
+            local cran_pname
+            local cran_version
+            local cran_revision
+            local cran_suffix
+
+            # set suffix
+            cran_suffix=.tar${pname#*.tar}
+            # remove suffix
+            cran_pname=${pname%.tar*}
+            # extract version and revision
+            cran_version=${cran_pname##*_}
+            # set pname
+            cran_pname=${cran_pname%_*}
+
+            if [[ "${cran_version}" = *-* ]] ; then
+                # set revision
+                cran_revision=${cran_version#*-}
+            fi
+
+            # set version
+            cran_version=${cran_version%%-*}
+
+            if [[ "${cran_revision}" = *-* ]] ; then
+                break;
+            fi
+
+            pname="${cran_pname}"
+            pname+="-${cran_version}"
+            pname+="${cran_revision+_${cran_revision}}"
+
+            surl="${surl%/*}/${cran_pname}"
+            surl+='_${PKGVERSION}${PKGEXTRAVERSION_DASH}'
+            surl+="${cran_suffix}"
+
+            if [ -z "${OPT_BUILDTYPE}" ] ; then
+                OPT_BUILDTYPE=r-package
+            fi
+        fi
+
         # and remove all HTTP-GET variables..
         pname=${pname%%\?*}