X-Git-Url: http://git.freeside.biz/gitweb/?p=freeside.git;a=blobdiff_plain;f=FS%2Fbin%2Ffreeside-cdr-sftp_and_import;h=aa4bf6471cb3aef939f14420c09bf08fff5e9207;hp=722bf733e842a31f4181a1873026607e9318da70;hb=f822e27a1e00594332ffa487a1c284234c5580a6;hpb=e9f160b9f019b82fd5a8cc630fa92943a52af1d2 diff --git a/FS/bin/freeside-cdr-sftp_and_import b/FS/bin/freeside-cdr-sftp_and_import index 722bf733e..aa4bf6471 100755 --- a/FS/bin/freeside-cdr-sftp_and_import +++ b/FS/bin/freeside-cdr-sftp_and_import @@ -12,8 +12,8 @@ use FS::cdr; # parse command line ### -use vars qw( $opt_m $opt_p $opt_r $opt_e $opt_d $opt_v $opt_P $opt_a $opt_c $opt_g $opt_s ); -getopts('c:m:p:r:e:d:v:P:ags'); +use vars qw( $opt_m $opt_p $opt_r $opt_e $opt_d $opt_v $opt_P $opt_a $opt_c $opt_g $opt_s $opt_b ); +getopts('c:m:p:r:e:d:v:P:agsb'); $opt_e ||= 'csv'; #$opt_e = ".$opt_e" unless $opt_e =~ /^\./; @@ -120,7 +120,7 @@ foreach my $filename ( @$ls ) { if ( $error ) { if ( $opt_s ) { - warn "$ungzipped: $error\n"; + warn "$ungziped: $error\n"; } else { unlink "$cachedir/$filename"; unlink "$cachedir/$ungziped" if $opt_g; @@ -161,7 +161,11 @@ foreach my $filename ( @$ls ) { ### sub usage { - "Usage: \n cdr.import user format servername\n"; + "Usage: + cdr.sftp_and_import [ -m method ] [ -p prefix ] [ -e extension ] + [ -r remotefolder ] [ -d donefolder ] [ -v level ] [ -P port ] + [ -a ] [ -g ] [ -s ] [ -c cdrtypenum ] user format [sftpuser@]servername + "; } use vars qw( $sftp $ftp ); @@ -176,6 +180,7 @@ sub ftp { or die "FTP connection to '$hostname' failed."; $ftp->login($ftp_user, $ftp_pass) or die "FTP login failed: ".$ftp->message; $ftp->cwd($opt_r) or die "can't chdir to $opt_r\n" if $opt_r; + $ftp->binary or die "can't set BINARY mode: ". $ftp->message if $opt_b; return $ftp; } @@ -198,7 +203,7 @@ freeside-cdr-sftp_and_import - Download CDR files from a remote server via SFTP =head1 SYNOPSIS - cdr.sftp_and_import [ -m method ] [ -p prefix ] [ -e extension ] + freeside-cdr-sftp_and_import [ -m method ] [ -p prefix ] [ -e extension ] [ -r remotefolder ] [ -d donefolder ] [ -v level ] [ -P port ] [ -a ] [ -g ] [ -s ] [ -c cdrtypenum ] user format [sftpuser@]servername @@ -221,6 +226,8 @@ or FTP and then import them into the database. -a: use ftp passive mode +-b: use ftp binary mode + -v: set verbosity level; this script only has one level, but it will be passed as the 'debug' argument to the transport method