From b6dae731de65e084f9e780de635a0462011f5cb8 Mon Sep 17 00:00:00 2001
From: Don Armstrong <don@donarmstrong.com>
Date: Mon, 23 Jan 2012 16:09:43 -0800
Subject: [PATCH] use CRAN2DEB_CACHE and CRAN2DEB_CONFDIR env variables

---
 trunk/R/zzz.R         | 17 +++++++++--------
 trunk/exec/cran2deb   | 11 ++++++++---
 trunk/exec/repopulate | 18 +++++++-----------
 3 files changed, 24 insertions(+), 22 deletions(-)

diff --git a/trunk/R/zzz.R b/trunk/R/zzz.R
index 050ed04..81aa0bf 100644
--- a/trunk/R/zzz.R
+++ b/trunk/R/zzz.R
@@ -7,16 +7,17 @@
     global("host_arch", gsub('^[a-z]+-','',which_system))
     global("maintainer", 'cran2deb autobuild <cran2deb@gmail.com>')
     global("root", system.file(package='cran2deb'))
-    global("cache_root", '/var/cache/cran2deb')
-    global("pbuilder_results",  file.path('/var/cache/cran2deb/results',which_system))
-    global("pbuilder_config",   file.path('/etc/cran2deb/sys',which_system,'pbuilderrc'))
-    global("dput_config",       file.path('/etc/cran2deb/sys',which_system,'dput.cf'))
-    global("dinstall_config",   file.path('/etc/cran2deb/sys',which_system,'mini-dinstall.conf'))
-    global("dinstall_archive",  file.path('/etc/cran2deb/archive',which_system))
+    global("cache_root", Sys.getenv('CRAN2DEB_CACHE','/var/cache/cran2deb'))
+    global("config_dir", Sys.getenv('CRAN2DEB_CONFDIR','/etc/cran2deb'))
+    global("pbuilder_results",  file.path(cache_root,which_system))
+    global("pbuilder_config",   file.path(config_dir,'sys',which_system,'pbuilderrc'))
+    global("dput_config",       file.path(config_dir,'sys',which_system,'dput.cf'))
+    global("dinstall_config",   file.path(config_dir,'sys',which_system,'mini-dinstall.conf'))
+    global("dinstall_archive",  file.path(config_dir,'archive',which_system))
     global("r_depend_fields", c('Depends','Imports')) # Suggests, Enhances
     global("scm_revision", paste("svn:", svnversion()))
-    global("patch_dir", '/etc/cran2deb/patches')
-    global("lintian_dir", '/etc/cran2deb/lintian')
+    global("patch_dir", file.path(config_dir,'patches'))
+    global("lintian_dir", file.path(config_dir,'lintian'))
     global("changesfile", function(srcname,version='*') {
         return(file.path(pbuilder_results
                         ,paste(srcname,'_',version,'_'
diff --git a/trunk/exec/cran2deb b/trunk/exec/cran2deb
index 5e5e240..4c01d4c 100755
--- a/trunk/exec/cran2deb
+++ b/trunk/exec/cran2deb
@@ -3,11 +3,16 @@ umask 002
 root=$(r -e 'suppressMessages(library(cran2deb));cat(system.file(package="cran2deb"),file=stdout())')
 cmd=$1
 
-if [ -e /etc/cran2deb/config ]; then
+CRAN2DEB_CACHE=/var/cache/cran2deb
+CRAN2DEB_CONFDIR=/etc/cran2deb
+if [ -r /etc/cran2deb/config ]; then
     . /etc/cran2deb/config;
-elif [ -r ~/.cran2deb_config ]; then
-    . ~/.cran2deb_config;
 fi;
+if [ -r ~/.cran2deb/config ]; then
+    CRAN2DEB_CONFDIR=~/.cran2deb
+    . ~/.cran2deb/config;
+fi;
+export CRAN2DEB_CACHE CRAN2DEB_CONFDIR
 
 
 if [ "x" = "x$cmd" ]; then
diff --git a/trunk/exec/repopulate b/trunk/exec/repopulate
index 72e23cc..a376fd9 100755
--- a/trunk/exec/repopulate
+++ b/trunk/exec/repopulate
@@ -6,16 +6,10 @@
 
 set -e
 
-dir=/etc/cran2deb
-if [ -e /etc/cran2deb/config ]; then
-    . /etc/cran2deb/config;
-elif [ -r ~/.cran2deb/config ]; then
-    dir=~/.cran2deb/
-    . ~/.cran2deb/config;
-fi;
+dir=${CRAN2DEB_CONFIDR:-/etc/cran2deb}
 
 if [ ! -d "$dir" ]; then
-       echo "Dir $dir not existing."
+       echo "Dir $dir does not exist."
        exit -1
 fi
 
@@ -23,11 +17,13 @@ umask 002
 echo "Setting 'root' var to '$1'."
 root=$1
 shift
-for x in $(find "${dir}" -type f -name '*.in'); do
+OLDIFS="$IFS"
+IFS="$(echo -ne '\0')"
+for x in $(find "${dir}" -type f -name '*.in' -print0); do
     #echo "x=$x"
-    y=$(echo $x | sed -e 's,.in$,,')
-    sed -e "s:@ROOT@:$root:g" <"$x" >"$y"
+    sed -e "s:@ROOT@:$root:g" <"$x" > "${x%%.in}"
 done
+IFS="$OLDIFS"
 
 # now do an update to reflect any config changes
 echo "Starting '$root/exec/update"
-- 
2.39.2