From 926b02216b16ef746a10c5e150596977a198a0fd Mon Sep 17 00:00:00 2001
From: Ivan Kohler <ivan@freeside.biz>
Date: Thu, 7 Aug 2014 12:02:38 -0700
Subject: [PATCH] fix aradial usage import, RT#29053

---
 bin/aradial-sftp_and_import | 11 ++++++-----
 1 file changed, 6 insertions(+), 5 deletions(-)
 mode change 100644 => 100755 bin/aradial-sftp_and_import

diff --git a/bin/aradial-sftp_and_import b/bin/aradial-sftp_and_import
old mode 100644
new mode 100755
index 425fc0bf3..e6af710b9
--- a/bin/aradial-sftp_and_import
+++ b/bin/aradial-sftp_and_import
@@ -6,7 +6,7 @@ use strict;
 use Getopt::Std;
 use Text::CSV_XS;
 use DBI;
-use FS::UID qw( adminsuidsetup datasrc );
+#use FS::UID qw( adminsuidsetup datasrc );
 
 our %aradial2db = (
   #'Date' => '',
@@ -40,10 +40,11 @@ getopts('m:abr:dP:v:');
 my %options = ();
 
 my $user = shift or die &usage;
-adminsuidsetup $user;
+#adminsuidsetup $user;
 
-# %%%FREESIDE_CACHE%%%
-my $cachedir = '%%%FREESIDE_CACHE%%%/cache.'. datasrc. '/cdrs';
+# %%%FREESIDE_CACHE%%% & hardcoded datasrc
+#my $cachedir = '%%%FREESIDE_CACHE%%%/cache.'. datasrc. '/cdrs';
+my $cachedir = '%%%FREESIDE_CACHE%%%/cache.DBI:Pg:dbname=freeside/cdrs';
 mkdir $cachedir unless -d $cachedir;
 
 my $servername = shift or die &usage;
@@ -188,7 +189,7 @@ sub usage {
   "Usage:
   aradial-sftp_and_import [ -m method ] [ -a ] [ -b ]
     [ -r remotefolder ] [ -d donefolder ] [ -v level ] [ -P port ]
-    user [sftpuser@]servername
+    user [sftpuser@]servername dbi_datasrc dbi_username dbi_pass
   ";
 }
 
-- 
2.11.0