8 |
## |
## |
9 |
## ------------------------------------------------------------------------- |
## ------------------------------------------------------------------------- |
10 |
## $Log$ |
## $Log$ |
11 |
|
## Revision 1.13 2004/06/19 16:53:38 joko |
12 |
|
## fix: handle local checksum only if database is configured with "hasLocalChecksum" |
13 |
|
## |
14 |
## Revision 1.12 2004/06/19 01:45:08 joko |
## Revision 1.12 2004/06/19 01:45:08 joko |
15 |
## introduced "local checksum"-mechanism |
## introduced "local checksum"-mechanism |
16 |
## moved _dumpCompact to ::Compare::Checksum |
## moved _dumpCompact to ::Compare::Checksum |
320 |
#if ( $statOK && (lc $self->{args}->{method} eq 'checksum') ) { |
#if ( $statOK && (lc $self->{args}->{method} eq 'checksum') ) { |
321 |
#if ( !$self->{node}->{status}->{new} && (lc $self->{args}->{method} eq 'checksum') ) { |
#if ( !$self->{node}->{status}->{new} && (lc $self->{args}->{method} eq 'checksum') ) { |
322 |
|
|
323 |
# calculate local checksum of source node |
# new 2004-06-17: calculate local checksum of source node |
324 |
$self->handleLocalChecksum('source'); |
# new 2004-06-19: ... only if requested |
325 |
|
if ($self->{options}->{source}->{storage}->{handle}->{locator}->{hasLocalChecksum}) { |
326 |
|
$self->handleLocalChecksum('source'); |
327 |
|
} |
328 |
|
|
329 |
# calculate checksum of source node |
# calculate checksum of source node |
330 |
#$self->_calcChecksum('source'); |
#$self->_calcChecksum('source'); |
369 |
} |
} |
370 |
|
|
371 |
# new 2004-06-17: also check if local checksum is inconsistent |
# new 2004-06-17: also check if local checksum is inconsistent |
372 |
if ($self->{node}->{source}->{checksum_local_storage} ne $self->{node}->{source}->{checksum_local_calculated}) { |
# new 2004-06-19: ... only if requested |
373 |
|
if ($self->{options}->{source}->{storage}->{handle}->{locator}->{hasLocalChecksum} and |
374 |
|
($self->{node}->{source}->{checksum_local_storage} ne $self->{node}->{source}->{checksum_local_calculated}) ) { |
375 |
$self->{node}->{status}->{dirty_local} = 1; |
$self->{node}->{status}->{dirty_local} = 1; |
376 |
$self->{node}->{status}->{dirty} = 1; |
$self->{node}->{status}->{dirty} = 1; |
377 |
} |
} |