fixed lead loader code to work with non-writable vicidial web directory

git-svn-id: svn://192.168.202.10@201 3d104415-ff17-0410-8863-d5cf3c621b8a
This commit is contained in:
mattf
2006-08-22 16:46:15 +00:00
parent f4e46afe97
commit 38d56c3ec8
7 changed files with 206 additions and 55 deletions
@@ -18,6 +18,7 @@ Campaign Recording -<\/B> This menu allows you to choose what level of recording
Add consultative transfer info to Capmaign modification screen info Add consultative transfer info to Capmaign modification screen info
Add note about phone_code being manditory for proper GMT offset encoding for proper time zone.
############################################################ AGENT Manual ############################################################ AGENT Manual
+14 -5
View File
@@ -11,12 +11,13 @@
# 60421-1043 - check GET/POST vars lines with isset to not trigger PHP NOTICES # 60421-1043 - check GET/POST vars lines with isset to not trigger PHP NOTICES
# 60616-1006 - added listID override and gmt_offset lookup while loading # 60616-1006 - added listID override and gmt_offset lookup while loading
# 60619-1652 - Added variable filtering to eliminate SQL injection attack threat # 60619-1652 - Added variable filtering to eliminate SQL injection attack threat
# 60822-1105 - fixed for nonwritable directories
# #
# make sure vicidial_list exists and that your file follows the formatting correctly. This page does not dedupe or do any other lead filtering actions yet at this time. # make sure vicidial_list exists and that your file follows the formatting correctly. This page does not dedupe or do any other lead filtering actions yet at this time.
# #
$version = '1.1.12'; $version = '2.0.1';
$build = '60619-1652'; $build = '60822-1105';
header ("Content-type: text/html; charset=utf-8"); header ("Content-type: text/html; charset=utf-8");
@@ -142,8 +143,16 @@ function ShowProgress(good, bad, total) {
if ($leadfile and filesize($LF_path)<=8388608) { if ($leadfile and filesize($LF_path)<=8388608) {
print "<script language='JavaScript1.2'>document.forms[0].leadfile.disabled=true; document.forms[0].submit_file.disabled=true; document.forms[0].reload_page.disabled=true;</script>"; print "<script language='JavaScript1.2'>document.forms[0].leadfile.disabled=true; document.forms[0].submit_file.disabled=true; document.forms[0].reload_page.disabled=true;</script>";
flush(); flush();
copy($LF_path, "$WeBServeRRooT/vicidial/vicidial_temp_file.txt"); if ($WeBRooTWritablE > 0)
$file=fopen("$WeBServeRRooT/vicidial/vicidial_temp_file.txt", "r"); {
copy($LF_path, "$WeBServeRRooT/vicidial/vicidial_temp_file.txt");
$lead_file = "./vicidial_temp_file.txt";
}
else
{
$lead_file = "$LF_path";
}
$file=fopen("$lead_file", "r");
if ($WeBRooTWritablE > 0) if ($WeBRooTWritablE > 0)
{$stmt_file=fopen("$WeBServeRRooT/vicidial/listloader_stmts.txt", "w");} {$stmt_file=fopen("$WeBServeRRooT/vicidial/listloader_stmts.txt", "w");}
$pulldate=date("Y-m-d H:i:s"); $pulldate=date("Y-m-d H:i:s");
@@ -157,7 +166,7 @@ if ($leadfile and filesize($LF_path)<=8388608) {
if (count($field_check)>=5) { if (count($field_check)>=5) {
flush(); flush();
$file=fopen("./vicidial_temp_file.txt", "r"); $file=fopen("$lead_file", "r");
$total=0; $good=0; $bad=0; $total=0; $good=0; $bad=0;
print "<center><font face='arial, helvetica' size=3 color='#009900'><B>Processing $delim_name-delimited file... ($tab_count|$pipe_count)\n"; print "<center><font face='arial, helvetica' size=3 color='#009900'><B>Processing $delim_name-delimited file... ($tab_count|$pipe_count)\n";
+13 -2
View File
@@ -1,6 +1,6 @@
#!/usr/bin/perl #!/usr/bin/perl
### listloader.pl version 0.2 *DBI-version* ### listloader.pl version 0.3 *DBI-version*
### ###
### Copyright (C) 2006 Matt Florell,Joe Johnson <vicidial@gmail.com> LICENSE: GPLv2 ### Copyright (C) 2006 Matt Florell,Joe Johnson <vicidial@gmail.com> LICENSE: GPLv2
### ###
@@ -11,6 +11,7 @@
# - Added gmt_offset_now lookup for each lead # - Added gmt_offset_now lookup for each lead
# 60811-1232 - Changed to DBI # 60811-1232 - Changed to DBI
# 60811-1329 - changed to use /etc/astguiclient.conf for configs # 60811-1329 - changed to use /etc/astguiclient.conf for configs
# 60822-1121 - fixed for nonwritable directories
# #
### begin parsing run-time options ### ### begin parsing run-time options ###
@@ -33,10 +34,20 @@ if (length($ARGV[0])>1)
{ {
@data_in = split(/--forcelistid=/,$args); @data_in = split(/--forcelistid=/,$args);
$forcelistid = $data_in[1]; $forcelistid = $data_in[1];
$forcelistid =~ s/ .*//gi;
print "\n----- FORCE LISTID OVERRIDE: $forcelistid -----\n\n"; print "\n----- FORCE LISTID OVERRIDE: $forcelistid -----\n\n";
} }
else else
{$forcelistid = '';} {$forcelistid = '';}
if ($args =~ /--lead-file=/i)
{
@data_in = split(/--lead-file=/,$args);
$lead_file = $data_in[1];
$lead_file =~ s/ .*//gi;
# print "\n----- LEAD FILE: $lead_file -----\n\n";
}
else
{$lead_file = './vicidial_temp_file.xls';}
} }
} }
### end parsing run-time options ### ### end parsing run-time options ###
@@ -138,7 +149,7 @@ $total=0; $good=0; $bad=0;
print "<center><font face='arial, helvetica' size=3 color='#009900'><B>Processing Excel file...\n"; print "<center><font face='arial, helvetica' size=3 color='#009900'><B>Processing Excel file...\n";
open(STMT_FILE, "> $PATHlogs/listloader_stmts.txt"); open(STMT_FILE, "> $PATHlogs/listloader_stmts.txt");
$oBook = Spreadsheet::ParseExcel::Workbook->Parse("./vicidial_temp_file.xls"); $oBook = Spreadsheet::ParseExcel::Workbook->Parse("$lead_file");
my($iR, $iC, $oWkS, $oWkC); my($iR, $iC, $oWkS, $oWkC);
foreach $oWkS (@{$oBook->{Worksheet}}) { foreach $oWkS (@{$oBook->{Worksheet}}) {
+12 -5
View File
@@ -8,6 +8,7 @@
# #
# changes: # changes:
# 60620-1149 - Added variable filtering to eliminate SQL injection attack threat # 60620-1149 - Added variable filtering to eliminate SQL injection attack threat
# 60822-1105 - fixed for nonwritable directories
# #
require("dbconnect.php"); require("dbconnect.php");
@@ -30,7 +31,7 @@ $rslt=mysql_query($stmt, $link);
$row=mysql_fetch_row($rslt); $row=mysql_fetch_row($rslt);
$auth=$row[0]; $auth=$row[0];
$fp = fopen ("./project_auth_entries.txt", "a"); if ($WeBRooTWritablE > 0) {$fp = fopen ("./project_auth_entries.txt", "a");}
$date = date("r"); $date = date("r");
$ip = getenv("REMOTE_ADDR"); $ip = getenv("REMOTE_ADDR");
$browser = getenv("HTTP_USER_AGENT"); $browser = getenv("HTTP_USER_AGENT");
@@ -59,13 +60,19 @@ $browser = getenv("HTTP_USER_AGENT");
echo "You do not have permissions to load leads\n"; echo "You do not have permissions to load leads\n";
exit; exit;
} }
fwrite ($fp, "LIST_LOAD|GOOD|$date|$PHP_AUTH_USER|$PHP_AUTH_PW|$ip|$browser|$LOGfullname|\n"); if ($WeBRooTWritablE > 0)
fclose($fp); {
fwrite ($fp, "LIST_LOAD|GOOD|$date|$PHP_AUTH_USER|$PHP_AUTH_PW|$ip|$browser|$LOGfullname|\n");
fclose($fp);
}
} }
else else
{ {
fwrite ($fp, "LIST_LOAD|FAIL|$date|$PHP_AUTH_USER|$PHP_AUTH_PW|$ip|$browser|\n"); if ($WeBRooTWritablE > 0)
fclose($fp); {
fwrite ($fp, "LIST_LOAD|FAIL|$date|$PHP_AUTH_USER|$PHP_AUTH_PW|$ip|$browser|\n");
fclose($fp);
}
} }
} }
@@ -11,6 +11,35 @@
# 60811-1329 - changed to use /etc/astguiclient.conf for configs # 60811-1329 - changed to use /etc/astguiclient.conf for configs
# #
### begin parsing run-time options ###
if (length($ARGV[0])>1)
{
$i=0;
while ($#ARGV >= $i)
{
$args = "$args $ARGV[$i]";
$i++;
}
if ($args =~ /--help|-h/i)
{
print "allowed run time options:\n [-forcelistid=1234] = overrides the listID given in the file with the 1234\n [-h] = this help screen\n\n";
}
else
{
if ($args =~ /--lead-file=/i)
{
@data_in = split(/--lead-file=/,$args);
$lead_file = $data_in[1];
$lead_file =~ s/ .*//gi;
# print "\n----- LEAD FILE: $lead_file -----\n\n";
}
else
{$lead_file = './vicidial_temp_file.xls';}
}
}
### end parsing run-time options ###
use Spreadsheet::ParseExcel; use Spreadsheet::ParseExcel;
use Time::Local; use Time::Local;
use DBI; use DBI;
@@ -63,7 +92,7 @@ $dbhA = DBI->connect("DBI:mysql:$VARDB_database:$VARDB_server:$VARDB_port", "$VA
or die "Couldn't connect to database: " . DBI->errstr; or die "Couldn't connect to database: " . DBI->errstr;
$oBook = Spreadsheet::ParseExcel::Workbook->Parse("./vicidial_temp_file.xls"); $oBook = Spreadsheet::ParseExcel::Workbook->Parse("$lead_file");
my($iR, $iC, $oWkS, $oWkC); my($iR, $iC, $oWkS, $oWkC);
$var_str=""; $var_str="";
@@ -100,7 +129,7 @@ while ($sthArows > $rec_count)
print " <tr bgcolor=#D9E6FE>\r\n"; print " <tr bgcolor=#D9E6FE>\r\n";
print " <th><font class=standard>".$field_name.": </font></td>\r\n"; print " <th><font class=standard>".$field_name.": </font></td>\r\n";
print " <th><select name='".$$names[$i]."_field'>\r\n"; print " <th><select name='".$$names[$i]."_field'>\r\n";
print " <option value=''>---------------------</option>\r\n"; print " <option value='9999'>---------------------</option>\r\n";
for ($j=0; $j<scalar(@xls_row); $j++) for ($j=0; $j<scalar(@xls_row); $j++)
{ {
+11 -1
View File
@@ -33,10 +33,20 @@ if (length($ARGV[0])>1)
{ {
@data_in = split(/--forcelistid=/,$args); @data_in = split(/--forcelistid=/,$args);
$forcelistid = $data_in[1]; $forcelistid = $data_in[1];
$forcelistid =~ s/ .*//gi;
print "\n----- FORCE LISTID OVERRIDE: $forcelistid -----\n\n"; print "\n----- FORCE LISTID OVERRIDE: $forcelistid -----\n\n";
} }
else else
{$forcelistid = '';} {$forcelistid = '';}
if ($args =~ /--lead-file=/i)
{
@data_in = split(/--lead-file=/,$args);
$lead_file = $data_in[1];
$lead_file =~ s/ .*//gi;
# print "\n----- LEAD FILE: $lead_file -----\n\n";
}
else
{$lead_file = './vicidial_temp_file.xls';}
} }
} }
### end parsing run-time options ### ### end parsing run-time options ###
@@ -139,7 +149,7 @@ if ($DB) {print "SEED TIME $secX : $year-$mon-$mday $hour:$min:$sec LOC
$total=0; $good=0; $bad=0; $total=0; $good=0; $bad=0;
open(STMT_FILE, "> $PATHlogs/listloader_stmts.txt"); open(STMT_FILE, "> $PATHlogs/listloader_stmts.txt");
$oBook = Spreadsheet::ParseExcel::Workbook->Parse("./vicidial_temp_file.xls"); $oBook = Spreadsheet::ParseExcel::Workbook->Parse("$lead_file");
my($iR, $iC, $oWkS, $oWkC); my($iR, $iC, $oWkS, $oWkC);
foreach $oWkS (@{$oBook->{Worksheet}}) { foreach $oWkS (@{$oBook->{Worksheet}}) {
@@ -13,11 +13,12 @@
# 60616-1240 - added listID override # 60616-1240 - added listID override
# 60616-1604 - added gmt lookup for each lead # 60616-1604 - added gmt lookup for each lead
# 60619-1651 - Added variable filtering to eliminate SQL injection attack threat # 60619-1651 - Added variable filtering to eliminate SQL injection attack threat
# 60822-1121 - fixed for nonwritable directories
# #
# make sure vicidial_list exists and that your file follows the formatting correctly. This page does not dedupe or do any other lead filtering actions yet at this time. # make sure vicidial_list exists and that your file follows the formatting correctly. This page does not dedupe or do any other lead filtering actions yet at this time.
$version = '1.1.12-1'; $version = '2.0.1';
$build = '60619-1651'; $build = '60822-1121';
require("dbconnect.php"); require("dbconnect.php");
@@ -94,6 +95,8 @@ if (isset($_GET["comments_field"])) {$comments_field=$_GET["comments_field"];
if (isset($_GET["list_id_override"])) {$list_id_override=$_GET["list_id_override"];} if (isset($_GET["list_id_override"])) {$list_id_override=$_GET["list_id_override"];}
elseif (isset($_POST["list_id_override"])) {$list_id_override=$_POST["list_id_override"];} elseif (isset($_POST["list_id_override"])) {$list_id_override=$_POST["list_id_override"];}
$list_id_override = (preg_replace("/\D/","",$list_id_override)); $list_id_override = (preg_replace("/\D/","",$list_id_override));
if (isset($_GET["lead_file"])) {$lead_file=$_GET["lead_file"];}
elseif (isset($_POST["lead_file"])) {$lead_file=$_POST["lead_file"];}
# $country_field=$_GET["country_field"]; if (!$country_field) {$country_field=$_POST["country_field"];} # $country_field=$_GET["country_field"]; if (!$country_field) {$country_field=$_POST["country_field"];}
@@ -114,7 +117,7 @@ $rslt=mysql_query($stmt, $link);
$row=mysql_fetch_row($rslt); $row=mysql_fetch_row($rslt);
$auth=$row[0]; $auth=$row[0];
$fp = fopen ("./project_auth_entries.txt", "a"); if ($WeBRooTWritablE > 0) {$fp = fopen ("./project_auth_entries.txt", "a");}
$date = date("r"); $date = date("r");
$ip = getenv("REMOTE_ADDR"); $ip = getenv("REMOTE_ADDR");
$browser = getenv("HTTP_USER_AGENT"); $browser = getenv("HTTP_USER_AGENT");
@@ -143,13 +146,19 @@ $browser = getenv("HTTP_USER_AGENT");
echo "You do not have permissions to load leads\n"; echo "You do not have permissions to load leads\n";
exit; exit;
} }
fwrite ($fp, "LIST_LOAD|GOOD|$date|$PHP_AUTH_USER|$PHP_AUTH_PW|$ip|$browser|$LOGfullname|\n"); if ($WeBRooTWritablE > 0)
fclose($fp); {
fwrite ($fp, "LIST_LOAD|GOOD|$date|$PHP_AUTH_USER|$PHP_AUTH_PW|$ip|$browser|$LOGfullname|\n");
fclose($fp);
}
} }
else else
{ {
fwrite ($fp, "LIST_LOAD|FAIL|$date|$PHP_AUTH_USER|$PHP_AUTH_PW|$ip|$browser|\n"); if ($WeBRooTWritablE > 0)
fclose($fp); {
fwrite ($fp, "LIST_LOAD|FAIL|$date|$PHP_AUTH_USER|$PHP_AUTH_PW|$ip|$browser|\n");
fclose($fp);
}
} }
} }
@@ -303,9 +312,11 @@ function ParseFileName() {
if (!eregi(".csv", $leadfile_name) && !eregi(".xls", $leadfile_name)) { if (!eregi(".csv", $leadfile_name) && !eregi(".xls", $leadfile_name)) {
# copy($leadfile, "./vicidial_temp_file.txt"); # copy($leadfile, "./vicidial_temp_file.txt");
$file=fopen("$WeBServeRRooT/vicidial/vicidial_temp_file.txt", "r"); $file=fopen("$lead_file", "r");
$stmt_file=fopen("listloader_stmts.txt", "w"); if ($WeBRooTWritablE > 0)
{
$stmt_file=fopen("listloader_stmts.txt", "w");
}
$buffer=fgets($file, 4096); $buffer=fgets($file, 4096);
$tab_count=substr_count($buffer, "\t"); $tab_count=substr_count($buffer, "\t");
$pipe_count=substr_count($buffer, "|"); $pipe_count=substr_count($buffer, "|");
@@ -315,7 +326,7 @@ function ParseFileName() {
if (count($field_check)>=5) { if (count($field_check)>=5) {
flush(); flush();
$file=fopen("$WeBServeRRooT/vicidial/vicidial_temp_file.txt", "r"); $file=fopen("$lead_file", "r");
print "<center><font face='arial, helvetica' size=3 color='#009900'><B>Processing $delim_name-delimited file...\n"; print "<center><font face='arial, helvetica' size=3 color='#009900'><B>Processing $delim_name-delimited file...\n";
if (strlen($list_id_override)>0) if (strlen($list_id_override)>0)
@@ -416,19 +427,21 @@ function ParseFileName() {
} }
} else if (!eregi(".csv", $leadfile_name)) { } else if (!eregi(".csv", $leadfile_name)) {
# copy($leadfile, "./vicidial_temp_file.xls"); # copy($leadfile, "./vicidial_temp_file.xls");
$file=fopen("$WeBServeRRooT/vicidial/vicidial_temp_file.xls", "r"); $file=fopen("$lead_file", "r");
print "<center><font face='arial, helvetica' size=3 color='#009900'><B>Processing Excel file... \n"; print "<center><font face='arial, helvetica' size=3 color='#009900'><B>Processing Excel file... \n";
if (strlen($list_id_override)>0) if (strlen($list_id_override)>0)
{ {
print "<BR><BR>LIST ID OVERRIDE FOR THIS FILE: $list_id_override<BR><BR>\n"; print "<BR><BR>LIST ID OVERRIDE FOR THIS FILE: $list_id_override<BR><BR>\n";
} }
# print "$WeBServeRRooT/vicidial/listloader_super.pl $vendor_lead_code_field,$source_id_field,$list_id_field,$phone_code_field,$phone_number_field,$title_field,$first_name_field,$middle_initial_field,$last_name_field,$address1_field,$address2_field,$address3_field,$city_field,$state_field,$province_field,$postal_code_field,$country_code_field,$gender_field,$date_of_birth_field,$alt_phone_field,$email_field,$security_phrase_field,$comments_field"; # print "|$WeBServeRRooT/vicidial/listloader_super.pl $vendor_lead_code_field,$source_id_field,$list_id_field,$phone_code_field,$phone_number_field,$title_field,$first_name_field,$middle_initial_field,$last_name_field,$address1_field,$address2_field,$address3_field,$city_field,$state_field,$province_field,$postal_code_field,$country_code_field,$gender_field,$date_of_birth_field,$alt_phone_field,$email_field,$security_phrase_field,$comments_field, --forcelistid=$list_id_override --lead_file=$lead_file|";
passthru("$WeBServeRRooT/vicidial/listloader_super.pl $vendor_lead_code_field,$source_id_field,$list_id_field,$phone_code_field,$phone_number_field,$title_field,$first_name_field,$middle_initial_field,$last_name_field,$address1_field,$address2_field,$address3_field,$city_field,$state_field,$province_field,$postal_code_field,$country_code_field,$gender_field,$date_of_birth_field,$alt_phone_field,$email_field,$security_phrase_field,$comments_field, --forcelistid=$list_id_override"); passthru("$WeBServeRRooT/vicidial/listloader_super.pl $vendor_lead_code_field,$source_id_field,$list_id_field,$phone_code_field,$phone_number_field,$title_field,$first_name_field,$middle_initial_field,$last_name_field,$address1_field,$address2_field,$address3_field,$city_field,$state_field,$province_field,$postal_code_field,$country_code_field,$gender_field,$date_of_birth_field,$alt_phone_field,$email_field,$security_phrase_field,$comments_field, --forcelistid=$list_id_override --lead-file=$lead_file");
} else { } else {
# copy($leadfile, "./vicidial_temp_file.csv"); # copy($leadfile, "./vicidial_temp_file.csv");
$file=fopen("$WeBServeRRooT/vicidial/vicidial_temp_file.csv", "r"); $file=fopen("$lead_file", "r");
$stmt_file=fopen("listloader_stmts.txt", "w");
if ($WeBRooTWritablE > 0)
{$stmt_file=fopen("$WeBServeRRooT/vicidial/listloader_stmts.txt", "w");}
print "<center><font face='arial, helvetica' size=3 color='#009900'><B>Processing CSV file... \n"; print "<center><font face='arial, helvetica' size=3 color='#009900'><B>Processing CSV file... \n";
if (strlen($list_id_override)>0) if (strlen($list_id_override)>0)
@@ -528,9 +541,18 @@ if ($leadfile && filesize($LF_path)<=8388608) {
if (!eregi(".csv", $leadfile_name) && !eregi(".xls", $leadfile_name)) { if (!eregi(".csv", $leadfile_name) && !eregi(".xls", $leadfile_name)) {
copy($LF_path, "$WeBServeRRooT/vicidial/vicidial_temp_file.txt"); if ($WeBRooTWritablE > 0)
$file=fopen("$WeBServeRRooT/vicidial/vicidial_temp_file.txt", "r"); {
if ($WeBRooTWritablE > 0) copy($LF_path, "$WeBServeRRooT/vicidial/vicidial_temp_file.txt");
$lead_file = "./vicidial_temp_file.txt";
}
else
{
copy($LF_path, "/tmp/vicidial_temp_file.txt");
$lead_file = "/tmp/vicidial_temp_file.txt";
}
$file=fopen("$lead_file", "r");
if ($WeBRooTWritablE > 0)
{$stmt_file=fopen("$WeBServeRRooT/vicidial/listloader_stmts.txt", "w");} {$stmt_file=fopen("$WeBServeRRooT/vicidial/listloader_stmts.txt", "w");}
$buffer=fgets($file, 4096); $buffer=fgets($file, 4096);
@@ -542,7 +564,7 @@ if ($leadfile && filesize($LF_path)<=8388608) {
if (count($field_check)>=5) { if (count($field_check)>=5) {
flush(); flush();
$file=fopen("$WeBServeRRooT/vicidial/vicidial_temp_file.txt", "r"); $file=fopen("$lead_file", "r");
$total=0; $good=0; $bad=0; $total=0; $good=0; $bad=0;
print "<center><font face='arial, helvetica' size=3 color='#009900'><B>Processing $delim_name-delimited file... ($tab_count|$pipe_count)\n"; print "<center><font face='arial, helvetica' size=3 color='#009900'><B>Processing $delim_name-delimited file... ($tab_count|$pipe_count)\n";
if (strlen($list_id_override)>0) if (strlen($list_id_override)>0)
@@ -640,15 +662,39 @@ if ($leadfile && filesize($LF_path)<=8388608) {
} else { } else {
print "<center><font face='arial, helvetica' size=3 color='#990000'><B>ERROR: The file does not have the required number of fields to process it.</B></font></center>"; print "<center><font face='arial, helvetica' size=3 color='#990000'><B>ERROR: The file does not have the required number of fields to process it.</B></font></center>";
} }
} else if (!eregi(".csv", $leadfile_name)) { } else if (!eregi(".csv", $leadfile_name))
copy($LF_path, "$WeBServeRRooT/vicidial/vicidial_temp_file.xls"); {
$file=fopen("$WeBServeRRooT/vicidial/vicidial_temp_file.xls", "r"); if ($WeBRooTWritablE > 0)
{
copy($LF_path, "$WeBServeRRooT/vicidial/vicidial_temp_file.xls");
$lead_file = "$WeBServeRRooT/vicidial/vicidial_temp_file.xls";
}
else
{
copy($LF_path, "/tmp/vicidial_temp_file.xls");
$lead_file = "/tmp/vicidial_temp_file.xls";
}
$file=fopen("$lead_file", "r");
passthru("$WeBServeRRooT/vicidial/listloader.pl --forcelistid=$list_id_override"); # echo "|$WeBServeRRooT/vicidial/listloader.pl --forcelistid=$list_id_override --lead-file=$lead_file|";
} else { passthru("$WeBServeRRooT/vicidial/listloader.pl --forcelistid=$list_id_override --lead-file=$lead_file");
copy($LF_path, "$WeBServeRRooT/vicidial/vicidial_temp_file.csv");
$file=fopen("$WeBServeRRooT/vicidial/vicidial_temp_file.csv", "r"); }
$stmt_file=fopen("listloader_stmts.txt", "w"); else
{
if ($WeBRooTWritablE > 0)
{
copy($LF_path, "$WeBServeRRooT/vicidial/vicidial_temp_file.csv");
$lead_file = "$WeBServeRRooT/vicidial/vicidial_temp_file.csv";
}
else
{
copy($LF_path, "/tmp/vicidial_temp_file.csv");
$lead_file = "/tmp/vicidial_temp_file.csv";
}
$file=fopen("$lead_file", "r");
if ($WeBRooTWritablE > 0)
{$stmt_file=fopen("$WeBServeRRooT/vicidial/listloader_stmts.txt", "w");}
print "<center><font face='arial, helvetica' size=3 color='#009900'><B>Processing CSV file... \n"; print "<center><font face='arial, helvetica' size=3 color='#009900'><B>Processing CSV file... \n";
@@ -752,10 +798,21 @@ if ($leadfile && filesize($LF_path)<=8388608) {
$rslt=mysql_query("select vendor_lead_code, source_id, list_id, phone_code, phone_number, title, first_name, middle_initial, last_name, address1, address2, address3, city, state, province, postal_code, country_code, gender, date_of_birth, alt_phone, email, security_phrase, comments from vicidial_list limit 1", $link); $rslt=mysql_query("select vendor_lead_code, source_id, list_id, phone_code, phone_number, title, first_name, middle_initial, last_name, address1, address2, address3, city, state, province, postal_code, country_code, gender, date_of_birth, alt_phone, email, security_phrase, comments from vicidial_list limit 1", $link);
if (!eregi(".csv", $leadfile_name) && !eregi(".xls", $leadfile_name)) { if (!eregi(".csv", $leadfile_name) && !eregi(".xls", $leadfile_name))
copy($LF_path, "$WeBServeRRooT/vicidial/vicidial_temp_file.txt"); {
$file=fopen("$WeBServeRRooT/vicidial/vicidial_temp_file.txt", "r"); if ($WeBRooTWritablE > 0)
$stmt_file=fopen("listloader_stmts.txt", "w"); {
copy($LF_path, "$WeBServeRRooT/vicidial/vicidial_temp_file.txt");
$lead_file = "$WeBServeRRooT/vicidial/vicidial_temp_file.txt";
}
else
{
copy($LF_path, "/tmp/vicidial_temp_file.txt");
$lead_file = "/tmp/vicidial_temp_file.txt";
}
$file=fopen("$lead_file", "r");
if ($WeBRooTWritablE > 0)
{$stmt_file=fopen("$WeBServeRRooT/vicidial/listloader_stmts.txt", "w");}
$buffer=fgets($file, 4096); $buffer=fgets($file, 4096);
$tab_count=substr_count($buffer, "\t"); $tab_count=substr_count($buffer, "\t");
@@ -764,7 +821,7 @@ if ($leadfile && filesize($LF_path)<=8388608) {
if ($tab_count>$pipe_count) {$delimiter="\t"; $delim_name="tab";} else {$delimiter="|"; $delim_name="pipe";} if ($tab_count>$pipe_count) {$delimiter="\t"; $delim_name="tab";} else {$delimiter="|"; $delim_name="pipe";}
$field_check=explode($delimiter, $buffer); $field_check=explode($delimiter, $buffer);
flush(); flush();
$file=fopen("$WeBServeRRooT/vicidial/vicidial_temp_file.txt", "r"); $file=fopen("$lead_file", "r");
print "<center><font face='arial, helvetica' size=3 color='#009900'><B>Processing $delim_name-delimited file...\n"; print "<center><font face='arial, helvetica' size=3 color='#009900'><B>Processing $delim_name-delimited file...\n";
if (strlen($list_id_override)>0) if (strlen($list_id_override)>0)
@@ -826,13 +883,39 @@ if ($leadfile && filesize($LF_path)<=8388608) {
#print " </td>\r\n"; #print " </td>\r\n";
#print " </tr>\r\n"; #print " </tr>\r\n";
} }
} else if (!eregi(".csv", $leadfile_name)) { }
copy($LF_path, "$WeBServeRRooT/vicidial/vicidial_temp_file.xls"); else if (!eregi(".csv", $leadfile_name))
passthru("$WeBServeRRooT/vicidial/listloader_rowdisplay.pl"); {
} else { if ($WeBRooTWritablE > 0)
copy($LF_path, "$WeBServeRRooT/vicidial/vicidial_temp_file.csv"); {
$file=fopen("$WeBServeRRooT/vicidial/vicidial_temp_file.csv", "r"); copy($LF_path, "$WeBServeRRooT/vicidial/vicidial_temp_file.xls");
$stmt_file=fopen("listloader_stmts.txt", "w"); $lead_file = "$WeBServeRRooT/vicidial/vicidial_temp_file.xls";
}
else
{
copy($LF_path, "/tmp/vicidial_temp_file.xls");
$lead_file = "/tmp/vicidial_temp_file.xls";
}
# echo "|$WeBServeRRooT/vicidial/listloader_rowdisplay.pl --lead-file=$lead_file|";
passthru("$WeBServeRRooT/vicidial/listloader_rowdisplay.pl --lead-file=$lead_file");
}
else
{
if ($WeBRooTWritablE > 0)
{
copy($LF_path, "$WeBServeRRooT/vicidial/vicidial_temp_file.csv");
$lead_file = "$WeBServeRRooT/vicidial/vicidial_temp_file.csv";
}
else
{
copy($LF_path, "/tmp/vicidial_temp_file.csv");
$lead_file = "/tmp/vicidial_temp_file.csv";
}
$file=fopen("$lead_file", "r");
if ($WeBRooTWritablE > 0)
{$stmt_file=fopen("$WeBServeRRooT/vicidial/listloader_stmts.txt", "w");}
print "<center><font face='arial, helvetica' size=3 color='#009900'><B>Processing CSV file... \n"; print "<center><font face='arial, helvetica' size=3 color='#009900'><B>Processing CSV file... \n";
@@ -895,6 +978,7 @@ if ($leadfile && filesize($LF_path)<=8388608) {
} }
} }
print " <tr bgcolor='#330099'>\r\n"; print " <tr bgcolor='#330099'>\r\n";
print " <input type=hidden name=lead_file value=\"$lead_file\">\r\n";
print " <input type=hidden name=list_id_override value=\"$list_id_override\">\r\n"; print " <input type=hidden name=list_id_override value=\"$list_id_override\">\r\n";
print " <th colspan=2><input type=submit name='OK_to_process' value='OK TO PROCESS'>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;<input type=button onClick=\"javascript:document.location='new_listloader_superL.php'\" value=\"START OVER\" name='reload_page'></th>\r\n"; print " <th colspan=2><input type=submit name='OK_to_process' value='OK TO PROCESS'>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;<input type=button onClick=\"javascript:document.location='new_listloader_superL.php'\" value=\"START OVER\" name='reload_page'></th>\r\n";
print " </tr>\r\n"; print " </tr>\r\n";