Lines 1-33
Link Here
|
1 |
--- lib/BackupPC/Xfer/Smb.pm.orig 2016-06-04 10:42:02 UTC |
1 |
--- lib/BackupPC/Xfer/Smb.pm.orig 2017-02-06 08:40:41 UTC |
2 |
+++ lib/BackupPC/Xfer/Smb.pm |
2 |
+++ lib/BackupPC/Xfer/Smb.pm |
3 |
@@ -217,7 +217,7 @@ sub readOutput |
3 |
@@ -242,7 +242,8 @@ sub readOutput |
4 |
# This section is highly dependent on the version of smbclient. |
|
|
5 |
# If you upgrade Samba, make sure that these regexp are still valid. |
6 |
# |
7 |
- if ( /^\s*(-?\d+) \(\s*\d+[.,]\d kb\/s\) (.*)$/ ) { |
8 |
+ if ( /^\s*(-?\d+) \(\s*\d+[.,]\d kb\/s\) (.*)$/ || /^tar:(\d+)\s+\+\+\+ (.*)$/ ) { |
9 |
my $sambaFileSize = $1; |
10 |
my $pcFileName = $2; |
11 |
(my $fileName = $pcFileName) =~ s/\\/\//g; |
12 |
@@ -230,7 +230,9 @@ sub readOutput |
13 |
$t->{byteCnt} += $2; |
14 |
$t->{fileCnt}++; |
15 |
$t->{XferLOG}->write(\"$_\n") if ( $t->{logLevel} >= 1 ); |
16 |
- } elsif ( /^\s*tar: dumped \d+ files/ ) { |
17 |
+ } elsif ( /^\s*tar: dumped \d+ files/ |
18 |
+ || /Total bytes received: \d+/i |
19 |
+ || /tar_process done, err = 0/ ) { |
20 |
$t->{xferOK} = 1; |
4 |
$t->{xferOK} = 1; |
|
|
5 |
$t->{byteCnt} = $1; |
21 |
$t->{XferLOG}->write(\"$_\n") if ( $t->{logLevel} >= 0 ); |
6 |
$t->{XferLOG}->write(\"$_\n") if ( $t->{logLevel} >= 0 ); |
22 |
} elsif ( /^\s*tar: restored \d+ files/ ) { |
7 |
- } elsif ( /^\s*tar: restored \d+ files/ ) { |
23 |
@@ -270,6 +272,10 @@ sub readOutput |
8 |
+ } elsif ( /^\s*tar: restored \d+ files/ |
24 |
} elsif ( /^\s*directory \\/i ) { |
9 |
+ || /^\s*tar:\d+\s*tar_process done, err = 0/ ) { |
25 |
$t->{XferLOG}->write(\"$_\n") if ( $t->{logLevel} >= 2 ); |
10 |
$t->{xferOK} = 1; |
26 |
} elsif ( /smb: \\>/ |
11 |
$t->{XferLOG}->write(\"$_\n") if ( $t->{logLevel} >= 0 ); |
27 |
+ || /^tar:\d+\s/ |
12 |
} elsif ( /^\s*read_socket_with_timeout: timeout read. /i ) { |
28 |
+ || /^ NTLMSSP_/ |
|
|
29 |
+ || /^GENSEC backend / |
30 |
+ || /^doing parameter / |
31 |
|| /^\s*added interface/i |
32 |
|| /^\s*tarmode is now/i |
33 |
|| /^\s*Total bytes written/i |