X-Git-Url: http://git.freeside.biz/gitweb/?p=freeside.git;a=blobdiff_plain;f=bin%2Faradial-sftp_and_import;h=668ec49ba18ad0e99b3cb31c94ffbf7df3a14a0b;hp=0cb6bca3a840d27e20caa2e1cd94d33252dbcf49;hb=88e9a56677d343392416c262f976f069157b06cb;hpb=7f1bc9c18dc4a2cd1c9a8f972c3107821af0e649 diff --git a/bin/aradial-sftp_and_import b/bin/aradial-sftp_and_import index 0cb6bca3a..668ec49ba 100755 --- a/bin/aradial-sftp_and_import +++ b/bin/aradial-sftp_and_import @@ -4,6 +4,7 @@ use strict; use Getopt::Std; +use Date::Parse; use Date::Format; use Text::CSV_XS; use DBI qw( :sql_types ); @@ -162,6 +163,8 @@ foreach my $filename ( @$ls ) { #skip blank records next unless grep defined($_), values %dbhash; + my $date = time2str( '%Y-%m-%d %X', str2time( $hash{'Date'} ) ); + $hash{'Status-Type'} = $status_type{ $hash{'Status-Type'} } if exists $status_type{ $hash{'Status-Type'} }; @@ -169,7 +172,8 @@ foreach my $filename ( @$ls ) { my @extra_values = (); if ( $hash{'Status-Type'} eq 'Start' ) { - $dbhash{'AcctStartTime'} = $hash{'Date'}; + push @keys, 'AcctStartTime'; + $dbhash{'AcctStartTime'} = $date; $sql = 'INSERT INTO radacct ( '. join(',', @keys). ' ) VALUES ( '. join(',', map ' ? ', @keys ). ' )'; @@ -177,7 +181,9 @@ foreach my $filename ( @$ls ) { } elsif ( $hash{'Status-Type'} eq 'Stop' ) { my $AcctSessionId = delete($dbhash{AcctSessionId}); - $dbhash{'AcctStopTime'} = $hash{'Date'}; + + push @keys, 'AcctStopTime'; + $dbhash{'AcctStopTime'} = $date; push @extra_values, $AcctSessionId;