Thread: Re: Performance Improvement by reducing WAL for Update Operation

Re: Performance Improvement by reducing WAL for Update Operation

From
Amit kapila
Date:

On Thu, 8 Nov 2012 17:33:54 +0000 Amit Kapila wrote:
On Mon, 29 Oct 2012 20:02:11 +0530 Amit Kapila wrote:
On Sunday, October 28, 2012 12:28 AM Heikki Linnakangas wrote:
>>> One idea is to use the LZ format in the WAL record, but use your
>>> memcmp() code to construct it. I believe the slow part in LZ compression
>>> is in trying to locate matches in the "history", so if you just replace
>>> that with your code that's aware of the column boundaries and uses
>>> simple memcmp() to detect what parts changed, you could create LZ
>>> compressed output just as quickly as the custom encoded format. It would
>>> leave the door open for making the encoding smarter or to do actual
>>> compression in the future, without changing the format and the code to
>>> decode it.

>>This is good idea. I shall try it.

>>In the existing algorithm for storing the new data which is not present in
>>the history, it needs 1 control byte for
>>every 8 bytes of new data which can increase the size of the compressed
>>output as compare to our delta encoding approach.

>>Approach-2
>---------------
>>Use only one bit for control data [0 - Length and new data, 1 - pick from
>>history based on OFFSET-LENGTH]
>>The modified bit value (0) is to handle the new field data as a continuous
>>stream of data, instead of treating every byte as a new data.

> Attached are the patches
> 1. wal_update_changes_lz_v4 - to use LZ Approach with memcmp to construct WAL record
> 2. wal_update_changes_modified_lz_v5 - to use modified LZ Approach as mentioned above as Approach-2


> The main Changes as compare to previous patch are as follows:
> 1. In heap_delta_encode, use LZ encoding instead of Custom encoding.
> 2. Instead of get_tup_info(), introduced heap_getattr_with_len() macro based on suggestion from Noah.
> 3. LZ macro's moved from .c to .h, as they need to be used for encoding.
> 4. Changed the format for function arguments for heap_delta_encode()/heap_delta_decode() based on suggestion from Noah.

 

Please find the updated patches attached with this mail.

 

Modification in these Patches apart from above:

1. Traverse the tuple only once (previously it needs to traverse 3 times) to check if particular offset matches and get the offset to generate encoded tuple.

    To achieve this I have modified function heap_tuple_attr_equals() to heap_attr_get_length_and_check_equals(), so that it can get the length of tuple attribute

    which can be used to calculate offset. A separate function can also be written to achieve the same.

2. Improve the comments in code.

 

Performance Data:

1. Please refer testcase in attached file pgbench_250.c

   Refer Function used to create random string at end of mail.

2. The detail data and configuration settings can be reffered in attached files (pgbench_encode_withlz_ff100 & pgbench_encode_withlz_ff80).

 

Benchmark results with -F 100:

-Patch-             -tps@-c1-   -tps@-c2-   -tps@-c4-   -tps@-c8-   -WAL@-c8-
xlogscale           802         1453        2253        2643        13.99 GB
xlogscale+org lz    807         1602        3168        5140        9.50 GB
xlogscale+mod lz    796         1620        3216        5270        9.16 GB


Benchmark results with -F 80:

-Patch-             -tps@-c1-   -tps@-c2-   -tps@-c4-   -tps@-c8-   -WAL@-c8-
xlogscale           811         1455        2148        2704        13.6 GB
xlogscale+org lz    829         1684        3223        5325        9.13 GB
xlogscale+mod lz    801         1657        3263        5488        8.86 GB

 

> I shall write the wal_update_changes_custom_delta_v6, and then we can compare all the three patches performance data and decide which one to go based on results.

   The results with this are not better than above 2 Approaches, so I am not attaching it.

 

Function used to create randome string

--------------------------------------------------------

CREATE OR REPLACE FUNCTION random_text_md5_v2(INTEGER)
RETURNS TEXT
LANGUAGE SQL
AS $$

    select upper(
        substring(
            (
                SELECT string_agg(md5(random()::TEXT), '')
                FROM generate_series(1, CEIL($1 / 32.)::integer)
                ),
        $1)
    );

$$;

Suggestions/Comments?

 

With Regards,

Amit Kapila.



Attachment

Re: Performance Improvement by reducing WAL for Update Operation

From
Kyotaro HORIGUCHI
Date:
Hello, I looked into the patch and have some comments.

From the restriction of the time for this rather big patch,
please excuse that these comments are on a part of it. Others
will follow in few days.


==== heaptuple.c

noncachegetattr(_with_len): 

- att_getlength should do strlen as worst case or VARSIZE_ANY which is heavier than doing one comparizon, so I
recommendto add 'if (len)' as the restriction for doing this, and give NULL as &len to nocachegetattr_with_len in
nocachegetattr.

heap_attr_get_length_and_check_equals:

- Size seems to be used conventionary as the type for memory object length, so it might be better using Size instead of
int32as the type for *tup[12]_attr_len in parameter.
 

- This function returns always false for attrnum <= 0 as whole tuple or some system attrs comparison regardless of the
realresult, which is a bit different from the anticipation which the name gives. If you need to keep this optimization,
itshould have the name more specific to the purpose.
 

haap_delta_encode:

- Some misleading variable names (like match_not_found), some reatitions of similiar codelets (att_align_pointer,
pglz_out_tag),misleading slight difference of the meanings of variables of similar names(old_off and new_off and the
similarpairs), and bit tricky use of pglz_out_add and pglz_out_tag with length = 0.
 
 These are welcome to be modified for better readability.

==== heapam.c

fastgetattr_with_len

- Missing left paren in the line 867 ('nocachegetattr_with_len(tup)...')

- Missing enclosing paren in heapam.c:879 (len, only on style)

- Allowing len = NULL will be good for better performance, like noncachegetattr.


fastgetattr

- I suppose that the coding covension here is that macro and alternative c-code are expected to be look similar.
fastgetattrlooks quite differ to corresponding macro.
 

...


regards,

-- 
Kyotaro Horiguchi
NTT Open Source Software Center



Re: Performance Improvement by reducing WAL for Update Operation

From
Amit kapila
Date:
On Friday, December 07, 2012 2:28 PM Kyotaro HORIGUCHI wrote:

> Hello, I looked into the patch and have some comments.

Thank you for reviewing the patch.

> From the restriction of the time for this rather big patch,
> please excuse that these comments are on a part of it. Others
> will follow in few days.

It's perfectly fine.


>==== heaptuple.c
>
>noncachegetattr(_with_len):
>
>- att_getlength should do strlen as worst case or VARSIZE_ANY
>  which is heavier than doing one comparizon, so I recommend to
>  add 'if (len)' as the restriction for doing this, and give NULL
>  as &len to nocachegetattr_with_len in nocachegetattr.
Fixed.

>heap_attr_get_length_and_check_equals:
>
>- Size seems to be used conventionary as the type for memory
>  object length, so it might be better using Size instead of
>  int32 as the type for *tup[12]_attr_len in parameter.

Fixed.

>- This function returns always false for attrnum <= 0 as whole
>  tuple or some system attrs comparison regardless of the real
>  result, which is a bit different from the anticipation which
>  the name gives. If you need to keep this optimization, it
>  should have the name more specific to the purpose.

The heap_attr_get_length_and_check_equals function is similar to heap_tuple_attr_equals,
the attrnum <= 0 check is required for heap_tuple_attr_equals.

>haap_delta_encode:
>
>- Some misleading variable names (like match_not_found),
>  some reatitions of similiar codelets (att_align_pointer, pglz_out_tag),
>  misleading slight difference of the meanings of variables of
>  similar names(old_off and new_off and the similar pairs),
>  and bit tricky use of pglz_out_add and pglz_out_tag with length = 0.
>
>  These are welcome to be modified for better readability.

The variable names are modified, please check them once.

The (att_align_pointer, pglz_out_tag) repetition code is added to take care of padding only incase of values are equal.

Use of pglz_out_add and pglz_out_tag with length = 0 is done because of code readability.

>==== heapam.c
>
>fastgetattr_with_len
>
>- Missing left paren in the line 867 ('nocachegetattr_with_len(tup)...')
>
>- Missing enclosing paren in heapam.c:879 (len, only on style)
>
>- Allowing len = NULL will be good for better performance, like
>  noncachegetattr.

Fixed. except len=NULL because fastgetattr is modified as below comment.

>fastgetattr
>
>- I suppose that the coding covension here is that macro and
>  alternative c-code are expected to be look similar. fastgetattr
>  looks quite differ to corresponding macro.

Fixed.


Another change is also done to handle the history size of 2 bytes which is possible with the usage of LZ macro's for
deltaencoding. 


With Regards,
Amit Kapila.
Attachment

Re: Performance Improvement by reducing WAL for Update Operation

From
Kyotaro HORIGUCHI
Date:
Thank you.

> >heap_attr_get_length_and_check_equals: 
..
> >- This function returns always false for attrnum <= 0 as whole 
> >  tuple or some system attrs comparison regardless of the real 
> >  result, which is a bit different from the anticipation which 
> >  the name gives. If you need to keep this optimization, it 
> >  should have the name more specific to the purpose. 
> 
> The heap_attr_get_length_and_check_equals function is similar to heap_tuple_attr_equals, 
> the attrnum <= 0 check is required for heap_tuple_attr_equals. 

Sorry, you're right.

> >haap_delta_encode: 
> > 
> >- Some misleading variable names (like match_not_found), 
> >  some reatitions of similiar codelets (att_align_pointer, pglz_out_tag), 
> >  misleading slight difference of the meanings of variables of 
> >  similar names(old_off and new_off and the similar pairs), 
> >  and bit tricky use of pglz_out_add and pglz_out_tag with length = 0. 
> > 
> >  These are welcome to be modified for better readability. 
> 
> The variable names are modified, please check them once. 
> 
> The (att_align_pointer, pglz_out_tag) repetition code is added to take care of padding only incase of values are
equal.
 
> Use of pglz_out_add and pglz_out_tag with length = 0 is done because of code readability. 

Oops! Sorry for mistake. My point was that the bases for old_off
(of match_off) and dp, not new_off. It is no unnatural. Namings
had not been the problem and the function was perfect as of the
last patch. I'd been confised by the asymmetry between match_off
to pglz_out_tag and dp to pglz_out_add.

> Another change is also done to handle the history size of 2 bytes which is possible with the usage of LZ macro's for
deltaencoding.
 

Good catch. This seems to have been a potential bug which does no
harm when called from pglz_compress..

==========

Looking into wal_update_changes_mod_lz_v6.patch, I understand
that this patch experimentally adds literal data segment which
have more than single byte in PG-LZ algorithm.  According to
pglz_find_match, memCMP is slower than 'while(*s && *s == *d)' if
len < 16 and I suppose it is probably true at least for 4 byte
length data. This is also applied on encoding side. If this mod
does no harm to performance, I want to see this applied also to
pglz_comress.
By the way, the comment on pg_lzcompress.c:690 seems to quite
differ from what the code does.


regards,


*1: http://archives.postgresql.org/message-id/6C0B27F7206C9E4CA54AE035729E9C38285495B0@szxeml509-mbx

-- 
Kyotaro Horiguchi
NTT Open Source Software Center



Re: Performance Improvement by reducing WAL for Update Operation

From
Amit Kapila
Date:
On Monday, December 10, 2012 2:41 PM Kyotaro HORIGUCHI wrote:
> Thank you.
> 
> > >heap_attr_get_length_and_check_equals:
> ..    
> > >- This function returns always false for attrnum <= 0 as whole
> > >  tuple or some system attrs comparison regardless of the real
> > >  result, which is a bit different from the anticipation which
> > >  the name gives. If you need to keep this optimization, it
> > >  should have the name more specific to the purpose.
> >
> > The heap_attr_get_length_and_check_equals function is similar to
> heap_tuple_attr_equals,
> > the attrnum <= 0 check is required for heap_tuple_attr_equals.
> 
> Sorry, you're right.
> 
> > >haap_delta_encode:
> > >
> > >- Some misleading variable names (like match_not_found),
> > >  some reatitions of similiar codelets (att_align_pointer,
> pglz_out_tag),
> > >  misleading slight difference of the meanings of variables of
> > >  similar names(old_off and new_off and the similar pairs),
> > >  and bit tricky use of pglz_out_add and pglz_out_tag with length =
> 0.
> > >
> > >  These are welcome to be modified for better readability.
> >
> > The variable names are modified, please check them once.
> >
> > The (att_align_pointer, pglz_out_tag) repetition code is added to take
> care of padding only incase of values are equal.
> > Use of pglz_out_add and pglz_out_tag with length = 0 is done because
> of code readability.
> 
> Oops! Sorry for mistake. My point was that the bases for old_off
> (of match_off) and dp, not new_off. It is no unnatural. Namings
> had not been the problem and the function was perfect as of the
> last patch. 

I think new naming I have done are more meaningful, do you think I should
revert to previous patch one's.

> I'd been confised by the asymmetry between match_off
> to pglz_out_tag and dp to pglz_out_add.

If we see the usage of pglz_out_tag and pglz_out_literal in pglz_compress(),
it is same as I have used.

> > Another change is also done to handle the history size of 2 bytes
> which is possible with the usage of LZ macro's for delta encoding.
> 
> Good catch. This seems to have been a potential bug which does no
> harm when called from pglz_compress..
> 
> ==========
> 
> Looking into wal_update_changes_mod_lz_v6.patch, I understand
> that this patch experimentally adds literal data segment which
> have more than single byte in PG-LZ algorithm.  According to
> pglz_find_match, memCMP is slower than 'while(*s && *s == *d)' if
> len < 16 and I suppose it is probably true at least for 4 byte
> length data. This is also applied on encoding side. If this mod
> does no harm to performance, I want to see this applied also to
> pglz_comress.

Where in pglz_comress(),  do you want to see similar usage?
Or do you want to see such use in function
heap_attr_get_length_and_check_equals(), where it compares 2 attributes.



>  By the way, the comment on pg_lzcompress.c:690 seems to quite
> differ from what the code does.

I shall fix this.

With Regards,
Amit Kapila.




Re: Performance Improvement by reducing WAL for Update Operation

From
Kyotaro HORIGUCHI
Date:
Hello, I took the perfomance figures for this patch.

CentOS6.3/Core i7
wal_level = archive, checkpoint_segments = 30 / 5min

A. Vanilla pgbench, postgres is HEAD
B. Vanilla pgbench, postgres is with this patch (wal_update_changes_lz_v5)
C. Modified pgbench(Long text), postgres is HEAD
D. Modified pgbench(Long text), postgres is with this patch

Running doing pgbench -s 10 -i, pgbench -c 20 -T 2400
  #trans/s  WAL MB  WAL kB/tran
1A      437                      1723     1.68
1B      435 (<1% slower than A)  1645     1.61   (96% of A)
1C      149                      5073    14.6
1D      174 (17% faster than C)  5232    12.8    (88% of C)

Restoring with the wal archives yielded during the first test.
   Recv sec  s/trans
2A      61     0.0581
2B      62     0.0594  (2% slower than A)
2C     287     0.805
2D     314     0.750   (7% faster than C)

For vanilla pgbench, WAL size shrinks slightly and performance
seems very slightly worse than unpatched postgres(1A vs. 1B). It
can be safely say that no harm on performance even outside of the
effective range of this patch. On the other hand, the performance
gain becomes 17% within the effective range (1C vs. 1D).

Recovery performance looks to have the same tendency. It looks to
produce very small loss outside of the effective range (2A
vs. 2B) and significant gain within (2C vs. 2D ).

As a whole, this patch brings very large gain in its effective
range - e.g. updates of relatively small portions of tuples, but
negligible loss of performance is observed outside of its
effective range.

I'll mark this patch as 'Ready for Committer' as soon as I get
finished confirming the mod patch.



==========
> I think new naming I have done are more meaningful, do you think I should
> revert to previous patch one's.

New naming is more meaningful, and a bit long. I don't think it
should be reverted.

> > Looking into wal_update_changes_mod_lz_v6.patch, I understand
> > that this patch experimentally adds literal data segment which
> > have more than single byte in PG-LZ algorithm.  According to
> > pglz_find_match, memCMP is slower than 'while(*s && *s == *d)' if
> > len < 16 and I suppose it is probably true at least for 4 byte
> > length data. This is also applied on encoding side. If this mod
> > does no harm to performance, I want to see this applied also to
> > pglz_comress.
> 
> Where in pglz_comress(),  do you want to see similar usage?
> Or do you want to see such use in function
> heap_attr_get_length_and_check_equals(), where it compares 2 attributes.

My point was the format for literal segments. It seems to reduce
about an eighth of literal segments. But the effectiveness under
real environment does not promising.. Forget it. It's just a
fancy.

regards,


-- 
Kyotaro Horiguchi
NTT Open Source Software Center



Re: Performance Improvement by reducing WAL for Update Operation

From
Amit Kapila
Date:
On Friday, December 14, 2012 2:32 PM Kyotaro HORIGUCHI wrote:
> Hello, I took the perfomance figures for this patch.
> 
> CentOS6.3/Core i7
> wal_level = archive, checkpoint_segments = 30 / 5min
> 
> A. Vanilla pgbench, postgres is HEAD
> B. Vanilla pgbench, postgres is with this patch
> (wal_update_changes_lz_v5)
> C. Modified pgbench(Long text), postgres is HEAD
> D. Modified pgbench(Long text), postgres is with this patch
> 
> Running doing pgbench -s 10 -i, pgbench -c 20 -T 2400
> 
>    #trans/s  WAL MB  WAL kB/tran
> 1A      437                      1723     1.68
> 1B      435 (<1% slower than A)  1645     1.61   (96% of A)
> 1C      149                      5073    14.6
> 1D      174 (17% faster than C)  5232    12.8    (88% of C)
> 
> Restoring with the wal archives yielded during the first test.
> 
>     Recv sec  s/trans
> 2A      61     0.0581
> 2B      62     0.0594  (2% slower than A)
> 2C     287     0.805
> 2D     314     0.750   (7% faster than C)
> 
> For vanilla pgbench, WAL size shrinks slightly and performance
> seems very slightly worse than unpatched postgres(1A vs. 1B). It
> can be safely say that no harm on performance even outside of the
> effective range of this patch. On the other hand, the performance
> gain becomes 17% within the effective range (1C vs. 1D).
> 
> Recovery performance looks to have the same tendency. It looks to
> produce very small loss outside of the effective range (2A
> vs. 2B) and significant gain within (2C vs. 2D ).
> 
> As a whole, this patch brings very large gain in its effective
> range - e.g. updates of relatively small portions of tuples, but
> negligible loss of performance is observed outside of its
> effective range.
> 
> I'll mark this patch as 'Ready for Committer' as soon as I get
> finished confirming the mod patch.

Thank you very much.

With Regards,
Amit Kapila.




Re: Performance Improvement by reducing WAL for Update Operation

From
Kyotaro HORIGUCHI
Date:
Hello, I saw this patch and confirmed that
- Coding style looks good.- Appliable onto HEAD.- Some mis-codings are fixed.

And took the performance figures for 4 types of modification
versus 2 benchmarks.

I've see small performace gain (4-8% for execution, and 6-12% for
recovery) and 16% WAL shrink for modified pgbench enhances the
benefit of this patch.

On the other hand I've found no significant loss of performance
for execution and 4% reduction of WAL for original pgbench, but
there might be 4-8% performance loss for recovery.

Attached patches are listed below.

wal_update_changes_lz_v5.patch
 Rather straight implement of wal compression using existing pg_lz compress format.

wal_update_changes_mod_lz_v6_2.patch
 Modify pg_lz to have bulk literal segment format which is available only for WAL compression. Misplaced comment
fixed.



The detail of performance follows.
=====
I've tested involving the mod patch and 'modified' mod
patch.

CentOS6.3/Core i7
wal_level = archive, checkpoint_segments = 30 / 5min

wal_update_changes_mod_lz_v6+ is the version in which memcpy for
segment shorter than 16 bytes to be copied by while(*s)
*d++=*s++.

     postgres                    pgbench
A.    HEAD                        Original
B. wal_update_changes_lz_v5       Original
C. wal_update_changes_mod_lz_v6   Original
D. wal_update_changes_mod_lz_v6+  Original
E.    HEAD                        attached with this patch
F. wal_update_changes_lz_v5       attached with this patch
G. wal_update_changes_mod_lz_v6   attached with this patch
H. wal_update_changes_mod_lz_v6+  attached with this patch

Running doing pgbench -s 10 -i, pgbench -c 10 -j 10 -T 1200
  #trans/s                    WAL MB  WAL kB/tran
1A      346                      760     1.87
1B      347                      730     1.80   (96% of A)
1C      346                      729     1.80   (96% of A)
1D      347                      730     1.80   (96% of A)

1E      192                     2790     6.20
1F      200 (4% faster than E)  2431     5.19   (84% of D)
1G      207 (8% faster than E)  2563     5.28   (85% of D)
1H      199 (4% faster than E)  2421     5.19   (84% of D)

Recovery time
   Recv sec   us/trans
2A      26       62.6
2B      27       64.8  (4% slower than A)
2C      28       67.4  (8% slower than A)
2D      26       62.4  (same as A)

2E     130      629
2F     149      579    ( 8% faster than E)
2G     128      592    ( 6% faster than E)
2H     130      553    (12% faster than E)

For vanilla pgbench, WAL size shrinks slightly and performance
seems same as unpatched postgres(1A vs. 1B, 1C, 1D). For modified
pgbench, WAL size shrinks by about 17% and performance seems to
have a gain by several percent.

Recovery performance looks to have the same tendency. It looks to
produce very small loss outside of the effective range (2A
vs. 2B, 2C) and significant gain within (2E vs. 2F, 2G, 2H).

As a whole, this patch brings very large gain in its effective
range - e.g. updates of relatively small portions in a tuple, but
negligible loss of performance is observed outside of its
effective range on the test machine. I suppose the losses will be
emphasized by the more higher performance of seq write of WAL
devices


regards,

-- 
Kyotaro Horiguchi
NTT Open Source Software Center
*** a/src/backend/access/common/heaptuple.c
--- b/src/backend/access/common/heaptuple.c
***************
*** 60,65 ****
--- 60,66 ---- #include "access/sysattr.h" #include "access/tuptoaster.h" #include "executor/tuptable.h"
+ #include "utils/datum.h"   /* Does att's datatype allow packing into the 1-byte-header varlena format? */
***************
*** 297,308 **** heap_attisnull(HeapTuple tup, int attnum) }  /* ----------------
!  *        nocachegetattr  *
!  *        This only gets called from fastgetattr() macro, in cases where  *        we can't use a cacheoffset and the
valueis not null.  *
 
!  *        This caches attribute offsets in the attribute descriptor.  *  *        An alternative way to speed things
upwould be to cache offsets  *        with the tuple, but that seems more difficult unless you take
 
--- 298,310 ---- }  /* ----------------
!  *        nocachegetattr_with_len  *
!  *        This only gets called in cases where  *        we can't use a cacheoffset and the value is not null.  *
!  *        This caches attribute offsets in the attribute descriptor and
!  *        outputs the length of the attribute value.  *  *        An alternative way to speed things up would be to
cacheoffsets  *        with the tuple, but that seems more difficult unless you take
 
***************
*** 320,328 **** heap_attisnull(HeapTuple tup, int attnum)  * ----------------  */ Datum
! nocachegetattr(HeapTuple tuple,
!                int attnum,
!                TupleDesc tupleDesc) {     HeapTupleHeader tup = tuple->t_data;     Form_pg_attribute *att =
tupleDesc->attrs;
--- 322,331 ----  * ----------------  */ Datum
! nocachegetattr_with_len(HeapTuple tuple,
!                         int attnum,
!                         TupleDesc tupleDesc,
!                         Size *len) {     HeapTupleHeader tup = tuple->t_data;     Form_pg_attribute *att =
tupleDesc->attrs;
***************
*** 381,386 **** nocachegetattr(HeapTuple tuple,
--- 384,392 ----          */         if (att[attnum]->attcacheoff >= 0)         {
+             if (len)
+                 *len = att_getlength(att[attnum]->attlen,
+                                      tp + att[attnum]->attcacheoff);             return fetchatt(att[attnum],
                   tp + att[attnum]->attcacheoff);         }
 
***************
*** 507,515 **** nocachegetattr(HeapTuple tuple,
--- 513,534 ----         }     } 
+     if (len)
+         *len = att_getlength(att[attnum]->attlen, tp + off);     return fetchatt(att[attnum], tp + off); } 
+ /*
+  *    nocachegetattr
+  */
+ Datum
+ nocachegetattr(HeapTuple tuple,
+                int attnum,
+                TupleDesc tupleDesc)
+ {
+     return nocachegetattr_with_len(tuple, attnum, tupleDesc, NULL);
+ }
+  /* ----------------  *        heap_getsysattr  *
***************
*** 618,623 **** heap_copytuple_with_tuple(HeapTuple src, HeapTuple dest)
--- 637,1015 ---- }  /*
+  * Check if the specified attribute's value is same in both given tuples.
+  * and outputs the length of the given attribute in both tuples.
+  */
+ bool
+ heap_attr_get_length_and_check_equals(TupleDesc tupdesc, int attrnum,
+                                       HeapTuple tup1, HeapTuple tup2,
+                                     Size *tup1_attr_len, Size *tup2_attr_len)
+ {
+     Datum        value1,
+                 value2;
+     bool        isnull1,
+                 isnull2;
+     Form_pg_attribute att;
+ 
+     *tup1_attr_len = 0;
+     *tup2_attr_len = 0;
+ 
+     /*
+      * If it's a whole-tuple reference, say "not equal".  It's not really
+      * worth supporting this case, since it could only succeed after a no-op
+      * update, which is hardly a case worth optimizing for.
+      */
+     if (attrnum == 0)
+         return false;
+ 
+     /*
+      * Likewise, automatically say "not equal" for any system attribute other
+      * than OID and tableOID; we cannot expect these to be consistent in a HOT
+      * chain, or even to be set correctly yet in the new tuple.
+      */
+     if (attrnum < 0)
+     {
+         if (attrnum != ObjectIdAttributeNumber &&
+             attrnum != TableOidAttributeNumber)
+             return false;
+     }
+ 
+     /*
+      * Extract the corresponding values.  XXX this is pretty inefficient if
+      * there are many indexed columns.    Should HeapSatisfiesHOTUpdate do a
+      * single heap_deform_tuple call on each tuple, instead?  But that doesn't
+      * work for system columns ...
+      */
+     value1 = heap_getattr_with_len(tup1, attrnum, tupdesc, &isnull1, tup1_attr_len);
+     value2 = heap_getattr_with_len(tup2, attrnum, tupdesc, &isnull2, tup2_attr_len);
+ 
+     /*
+      * If one value is NULL and other is not, then they are certainly not
+      * equal
+      */
+     if (isnull1 != isnull2)
+         return false;
+ 
+     /*
+      * If both are NULL, they can be considered equal.
+      */
+     if (isnull1)
+         return true;
+ 
+     /*
+      * We do simple binary comparison of the two datums.  This may be overly
+      * strict because there can be multiple binary representations for the
+      * same logical value.    But we should be OK as long as there are no false
+      * positives.  Using a type-specific equality operator is messy because
+      * there could be multiple notions of equality in different operator
+      * classes; furthermore, we cannot safely invoke user-defined functions
+      * while holding exclusive buffer lock.
+      */
+     if (attrnum <= 0)
+     {
+         /* The only allowed system columns are OIDs, so do this */
+         return (DatumGetObjectId(value1) == DatumGetObjectId(value2));
+     }
+     else
+     {
+         Assert(attrnum <= tupdesc->natts);
+         att = tupdesc->attrs[attrnum - 1];
+         return datumIsEqual(value1, value2, att->attbyval, att->attlen);
+     }
+ }
+ 
+ /* ----------------
+  * heap_delta_encode
+  *        Forms an encoded data from old and new tuple with the modified columns
+  *        using an algorithm similar to LZ algorithm.
+  *
+  *        tupleDesc - Tuple descriptor.
+  *        oldtup - pointer to the old/history tuple.
+  *        newtup - pointer to the new tuple.
+  *        encdata - pointer to the encoded data using lz algorithm.
+  *
+  *        Encode the bitmap [+padding] [+oid] as a new data. And loop for all
+  *        attributes to find any modifications in the attributes.
+  *
+  *        The unmodified data is encoded as a history tag to the output and the
+  *        modifed data is encoded as new data to the output.
+  *
+  *        If the encoded output data is less than 75% of original data,
+  *        The output data is considered as encoded and proceed further.
+  * ----------------
+  */
+ bool
+ heap_delta_encode(TupleDesc tupleDesc, HeapTuple oldtup, HeapTuple newtup,
+                   PGLZ_Header *encdata)
+ {
+     Form_pg_attribute *att = tupleDesc->attrs;
+     int            numberOfAttributes;
+     int32        new_tup_off = 0,
+                 old_tup_off = 0,
+                 temp_off = 0,
+                 match_off = 0,
+                 change_off = 0;
+     int            attnum;
+     int32        data_len,
+                 old_tup_pad_len,
+                 new_tup_pad_len;
+     Size        old_tup_attr_len,
+                 new_tup_attr_len;
+     bool        is_attr_equals = true;
+     unsigned char *bp = (unsigned char *) encdata + sizeof(PGLZ_Header);
+     unsigned char *bstart = bp;
+     char       *dp = (char *) newtup->t_data + offsetof(HeapTupleHeaderData, t_bits);
+     char       *dstart = dp;
+     char       *history;
+     unsigned char ctrl_dummy = 0;
+     unsigned char *ctrlp = &ctrl_dummy;
+     unsigned char ctrlb = 0;
+     unsigned char ctrl = 0;
+     int32        len,
+                 old_tup_bitmaplen,
+                 new_tup_bitmaplen,
+                 new_tup_len;
+     int32        result_size;
+     int32        result_max;
+ 
+     /* Include the bitmap header in the lz encoded data. */
+     history = (char *) oldtup->t_data + offsetof(HeapTupleHeaderData, t_bits);
+     old_tup_bitmaplen = oldtup->t_data->t_hoff - offsetof(HeapTupleHeaderData, t_bits);
+     new_tup_bitmaplen = newtup->t_data->t_hoff - offsetof(HeapTupleHeaderData, t_bits);
+     new_tup_len = newtup->t_len - offsetof(HeapTupleHeaderData, t_bits);
+ 
+     /*
+      * The maximum encoded data is of 75% of total size. The max tuple size is
+      * already validated as it cannot be more than MaxHeapTupleSize.
+      */
+     result_max = (new_tup_len * 75) / 100;
+     encdata->rawsize = new_tup_len;
+ 
+     /*
+      * Check for output buffer is reached the result_max by advancing the
+      * buffer by the calculated aproximate length for the corresponding
+      * operation.
+      */
+     if ((bp + (2 * new_tup_bitmaplen)) - bstart >= result_max)
+         return false;
+ 
+     /* Copy the bitmap data from new tuple to the encoded data buffer */
+     pglz_out_add(ctrlp, ctrlb, ctrl, bp, new_tup_bitmaplen, dp);
+     dstart = dp;
+ 
+     numberOfAttributes = HeapTupleHeaderGetNatts(newtup->t_data);
+     for (attnum = 1; attnum <= numberOfAttributes; attnum++)
+     {
+         /*
+          * If the attribute is modified by the update operation, store the
+          * appropiate offsets in the WAL record, otherwise skip to the next
+          * attribute.
+          */
+         if (!heap_attr_get_length_and_check_equals(tupleDesc, attnum, oldtup,
+                                newtup, &old_tup_attr_len, &new_tup_attr_len))
+         {
+             is_attr_equals = false;
+             data_len = old_tup_off - match_off;
+ 
+             /*
+              * Check for output buffer is reached the result_max by advancing
+              * the buffer by the calculated aproximate length for the
+              * corresponding operation.
+              */
+             len = PGLZ_GET_HIST_CTRL_BIT_LEN(data_len);
+             if ((bp + len) - bstart >= result_max)
+                 return false;
+ 
+             /*
+              * The match_off value is calculated w.r.t to the tuple t_hoff
+              * value, the bit map len needs to be added to match_off to get
+              * the actual start offfset from the old/history tuple.
+              */
+             match_off += old_tup_bitmaplen;
+ 
+             /*
+              * If any unchanged data presents in the old and new tuples then
+              * encode the data as it needs to copy from history tuple with len
+              * and offset.
+              */
+             pglz_out_tag(ctrlp, ctrlb, ctrl, bp, data_len, match_off, history);
+ 
+             /*
+              * Recalculate the old and new tuple offsets based on padding
+              * present in the tuples
+              */
+             if (!HeapTupleHasNulls(oldtup)
+                 || !att_isnull((attnum - 1), oldtup->t_data->t_bits))
+             {
+                 old_tup_off = att_align_pointer(old_tup_off,
+                                                 att[attnum - 1]->attalign,
+                                                 att[attnum - 1]->attlen,
+                                                 (char *) oldtup->t_data + oldtup->t_data->t_hoff + old_tup_off);
+             }
+ 
+             if (!HeapTupleHasNulls(newtup)
+                 || !att_isnull((attnum - 1), newtup->t_data->t_bits))
+             {
+                 new_tup_off = att_align_pointer(new_tup_off,
+                                                 att[attnum - 1]->attalign,
+                                                 att[attnum - 1]->attlen,
+                                                 (char *) newtup->t_data + newtup->t_data->t_hoff + new_tup_off);
+             }
+ 
+             old_tup_off += old_tup_attr_len;
+             new_tup_off += new_tup_attr_len;
+ 
+             match_off = old_tup_off;
+         }
+         else
+         {
+             /*
+              * Check for output buffer is reached the result_max by advancing
+              * the buffer by the calculated aproximate length for the
+              * corresponding operation.
+              */
+             data_len = new_tup_off - change_off;
+             if ((bp + (2 * data_len)) - bstart >= result_max)
+                 return false;
+ 
+             /* Copy the modified column data to the output buffer if present */
+             pglz_out_add(ctrlp, ctrlb, ctrl, bp, data_len, dp);
+ 
+             /*
+              * calculate the old tuple field start position, required to
+              * ignore if any alignmet is present.
+              */
+             if (!HeapTupleHasNulls(oldtup)
+                 || !att_isnull((attnum - 1), oldtup->t_data->t_bits))
+             {
+                 temp_off = old_tup_off;
+                 old_tup_off = att_align_pointer(old_tup_off,
+                                                 att[attnum - 1]->attalign,
+                                                 att[attnum - 1]->attlen,
+                                                 (char *) oldtup->t_data + oldtup->t_data->t_hoff + old_tup_off);
+ 
+                 old_tup_pad_len = old_tup_off - temp_off;
+ 
+                 /*
+                  * calculate the new tuple field start position to check
+                  * whether any padding is required or not because field
+                  * alignment.
+                  */
+                 temp_off = new_tup_off;
+                 new_tup_off = att_align_pointer(new_tup_off,
+                                                 att[attnum - 1]->attalign,
+                                                 att[attnum - 1]->attlen,
+                                                 (char *) newtup->t_data + newtup->t_data->t_hoff + new_tup_off);
+                 new_tup_pad_len = new_tup_off - temp_off;
+ 
+                 /*
+                  * Checking for that is there any alignment difference between
+                  * old and new tuple attributes.
+                  */
+                 if (old_tup_pad_len != new_tup_pad_len)
+                 {
+                     /*
+                      * If the alignment difference is found between old and
+                      * new tuples and the last attribute value of the new
+                      * tuple is same as old tuple then write the encode as
+                      * history data until the current match.
+                      *
+                      * If the last attribute value of new tuple is not same as
+                      * old tuple then the matched data marking as history is
+                      * already taken care.
+                      */
+                     if (is_attr_equals)
+                     {
+                         /*
+                          * Check for output buffer is reached the result_max
+                          * by advancing the buffer by the calculated
+                          * aproximate length for the corresponding operation.
+                          */
+                         data_len = old_tup_off - old_tup_pad_len - match_off;
+                         len = PGLZ_GET_HIST_CTRL_BIT_LEN(data_len);
+                         if ((bp + len) - bstart >= result_max)
+                             return false;
+ 
+                         match_off += old_tup_bitmaplen;
+                         pglz_out_tag(ctrlp, ctrlb, ctrl, bp, data_len, match_off, history);
+                     }
+ 
+                     match_off = old_tup_off;
+ 
+                     /* Alignment data */
+                     if ((bp + (2 * new_tup_pad_len)) - bstart >= result_max)
+                         return false;
+ 
+                     pglz_out_add(ctrlp, ctrlb, ctrl, bp, new_tup_pad_len, dp);
+                 }
+             }
+ 
+             old_tup_off += old_tup_attr_len;
+             new_tup_off += new_tup_attr_len;
+ 
+             change_off = new_tup_off;
+ 
+             /*
+              * Recalculate the destination pointer with the new offset which
+              * is used while copying the modified data.
+              */
+             dp = dstart + new_tup_off;
+             is_attr_equals = true;
+         }
+     }
+ 
+     /* If any modified column data presents then copy it. */
+     data_len = new_tup_off - change_off;
+     if ((bp + (2 * data_len)) - bstart >= result_max)
+         return false;
+ 
+     pglz_out_add(ctrlp, ctrlb, ctrl, bp, data_len, dp);
+ 
+     /* If any left out old tuple data presents then copy it as history */
+     data_len = old_tup_off - match_off;
+     len = PGLZ_GET_HIST_CTRL_BIT_LEN(data_len);
+     if ((bp + len) - bstart >= result_max)
+         return false;
+ 
+     match_off += old_tup_bitmaplen;
+     pglz_out_tag(ctrlp, ctrlb, ctrl, bp, data_len, match_off, history);
+ 
+     /*
+      * Write out the last control byte and check that we haven't overrun the
+      * output size allowed by the strategy.
+      */
+     *ctrlp = ctrlb;
+ 
+     result_size = bp - bstart;
+     if (result_size >= result_max)
+         return false;
+ 
+     /*
+      * Success - need only fill in the actual length of the compressed datum.
+      */
+     SET_VARSIZE_COMPRESSED(encdata, result_size + sizeof(PGLZ_Header));
+     return true;
+ }
+ 
+ /* ----------------
+  * heap_delta_decode
+  *        Decodes the encoded data to dest tuple with the help of history.
+  *
+  *        encdata - Pointer to the encoded data.
+  *        oldtup - pointer to the history tuple.
+  *        newtup - pointer to the destination tuple.
+  * ----------------
+  */
+ void
+ heap_delta_decode(PGLZ_Header *encdata, HeapTuple oldtup, HeapTuple newtup)
+ {
+     return pglz_decompress_with_history((char *) encdata,
+              (char *) newtup->t_data + offsetof(HeapTupleHeaderData, t_bits),
+                                         &newtup->t_len,
+             (char *) oldtup->t_data + offsetof(HeapTupleHeaderData, t_bits));
+ }
+ 
+ /*  * heap_form_tuple  *        construct a tuple from the given values[] and isnull[] arrays,  *        which are of
thelength indicated by tupleDescriptor->natts
 
*** a/src/backend/access/heap/heapam.c
--- b/src/backend/access/heap/heapam.c
***************
*** 85,90 **** static HeapTuple heap_prepare_insert(Relation relation, HeapTuple tup,
--- 85,91 ----                     TransactionId xid, CommandId cid, int options); static XLogRecPtr
log_heap_update(Relationreln, Buffer oldbuf,                 ItemPointerData from, Buffer newbuf, HeapTuple newtup,
 
+                 HeapTuple oldtup,                 bool all_visible_cleared, bool new_all_visible_cleared); static
boolHeapSatisfiesHOTUpdate(Relation relation, Bitmapset *hot_attrs,                        HeapTuple oldtup, HeapTuple
newtup);
***************
*** 844,849 **** heapgettup_pagemode(HeapScanDesc scan,
--- 845,898 ----  * definition in access/htup.h is maintained.  */ Datum
+ fastgetattr_with_len(HeapTuple tup, int attnum, TupleDesc tupleDesc,
+                      bool *isnull, int32 *len)
+ {
+     return (
+             (attnum) > 0 ?
+             (
+              (*(isnull) = false),
+              HeapTupleNoNulls(tup) ?
+              (
+               (tupleDesc)->attrs[(attnum) - 1]->attcacheoff >= 0 ?
+               (
+             (*(len) = att_getlength((tupleDesc)->attrs[(attnum - 1)]->attlen,
+                              (char *) (tup)->t_data + (tup)->t_data->t_hoff +
+                              (tupleDesc)->attrs[(attnum) - 1]->attcacheoff)),
+                fetchatt((tupleDesc)->attrs[(attnum) - 1],
+                         (char *) (tup)->t_data + (tup)->t_data->t_hoff +
+                         (tupleDesc)->attrs[(attnum) - 1]->attcacheoff)
+                )
+               :
+               (
+                nocachegetattr_with_len(tup), (attnum), (tupleDesc), (len))
+               )
+              :
+              (
+               att_isnull((attnum) - 1, (tup)->t_data->t_bits) ?
+               (
+                (*(isnull) = true),
+                (*(len) = 0),
+                (Datum) NULL
+                )
+               :
+               (
+                nocachegetattr_with_len((tup), (attnum), (tupleDesc), (len))
+                )
+               )
+              )
+             :
+             (
+              (Datum) NULL
+              )
+         );
+ }
+ 
+ /*
+  * This is formatted so oddly so that the correspondence to the macro
+  * definition in access/htup.h is maintained.
+  */
+ Datum fastgetattr(HeapTuple tup, int attnum, TupleDesc tupleDesc,             bool *isnull) {
***************
*** 860,866 **** fastgetattr(HeapTuple tup, int attnum, TupleDesc tupleDesc,
(tupleDesc)->attrs[(attnum)- 1]->attcacheoff)                )               :
 
!               nocachegetattr((tup), (attnum), (tupleDesc))               )              :              (
--- 909,916 ----                         (tupleDesc)->attrs[(attnum) - 1]->attcacheoff)                )
:
!               (
!                nocachegetattr(tup), (attnum), (tupleDesc))               )              :              (
***************
*** 2383,2389 **** simple_heap_insert(Relation relation, HeapTuple tup) HTSU_Result heap_delete(Relation relation,
ItemPointertid,             CommandId cid, Snapshot crosscheck, bool wait,
 
!             HeapUpdateFailureData *hufd) {     HTSU_Result result;     TransactionId xid =
GetCurrentTransactionId();
--- 2433,2439 ---- HTSU_Result heap_delete(Relation relation, ItemPointer tid,             CommandId cid, Snapshot
crosscheck,bool wait,
 
!             HeapUpdateFailureData * hufd) {     HTSU_Result result;     TransactionId xid =
GetCurrentTransactionId();
***************
*** 3212,3221 **** l2:     /* XLOG stuff */     if (RelationNeedsWAL(relation))     {
!         XLogRecPtr    recptr = log_heap_update(relation, buffer, oldtup.t_self,
!                                              newbuf, heaptup,
!                                              all_visible_cleared,
!                                              all_visible_cleared_new);          if (newbuf != buffer)         {
--- 3262,3273 ----     /* XLOG stuff */     if (RelationNeedsWAL(relation))     {
!         XLogRecPtr    recptr;
! 
!         recptr = log_heap_update(relation, buffer, oldtup.t_self,
!                                  newbuf, heaptup, &oldtup,
!                                  all_visible_cleared,
!                                  all_visible_cleared_new);          if (newbuf != buffer)         {
***************
*** 3282,3355 **** static bool heap_tuple_attr_equals(TupleDesc tupdesc, int attrnum,                        HeapTuple
tup1,HeapTuple tup2) {
 
!     Datum        value1,
!                 value2;
!     bool        isnull1,
!                 isnull2;
!     Form_pg_attribute att;
! 
!     /*
!      * If it's a whole-tuple reference, say "not equal".  It's not really
!      * worth supporting this case, since it could only succeed after a no-op
!      * update, which is hardly a case worth optimizing for.
!      */
!     if (attrnum == 0)
!         return false;
! 
!     /*
!      * Likewise, automatically say "not equal" for any system attribute other
!      * than OID and tableOID; we cannot expect these to be consistent in a HOT
!      * chain, or even to be set correctly yet in the new tuple.
!      */
!     if (attrnum < 0)
!     {
!         if (attrnum != ObjectIdAttributeNumber &&
!             attrnum != TableOidAttributeNumber)
!             return false;
!     } 
!     /*
!      * Extract the corresponding values.  XXX this is pretty inefficient if
!      * there are many indexed columns.    Should HeapSatisfiesHOTUpdate do a
!      * single heap_deform_tuple call on each tuple, instead?  But that doesn't
!      * work for system columns ...
!      */
!     value1 = heap_getattr(tup1, attrnum, tupdesc, &isnull1);
!     value2 = heap_getattr(tup2, attrnum, tupdesc, &isnull2);
! 
!     /*
!      * If one value is NULL and other is not, then they are certainly not
!      * equal
!      */
!     if (isnull1 != isnull2)
!         return false;
! 
!     /*
!      * If both are NULL, they can be considered equal.
!      */
!     if (isnull1)
!         return true;
! 
!     /*
!      * We do simple binary comparison of the two datums.  This may be overly
!      * strict because there can be multiple binary representations for the
!      * same logical value.    But we should be OK as long as there are no false
!      * positives.  Using a type-specific equality operator is messy because
!      * there could be multiple notions of equality in different operator
!      * classes; furthermore, we cannot safely invoke user-defined functions
!      * while holding exclusive buffer lock.
!      */
!     if (attrnum <= 0)
!     {
!         /* The only allowed system columns are OIDs, so do this */
!         return (DatumGetObjectId(value1) == DatumGetObjectId(value2));
!     }
!     else
!     {
!         Assert(attrnum <= tupdesc->natts);
!         att = tupdesc->attrs[attrnum - 1];
!         return datumIsEqual(value1, value2, att->attbyval, att->attlen);
!     } }  /*
--- 3334,3344 ---- heap_tuple_attr_equals(TupleDesc tupdesc, int attrnum,                        HeapTuple tup1,
HeapTupletup2) {
 
!     Size        tup1_attr_len,
!                 tup2_attr_len; 
!     return heap_attr_get_length_and_check_equals(tupdesc, attrnum, tup1, tup2,
!                                              &tup1_attr_len, &tup2_attr_len); }  /*
***************
*** 4447,4453 **** log_heap_visible(RelFileNode rnode, BlockNumber block, Buffer vm_buffer,  */ static XLogRecPtr
log_heap_update(Relationreln, Buffer oldbuf, ItemPointerData from,
 
!                 Buffer newbuf, HeapTuple newtup,                 bool all_visible_cleared, bool
new_all_visible_cleared){     xl_heap_update xlrec;
 
--- 4436,4442 ----  */ static XLogRecPtr log_heap_update(Relation reln, Buffer oldbuf, ItemPointerData from,
!                 Buffer newbuf, HeapTuple newtup, HeapTuple oldtup,                 bool all_visible_cleared, bool
new_all_visible_cleared){     xl_heap_update xlrec;
 
***************
*** 4456,4461 **** log_heap_update(Relation reln, Buffer oldbuf, ItemPointerData from,
--- 4445,4461 ----     XLogRecPtr    recptr;     XLogRecData rdata[4];     Page        page = BufferGetPage(newbuf);
+     char       *newtupdata;
+     int            newtuplen;
+     int            oldtuplen;
+     bool        compressed = false;
+ 
+     /* Structure which holds max output possible from the LZ algorithm */
+     struct
+     {
+         PGLZ_Header pglzheader;
+         char        buf[MaxHeapTupleSize];
+     }            buf;      /* Caller should not call me on a non-WAL-logged relation */
Assert(RelationNeedsWAL(reln));
***************
*** 4465,4475 **** log_heap_update(Relation reln, Buffer oldbuf, ItemPointerData from,     else         info =
XLOG_HEAP_UPDATE;     xlrec.target.node = reln->rd_node;     xlrec.target.tid = from;
 
!     xlrec.all_visible_cleared = all_visible_cleared;     xlrec.newtid = newtup->t_self;
!     xlrec.new_all_visible_cleared = new_all_visible_cleared;      rdata[0].data = (char *) &xlrec;     rdata[0].len =
SizeOfHeapUpdate;
--- 4465,4505 ----     else         info = XLOG_HEAP_UPDATE; 
+     newtupdata = ((char *) newtup->t_data) + offsetof(HeapTupleHeaderData, t_bits);
+     newtuplen = newtup->t_len - offsetof(HeapTupleHeaderData, t_bits);
+     oldtuplen = oldtup->t_len - offsetof(HeapTupleHeaderData, t_bits);
+ 
+     /* Is the update is going to the same page? */
+     if (oldbuf == newbuf)
+     {
+         /*
+          * LZ algorithm can hold only history offset in the range of 1 - 4095.
+          * so the delta encode is restricted for the tuples with length more
+          * than PGLZ_HISTORY_SIZE.
+          */
+         if (oldtuplen < PGLZ_HISTORY_SIZE)
+         {
+             /* Delta-encode the new tuple using the old tuple */
+             if (heap_delta_encode(reln->rd_att, oldtup, newtup,
+                                   &buf.pglzheader))
+             {
+                 compressed = true;
+                 newtupdata = (char *) &buf.pglzheader;
+                 newtuplen = VARSIZE(&buf.pglzheader);
+             }
+         }
+     }
+ 
+     xlrec.flags = 0;     xlrec.target.node = reln->rd_node;     xlrec.target.tid = from;
!     if (all_visible_cleared)
!         xlrec.flags |= XL_HEAP_UPDATE_ALL_VISIBLE_CLEARED;     xlrec.newtid = newtup->t_self;
!     if (new_all_visible_cleared)
!         xlrec.flags |= XL_HEAP_UPDATE_NEW_ALL_VISIBLE_CLEARED;
!     if (compressed)
!         xlrec.flags |= XL_HEAP_UPDATE_DELTA_ENCODED;      rdata[0].data = (char *) &xlrec;     rdata[0].len =
SizeOfHeapUpdate;
***************
*** 4496,4504 **** log_heap_update(Relation reln, Buffer oldbuf, ItemPointerData from,     rdata[2].buffer_std = true;
  rdata[2].next = &(rdata[3]); 
 
!     /* PG73FORMAT: write bitmap [+ padding] [+ oid] + data */
!     rdata[3].data = (char *) newtup->t_data + offsetof(HeapTupleHeaderData, t_bits);
!     rdata[3].len = newtup->t_len - offsetof(HeapTupleHeaderData, t_bits);     rdata[3].buffer = newbuf;
rdata[3].buffer_std= true;     rdata[3].next = NULL;
 
--- 4526,4537 ----     rdata[2].buffer_std = true;     rdata[2].next = &(rdata[3]); 
!     /*
!      * PG73FORMAT: write bitmap [+ padding] [+ oid] + data follows .........
!      * OR PG93FORMAT [If encoded]: LZ header + Encoded data follows
!      */
!     rdata[3].data = newtupdata;
!     rdata[3].len = newtuplen;     rdata[3].buffer = newbuf;     rdata[3].buffer_std = true;     rdata[3].next =
NULL;
***************
*** 5274,5280 **** heap_xlog_update(XLogRecPtr lsn, XLogRecord *record, bool hot_update)
--- 5307,5316 ----     Page        page;     OffsetNumber offnum;     ItemId        lp = NULL;
+     HeapTupleData newtup;
+     HeapTupleData oldtup;     HeapTupleHeader htup;
+     HeapTupleHeader oldtupdata = NULL;     struct     {         HeapTupleHeaderData hdr;
***************
*** 5289,5295 **** heap_xlog_update(XLogRecPtr lsn, XLogRecord *record, bool hot_update)      * The visibility map may
needto be fixed even if the heap page is      * already up-to-date.      */
 
!     if (xlrec->all_visible_cleared)     {         Relation    reln = CreateFakeRelcacheEntry(xlrec->target.node);
   BlockNumber block = ItemPointerGetBlockNumber(&xlrec->target.tid);
 
--- 5325,5331 ----      * The visibility map may need to be fixed even if the heap page is      * already up-to-date.
  */
 
!     if (xlrec->flags & XL_HEAP_UPDATE_ALL_VISIBLE_CLEARED)     {         Relation    reln =
CreateFakeRelcacheEntry(xlrec->target.node);        BlockNumber block = ItemPointerGetBlockNumber(&xlrec->target.tid);
 
***************
*** 5349,5355 **** heap_xlog_update(XLogRecPtr lsn, XLogRecord *record, bool hot_update)     if
(PageGetMaxOffsetNumber(page)< offnum || !ItemIdIsNormal(lp))         elog(PANIC, "heap_update_redo: invalid lp"); 
 
!     htup = (HeapTupleHeader) PageGetItem(page, lp);      htup->t_infomask &= ~(HEAP_XMAX_COMMITTED |
        HEAP_XMAX_INVALID |
 
--- 5385,5391 ----     if (PageGetMaxOffsetNumber(page) < offnum || !ItemIdIsNormal(lp))         elog(PANIC,
"heap_update_redo:invalid lp"); 
 
!     oldtupdata = htup = (HeapTupleHeader) PageGetItem(page, lp);      htup->t_infomask &= ~(HEAP_XMAX_COMMITTED |
                     HEAP_XMAX_INVALID |
 
***************
*** 5368,5374 **** heap_xlog_update(XLogRecPtr lsn, XLogRecord *record, bool hot_update)     /* Mark the page as a
candidatefor pruning */     PageSetPrunable(page, record->xl_xid); 
 
!     if (xlrec->all_visible_cleared)         PageClearAllVisible(page);      /*
--- 5404,5410 ----     /* Mark the page as a candidate for pruning */     PageSetPrunable(page, record->xl_xid); 
!     if (xlrec->flags & XL_HEAP_UPDATE_ALL_VISIBLE_CLEARED)         PageClearAllVisible(page);      /*
***************
*** 5393,5399 **** newt:;      * The visibility map may need to be fixed even if the heap page is      * already
up-to-date.     */
 
!     if (xlrec->new_all_visible_cleared)     {         Relation    reln = CreateFakeRelcacheEntry(xlrec->target.node);
       BlockNumber block = ItemPointerGetBlockNumber(&xlrec->newtid);
 
--- 5429,5435 ----      * The visibility map may need to be fixed even if the heap page is      * already up-to-date.
  */
 
!     if (xlrec->flags & XL_HEAP_UPDATE_NEW_ALL_VISIBLE_CLEARED)     {         Relation    reln =
CreateFakeRelcacheEntry(xlrec->target.node);        BlockNumber block = ItemPointerGetBlockNumber(&xlrec->newtid);
 
***************
*** 5456,5465 **** newsame:;            SizeOfHeapHeader);     htup = &tbuf.hdr;     MemSet((char *) htup, 0,
sizeof(HeapTupleHeaderData));
!     /* PG73FORMAT: get bitmap [+ padding] [+ oid] + data */
!     memcpy((char *) htup + offsetof(HeapTupleHeaderData, t_bits),
!            (char *) xlrec + hsize,
!            newlen);     newlen += offsetof(HeapTupleHeaderData, t_bits);     htup->t_infomask2 = xlhdr.t_infomask2;
 htup->t_infomask = xlhdr.t_infomask;
 
--- 5492,5520 ----            SizeOfHeapHeader);     htup = &tbuf.hdr;     MemSet((char *) htup, 0,
sizeof(HeapTupleHeaderData));
! 
!     /*
!      * If the new tuple was delta-encoded, decode it.
!      */
!     if (xlrec->flags & XL_HEAP_UPDATE_DELTA_ENCODED)
!     {
!         /* PG93FORMAT: LZ header + Encoded data */
!         PGLZ_Header *encoded_data = (PGLZ_Header *) (((char *) xlrec) + hsize);
! 
!         oldtup.t_data = oldtupdata;
!         newtup.t_data = htup;
! 
!         heap_delta_decode(encoded_data, &oldtup, &newtup);
!         newlen = newtup.t_len;
!     }
!     else
!     {
!         /* PG73FORMAT: get bitmap [+ padding] [+ oid] + data */
!         memcpy((char *) htup + offsetof(HeapTupleHeaderData, t_bits),
!                (char *) xlrec + hsize,
!                newlen);
!     }
!      newlen += offsetof(HeapTupleHeaderData, t_bits);     htup->t_infomask2 = xlhdr.t_infomask2;     htup->t_infomask
=xlhdr.t_infomask;
 
***************
*** 5474,5480 **** newsame:;     if (offnum == InvalidOffsetNumber)         elog(PANIC, "heap_update_redo: failed to
addtuple"); 
 
!     if (xlrec->new_all_visible_cleared)         PageClearAllVisible(page);      freespace =
PageGetHeapFreeSpace(page);       /* needed to update FSM below */
 
--- 5529,5535 ----     if (offnum == InvalidOffsetNumber)         elog(PANIC, "heap_update_redo: failed to add tuple");

!     if (xlrec->flags & XL_HEAP_UPDATE_NEW_ALL_VISIBLE_CLEARED)         PageClearAllVisible(page);      freespace =
PageGetHeapFreeSpace(page);       /* needed to update FSM below */
 
*** a/src/backend/utils/adt/pg_lzcompress.c
--- b/src/backend/utils/adt/pg_lzcompress.c
***************
*** 182,190 ****  */ #define PGLZ_HISTORY_LISTS        8192    /* must be power of 2 */ #define PGLZ_HISTORY_MASK
(PGLZ_HISTORY_LISTS - 1)
 
- #define PGLZ_HISTORY_SIZE        4096
- #define PGLZ_MAX_MATCH            273
-   /* ----------  * PGLZ_HistEntry -
--- 182,187 ----
***************
*** 302,368 **** do {                                    \             }
               \ } while (0) 
 
- 
- /* ----------
-  * pglz_out_ctrl -
-  *
-  *        Outputs the last and allocates a new control byte if needed.
-  * ----------
-  */
- #define pglz_out_ctrl(__ctrlp,__ctrlb,__ctrl,__buf) \
- do { \
-     if ((__ctrl & 0xff) == 0)                                                \
-     {                                                                        \
-         *(__ctrlp) = __ctrlb;                                                \
-         __ctrlp = (__buf)++;                                                \
-         __ctrlb = 0;                                                        \
-         __ctrl = 1;                                                            \
-     }                                                                        \
- } while (0)
- 
- 
- /* ----------
-  * pglz_out_literal -
-  *
-  *        Outputs a literal byte to the destination buffer including the
-  *        appropriate control bit.
-  * ----------
-  */
- #define pglz_out_literal(_ctrlp,_ctrlb,_ctrl,_buf,_byte) \
- do { \
-     pglz_out_ctrl(_ctrlp,_ctrlb,_ctrl,_buf);                                \
-     *(_buf)++ = (unsigned char)(_byte);                                        \
-     _ctrl <<= 1;                                                            \
- } while (0)
- 
- 
- /* ----------
-  * pglz_out_tag -
-  *
-  *        Outputs a backward reference tag of 2-4 bytes (depending on
-  *        offset and length) to the destination buffer including the
-  *        appropriate control bit.
-  * ----------
-  */
- #define pglz_out_tag(_ctrlp,_ctrlb,_ctrl,_buf,_len,_off) \
- do { \
-     pglz_out_ctrl(_ctrlp,_ctrlb,_ctrl,_buf);                                \
-     _ctrlb |= _ctrl;                                                        \
-     _ctrl <<= 1;                                                            \
-     if (_len > 17)                                                            \
-     {                                                                        \
-         (_buf)[0] = (unsigned char)((((_off) & 0xf00) >> 4) | 0x0f);        \
-         (_buf)[1] = (unsigned char)(((_off) & 0xff));                        \
-         (_buf)[2] = (unsigned char)((_len) - 18);                            \
-         (_buf) += 3;                                                        \
-     } else {                                                                \
-         (_buf)[0] = (unsigned char)((((_off) & 0xf00) >> 4) | ((_len) - 3)); \
-         (_buf)[1] = (unsigned char)((_off) & 0xff);                            \
-         (_buf) += 2;                                                        \
-     }                                                                        \
- } while (0)
- 
-  /* ----------  * pglz_find_match -  *
--- 299,304 ----
***************
*** 595,601 **** pglz_compress(const char *source, int32 slen, PGLZ_Header *dest,              * Create the tag and add
historyentries for all matched              * characters.              */
 
!             pglz_out_tag(ctrlp, ctrlb, ctrl, bp, match_len, match_off);             while (match_len--)             {
               pglz_hist_add(hist_start, hist_entries,
 
--- 531,537 ----              * Create the tag and add history entries for all matched              * characters.
      */
 
!             pglz_out_tag(ctrlp, ctrlb, ctrl, bp, match_len, match_off, dp);             while (match_len--)
 {                 pglz_hist_add(hist_start, hist_entries,
 
***************
*** 647,661 **** pglz_compress(const char *source, int32 slen, PGLZ_Header *dest, void pglz_decompress(const
PGLZ_Header*source, char *dest) {     const unsigned char *sp;     const unsigned char *srcend;     unsigned char *dp;
  unsigned char *destend;      sp = ((const unsigned char *) source) + sizeof(PGLZ_Header);
 
!     srcend = ((const unsigned char *) source) + VARSIZE(source);     dp = (unsigned char *) dest;
!     destend = dp + source->rawsize;      while (sp < srcend && dp < destend)     {
--- 583,620 ---- void pglz_decompress(const PGLZ_Header *source, char *dest) {
+     pglz_decompress_with_history((char *) source, dest, NULL, NULL);
+ }
+ 
+ /* ----------
+  * pglz_decompress_with_history -
+  *
+  *        Decompresses source into dest.
+  *        To decompress, it uses history if provided.
+  * ----------
+  */
+ void
+ pglz_decompress_with_history(const char *source, char *dest, uint32 *destlen,
+                              const char *history)
+ {
+     PGLZ_Header src;     const unsigned char *sp;     const unsigned char *srcend;     unsigned char *dp;
unsignedchar *destend; 
 
+     /* To avoid the unaligned access of PGLZ_Header */
+     memcpy((char *) &src, source, sizeof(PGLZ_Header));
+      sp = ((const unsigned char *) source) + sizeof(PGLZ_Header);
!     srcend = ((const unsigned char *) source) + VARSIZE(&src);     dp = (unsigned char *) dest;
!     destend = dp + src.rawsize;
! 
!     if (destlen)
!     {
!         *destlen = src.rawsize;
!     }      while (sp < srcend && dp < destend)     {
***************
*** 699,714 **** pglz_decompress(const PGLZ_Header *source, char *dest)                     break;                 } 
!                 /*
!                  * Now we copy the bytes specified by the tag from OUTPUT to
!                  * OUTPUT. It is dangerous and platform dependent to use
!                  * memcpy() here, because the copied areas could overlap
!                  * extremely!
!                  */
!                 while (len--)                 {
!                     *dp = dp[-off];
!                     dp++;                 }             }             else
--- 658,685 ----                     break;                 } 
!                 if (history)
!                 {
!                     /*
!                      * Now we copy the bytes specified by the tag from history to
!                      * OUTPUT.
!                      */
!                     memcpy(dp, history + off, len);
!                     dp += len;
!                 }
!                 else                 {
!                     /*
!                      * Now we copy the bytes specified by the tag from OUTPUT to
!                      * OUTPUT. It is dangerous and platform dependent to use
!                      * memcpy() here, because the copied areas could overlap
!                      * extremely!
!                      */
!                     while (len--)
!                     {
!                         *dp = dp[-off];
!                         dp++;
!                     }                 }             }             else
*** a/src/include/access/heapam_xlog.h
--- b/src/include/access/heapam_xlog.h
***************
*** 142,153 **** typedef struct xl_heap_update {     xl_heaptid    target;            /* deleted tuple id */
ItemPointerDatanewtid;        /* new inserted tuple id */
 
!     bool        all_visible_cleared;    /* PD_ALL_VISIBLE was cleared */
!     bool        new_all_visible_cleared;        /* same for the page of newtid */     /* NEW TUPLE xl_heap_header AND
TUPLEDATA FOLLOWS AT END OF STRUCT */ } xl_heap_update; 
 
! #define SizeOfHeapUpdate    (offsetof(xl_heap_update, new_all_visible_cleared) + sizeof(bool))  /*  * This is what we
needto know about vacuum page cleanup/redirect
 
--- 142,161 ---- {     xl_heaptid    target;            /* deleted tuple id */     ItemPointerData newtid;        /*
newinserted tuple id */
 
!     char        flags;            /* flag bits, see below */
!      /* NEW TUPLE xl_heap_header AND TUPLE DATA FOLLOWS AT END OF STRUCT */ } xl_heap_update; 
! 
! #define XL_HEAP_UPDATE_ALL_VISIBLE_CLEARED        0x01 /* Indicates as old page's
!                                                 all visible bit is cleared */
! #define XL_HEAP_UPDATE_NEW_ALL_VISIBLE_CLEARED    0x02 /* Indicates as new page's
!                                                 all visible bit is cleared */
! #define XL_HEAP_UPDATE_DELTA_ENCODED            0x04 /* Indicates as the update
!                                                 operation is delta encoded */
! 
! #define SizeOfHeapUpdate    (offsetof(xl_heap_update, flags) + sizeof(char))  /*  * This is what we need to know
aboutvacuum page cleanup/redirect
 
*** a/src/include/access/htup_details.h
--- b/src/include/access/htup_details.h
***************
*** 18,23 ****
--- 18,24 ---- #include "access/tupdesc.h" #include "access/tupmacs.h" #include "storage/bufpage.h"
+ #include "utils/pg_lzcompress.h"  /*  * MaxTupleAttributeNumber limits the number of (user) columns in a tuple.
***************
*** 528,533 **** struct MinimalTupleData
--- 529,535 ----         HeapTupleHeaderSetOid((tuple)->t_data, (oid))  
+ #if !defined(DISABLE_COMPLEX_MACRO) /* ----------------  *        fastgetattr  *
***************
*** 542,550 **** struct MinimalTupleData  *        lookups, and call nocachegetattr() for the rest.  * ----------------
*/
 
- 
- #if !defined(DISABLE_COMPLEX_MACRO)
-  #define fastgetattr(tup, attnum, tupleDesc, isnull)                    \ (
                        \     AssertMacro((attnum) > 0),                                        \
 
--- 544,549 ----
***************
*** 572,585 **** struct MinimalTupleData             nocachegetattr((tup), (attnum), (tupleDesc))            \
)                                                           \     )
          \ )
 
- #else                            /* defined(DISABLE_COMPLEX_MACRO) */  extern Datum fastgetattr(HeapTuple tup, int
attnum,TupleDesc tupleDesc,             bool *isnull); #endif   /* defined(DISABLE_COMPLEX_MACRO) */ 
 
-  /* ----------------  *        heap_getattr  *
--- 571,626 ----             nocachegetattr((tup), (attnum), (tupleDesc))            \         )
                                   \     )                                                                \
 
+ )                                                                    \
+ 
+ /* ----------------
+  *        fastgetattr_with_len
+  *
+  *        Similar to fastgetattr and fetches the length of the given attribute
+  *        also.
+  * ----------------
+  */
+ #define fastgetattr_with_len(tup, attnum, tupleDesc, isnull, len)    \
+ (                                                                    \
+     AssertMacro((attnum) > 0),                                        \
+     (*(isnull) = false),                                            \
+     HeapTupleNoNulls(tup) ?                                         \
+     (                                                                \
+         (tupleDesc)->attrs[(attnum)-1]->attcacheoff >= 0 ?            \
+         (                                                            \
+             (*(len) = att_getlength(                                \
+                     (tupleDesc)->attrs[(attnum)-1]->attlen,         \
+                     (char *) (tup)->t_data + (tup)->t_data->t_hoff +\
+                     (tupleDesc)->attrs[(attnum)-1]->attcacheoff)),    \
+             fetchatt((tupleDesc)->attrs[(attnum)-1],                \
+                 (char *) (tup)->t_data + (tup)->t_data->t_hoff +    \
+                     (tupleDesc)->attrs[(attnum)-1]->attcacheoff)    \
+         )                                                            \
+         :                                                            \
+             nocachegetattr_with_len((tup), (attnum), (tupleDesc), (len))\
+     )                                                                \
+     :                                                                \
+     (                                                                \
+         att_isnull((attnum)-1, (tup)->t_data->t_bits) ?             \
+         (                                                            \
+             (*(isnull) = true),                                     \
+             (*(len) = 0),                                            \
+             (Datum)NULL                                             \
+         )                                                            \
+         :                                                            \
+         (                                                            \
+             nocachegetattr_with_len((tup), (attnum), (tupleDesc), (len))\
+         )                                                            \
+     )                                                                \ ) 
+ #else                            /* defined(DISABLE_COMPLEX_MACRO) */ extern Datum fastgetattr(HeapTuple tup, int
attnum,TupleDesc tupleDesc,             bool *isnull);
 
+ extern Datum fastgetattr_with_len(HeapTuple tup, int attnum,
+             TupleDesc tupleDesc, bool *isnull, int32 *len); #endif   /* defined(DISABLE_COMPLEX_MACRO) */  /*
---------------- *        heap_getattr  *
 
***************
*** 596,616 **** extern Datum fastgetattr(HeapTuple tup, int attnum, TupleDesc tupleDesc,  * ----------------  */
#defineheap_getattr(tup, attnum, tupleDesc, isnull) \     ( \
 
!         ((attnum) > 0) ? \         ( \
!             ((attnum) > (int) HeapTupleHeaderGetNatts((tup)->t_data)) ? \
!             ( \
!                 (*(isnull) = true), \
!                 (Datum)NULL \
!             ) \
!             : \
!                 fastgetattr((tup), (attnum), (tupleDesc), (isnull)) \         ) \         : \
!             heap_getsysattr((tup), (attnum), (tupleDesc), (isnull)) \
!     )   /* prototypes for functions in common/heaptuple.c */ extern Size heap_compute_data_size(TupleDesc tupleDesc,
--- 637,679 ----  * ----------------  */ #define heap_getattr(tup, attnum, tupleDesc, isnull) \
+ ( \
+     ((attnum) > 0) ? \     ( \
!         ((attnum) > (int) HeapTupleHeaderGetNatts((tup)->t_data)) ? \         ( \
!             (*(isnull) = true), \
!             (Datum)NULL \         ) \         : \
!             fastgetattr((tup), (attnum), (tupleDesc), (isnull)) \
!     ) \
!     : \
!         heap_getsysattr((tup), (attnum), (tupleDesc), (isnull)) \
! ) 
+ /* ----------------
+  *        heap_getattr_with_len
+  *
+  *        Similar to heap_getattr and outputs the length of the given attribute.
+  * ----------------
+  */
+ #define heap_getattr_with_len(tup, attnum, tupleDesc, isnull, len) \
+ ( \
+     ((attnum) > 0) ? \
+     ( \
+         ((attnum) > (int) HeapTupleHeaderGetNatts((tup)->t_data)) ? \
+         ( \
+             (*(isnull) = true), \
+             (*(len) = 0), \
+             (Datum)NULL \
+         ) \
+         : \
+             fastgetattr_with_len((tup), (attnum), (tupleDesc), (isnull), (len)) \
+     ) \
+     : \
+         heap_getsysattr((tup), (attnum), (tupleDesc), (isnull)) \
+ )  /* prototypes for functions in common/heaptuple.c */ extern Size heap_compute_data_size(TupleDesc tupleDesc,
***************
*** 620,625 **** extern void heap_fill_tuple(TupleDesc tupleDesc,
--- 683,690 ----                 char *data, Size data_size,                 uint16 *infomask, bits8 *bit); extern bool
heap_attisnull(HeapTupletup, int attnum);
 
+ extern Datum nocachegetattr_with_len(HeapTuple tup, int attnum,
+                TupleDesc att, Size *len); extern Datum nocachegetattr(HeapTuple tup, int attnum,
TupleDescatt); extern Datum heap_getsysattr(HeapTuple tup, int attnum, TupleDesc tupleDesc,
 
***************
*** 636,641 **** extern HeapTuple heap_modify_tuple(HeapTuple tuple,
--- 701,714 ---- extern void heap_deform_tuple(HeapTuple tuple, TupleDesc tupleDesc,                   Datum *values,
bool*isnull); 
 
+ extern bool heap_attr_get_length_and_check_equals(TupleDesc tupdesc,
+                         int attrnum, HeapTuple tup1, HeapTuple tup2,
+                         Size *tup1_attr_len, Size *tup2_attr_len);
+ extern bool heap_delta_encode(TupleDesc tupleDesc, HeapTuple oldtup,
+                 HeapTuple newtup, PGLZ_Header *encdata);
+ extern void heap_delta_decode (PGLZ_Header *encdata, HeapTuple oldtup,
+                 HeapTuple newtup);
+  /* these three are deprecated versions of the three above: */ extern HeapTuple heap_formtuple(TupleDesc
tupleDescriptor,               Datum *values, char *nulls);
 
*** a/src/include/access/tupmacs.h
--- b/src/include/access/tupmacs.h
***************
*** 187,192 ****
--- 187,214 ---- )  /*
+  * att_getlength -
+  *            Gets the length of the attribute.
+  */
+ #define att_getlength(attlen, attptr) \
+ ( \
+     ((attlen) > 0) ? \
+     ( \
+         (attlen) \
+     ) \
+     : (((attlen) == -1) ? \
+     ( \
+         VARSIZE_ANY(attptr) \
+     ) \
+     : \
+     ( \
+         AssertMacro((attlen) == -2), \
+         (strlen((char *) (attptr)) + 1) \
+     )) \
+ )
+ 
+ 
+ /*  * store_att_byval is a partial inverse of fetch_att: store a given Datum  * value into a tuple data area at the
specifiedaddress.  However, it only  * handles the byval case, because in typical usage the caller needs to
 
*** a/src/include/utils/pg_lzcompress.h
--- b/src/include/utils/pg_lzcompress.h
***************
*** 23,28 **** typedef struct PGLZ_Header
--- 23,30 ----     int32        rawsize; } PGLZ_Header; 
+ #define PGLZ_HISTORY_SIZE        4096
+ #define PGLZ_MAX_MATCH            273  /* ----------  * PGLZ_MAX_OUTPUT -
***************
*** 86,91 **** typedef struct PGLZ_Strategy
--- 88,198 ----     int32        match_size_drop; } PGLZ_Strategy; 
+ /*
+  * calculate the approximate length required for history encode tag for the
+  * given length
+  */
+ #define PGLZ_GET_HIST_CTRL_BIT_LEN(_len) \
+ ( \
+     ((_len) < 17) ?    (3) : (4 * (1 + ((_len) / PGLZ_MAX_MATCH)))    \
+ )
+ 
+ /* ----------
+  * pglz_out_ctrl -
+  *
+  *        Outputs the last and allocates a new control byte if needed.
+  * ----------
+  */
+ #define pglz_out_ctrl(__ctrlp,__ctrlb,__ctrl,__buf) \
+ do { \
+     if ((__ctrl & 0xff) == 0)                                                \
+     {                                                                        \
+         *(__ctrlp) = __ctrlb;                                                \
+         __ctrlp = (__buf)++;                                                \
+         __ctrlb = 0;                                                        \
+         __ctrl = 1;                                                         \
+     }                                                                        \
+ } while (0)
+ 
+ /* ----------
+  * pglz_out_literal -
+  *
+  *        Outputs a literal byte to the destination buffer including the
+  *        appropriate control bit.
+  * ----------
+  */
+ #define pglz_out_literal(_ctrlp,_ctrlb,_ctrl,_buf,_byte) \
+ do { \
+     pglz_out_ctrl(_ctrlp,_ctrlb,_ctrl,_buf);                                \
+     *(_buf)++ = (unsigned char)(_byte);                                     \
+     _ctrl <<= 1;                                                            \
+ } while (0)
+ 
+ /* ----------
+  * pglz_out_tag -
+  *
+  *        Outputs a backward/history reference tag of 2-4 bytes (depending on
+  *        offset and length) to the destination buffer including the
+  *        appropriate control bit.
+  *
+  *        Split the process of backward/history reference as different chunks,
+  *        if the given lenght is more than max match and repeats the process
+  *        until the given length is processed.
+  *
+  *        If the matched history length is less than 3 bytes then add it as a
+  *        new data only during encoding instead of history reference. This occurs
+  *        only while framing delta record for wal update operation.
+  * ----------
+  */
+ #define pglz_out_tag(_ctrlp,_ctrlb,_ctrl,_buf,_len,_off,_byte) \
+ do { \
+     int _mlen;                                                                    \
+     int _total_len = (_len);                                                    \
+     while (_total_len > 0)                                                        \
+     {                                                                            \
+         _mlen = _total_len > PGLZ_MAX_MATCH ? PGLZ_MAX_MATCH : _total_len;        \
+         if (_mlen < 3)                                                            \
+         {                                                                        \
+             (_byte) = (char *)(_byte) + (_off);                                    \
+             pglz_out_add(_ctrlp,_ctrlb,_ctrl,_buf,_mlen,(_byte));                \
+             break;                                                                \
+         }                                                                        \
+         pglz_out_ctrl(_ctrlp,_ctrlb,_ctrl,_buf);                                \
+         _ctrlb |= _ctrl;                                                        \
+         _ctrl <<= 1;                                                            \
+         if (_mlen > 17)                                                            \
+         {                                                                        \
+             (_buf)[0] = (unsigned char)((((_off) & 0xf00) >> 4) | 0x0f);        \
+             (_buf)[1] = (unsigned char)(((_off) & 0xff));                        \
+             (_buf)[2] = (unsigned char)((_mlen) - 18);                            \
+             (_buf) += 3;                                                        \
+         } else {                                                                \
+             (_buf)[0] = (unsigned char)((((_off) & 0xf00) >> 4) | ((_mlen) - 3)); \
+             (_buf)[1] = (unsigned char)((_off) & 0xff);                            \
+             (_buf) += 2;                                                        \
+         }                                                                        \
+         _total_len -= _mlen;                                                    \
+         (_off) += _mlen;                                                        \
+     }                                                                            \
+ } while (0)
+ 
+ /* ----------
+  * pglz_out_add -
+  *
+  *        Outputs a literal byte to the destination buffer including the
+  *        appropriate control bit until the given input length.
+  * ----------
+  */
+ #define pglz_out_add(_ctrlp,_ctrlb,_ctrl,_buf,_len,_byte) \
+ do { \
+     int32 _total_len = (_len);                                            \
+     while (_total_len-- > 0)                                            \
+     {                                                                    \
+         pglz_out_literal(_ctrlp, _ctrlb, _ctrl, _buf, *(_byte));        \
+         (_byte) = (char *)(_byte) + 1;                                    \
+     }                                                                    \
+ } while (0)
+   /* ----------  * The standard strategies
***************
*** 108,112 **** extern const PGLZ_Strategy *const PGLZ_strategy_always; extern bool pglz_compress(const char *source,
int32slen, PGLZ_Header *dest,               const PGLZ_Strategy *strategy); extern void pglz_decompress(const
PGLZ_Header*source, char *dest);
 
!  #endif   /* _PG_LZCOMPRESS_H_ */
--- 215,220 ---- extern bool pglz_compress(const char *source, int32 slen, PGLZ_Header *dest,               const
PGLZ_Strategy*strategy); extern void pglz_decompress(const PGLZ_Header *source, char *dest);
 
! extern void pglz_decompress_with_history(const char *source, char *dest,
!                 uint32 *destlen, const char *history); #endif   /* _PG_LZCOMPRESS_H_ */
diff --git a/src/backend/access/common/heaptuple.c b/src/backend/access/common/heaptuple.c
index 034dfe5..83bd03d 100644
--- a/src/backend/access/common/heaptuple.c
+++ b/src/backend/access/common/heaptuple.c
@@ -60,6 +60,7 @@#include "access/sysattr.h"#include "access/tuptoaster.h"#include "executor/tuptable.h"
+#include "utils/datum.h"/* Does att's datatype allow packing into the 1-byte-header varlena format? */
@@ -297,12 +298,13 @@ heap_attisnull(HeapTuple tup, int attnum)}/* ----------------
- *        nocachegetattr
+ *        nocachegetattr_with_len *
- *        This only gets called from fastgetattr() macro, in cases where
+ *        This only gets called in cases where *        we can't use a cacheoffset and the value is not null. *
- *        This caches attribute offsets in the attribute descriptor.
+ *        This caches attribute offsets in the attribute descriptor and
+ *        outputs the length of the attribute value. * *        An alternative way to speed things up would be to
cacheoffsets *        with the tuple, but that seems more difficult unless you take
 
@@ -320,9 +322,10 @@ heap_attisnull(HeapTuple tup, int attnum) * ---------------- */Datum
-nocachegetattr(HeapTuple tuple,
-               int attnum,
-               TupleDesc tupleDesc)
+nocachegetattr_with_len(HeapTuple tuple,
+                        int attnum,
+                        TupleDesc tupleDesc,
+                        Size *len){    HeapTupleHeader tup = tuple->t_data;    Form_pg_attribute *att =
tupleDesc->attrs;
@@ -381,6 +384,9 @@ nocachegetattr(HeapTuple tuple,         */        if (att[attnum]->attcacheoff >= 0)        {
+            if (len)
+                *len = att_getlength(att[attnum]->attlen,
+                                     tp + att[attnum]->attcacheoff);            return fetchatt(att[attnum],
                tp + att[attnum]->attcacheoff);        }
 
@@ -507,9 +513,22 @@ nocachegetattr(HeapTuple tuple,        }    }
+    if (len)
+        *len = att_getlength(att[attnum]->attlen, tp + off);    return fetchatt(att[attnum], tp + off);}
+/*
+ *    nocachegetattr
+ */
+Datum
+nocachegetattr(HeapTuple tuple,
+               int attnum,
+               TupleDesc tupleDesc)
+{
+    return nocachegetattr_with_len(tuple, attnum, tupleDesc, NULL);
+}
+/* ---------------- *        heap_getsysattr *
@@ -618,6 +637,379 @@ heap_copytuple_with_tuple(HeapTuple src, HeapTuple dest)}/*
+ * Check if the specified attribute's value is same in both given tuples.
+ * and outputs the length of the given attribute in both tuples.
+ */
+bool
+heap_attr_get_length_and_check_equals(TupleDesc tupdesc, int attrnum,
+                                      HeapTuple tup1, HeapTuple tup2,
+                                    Size *tup1_attr_len, Size *tup2_attr_len)
+{
+    Datum        value1,
+                value2;
+    bool        isnull1,
+                isnull2;
+    Form_pg_attribute att;
+
+    *tup1_attr_len = 0;
+    *tup2_attr_len = 0;
+
+    /*
+     * If it's a whole-tuple reference, say "not equal".  It's not really
+     * worth supporting this case, since it could only succeed after a no-op
+     * update, which is hardly a case worth optimizing for.
+     */
+    if (attrnum == 0)
+        return false;
+
+    /*
+     * Likewise, automatically say "not equal" for any system attribute other
+     * than OID and tableOID; we cannot expect these to be consistent in a HOT
+     * chain, or even to be set correctly yet in the new tuple.
+     */
+    if (attrnum < 0)
+    {
+        if (attrnum != ObjectIdAttributeNumber &&
+            attrnum != TableOidAttributeNumber)
+            return false;
+    }
+
+    /*
+     * Extract the corresponding values.  XXX this is pretty inefficient if
+     * there are many indexed columns.    Should HeapSatisfiesHOTUpdate do a
+     * single heap_deform_tuple call on each tuple, instead?  But that doesn't
+     * work for system columns ...
+     */
+    value1 = heap_getattr_with_len(tup1, attrnum, tupdesc, &isnull1, tup1_attr_len);
+    value2 = heap_getattr_with_len(tup2, attrnum, tupdesc, &isnull2, tup2_attr_len);
+
+    /*
+     * If one value is NULL and other is not, then they are certainly not
+     * equal
+     */
+    if (isnull1 != isnull2)
+        return false;
+
+    /*
+     * If both are NULL, they can be considered equal.
+     */
+    if (isnull1)
+        return true;
+
+    /*
+     * We do simple binary comparison of the two datums.  This may be overly
+     * strict because there can be multiple binary representations for the
+     * same logical value.    But we should be OK as long as there are no false
+     * positives.  Using a type-specific equality operator is messy because
+     * there could be multiple notions of equality in different operator
+     * classes; furthermore, we cannot safely invoke user-defined functions
+     * while holding exclusive buffer lock.
+     */
+    if (attrnum <= 0)
+    {
+        /* The only allowed system columns are OIDs, so do this */
+        return (DatumGetObjectId(value1) == DatumGetObjectId(value2));
+    }
+    else
+    {
+        Assert(attrnum <= tupdesc->natts);
+        att = tupdesc->attrs[attrnum - 1];
+        return datumIsEqual(value1, value2, att->attbyval, att->attlen);
+    }
+}
+
+/* ----------------
+ * heap_delta_encode
+ *        Forms an encoded data from old and new tuple with the modified columns
+ *        using an algorithm similar to LZ algorithm.
+ *
+ *        tupleDesc - Tuple descriptor.
+ *        oldtup - pointer to the old/history tuple.
+ *        newtup - pointer to the new tuple.
+ *        encdata - pointer to the encoded data using lz algorithm.
+ *
+ *        Encode the bitmap [+padding] [+oid] as a new data. And loop for all
+ *        attributes to find any modifications in the attributes.
+ *
+ *        The unmodified data is encoded as a history tag to the output and the
+ *        modifed data is encoded as new data to the output.
+ *
+ *        If the encoded output data is less than 75% of original data,
+ *        The output data is considered as encoded and proceed further.
+ * ----------------
+ */
+bool
+heap_delta_encode(TupleDesc tupleDesc, HeapTuple oldtup, HeapTuple newtup,
+                  PGLZ_Header *encdata)
+{
+    Form_pg_attribute *att = tupleDesc->attrs;
+    int            numberOfAttributes;
+    int32        new_tup_off = 0,
+                old_tup_off = 0,
+                temp_off = 0,
+                match_off = 0,
+                change_off = 0;
+    int            attnum;
+    int32        data_len,
+                old_tup_pad_len,
+                new_tup_pad_len;
+    Size        old_tup_attr_len,
+                new_tup_attr_len;
+    bool        is_attr_equals = true;
+    unsigned char *bp = (unsigned char *) encdata + sizeof(PGLZ_Header);
+    unsigned char *bstart = bp;
+    char       *dp = (char *) newtup->t_data + offsetof(HeapTupleHeaderData, t_bits);
+    char       *dstart = dp;
+    char       *history;
+    unsigned char ctrl_dummy = 0;
+    unsigned char *ctrlp = &ctrl_dummy;
+    unsigned char ctrlb = 0;
+    unsigned char ctrl = 0;
+    int32        len,
+                old_tup_bitmaplen,
+                new_tup_bitmaplen,
+                new_tup_len;
+    int32        result_size;
+    int32        result_max;
+
+    /* Include the bitmap header in the lz encoded data. */
+    history = (char *) oldtup->t_data + offsetof(HeapTupleHeaderData, t_bits);
+    old_tup_bitmaplen = oldtup->t_data->t_hoff - offsetof(HeapTupleHeaderData, t_bits);
+    new_tup_bitmaplen = newtup->t_data->t_hoff - offsetof(HeapTupleHeaderData, t_bits);
+    new_tup_len = newtup->t_len - offsetof(HeapTupleHeaderData, t_bits);
+
+    /*
+     * The maximum encoded data is of 75% of total size. The max tuple size is
+     * already validated as it cannot be more than MaxHeapTupleSize.
+     */
+    result_max = (new_tup_len * 75) / 100;
+    encdata->rawsize = new_tup_len;
+
+    /*
+     * Check for output buffer is reached the result_max by advancing the
+     * buffer by the calculated aproximate length for the corresponding
+     * operation.
+     */
+    if ((bp + (2 * new_tup_bitmaplen)) - bstart >= result_max)
+        return false;
+
+    /* Copy the bitmap data from new tuple to the encoded data buffer */
+    pglz_out_add(ctrlp, ctrlb, ctrl, bp, new_tup_bitmaplen, dp);
+    dstart = dp;
+
+    numberOfAttributes = HeapTupleHeaderGetNatts(newtup->t_data);
+    for (attnum = 1; attnum <= numberOfAttributes; attnum++)
+    {
+        /*
+         * If the attribute is modified by the update operation, store the
+         * appropiate offsets in the WAL record, otherwise skip to the next
+         * attribute.
+         */
+        if (!heap_attr_get_length_and_check_equals(tupleDesc, attnum, oldtup,
+                               newtup, &old_tup_attr_len, &new_tup_attr_len))
+        {
+            is_attr_equals = false;
+            data_len = old_tup_off - match_off;
+
+            /*
+             * Check for output buffer is reached the result_max by advancing
+             * the buffer by the calculated aproximate length for the
+             * corresponding operation.
+             */
+            len = PGLZ_GET_HIST_CTRL_BIT_LEN(data_len);
+            if ((bp + len) - bstart >= result_max)
+                return false;
+
+            /*
+             * The match_off value is calculated w.r.t to the tuple t_hoff
+             * value, the bit map len needs to be added to match_off to get
+             * the actual start offfset from the old/history tuple.
+             */
+            match_off += old_tup_bitmaplen;
+
+            /*
+             * If any unchanged data presents in the old and new tuples then
+             * encode the data as it needs to copy from history tuple with len
+             * and offset.
+             */
+            pglz_out_tag(ctrlp, ctrlb, ctrl, bp, data_len, match_off, history);
+
+            /*
+             * Recalculate the old and new tuple offsets based on padding
+             * present in the tuples
+             */
+            if (!HeapTupleHasNulls(oldtup)
+                || !att_isnull((attnum - 1), oldtup->t_data->t_bits))
+            {
+                old_tup_off = att_align_pointer(old_tup_off,
+                                                att[attnum - 1]->attalign,
+                                                att[attnum - 1]->attlen,
+                                                (char *) oldtup->t_data + oldtup->t_data->t_hoff + old_tup_off);
+            }
+
+            if (!HeapTupleHasNulls(newtup)
+                || !att_isnull((attnum - 1), newtup->t_data->t_bits))
+            {
+                new_tup_off = att_align_pointer(new_tup_off,
+                                                att[attnum - 1]->attalign,
+                                                att[attnum - 1]->attlen,
+                                                (char *) newtup->t_data + newtup->t_data->t_hoff + new_tup_off);
+            }
+
+            old_tup_off += old_tup_attr_len;
+            new_tup_off += new_tup_attr_len;
+
+            match_off = old_tup_off;
+        }
+        else
+        {
+            /*
+             * Check for output buffer is reached the result_max by advancing
+             * the buffer by the calculated aproximate length for the
+             * corresponding operation.
+             */
+            data_len = new_tup_off - change_off;
+            if ((bp + (2 * data_len)) - bstart >= result_max)
+                return false;
+
+            /* Copy the modified column data to the output buffer if present */
+            pglz_out_add(ctrlp, ctrlb, ctrl, bp, data_len, dp);
+
+            /*
+             * calculate the old tuple field start position, required to
+             * ignore if any alignmet is present.
+             */
+            if (!HeapTupleHasNulls(oldtup)
+                || !att_isnull((attnum - 1), oldtup->t_data->t_bits))
+            {
+                temp_off = old_tup_off;
+                old_tup_off = att_align_pointer(old_tup_off,
+                                                att[attnum - 1]->attalign,
+                                                att[attnum - 1]->attlen,
+                                                (char *) oldtup->t_data + oldtup->t_data->t_hoff + old_tup_off);
+
+                old_tup_pad_len = old_tup_off - temp_off;
+
+                /*
+                 * calculate the new tuple field start position to check
+                 * whether any padding is required or not because field
+                 * alignment.
+                 */
+                temp_off = new_tup_off;
+                new_tup_off = att_align_pointer(new_tup_off,
+                                                att[attnum - 1]->attalign,
+                                                att[attnum - 1]->attlen,
+                                                (char *) newtup->t_data + newtup->t_data->t_hoff + new_tup_off);
+                new_tup_pad_len = new_tup_off - temp_off;
+
+                /*
+                 * Checking for that is there any alignment difference between
+                 * old and new tuple attributes.
+                 */
+                if (old_tup_pad_len != new_tup_pad_len)
+                {
+                    /*
+                     * If the alignment difference is found between old and
+                     * new tuples and the last attribute value of the new
+                     * tuple is same as old tuple then write the encode as
+                     * history data until the current match.
+                     *
+                     * If the last attribute value of new tuple is not same as
+                     * old tuple then the matched data marking as history is
+                     * already taken care.
+                     */
+                    if (is_attr_equals)
+                    {
+                        /*
+                         * Check for output buffer is reached the result_max
+                         * by advancing the buffer by the calculated
+                         * aproximate length for the corresponding operation.
+                         */
+                        data_len = old_tup_off - old_tup_pad_len - match_off;
+                        len = PGLZ_GET_HIST_CTRL_BIT_LEN(data_len);
+                        if ((bp + len) - bstart >= result_max)
+                            return false;
+
+                        match_off += old_tup_bitmaplen;
+                        pglz_out_tag(ctrlp, ctrlb, ctrl, bp, data_len, match_off, history);
+                    }
+
+                    match_off = old_tup_off;
+
+                    /* Alignment data */
+                    if ((bp + (2 * new_tup_pad_len)) - bstart >= result_max)
+                        return false;
+
+                    pglz_out_add(ctrlp, ctrlb, ctrl, bp, new_tup_pad_len, dp);
+                }
+            }
+
+            old_tup_off += old_tup_attr_len;
+            new_tup_off += new_tup_attr_len;
+
+            change_off = new_tup_off;
+
+            /*
+             * Recalculate the destination pointer with the new offset which
+             * is used while copying the modified data.
+             */
+            dp = dstart + new_tup_off;
+            is_attr_equals = true;
+        }
+    }
+
+    /* If any modified column data presents then copy it. */
+    data_len = new_tup_off - change_off;
+    if ((bp + (2 * data_len)) - bstart >= result_max)
+        return false;
+
+    pglz_out_add(ctrlp, ctrlb, ctrl, bp, data_len, dp);
+
+    /* If any left out old tuple data presents then copy it as history */
+    data_len = old_tup_off - match_off;
+    len = PGLZ_GET_HIST_CTRL_BIT_LEN(data_len);
+    if ((bp + len) - bstart >= result_max)
+        return false;
+
+    match_off += old_tup_bitmaplen;
+    pglz_out_tag(ctrlp, ctrlb, ctrl, bp, data_len, match_off, history);
+
+    /*
+     * Write out the last control byte and check that we haven't overrun the
+     * output size allowed by the strategy.
+     */
+    *ctrlp = ctrlb;
+
+    result_size = bp - bstart;
+    if (result_size >= result_max)
+        return false;
+
+    /*
+     * Success - need only fill in the actual length of the compressed datum.
+     */
+    SET_VARSIZE_COMPRESSED(encdata, result_size + sizeof(PGLZ_Header));
+    return true;
+}
+
+/* ----------------
+ * heap_delta_decode
+ *        Decodes the encoded data to dest tuple with the help of history.
+ *
+ *        encdata - Pointer to the encoded data.
+ *        oldtup - pointer to the history tuple.
+ *        newtup - pointer to the destination tuple.
+ * ----------------
+ */
+void
+heap_delta_decode(PGLZ_Header *encdata, HeapTuple oldtup, HeapTuple newtup)
+{
+    return pglz_decompress_with_history((char *) encdata,
+             (char *) newtup->t_data + offsetof(HeapTupleHeaderData, t_bits),
+                                        &newtup->t_len,
+            (char *) oldtup->t_data + offsetof(HeapTupleHeaderData, t_bits));
+}
+
+/* * heap_form_tuple *        construct a tuple from the given values[] and isnull[] arrays, *        which are of the
lengthindicated by tupleDescriptor->natts
 
diff --git a/src/backend/access/heap/heapam.c b/src/backend/access/heap/heapam.c
index 186fb87..46a0d26 100644
--- a/src/backend/access/heap/heapam.c
+++ b/src/backend/access/heap/heapam.c
@@ -85,6 +85,7 @@ static HeapTuple heap_prepare_insert(Relation relation, HeapTuple tup,
TransactionIdxid, CommandId cid, int options);static XLogRecPtr log_heap_update(Relation reln, Buffer oldbuf,
    ItemPointerData from, Buffer newbuf, HeapTuple newtup,
 
+                HeapTuple oldtup,                bool all_visible_cleared, bool new_all_visible_cleared);static bool
HeapSatisfiesHOTUpdate(Relationrelation, Bitmapset *hot_attrs,                       HeapTuple oldtup, HeapTuple
newtup);
@@ -857,6 +858,54 @@ heapgettup_pagemode(HeapScanDesc scan, * definition in access/htup.h is maintained. */Datum
+fastgetattr_with_len(HeapTuple tup, int attnum, TupleDesc tupleDesc,
+                     bool *isnull, int32 *len)
+{
+    return (
+            (attnum) > 0 ?
+            (
+             (*(isnull) = false),
+             HeapTupleNoNulls(tup) ?
+             (
+              (tupleDesc)->attrs[(attnum) - 1]->attcacheoff >= 0 ?
+              (
+            (*(len) = att_getlength((tupleDesc)->attrs[(attnum - 1)]->attlen,
+                             (char *) (tup)->t_data + (tup)->t_data->t_hoff +
+                             (tupleDesc)->attrs[(attnum) - 1]->attcacheoff)),
+               fetchatt((tupleDesc)->attrs[(attnum) - 1],
+                        (char *) (tup)->t_data + (tup)->t_data->t_hoff +
+                        (tupleDesc)->attrs[(attnum) - 1]->attcacheoff)
+               )
+              :
+              (
+               nocachegetattr_with_len(tup), (attnum), (tupleDesc), (len))
+              )
+             :
+             (
+              att_isnull((attnum) - 1, (tup)->t_data->t_bits) ?
+              (
+               (*(isnull) = true),
+               (*(len) = 0),
+               (Datum) NULL
+               )
+              :
+              (
+               nocachegetattr_with_len((tup), (attnum), (tupleDesc), (len))
+               )
+              )
+             )
+            :
+            (
+             (Datum) NULL
+             )
+        );
+}
+
+/*
+ * This is formatted so oddly so that the correspondence to the macro
+ * definition in access/htup.h is maintained.
+ */
+Datumfastgetattr(HeapTuple tup, int attnum, TupleDesc tupleDesc,            bool *isnull){
@@ -873,7 +922,8 @@ fastgetattr(HeapTuple tup, int attnum, TupleDesc tupleDesc,
(tupleDesc)->attrs[(attnum)- 1]->attcacheoff)               )              :
 
-              nocachegetattr((tup), (attnum), (tupleDesc))
+              (
+               nocachegetattr(tup), (attnum), (tupleDesc))              )             :             (
@@ -2400,7 +2450,7 @@ simple_heap_insert(Relation relation, HeapTuple tup)HTSU_Resultheap_delete(Relation relation,
ItemPointertid,            CommandId cid, Snapshot crosscheck, bool wait,
 
-            HeapUpdateFailureData *hufd)
+            HeapUpdateFailureData * hufd){    HTSU_Result result;    TransactionId xid = GetCurrentTransactionId();
@@ -2702,7 +2752,7 @@ simple_heap_delete(Relation relation, ItemPointer tid)    result = heap_delete(relation, tid,
                   GetCurrentCommandId(true), InvalidSnapshot,
 
-                         true /* wait for commit */,
+                         true /* wait for commit */ ,                         &hufd);    switch (result)    {
@@ -2759,7 +2809,7 @@ simple_heap_delete(Relation relation, ItemPointer tid)HTSU_Resultheap_update(Relation relation,
ItemPointerotid, HeapTuple newtup,            CommandId cid, Snapshot crosscheck, bool wait,
 
-            HeapUpdateFailureData *hufd)
+            HeapUpdateFailureData * hufd){    HTSU_Result result;    TransactionId xid = GetCurrentTransactionId();
@@ -3229,10 +3279,12 @@ l2:    /* XLOG stuff */    if (RelationNeedsWAL(relation))    {
-        XLogRecPtr    recptr = log_heap_update(relation, buffer, oldtup.t_self,
-                                             newbuf, heaptup,
-                                             all_visible_cleared,
-                                             all_visible_cleared_new);
+        XLogRecPtr    recptr;
+
+        recptr = log_heap_update(relation, buffer, oldtup.t_self,
+                                 newbuf, heaptup, &oldtup,
+                                 all_visible_cleared,
+                                 all_visible_cleared_new);        if (newbuf != buffer)        {
@@ -3299,74 +3351,11 @@ static boolheap_tuple_attr_equals(TupleDesc tupdesc, int attrnum,
HeapTupletup1, HeapTuple tup2){
 
-    Datum        value1,
-                value2;
-    bool        isnull1,
-                isnull2;
-    Form_pg_attribute att;
+    Size        tup1_attr_len,
+                tup2_attr_len;
-    /*
-     * If it's a whole-tuple reference, say "not equal".  It's not really
-     * worth supporting this case, since it could only succeed after a no-op
-     * update, which is hardly a case worth optimizing for.
-     */
-    if (attrnum == 0)
-        return false;
-
-    /*
-     * Likewise, automatically say "not equal" for any system attribute other
-     * than OID and tableOID; we cannot expect these to be consistent in a HOT
-     * chain, or even to be set correctly yet in the new tuple.
-     */
-    if (attrnum < 0)
-    {
-        if (attrnum != ObjectIdAttributeNumber &&
-            attrnum != TableOidAttributeNumber)
-            return false;
-    }
-
-    /*
-     * Extract the corresponding values.  XXX this is pretty inefficient if
-     * there are many indexed columns.    Should HeapSatisfiesHOTUpdate do a
-     * single heap_deform_tuple call on each tuple, instead?  But that doesn't
-     * work for system columns ...
-     */
-    value1 = heap_getattr(tup1, attrnum, tupdesc, &isnull1);
-    value2 = heap_getattr(tup2, attrnum, tupdesc, &isnull2);
-
-    /*
-     * If one value is NULL and other is not, then they are certainly not
-     * equal
-     */
-    if (isnull1 != isnull2)
-        return false;
-
-    /*
-     * If both are NULL, they can be considered equal.
-     */
-    if (isnull1)
-        return true;
-
-    /*
-     * We do simple binary comparison of the two datums.  This may be overly
-     * strict because there can be multiple binary representations for the
-     * same logical value.    But we should be OK as long as there are no false
-     * positives.  Using a type-specific equality operator is messy because
-     * there could be multiple notions of equality in different operator
-     * classes; furthermore, we cannot safely invoke user-defined functions
-     * while holding exclusive buffer lock.
-     */
-    if (attrnum <= 0)
-    {
-        /* The only allowed system columns are OIDs, so do this */
-        return (DatumGetObjectId(value1) == DatumGetObjectId(value2));
-    }
-    else
-    {
-        Assert(attrnum <= tupdesc->natts);
-        att = tupdesc->attrs[attrnum - 1];
-        return datumIsEqual(value1, value2, att->attbyval, att->attlen);
-    }
+    return heap_attr_get_length_and_check_equals(tupdesc, attrnum, tup1, tup2,
+                                             &tup1_attr_len, &tup2_attr_len);}/*
@@ -3417,7 +3406,7 @@ simple_heap_update(Relation relation, ItemPointer otid, HeapTuple tup)    result =
heap_update(relation,otid, tup,                         GetCurrentCommandId(true), InvalidSnapshot,
 
-                         true /* wait for commit */,
+                         true /* wait for commit */ ,                         &hufd);    switch (result)    {
@@ -3504,7 +3493,7 @@ simple_heap_update(Relation relation, ItemPointer otid, HeapTuple
tup)HTSU_Resultheap_lock_tuple(Relationrelation, HeapTuple tuple,                CommandId cid, LockTupleMode mode,
boolnowait,
 
-                Buffer *buffer, HeapUpdateFailureData *hufd)
+                Buffer *buffer, HeapUpdateFailureData * hufd){    HTSU_Result result;    ItemPointer tid =
&(tuple->t_self);
@@ -4464,7 +4453,7 @@ log_heap_visible(RelFileNode rnode, BlockNumber block, Buffer vm_buffer, */static
XLogRecPtrlog_heap_update(Relationreln, Buffer oldbuf, ItemPointerData from,
 
-                Buffer newbuf, HeapTuple newtup,
+                Buffer newbuf, HeapTuple newtup, HeapTuple oldtup,                bool all_visible_cleared, bool
new_all_visible_cleared){   xl_heap_update xlrec;
 
@@ -4473,6 +4462,17 @@ log_heap_update(Relation reln, Buffer oldbuf, ItemPointerData from,    XLogRecPtr    recptr;
XLogRecDatardata[4];    Page        page = BufferGetPage(newbuf);
 
+    char       *newtupdata;
+    int            newtuplen;
+    int            oldtuplen;
+    bool        compressed = false;
+
+    /* Structure which holds max output possible from the LZ algorithm */
+    struct
+    {
+        PGLZ_Header pglzheader;
+        char        buf[MaxHeapTupleSize];
+    }            buf;    /* Caller should not call me on a non-WAL-logged relation */
Assert(RelationNeedsWAL(reln));
@@ -4482,11 +4482,41 @@ log_heap_update(Relation reln, Buffer oldbuf, ItemPointerData from,    else        info =
XLOG_HEAP_UPDATE;
+    newtupdata = ((char *) newtup->t_data) + offsetof(HeapTupleHeaderData, t_bits);
+    newtuplen = newtup->t_len - offsetof(HeapTupleHeaderData, t_bits);
+    oldtuplen = oldtup->t_len - offsetof(HeapTupleHeaderData, t_bits);
+
+    /* Is the update is going to the same page? */
+    if (oldbuf == newbuf)
+    {
+        /*
+         * LZ algorithm can hold only history offset in the range of 1 - 4095.
+         * so the delta encode is restricted for the tuples with length more
+         * than PGLZ_HISTORY_SIZE.
+         */
+        if (oldtuplen < PGLZ_HISTORY_SIZE)
+        {
+            /* Delta-encode the new tuple using the old tuple */
+            if (heap_delta_encode(reln->rd_att, oldtup, newtup,
+                                  &buf.pglzheader))
+            {
+                compressed = true;
+                newtupdata = (char *) &buf.pglzheader;
+                newtuplen = VARSIZE(&buf.pglzheader);
+            }
+        }
+    }
+
+    xlrec.flags = 0;    xlrec.target.node = reln->rd_node;    xlrec.target.tid = from;
-    xlrec.all_visible_cleared = all_visible_cleared;
+    if (all_visible_cleared)
+        xlrec.flags |= XL_HEAP_UPDATE_ALL_VISIBLE_CLEARED;    xlrec.newtid = newtup->t_self;
-    xlrec.new_all_visible_cleared = new_all_visible_cleared;
+    if (new_all_visible_cleared)
+        xlrec.flags |= XL_HEAP_UPDATE_NEW_ALL_VISIBLE_CLEARED;
+    if (compressed)
+        xlrec.flags |= XL_HEAP_UPDATE_DELTA_ENCODED;    rdata[0].data = (char *) &xlrec;    rdata[0].len =
SizeOfHeapUpdate;
@@ -4513,9 +4543,12 @@ log_heap_update(Relation reln, Buffer oldbuf, ItemPointerData from,    rdata[2].buffer_std =
true;   rdata[2].next = &(rdata[3]);
 
-    /* PG73FORMAT: write bitmap [+ padding] [+ oid] + data */
-    rdata[3].data = (char *) newtup->t_data + offsetof(HeapTupleHeaderData, t_bits);
-    rdata[3].len = newtup->t_len - offsetof(HeapTupleHeaderData, t_bits);
+    /*
+     * PG73FORMAT: write bitmap [+ padding] [+ oid] + data follows .........
+     * OR PG93FORMAT [If encoded]: LZ header + Encoded data follows
+     */
+    rdata[3].data = newtupdata;
+    rdata[3].len = newtuplen;    rdata[3].buffer = newbuf;    rdata[3].buffer_std = true;    rdata[3].next = NULL;
@@ -5291,7 +5324,10 @@ heap_xlog_update(XLogRecPtr lsn, XLogRecord *record, bool hot_update)    Page        page;
OffsetNumberoffnum;    ItemId        lp = NULL;
 
+    HeapTupleData newtup;
+    HeapTupleData oldtup;    HeapTupleHeader htup;
+    HeapTupleHeader oldtupdata = NULL;    struct    {        HeapTupleHeaderData hdr;
@@ -5306,7 +5342,7 @@ heap_xlog_update(XLogRecPtr lsn, XLogRecord *record, bool hot_update)     * The visibility map
mayneed to be fixed even if the heap page is     * already up-to-date.     */
 
-    if (xlrec->all_visible_cleared)
+    if (xlrec->flags & XL_HEAP_UPDATE_ALL_VISIBLE_CLEARED)    {        Relation    reln =
CreateFakeRelcacheEntry(xlrec->target.node);       BlockNumber block = ItemPointerGetBlockNumber(&xlrec->target.tid);
 
@@ -5366,7 +5402,7 @@ heap_xlog_update(XLogRecPtr lsn, XLogRecord *record, bool hot_update)    if
(PageGetMaxOffsetNumber(page)< offnum || !ItemIdIsNormal(lp))        elog(PANIC, "heap_update_redo: invalid lp");
 
-    htup = (HeapTupleHeader) PageGetItem(page, lp);
+    oldtupdata = htup = (HeapTupleHeader) PageGetItem(page, lp);    htup->t_infomask &= ~(HEAP_XMAX_COMMITTED |
                 HEAP_XMAX_INVALID |
 
@@ -5385,7 +5421,7 @@ heap_xlog_update(XLogRecPtr lsn, XLogRecord *record, bool hot_update)    /* Mark the page as a
candidatefor pruning */    PageSetPrunable(page, record->xl_xid);
 
-    if (xlrec->all_visible_cleared)
+    if (xlrec->flags & XL_HEAP_UPDATE_ALL_VISIBLE_CLEARED)        PageClearAllVisible(page);    /*
@@ -5410,7 +5446,7 @@ newt:;     * The visibility map may need to be fixed even if the heap page is     * already
up-to-date.    */
 
-    if (xlrec->new_all_visible_cleared)
+    if (xlrec->flags & XL_HEAP_UPDATE_NEW_ALL_VISIBLE_CLEARED)    {        Relation    reln =
CreateFakeRelcacheEntry(xlrec->target.node);       BlockNumber block = ItemPointerGetBlockNumber(&xlrec->newtid);
 
@@ -5473,10 +5509,29 @@ newsame:;           SizeOfHeapHeader);    htup = &tbuf.hdr;    MemSet((char *) htup, 0,
sizeof(HeapTupleHeaderData));
-    /* PG73FORMAT: get bitmap [+ padding] [+ oid] + data */
-    memcpy((char *) htup + offsetof(HeapTupleHeaderData, t_bits),
-           (char *) xlrec + hsize,
-           newlen);
+
+    /*
+     * If the new tuple was delta-encoded, decode it.
+     */
+    if (xlrec->flags & XL_HEAP_UPDATE_DELTA_ENCODED)
+    {
+        /* PG93FORMAT: LZ header + Encoded data */
+        PGLZ_Header *encoded_data = (PGLZ_Header *) (((char *) xlrec) + hsize);
+
+        oldtup.t_data = oldtupdata;
+        newtup.t_data = htup;
+
+        heap_delta_decode(encoded_data, &oldtup, &newtup);
+        newlen = newtup.t_len;
+    }
+    else
+    {
+        /* PG73FORMAT: get bitmap [+ padding] [+ oid] + data */
+        memcpy((char *) htup + offsetof(HeapTupleHeaderData, t_bits),
+               (char *) xlrec + hsize,
+               newlen);
+    }
+    newlen += offsetof(HeapTupleHeaderData, t_bits);    htup->t_infomask2 = xlhdr.t_infomask2;    htup->t_infomask =
xlhdr.t_infomask;
@@ -5491,7 +5546,7 @@ newsame:;    if (offnum == InvalidOffsetNumber)        elog(PANIC, "heap_update_redo: failed to
addtuple");
 
-    if (xlrec->new_all_visible_cleared)
+    if (xlrec->flags & XL_HEAP_UPDATE_NEW_ALL_VISIBLE_CLEARED)        PageClearAllVisible(page);    freespace =
PageGetHeapFreeSpace(page);       /* needed to update FSM below */
 
diff --git a/src/backend/utils/adt/pg_lzcompress.c b/src/backend/utils/adt/pg_lzcompress.c
index 466982e..d836b51 100644
--- a/src/backend/utils/adt/pg_lzcompress.c
+++ b/src/backend/utils/adt/pg_lzcompress.c
@@ -182,9 +182,6 @@ */#define PGLZ_HISTORY_LISTS        8192    /* must be power of 2 */#define PGLZ_HISTORY_MASK
(PGLZ_HISTORY_LISTS - 1)
 
-#define PGLZ_HISTORY_SIZE        4096
-#define PGLZ_MAX_MATCH            273
-/* ---------- * PGLZ_HistEntry -
@@ -302,67 +299,6 @@ do {                                    \            }
                  \} while (0)
 
-
-/* ----------
- * pglz_out_ctrl -
- *
- *        Outputs the last and allocates a new control byte if needed.
- * ----------
- */
-#define pglz_out_ctrl(__ctrlp,__ctrlb,__ctrl,__buf) \
-do { \
-    if ((__ctrl & 0xff) == 0)                                                \
-    {                                                                        \
-        *(__ctrlp) = __ctrlb;                                                \
-        __ctrlp = (__buf)++;                                                \
-        __ctrlb = 0;                                                        \
-        __ctrl = 1;                                                            \
-    }                                                                        \
-} while (0)
-
-
-/* ----------
- * pglz_out_literal -
- *
- *        Outputs a literal byte to the destination buffer including the
- *        appropriate control bit.
- * ----------
- */
-#define pglz_out_literal(_ctrlp,_ctrlb,_ctrl,_buf,_byte) \
-do { \
-    pglz_out_ctrl(_ctrlp,_ctrlb,_ctrl,_buf);                                \
-    *(_buf)++ = (unsigned char)(_byte);                                        \
-    _ctrl <<= 1;                                                            \
-} while (0)
-
-
-/* ----------
- * pglz_out_tag -
- *
- *        Outputs a backward reference tag of 2-4 bytes (depending on
- *        offset and length) to the destination buffer including the
- *        appropriate control bit.
- * ----------
- */
-#define pglz_out_tag(_ctrlp,_ctrlb,_ctrl,_buf,_len,_off) \
-do { \
-    pglz_out_ctrl(_ctrlp,_ctrlb,_ctrl,_buf);                                \
-    _ctrlb |= _ctrl;                                                        \
-    _ctrl <<= 1;                                                            \
-    if (_len > 17)                                                            \
-    {                                                                        \
-        (_buf)[0] = (unsigned char)((((_off) & 0xf00) >> 4) | 0x0f);        \
-        (_buf)[1] = (unsigned char)(((_off) & 0xff));                        \
-        (_buf)[2] = (unsigned char)((_len) - 18);                            \
-        (_buf) += 3;                                                        \
-    } else {                                                                \
-        (_buf)[0] = (unsigned char)((((_off) & 0xf00) >> 4) | ((_len) - 3)); \
-        (_buf)[1] = (unsigned char)((_off) & 0xff);                            \
-        (_buf) += 2;                                                        \
-    }                                                                        \
-} while (0)
-
-/* ---------- * pglz_find_match - *
@@ -595,7 +531,7 @@ pglz_compress(const char *source, int32 slen, PGLZ_Header *dest,             * Create the tag and
addhistory entries for all matched             * characters.             */
 
-            pglz_out_tag(ctrlp, ctrlb, ctrl, bp, match_len, match_off);
+            pglz_out_tag(ctrlp, ctrlb, ctrl, bp, match_len, match_off, dp);            while (match_len--)
{               pglz_hist_add(hist_start, hist_entries,
 
@@ -647,15 +583,38 @@ pglz_compress(const char *source, int32 slen, PGLZ_Header *dest,voidpglz_decompress(const
PGLZ_Header*source, char *dest){
 
+    pglz_decompress_with_history((char *) source, dest, NULL, NULL);
+}
+
+/* ----------
+ * pglz_decompress_with_history -
+ *
+ *        Decompresses source into dest.
+ *        To decompress, it uses history if provided.
+ * ----------
+ */
+void
+pglz_decompress_with_history(const char *source, char *dest, uint32 *destlen,
+                             const char *history)
+{
+    PGLZ_Header src;    const unsigned char *sp;    const unsigned char *srcend;    unsigned char *dp;    unsigned
char*destend;
 
+    /* To avoid the unaligned access of PGLZ_Header */
+    memcpy((char *) &src, source, sizeof(PGLZ_Header));
+    sp = ((const unsigned char *) source) + sizeof(PGLZ_Header);
-    srcend = ((const unsigned char *) source) + VARSIZE(source);
+    srcend = ((const unsigned char *) source) + VARSIZE(&src);    dp = (unsigned char *) dest;
-    destend = dp + source->rawsize;
+    destend = dp + src.rawsize;
+
+    if (destlen)
+    {
+        *destlen = src.rawsize;
+    }    while (sp < srcend && dp < destend)    {
@@ -699,28 +658,76 @@ pglz_decompress(const PGLZ_Header *source, char *dest)                    break;
}
-                /*
-                 * Now we copy the bytes specified by the tag from OUTPUT to
-                 * OUTPUT. It is dangerous and platform dependent to use
-                 * memcpy() here, because the copied areas could overlap
-                 * extremely!
-                 */
-                while (len--)
+                if (history)
+                {
+                    /*
+                     * Now we copy the bytes specified by the tag from history to
+                     * OUTPUT.
+                     */
+                    memcpy(dp, history + off, len);
+                    dp += len;
+                }
+                else                {
-                    *dp = dp[-off];
-                    dp++;
+                    /*
+                     * Now we copy the bytes specified by the tag from OUTPUT to
+                     * OUTPUT. It is dangerous and platform dependent to use
+                     * memcpy() here, because the copied areas could overlap
+                     * extremely!
+                     */
+                    while (len--)
+                    {
+                        *dp = dp[-off];
+                        dp++;
+                    }                }            }            else            {
-                /*
-                 * An unset control bit means LITERAL BYTE. So we just copy
-                 * one from INPUT to OUTPUT.
-                 */
-                if (dp >= destend)        /* check for buffer overrun */
-                    break;        /* do not clobber memory */
-
-                *dp++ = *sp++;
+                if (history)
+                {
+                    /*
+                     * The byte at current offset in the source is the length
+                     * of this literal segment. See pglz_out_add for encoding
+                     * side.
+                     */
+                    int32        len;
+
+                    len = sp[0];
+                    sp += 1;
+
+                    /*
+                     * Check for output buffer overrun, to ensure we don't clobber
+                     * memory in case of corrupt input.  Note: we must advance dp
+                     * here to ensure the error is detected below the loop.  We
+                     * don't simply put the elog inside the loop since that will
+                     * probably interfere with optimization.
+                     */
+                    if (dp + len > destend)
+                    {
+                        dp += len;
+                        break;
+                    }
+
+                    /*
+                     * Now we copy the bytes specified by the tag from Source to
+                     * OUTPUT.
+                     */
+                    memcpy(dp, sp, len);
+                    dp += len;
+                    sp += len;
+                }
+                else
+                {
+                    /*
+                     * An unset control bit means LITERAL BYTE. So we just copy
+                     * one from INPUT to OUTPUT.
+                     */
+                    if (dp >= destend)        /* check for buffer overrun */
+                        break;        /* do not clobber memory */
+
+                    *dp++ = *sp++;
+                }            }            /*
diff --git a/src/include/access/heapam_xlog.h b/src/include/access/heapam_xlog.h
index 8ec710e..3e4001f 100644
--- a/src/include/access/heapam_xlog.h
+++ b/src/include/access/heapam_xlog.h
@@ -142,12 +142,20 @@ typedef struct xl_heap_update{    xl_heaptid    target;            /* deleted tuple id */
ItemPointerDatanewtid;        /* new inserted tuple id */
 
-    bool        all_visible_cleared;    /* PD_ALL_VISIBLE was cleared */
-    bool        new_all_visible_cleared;        /* same for the page of newtid */
+    char        flags;            /* flag bits, see below */
+    /* NEW TUPLE xl_heap_header AND TUPLE DATA FOLLOWS AT END OF STRUCT */} xl_heap_update;
-#define SizeOfHeapUpdate    (offsetof(xl_heap_update, new_all_visible_cleared) + sizeof(bool))
+
+#define XL_HEAP_UPDATE_ALL_VISIBLE_CLEARED        0x01 /* Indicates as old page's
+                                                all visible bit is cleared */
+#define XL_HEAP_UPDATE_NEW_ALL_VISIBLE_CLEARED    0x02 /* Indicates as new page's
+                                                all visible bit is cleared */
+#define XL_HEAP_UPDATE_DELTA_ENCODED            0x04 /* Indicates as the update
+                                                operation is delta encoded */
+
+#define SizeOfHeapUpdate    (offsetof(xl_heap_update, flags) + sizeof(char))/* * This is what we need to know about
vacuumpage cleanup/redirect
 
diff --git a/src/include/access/htup_details.h b/src/include/access/htup_details.h
index 7abe3e6..4419fc4 100644
--- a/src/include/access/htup_details.h
+++ b/src/include/access/htup_details.h
@@ -18,6 +18,7 @@#include "access/tupdesc.h"#include "access/tupmacs.h"#include "storage/bufpage.h"
+#include "utils/pg_lzcompress.h"/* * MaxTupleAttributeNumber limits the number of (user) columns in a tuple.
@@ -528,6 +529,7 @@ struct MinimalTupleData        HeapTupleHeaderSetOid((tuple)->t_data, (oid))
+#if !defined(DISABLE_COMPLEX_MACRO)/* ---------------- *        fastgetattr *
@@ -542,9 +544,6 @@ struct MinimalTupleData *        lookups, and call nocachegetattr() for the rest. *
----------------*/
 
-
-#if !defined(DISABLE_COMPLEX_MACRO)
-#define fastgetattr(tup, attnum, tupleDesc, isnull)                    \(
                     \    AssertMacro((attnum) > 0),                                        \
 
@@ -572,14 +571,56 @@ struct MinimalTupleData            nocachegetattr((tup), (attnum), (tupleDesc))            \
 )                                                            \    )
           \
 
+)                                                                    \
+
+/* ----------------
+ *        fastgetattr_with_len
+ *
+ *        Similar to fastgetattr and fetches the length of the given attribute
+ *        also.
+ * ----------------
+ */
+#define fastgetattr_with_len(tup, attnum, tupleDesc, isnull, len)    \
+(                                                                    \
+    AssertMacro((attnum) > 0),                                        \
+    (*(isnull) = false),                                            \
+    HeapTupleNoNulls(tup) ?                                         \
+    (                                                                \
+        (tupleDesc)->attrs[(attnum)-1]->attcacheoff >= 0 ?            \
+        (                                                            \
+            (*(len) = att_getlength(                                \
+                    (tupleDesc)->attrs[(attnum)-1]->attlen,         \
+                    (char *) (tup)->t_data + (tup)->t_data->t_hoff +\
+                    (tupleDesc)->attrs[(attnum)-1]->attcacheoff)),    \
+            fetchatt((tupleDesc)->attrs[(attnum)-1],                \
+                (char *) (tup)->t_data + (tup)->t_data->t_hoff +    \
+                    (tupleDesc)->attrs[(attnum)-1]->attcacheoff)    \
+        )                                                            \
+        :                                                            \
+            nocachegetattr_with_len((tup), (attnum), (tupleDesc), (len))\
+    )                                                                \
+    :                                                                \
+    (                                                                \
+        att_isnull((attnum)-1, (tup)->t_data->t_bits) ?             \
+        (                                                            \
+            (*(isnull) = true),                                     \
+            (*(len) = 0),                                            \
+            (Datum)NULL                                             \
+        )                                                            \
+        :                                                            \
+        (                                                            \
+            nocachegetattr_with_len((tup), (attnum), (tupleDesc), (len))\
+        )                                                            \
+    )                                                                \)
-#else                            /* defined(DISABLE_COMPLEX_MACRO) */
+#else                            /* defined(DISABLE_COMPLEX_MACRO) */extern Datum fastgetattr(HeapTuple tup, int
attnum,TupleDesc tupleDesc,            bool *isnull);
 
+extern Datum fastgetattr_with_len(HeapTuple tup, int attnum,
+            TupleDesc tupleDesc, bool *isnull, int32 *len);#endif   /* defined(DISABLE_COMPLEX_MACRO) */
-/* ---------------- *        heap_getattr *
@@ -596,21 +637,43 @@ extern Datum fastgetattr(HeapTuple tup, int attnum, TupleDesc tupleDesc, * ----------------
*/#defineheap_getattr(tup, attnum, tupleDesc, isnull) \
 
+( \
+    ((attnum) > 0) ? \    ( \
-        ((attnum) > 0) ? \
+        ((attnum) > (int) HeapTupleHeaderGetNatts((tup)->t_data)) ? \        ( \
-            ((attnum) > (int) HeapTupleHeaderGetNatts((tup)->t_data)) ? \
-            ( \
-                (*(isnull) = true), \
-                (Datum)NULL \
-            ) \
-            : \
-                fastgetattr((tup), (attnum), (tupleDesc), (isnull)) \
+            (*(isnull) = true), \
+            (Datum)NULL \        ) \        : \
-            heap_getsysattr((tup), (attnum), (tupleDesc), (isnull)) \
-    )
+            fastgetattr((tup), (attnum), (tupleDesc), (isnull)) \
+    ) \
+    : \
+        heap_getsysattr((tup), (attnum), (tupleDesc), (isnull)) \
+)
+/* ----------------
+ *        heap_getattr_with_len
+ *
+ *        Similar to heap_getattr and outputs the length of the given attribute.
+ * ----------------
+ */
+#define heap_getattr_with_len(tup, attnum, tupleDesc, isnull, len) \
+( \
+    ((attnum) > 0) ? \
+    ( \
+        ((attnum) > (int) HeapTupleHeaderGetNatts((tup)->t_data)) ? \
+        ( \
+            (*(isnull) = true), \
+            (*(len) = 0), \
+            (Datum)NULL \
+        ) \
+        : \
+            fastgetattr_with_len((tup), (attnum), (tupleDesc), (isnull), (len)) \
+    ) \
+    : \
+        heap_getsysattr((tup), (attnum), (tupleDesc), (isnull)) \
+)/* prototypes for functions in common/heaptuple.c */extern Size heap_compute_data_size(TupleDesc tupleDesc,
@@ -620,6 +683,8 @@ extern void heap_fill_tuple(TupleDesc tupleDesc,                char *data, Size data_size,
      uint16 *infomask, bits8 *bit);extern bool heap_attisnull(HeapTuple tup, int attnum);
 
+extern Datum nocachegetattr_with_len(HeapTuple tup, int attnum,
+               TupleDesc att, Size *len);extern Datum nocachegetattr(HeapTuple tup, int attnum,
TupleDescatt);extern Datum heap_getsysattr(HeapTuple tup, int attnum, TupleDesc tupleDesc,
 
@@ -636,6 +701,14 @@ extern HeapTuple heap_modify_tuple(HeapTuple tuple,extern void heap_deform_tuple(HeapTuple tuple,
TupleDesctupleDesc,                  Datum *values, bool *isnull);
 
+extern bool heap_attr_get_length_and_check_equals(TupleDesc tupdesc,
+                        int attrnum, HeapTuple tup1, HeapTuple tup2,
+                        Size *tup1_attr_len, Size *tup2_attr_len);
+extern bool heap_delta_encode(TupleDesc tupleDesc, HeapTuple oldtup,
+                HeapTuple newtup, PGLZ_Header *encdata);
+extern void heap_delta_decode (PGLZ_Header *encdata, HeapTuple oldtup,
+                HeapTuple newtup);
+/* these three are deprecated versions of the three above: */extern HeapTuple heap_formtuple(TupleDesc
tupleDescriptor,              Datum *values, char *nulls);
 
diff --git a/src/include/access/tupmacs.h b/src/include/access/tupmacs.h
index 984a049..c1a27f7 100644
--- a/src/include/access/tupmacs.h
+++ b/src/include/access/tupmacs.h
@@ -187,6 +187,28 @@)/*
+ * att_getlength -
+ *            Gets the length of the attribute.
+ */
+#define att_getlength(attlen, attptr) \
+( \
+    ((attlen) > 0) ? \
+    ( \
+        (attlen) \
+    ) \
+    : (((attlen) == -1) ? \
+    ( \
+        VARSIZE_ANY(attptr) \
+    ) \
+    : \
+    ( \
+        AssertMacro((attlen) == -2), \
+        (strlen((char *) (attptr)) + 1) \
+    )) \
+)
+
+
+/* * store_att_byval is a partial inverse of fetch_att: store a given Datum * value into a tuple data area at the
specifiedaddress.  However, it only * handles the byval case, because in typical usage the caller needs to
 
diff --git a/src/include/utils/pg_lzcompress.h b/src/include/utils/pg_lzcompress.h
index 4af24a3..7b9d588 100644
--- a/src/include/utils/pg_lzcompress.h
+++ b/src/include/utils/pg_lzcompress.h
@@ -23,6 +23,8 @@ typedef struct PGLZ_Header    int32        rawsize;} PGLZ_Header;
+#define PGLZ_HISTORY_SIZE        4096
+#define PGLZ_MAX_MATCH            273/* ---------- * PGLZ_MAX_OUTPUT -
@@ -86,6 +88,119 @@ typedef struct PGLZ_Strategy    int32        match_size_drop;} PGLZ_Strategy;
+/*
+ * calculate the approximate length required for history encode tag for the
+ * given length
+ */
+#define PGLZ_GET_HIST_CTRL_BIT_LEN(_len) \
+( \
+    ((_len) < 17) ?    (3) : (4 * (1 + ((_len) / PGLZ_MAX_MATCH)))    \
+)
+
+/* ----------
+ * pglz_out_ctrl -
+ *
+ *        Outputs the last and allocates a new control byte if needed.
+ * ----------
+ */
+#define pglz_out_ctrl(__ctrlp,__ctrlb,__ctrl,__buf) \
+do { \
+    if ((__ctrl & 0xff) == 0)                                                \
+    {                                                                        \
+        *(__ctrlp) = __ctrlb;                                                \
+        __ctrlp = (__buf)++;                                                \
+        __ctrlb = 0;                                                        \
+        __ctrl = 1;                                                         \
+    }                                                                        \
+} while (0)
+
+/* ----------
+ * pglz_out_literal -
+ *
+ *        Outputs a literal byte to the destination buffer including the
+ *        appropriate control bit.
+ * ----------
+ */
+#define pglz_out_literal(_ctrlp,_ctrlb,_ctrl,_buf,_byte) \
+do { \
+    pglz_out_ctrl(_ctrlp,_ctrlb,_ctrl,_buf);                                \
+    *(_buf)++ = (unsigned char)(_byte);                                     \
+    _ctrl <<= 1;                                                            \
+} while (0)
+
+/* ----------
+ * pglz_out_tag -
+ *
+ *        Outputs a backward/history reference tag of 2-4 bytes (depending on
+ *        offset and length) to the destination buffer including the
+ *        appropriate control bit.
+ *
+ *        Split the process of backward/history reference as different chunks,
+ *        if the given lenght is more than max match and repeats the process
+ *        until the given length is processed.
+ *
+ *        If the matched history length is less than 3 bytes then add it as a
+ *        new data only during encoding instead of history reference. This occurs
+ *        only while framing delta record for wal update operation.
+ * ----------
+ */
+#define pglz_out_tag(_ctrlp,_ctrlb,_ctrl,_buf,_len,_off,_byte) \
+do { \
+    int _mlen;                                                                    \
+    int _total_len = (_len);                                                    \
+    while (_total_len > 0)                                                        \
+    {                                                                            \
+        _mlen = _total_len > PGLZ_MAX_MATCH ? PGLZ_MAX_MATCH : _total_len;        \
+        if (_mlen < 3)                                                            \
+        {                                                                        \
+            (_byte) = (char *)(_byte) + (_off);                                    \
+            pglz_out_add(_ctrlp,_ctrlb,_ctrl,_buf,_mlen,(_byte));                \
+            break;                                                                \
+        }                                                                        \
+        pglz_out_ctrl(_ctrlp,_ctrlb,_ctrl,_buf);                                \
+        _ctrlb |= _ctrl;                                                        \
+        _ctrl <<= 1;                                                            \
+        if (_mlen > 17)                                                            \
+        {                                                                        \
+            (_buf)[0] = (unsigned char)((((_off) & 0xf00) >> 4) | 0x0f);        \
+            (_buf)[1] = (unsigned char)(((_off) & 0xff));                        \
+            (_buf)[2] = (unsigned char)((_mlen) - 18);                            \
+            (_buf) += 3;                                                        \
+        } else {                                                                \
+            (_buf)[0] = (unsigned char)((((_off) & 0xf00) >> 4) | ((_mlen) - 3)); \
+            (_buf)[1] = (unsigned char)((_off) & 0xff);                            \
+            (_buf) += 2;                                                        \
+        }                                                                        \
+        _total_len -= _mlen;                                                    \
+        (_off) += _mlen;                                                        \
+    }                                                                            \
+} while (0)
+
+/* ----------
+ * pglz_out_add -
+ *
+ *        Outputs a reference tag of 1 byte with length and the new data
+ *        to the destination buffer, including the appropriate control bit.
+ * ----------
+ */
+#define pglz_out_add(_ctrlp,_ctrlb,_ctrl,_buf,_len,_byte) \
+do { \
+    int32 _mlen;                                                                \
+    int32 _total_len = (_len);                                                            \
+    while (_total_len > 0)                                                        \
+    {                                                                        \
+        _mlen = _total_len > 255 ? 255 : _total_len;                                \
+        pglz_out_ctrl(_ctrlp,_ctrlb,_ctrl,_buf);                            \
+        _ctrl <<= 1;                                                        \
+        (_buf)[0] = (unsigned char)(_mlen);                                    \
+        (_buf) += 1;                                                        \
+        memcpy((_buf), (_byte), _mlen);                                        \
+        (_buf) += _mlen;                                                    \
+        (_byte) += _mlen;                                                    \
+        _total_len -= _mlen;                                                    \
+    }                                                                        \
+} while (0)
+/* ---------- * The standard strategies
@@ -108,5 +223,6 @@ extern const PGLZ_Strategy *const PGLZ_strategy_always;extern bool pglz_compress(const char
*source,int32 slen, PGLZ_Header *dest,              const PGLZ_Strategy *strategy);extern void pglz_decompress(const
PGLZ_Header*source, char *dest);
 
-
+extern void pglz_decompress_with_history(const char *source, char *dest,
+                uint32 *destlen, const char *history);#endif   /* _PG_LZCOMPRESS_H_ */

Re: Performance Improvement by reducing WAL for Update Operation

From
Simon Riggs
Date:
On 28 December 2012 08:07, Kyotaro HORIGUCHI
<horiguchi.kyotaro@lab.ntt.co.jp> wrote:

> Hello, I saw this patch and confirmed that
>
>  - Coding style looks good.
>  - Appliable onto HEAD.
>  - Some mis-codings are fixed.

I've had a quick review of the patch to see how close we're getting.
The perf tests look to me like we're getting what we wanted from this
and I'm happy with the recovery performance trade-offs. Well done to
both author and testers.

My comments

* There is a fixed 75% heuristic in the patch. Can we document where
that came from? Can we have a parameter that sets that please? This
can be used to have further tests to confirm the useful setting of
this. I expect it to be removed before we release, but it will help
during beta.

* The compression algorithm depends completely upon new row length
savings. If the new row is short, it would seem easier to just skip
the checks and include it anyway. We can say if old and new vary in
length by > 50% of each other, just include new as-is, since the rows
very clearly differ in a big way. Also, if tuple is same length as
before, can we compare the whole tuple at once to save doing
per-column checks?

* If full page writes is on and the page is very old, we are just
going to copy the whole block. So why not check for that rather than
do all these push ups and then just copy the page anyway?

* TOAST is not handled at all. No comments about it, nothing. Does
that mean it hasn't been considered? Or did we decide not to care in
this release? Presumably that means we are comparing toast pointers
byte by byte to see if they are the same?

* I'd like to see a specific test in regression that is designed to
exercise the code here. That way we will be certain that the code is
getting regularly tested.

* The internal docs are completely absent. We need at least a whole
page of descriptive comment, discussing trade-offs and design
decisions. This is very important because it will help locate bugs
much faster if these things are clealry documented. It also helps
reviewers. This is a big timewaster for committers because you have to
read the whole patch and understand it before you can attempt to form
opinions. Commits happen quicker and easier with good comments.

* Lots of typos in comments. Many comments say nothing more than the
words already used in the function name itself

* "flags" variables are almost always int or uint in PG source.

* PGLZ_HISTORY_SIZE needs to be documented in the place it is defined,
not the place its used. The test if (oldtuplen < PGLZ_HISTORY_SIZE)
really needs to be a test inside the compression module to maintain
better modularity, so the value itself needn't be exported

* Need to mention the WAL format change, or include the change within
the patch so we can see

-- Simon Riggs                   http://www.2ndQuadrant.com/PostgreSQL Development, 24x7 Support, Training & Services



Re: Performance Improvement by reducing WAL for Update Operation

From
Amit Kapila
Date:
On Friday, December 28, 2012 3:52 PM Simon Riggs wrote:
> On 28 December 2012 08:07, Kyotaro HORIGUCHI
> <horiguchi.kyotaro@lab.ntt.co.jp> wrote:
> 
> > Hello, I saw this patch and confirmed that
> >
> >  - Coding style looks good.
> >  - Appliable onto HEAD.
> >  - Some mis-codings are fixed.
> 
> I've had a quick review of the patch to see how close we're getting.
> The perf tests look to me like we're getting what we wanted from this
> and I'm happy with the recovery performance trade-offs. Well done to
> both author and testers.
> 
> My comments
> 
> * There is a fixed 75% heuristic in the patch. Can we document where
> that came from? 

It is from LZ compression strategy. Refer PGLZ_Strategy.
I will add comment for it.

> Can we have a parameter that sets that please? This
> can be used to have further tests to confirm the useful setting of
> this. I expect it to be removed before we release, but it will help
> during beta.

I shall add that for test purpose.
> * The compression algorithm depends completely upon new row length
> savings. If the new row is short, it would seem easier to just skip
> the checks and include it anyway. We can say if old and new vary in
> length by > 50% of each other, just include new as-is, since the rows
> very clearly differ in a big way.

I think it makes more sense. So I shall update the patch.

> Also, if tuple is same length as
> before, can we compare the whole tuple at once to save doing
> per-column checks?

I shall evaluate and discuss with you.

> * If full page writes is on and the page is very old, we are just
> going to copy the whole block. So why not check for that rather than
> do all these push ups and then just copy the page anyway?

I shall check once and update the patch.

> * TOAST is not handled at all. No comments about it, nothing. Does
> that mean it hasn't been considered? Or did we decide not to care in
> this release? 

> Presumably that means we are comparing toast pointers
> byte by byte to see if they are the same?

Yes, currently this patch is doing byte by byte comparison for toast
pointers. I shall add comment.
In future, we can evaluate if further optimizations can be done.

> * I'd like to see a specific test in regression that is designed to
> exercise the code here. That way we will be certain that the code is
> getting regularly tested.

I shall add more specific tests.

> * The internal docs are completely absent. We need at least a whole
> page of descriptive comment, discussing trade-offs and design
> decisions. This is very important because it will help locate bugs
> much faster if these things are clealry documented. It also helps
> reviewers. This is a big timewaster for committers because you have to
> read the whole patch and understand it before you can attempt to form
> opinions. Commits happen quicker and easier with good comments.

Do you have any suggestion for where to put this information, any particular
ReadMe?

> * Lots of typos in comments. Many comments say nothing more than the
> words already used in the function name itself
> 
> * "flags" variables are almost always int or uint in PG source.

> * PGLZ_HISTORY_SIZE needs to be documented in the place it is defined,
> not the place its used. The test if (oldtuplen < PGLZ_HISTORY_SIZE)
> really needs to be a test inside the compression module to maintain
> better modularity, so the value itself needn't be exported

I shall update the patch to address it.

> * Need to mention the WAL format change, or include the change within
> the patch so we can see

Sure, I will update this in code comments and internals docs.


With Regards,
Amit Kapila.




Re: Performance Improvement by reducing WAL for Update Operation

From
Amit Kapila
Date:
On Friday, December 28, 2012 1:38 PM Kyotaro HORIGUCHI wrote:
> Hello, I saw this patch and confirmed that
> 
>  - Coding style looks good.
>  - Appliable onto HEAD.
>  - Some mis-codings are fixed.
> 
> And took the performance figures for 4 types of modification versus 2
> benchmarks.
> 
> As a whole, this patch brings very large gain in its effective range -
> e.g. updates of relatively small portions in a tuple, but negligible
> loss of performance is observed outside of its effective range on the
> test machine. I suppose the losses will be emphasized by the more
> higher performance of seq write of WAL devices


Thank you very much for the review.

With Regards,
Amit Kapila.




Re: Performance Improvement by reducing WAL for Update Operation

From
Simon Riggs
Date:
On 28 December 2012 11:27, Amit Kapila <amit.kapila@huawei.com> wrote:

>> * The internal docs are completely absent. We need at least a whole
>> page of descriptive comment, discussing trade-offs and design
>> decisions. This is very important because it will help locate bugs
>> much faster if these things are clealry documented. It also helps
>> reviewers. This is a big timewaster for committers because you have to
>> read the whole patch and understand it before you can attempt to form
>> opinions. Commits happen quicker and easier with good comments.
>
> Do you have any suggestion for where to put this information, any particular
> ReadMe?

Location is less relevant, since it will show up as additions in the patch.

Put it wherever makes most sense in comparison to existing related
comments/README. I have no preference myself.

If its any consolation, I notice a common issue with patches is lack
of *explanatory* comments, as opposed to line by line comments. So
same review comment to 50-75% of patches I've reviewed recently, which
is also likely why.

-- Simon Riggs                   http://www.2ndQuadrant.com/PostgreSQL Development, 24x7 Support, Training & Services



Re: Performance Improvement by reducing WAL for Update Operation

From
Simon Riggs
Date:
On 28 December 2012 11:27, Amit Kapila <amit.kapila@huawei.com> wrote:

>> * TOAST is not handled at all. No comments about it, nothing. Does
>> that mean it hasn't been considered? Or did we decide not to care in
>> this release?
>
>> Presumably that means we are comparing toast pointers
>> byte by byte to see if they are the same?
>
> Yes, currently this patch is doing byte by byte comparison for toast
> pointers. I shall add comment.
> In future, we can evaluate if further optimizations can be done.

Just a comment to say that the comparison takes place after TOASTed
columns have been removed. TOAST is already optimised for whole value
UPDATE anyway, so that is the right place to produce the delta.

It does make me think that we can further optimise TOAST by updating
only the parts of a toasted datum that have changed. That will be
useful for JSON and XML applications that change only a portion of
large documents.

-- Simon Riggs                   http://www.2ndQuadrant.com/PostgreSQL Development, 24x7 Support, Training & Services



Re: Performance Improvement by reducing WAL for Update Operation

From
Amit Kapila
Date:
On Friday, December 28, 2012 3:52 PM Simon Riggs wrote:
> On 28 December 2012 08:07, Kyotaro HORIGUCHI
> <horiguchi.kyotaro@lab.ntt.co.jp> wrote:
> 
> > Hello, I saw this patch and confirmed that
> >
> >  - Coding style looks good.
> >  - Appliable onto HEAD.
> >  - Some mis-codings are fixed.
> 
> I've had a quick review of the patch to see how close we're getting.
> The perf tests look to me like we're getting what we wanted from this
> and I'm happy with the recovery performance trade-offs. Well done to
> both author and testers.
> 
> 
> * The compression algorithm depends completely upon new row length
> savings. If the new row is short, it would seem easier to just skip
> the checks and include it anyway. We can say if old and new vary in
> length by > 50% of each other, just include new as-is, since the rows
> very clearly differ in a big way. 

> Also, if tuple is same length as 
> before, can we compare the whole tuple at once to save doing
> per-column checks?

If we have to do whole tuple comparison then storing of changed parts might
need to be
be done in a byte-by-byte way rather then at column offset boundaries.
This might not be possible with current algorithm as it stores in WAL
information column-by-column and decrypts also in similar way.

> The internal docs are completely absent. We need at least a whole page of
descriptive > comment, discussing trade-offs and design decisions.

Currently I have planned to put it transam/README, as most of WAL
description is present there.

With Regards,
Amit Kapila.




Re: Performance Improvement by reducing WAL for Update Operation

From
Simon Riggs
Date:
On 4 January 2013 13:53, Amit Kapila <amit.kapila@huawei.com> wrote:
> On Friday, December 28, 2012 3:52 PM Simon Riggs wrote:
>> On 28 December 2012 08:07, Kyotaro HORIGUCHI
>> <horiguchi.kyotaro@lab.ntt.co.jp> wrote:
>>
>> > Hello, I saw this patch and confirmed that
>> >
>> >  - Coding style looks good.
>> >  - Appliable onto HEAD.
>> >  - Some mis-codings are fixed.
>>
>> I've had a quick review of the patch to see how close we're getting.
>> The perf tests look to me like we're getting what we wanted from this
>> and I'm happy with the recovery performance trade-offs. Well done to
>> both author and testers.
>>
>>
>> * The compression algorithm depends completely upon new row length
>> savings. If the new row is short, it would seem easier to just skip
>> the checks and include it anyway. We can say if old and new vary in
>> length by > 50% of each other, just include new as-is, since the rows
>> very clearly differ in a big way.
>
>> Also, if tuple is same length as
>> before, can we compare the whole tuple at once to save doing
>> per-column checks?
>
> If we have to do whole tuple comparison then storing of changed parts might
> need to be
> be done in a byte-by-byte way rather then at column offset boundaries.
> This might not be possible with current algorithm as it stores in WAL
> information column-by-column and decrypts also in similar way.

OK, please explain in comments.

>> The internal docs are completely absent. We need at least a whole page of
> descriptive > comment, discussing trade-offs and design decisions.
>
> Currently I have planned to put it transam/README, as most of WAL
> description is present there.

But also in comments for each major function.

Thanks

-- Simon Riggs                   http://www.2ndQuadrant.com/PostgreSQL Development, 24x7 Support, Training & Services



Re: Performance Improvement by reducing WAL for Update Operation

From
Amit kapila
Date:
On Friday, January 04, 2013 8:03 PM Simon Riggs wrote:
On 4 January 2013 13:53, Amit Kapila <amit.kapila@huawei.com> wrote:
> On Friday, December 28, 2012 3:52 PM Simon Riggs wrote:
>> On 28 December 2012 08:07, Kyotaro HORIGUCHI
>> <horiguchi.kyotaro@lab.ntt.co.jp> wrote:
>>
>> > Hello, I saw this patch and confirmed that
>> >
>> >  - Coding style looks good.
>> >  - Appliable onto HEAD.
>> >  - Some mis-codings are fixed.
>>
>> I've had a quick review of the patch to see how close we're getting.
>> The perf tests look to me like we're getting what we wanted from this
>> and I'm happy with the recovery performance trade-offs. Well done to
>> both author and testers.
>>
Update patch contains handling of below Comments
>
>* There is a fixed 75% heuristic in the patch. Can we document where
>that came from? Can we have a parameter that sets that please? This
>can be used to have further tests to confirm the useful setting of
>this. I expect it to be removed before we release, but it will help
>during beta.

Added a guc variable wal_update_compression_ratio to set the compression ratio.
It can be removed during beta.

>* The compression algorithm depends completely upon new row length
>savings. If the new row is short, it would seem easier to just skip
>the checks and include it anyway. We can say if old and new vary in
>length by > 50% of each other, just include new as-is, since the rows
>very clearly differ in a big way.

Added a check in heap_delta_encode to identify whether the tuples are differ in length by 50%.

>* If full page writes is on and the page is very old, we are just
>going to copy the whole block. So why not check for that rather than
>do all these push ups and then just copy the page anyway?

Added a function which is used to identify whether the page needs a backup block or not.
based on the result the optimization is applied.


>* I'd like to see a specific test in regression that is designed to
>exercise the code here. That way we will be certain that the code is
>getting regularly tested.

Added the regression tests which covers all the changes done for the optimization except recovery.

>* The internal docs are completely absent. We need at least a whole
>page of descriptive comment, discussing trade-offs and design
>decisions. This is very important because it will help locate bugs
>much faster if these things are clealry documented. It also helps
>reviewers. This is a big timewaster for committers because you have to
>read the whole patch and understand it before you can attempt to form
>opinions. Commits happen quicker and easier with good comments.
>* Need to mention the WAL format change, or include the change within
>the patch so we can see

backend/access/transam/README is updated with details.

>* Lots of typos in comments. Many comments say nothing more than the
>words already used in the function name itself

corrected the typos and removed unnecessary comments.

>* "flags" variables are almost always int or uint in PG source.
>
>* PGLZ_HISTORY_SIZE needs to be documented in the place it is defined,
>not the place its used. The test if (oldtuplen < PGLZ_HISTORY_SIZE)
>really needs to be a test inside the compression module to maintain
>better modularity, so the value itself needn't be exported

(oldtuplen < PGLZ_HISTORY_SIZE) validation is moved inside the heap_delta_encode
and updated the flags variable also.

Test results with modified pgbench (1800 record size) on the latest patch:

-Patch-             -tps@-c1-     -WAL@-c1-      -tps@-c2-      -WAL@-c2-
Head                831           4.17 GB        1416           7.13 GB
WAL modification    846           2.36 GB        1712           3.31 GB

-Patch-             -tps@-c4-     -WAL@-c4-      -tps@-c8-      -WAL@-c8-
Head                2196          11.01 GB       2758           13.88 GB
WAL modification    3295           5.87 GB       5472            9.02 GB


With Regards,
Amit Kapila.
Attachment

Re: Performance Improvement by reducing WAL for Update Operation

From
Simon Riggs
Date:
On 9 January 2013 08:05, Amit kapila <amit.kapila@huawei.com> wrote:

> Update patch contains handling of below Comments

Thanks


> Test results with modified pgbench (1800 record size) on the latest patch:
>
> -Patch-             -tps@-c1-     -WAL@-c1-      -tps@-c2-      -WAL@-c2-
> Head                831           4.17 GB        1416           7.13 GB
> WAL modification    846           2.36 GB        1712           3.31 GB
>
> -Patch-             -tps@-c4-     -WAL@-c4-      -tps@-c8-      -WAL@-c8-
> Head                2196          11.01 GB       2758           13.88 GB
> WAL modification    3295           5.87 GB       5472            9.02 GB

And test results on normal pgbench?

-- Simon Riggs                   http://www.2ndQuadrant.com/PostgreSQL Development, 24x7 Support, Training & Services



Re: Performance Improvement by reducing WAL for Update Operation

From
Amit Kapila
Date:
On Wednesday, January 09, 2013 4:57 PM Simon Riggs wrote:
> On 9 January 2013 08:05, Amit kapila <amit.kapila@huawei.com> wrote:
> 
> > Update patch contains handling of below Comments
> 
> Thanks
> 
> 
> > Test results with modified pgbench (1800 record size) on the latest
> patch:
> >
> > -Patch-             -tps@-c1-     -WAL@-c1-      -tps@-c2-      -
> WAL@-c2-
> > Head                831           4.17 GB        1416           7.13
> GB
> > WAL modification    846           2.36 GB        1712           3.31
> GB
> >
> > -Patch-             -tps@-c4-     -WAL@-c4-      -tps@-c8-      -
> WAL@-c8-
> > Head                2196          11.01 GB       2758           13.88
> GB
> > WAL modification    3295           5.87 GB       5472            9.02
> GB
> 
> And test results on normal pgbench?

As there was no gain for original pgbench as was shown in performance
readings, so I thought it is not mandatory.
However I shall run for normal pgbench as it should not lead any further dip
in normal pgbench.
Thanks for pointing.

With Regards,
Amit Kapila.






Re: Performance Improvement by reducing WAL for Update Operation

From
Amit Kapila
Date:
On Wednesday, January 09, 2013 4:57 PM Simon Riggs wrote:
> On 9 January 2013 08:05, Amit kapila <amit.kapila@huawei.com> wrote:
> 
> > Update patch contains handling of below Comments
> 
> Thanks
> 
> 
> > Test results with modified pgbench (1800 record size) on the latest
> patch:
> >
> > -Patch-             -tps@-c1-     -WAL@-c1-      -tps@-c2-      -
> WAL@-c2-
> > Head                831           4.17 GB        1416           7.13
> GB
> > WAL modification    846           2.36 GB        1712           3.31
> GB
> >
> > -Patch-             -tps@-c4-     -WAL@-c4-      -tps@-c8-      -
> WAL@-c8-
> > Head                2196          11.01 GB       2758           13.88
> GB
> > WAL modification    3295           5.87 GB       5472            9.02
> GB
> 
> And test results on normal pgbench?

configuration: 

shared_buffers = 4GB 
wal_buffers = 16MB 
checkpoint_segments = 256 
checkpoint_interval = 15min 
autovacuum = off 
server_encoding = SQL_ASCII 
client_encoding = UTF8 
lc_collate = C 
lc_ctype = C 


init: 

pgbench -s 75 -i -F 80 

run: 

pgbench -T 600 


Test results with original pgbench (synccommit off) on the latest patch: 


-Patch-             -tps@-c1-     -WAL@-c1-      -tps@-c2-      -WAL@-c2-
Head                1459          1.40 GB        2491           1.70 GB
WAL modification    1558          1.38 GB        2441           1.59 GB


-Patch-             -tps@-c4-     -WAL@-c4-      -tps@-c8-      -WAL@-c8-
Head                5139          2.49 GB        10651          4.72 GB
WAL modification    5224          2.28 GB        11329          3.96 GB 



Test results with original pgbench (synccommit on) on the latest patch: 


-Patch-             -tps@-c1-     -WAL@-c1-      -tps@-c2-      -WAL@-c2-
Head                146           0.45 GB        167            0.49 GB
WAL modification    144           0.44 GB        166            0.49 GB


-Patch-             -tps@-c4-     -WAL@-c4-      -tps@-c8-      -WAL@-c8-
Head                325           0.77 GB        603            1.03 GB
WAL modification    321           0.76 GB        604            1.01 GB



The results are similar as noted by Kyotaro-San. The WAL size is reduced
even for original pgbench.
There is slight performance dip in some of the cases for original pgbench.

With Regards,
Amit Kapila.




Re: Performance Improvement by reducing WAL for Update Operation

From
Simon Riggs
Date:
On 11 January 2013 10:40, Amit Kapila <amit.kapila@huawei.com> wrote:

> Test results with original pgbench (synccommit off) on the latest patch:
>
>
> -Patch-             -tps@-c1-     -WAL@-c1-      -tps@-c2-      -WAL@-c2-
> Head                1459          1.40 GB        2491           1.70 GB
> WAL modification    1558          1.38 GB        2441           1.59 GB
>
>
> -Patch-             -tps@-c4-     -WAL@-c4-      -tps@-c8-      -WAL@-c8-
> Head                5139          2.49 GB        10651          4.72 GB
> WAL modification    5224          2.28 GB        11329          3.96 GB

> There is slight performance dip in some of the cases for original pgbench.

Is this just one run? Can we see 3 runs please?

Can we investigate the performance dip at c=2?

-- Simon Riggs                   http://www.2ndQuadrant.com/PostgreSQL Development, 24x7 Support, Training & Services



Re: Performance Improvement by reducing WAL for Update Operation

From
Amit Kapila
Date:
On Friday, January 11, 2013 4:28 PM Simon Riggs wrote:
> On 11 January 2013 10:40, Amit Kapila <amit.kapila@huawei.com> wrote:
> 
> > Test results with original pgbench (synccommit off) on the latest
> patch:
> >
> >
> > -Patch-             -tps@-c1-     -WAL@-c1-      -tps@-c2-      -
> WAL@-c2-
> > Head                1459          1.40 GB        2491           1.70
> GB
> > WAL modification    1558          1.38 GB        2441           1.59
> GB
> >
> >
> > -Patch-             -tps@-c4-     -WAL@-c4-      -tps@-c8-      -
> WAL@-c8-
> > Head                5139          2.49 GB        10651          4.72
> GB
> > WAL modification    5224          2.28 GB        11329          3.96
> GB
> 
> > There is slight performance dip in some of the cases for original
> pgbench.
> 
> Is this just one run? Can we see 3 runs please?
 This average of 3 runs.
-Patch-               -tps@-c1-     -WAL@-c1-      -tps@-c2-      -WAL@-c2- Head-1                 1648          1.47
GB       2491           1.69 GB Head-2                 1538          1.43 GB        2529           1.72 GB Head-3
         1192          1.31 GB        2453           1.70 GB
 
 AvgHead                1459          1.40 GB        2491           1.70 GB
 WAL modification-1      1618          1.40 GB        2351           1.56
GB WAL modification-2      1623          1.40 GB        2411           1.59
GB WAL modification-3      1435          1.34 GB        2562           1.61
GB
 WAL modification-Avg    1558          1.38 GB        2441           1.59
GB


-Patch-               -tps@-c4-     -WAL@-c4-      -tps@-c8-      -WAL@-c8- Head-1                 5285          2.53
GB       11858           5.43
 
GB Head-2                 5105          2.47 GB        10724           4.98
GB Head-3                 5029          2.46 GB        9372            3.75
GB
 AvgHead                5139          2.49 GB        10651           4.72
GB
 WAL modification-1      5117          2.26 GB        12092           4.42
GB WAL modification-2      5142          2.26 GB        9965            3.48
GB WAL modification-3      5413          2.33 GB        11930           3.99
GB
 WAL modification-Avg    5224          2.28 GB        11329           3.96
GB 


> Can we investigate the performance dip at c=2? Please consider following points for this dip: 1. For synchronous
commit= off, there is always slight variation in data. 2. The size of WAL is reduced. 3. For small rows (128 bytes),
sometimesthe performance difference
 
created by this algorithm doesn't help much,     as the size is not reduced significantly and there is equivalent
overhead for delta compression.     We can put check that this optimization should be applied if row length
is greater than some     threshold(128 bytes, 200 bytes), but I feel as performance dip is not
much and WAL reduction gain is also      there, so it should be okay without any check as well.

With Regards,
Amit Kapila.




Re: Performance Improvement by reducing WAL for Update Operation

From
Simon Riggs
Date:
On 11 January 2013 12:30, Amit Kapila <amit.kapila@huawei.com> wrote:

>> Is this just one run? Can we see 3 runs please?
>
>   This average of 3 runs.

The results are so variable its almost impossible to draw any
conclusions at all. I think if we did harder stats on those we'd get
nothing.

Can you do something to bring that in? Or just do more tests to get a
better view?


>  -Patch-               -tps@-c1-     -WAL@-c1-      -tps@-c2-      -WAL@-c2-
>   Head-1                 1648          1.47 GB        2491           1.69 GB
>   Head-2                 1538          1.43 GB        2529           1.72 GB
>   Head-3                 1192          1.31 GB        2453           1.70 GB
>
>   AvgHead                1459          1.40 GB        2491           1.70 GB
>
>   WAL modification-1      1618          1.40 GB        2351           1.56
> GB
>   WAL modification-2      1623          1.40 GB        2411           1.59
> GB
>   WAL modification-3      1435          1.34 GB        2562           1.61
> GB
>
>   WAL modification-Avg    1558          1.38 GB        2441           1.59
> GB
>
>
> -Patch-               -tps@-c4-     -WAL@-c4-      -tps@-c8-      -WAL@-c8-
>   Head-1                 5285          2.53 GB        11858           5.43
> GB
>   Head-2                 5105          2.47 GB        10724           4.98
> GB
>   Head-3                 5029          2.46 GB        9372            3.75
> GB
>
>   AvgHead                5139          2.49 GB        10651           4.72
> GB
>
>   WAL modification-1      5117          2.26 GB        12092           4.42
> GB
>   WAL modification-2      5142          2.26 GB        9965            3.48
> GB
>   WAL modification-3      5413          2.33 GB        11930           3.99
> GB
>
>   WAL modification-Avg    5224          2.28 GB        11329           3.96
> GB
>
>
>> Can we investigate the performance dip at c=2?
>   Please consider following points for this dip:
>   1. For synchronous commit = off, there is always slight variation in data.
>   2. The size of WAL is reduced.
>   3. For small rows (128 bytes), sometimes the performance difference
> created by this algorithm doesn't help much,
>      as the size is not reduced significantly and there is equivalent
> overhead for delta compression.
>      We can put check that this optimization should be applied if row length
> is greater than some
>      threshold(128 bytes, 200 bytes), but I feel as performance dip is not
> much and WAL reduction gain is also
>      there, so it should be okay without any check as well.
>
> With Regards,
> Amit Kapila.
>



-- Simon Riggs                   http://www.2ndQuadrant.com/PostgreSQL Development, 24x7 Support, Training & Services



Re: Performance Improvement by reducing WAL for Update Operation

From
Simon Riggs
Date:
On 28 December 2012 10:21, Simon Riggs <simon@2ndquadrant.com> wrote:

> * There is a fixed 75% heuristic in the patch.

I'm concerned that we're doing extra work while holding the buffer
locked, which will exacerbate any block contention that exists.

We have a list of the columns that the UPDATE is touching since we use
that to check column permissions for the UPDATE. Which means we should
be able to use that list to check only the columns actually changing
in this UPDATE statement.

That will likely save us some time during the compression check.

Can you look into that please? I don't think it will be much work.

I've moved this to the next CF. I'm planning to review this one first.

-- Simon Riggs                   http://www.2ndQuadrant.com/PostgreSQL Development, 24x7 Support, Training & Services



Re: Performance Improvement by reducing WAL for Update Operation

From
Amit Kapila
Date:
On Friday, January 11, 2013 6:18 PM Simon Riggs wrote:
> On 11 January 2013 12:30, Amit Kapila <amit.kapila@huawei.com> wrote:
> 
> >> Is this just one run? Can we see 3 runs please?
> >
> >   This average of 3 runs.
> 
> The results are so variable its almost impossible to draw any
> conclusions at all. I think if we did harder stats on those we'd get
> nothing.
> 
> Can you do something to bring that in? Or just do more tests to get a
> better view?

To be honest, I have tried this set of 3 readings 2 times and there is
similar fluctuation for sync commit =off
What I can do is early next week, 
a. I can run this test for 10 times to see the results.
b. run the tests for record length-256 instead of 128

However I think my results of sync commit = on is matching with Kyotaro-San.

Please suggest if you have anything in mind?

This is for sync mode= off, if see the result on sync mode= on, it is
comparatively consistent. 
I think for sync commit = off, there is always fluctuation in results. 
The sync mode= on, results are as below:
-Patch-             -tps@-c1-     -WAL@-c1-      -tps@-c2-      -WAL@-c2- Head-1              149          0.46 GB
 160           0.48
 
GB Head-2              145          0.45 GB        180           0.52
GB Head-3              144          0.45 GB        161           0.48
GB
 WAL modification-1    142          0.44 GB        161           0.48 GB WAL modification-2    146          1.45 GB
  162           0.48 GB WAL modification-3    144          1.44 GB        175           0.51 GB
 
-Patch-             -tps@-c4-     -WAL@-c4-      -tps@-c8-      -WAL@-c8- Head-1              325          0.77 GB
 602           1.03
 
GB Head-2              328          0.77 GB        606           1.03
GB Head-3              323          0.77 GB        603           1.03
GB
 WAL modification-1    324          0.76 GB        604           1.01 GB WAL modification-2    322          0.76 GB
  604           1.01 GB WAL modification-3    317          0.75 GB        604           1.01 GB
 
> >
> >
> >> Can we investigate the performance dip at c=2?
> >   Please consider following points for this dip:
> >   1. For synchronous commit = off, there is always slight variation
> in data.
> >   2. The size of WAL is reduced.
> >   3. For small rows (128 bytes), sometimes the performance difference
> > created by this algorithm doesn't help much,
> >      as the size is not reduced significantly and there is equivalent
> > overhead for delta compression.
> >      We can put check that this optimization should be applied if row
> length
> > is greater than some
> >      threshold(128 bytes, 200 bytes), but I feel as performance dip
> is not
> > much and WAL reduction gain is also
> >      there, so it should be okay without any check as well.
> >
> > With Regards,
> > Amit Kapila.
> >

With Regards,
Amit Kapila.




Re: Performance Improvement by reducing WAL for Update Operation

From
Amit Kapila
Date:
On Friday, January 11, 2013 6:45 PM Simon Riggs wrote:
> On 28 December 2012 10:21, Simon Riggs <simon@2ndquadrant.com> wrote:
> 
> > * There is a fixed 75% heuristic in the patch.
> 
> I'm concerned that we're doing extra work while holding the buffer
> locked, which will exacerbate any block contention that exists.
> 
> We have a list of the columns that the UPDATE is touching since we use
> that to check column permissions for the UPDATE. Which means we should
> be able to use that list to check only the columns actually changing
> in this UPDATE statement.
> 
> That will likely save us some time during the compression check.
> 
> Can you look into that please? I don't think it will be much work.

IIUC, I have done that way in the initial version of the patch that is do
encoding for modified columns.
I have mentioned reference of my initial patch as below:

modifiedCols = (rt_fetch(resultRelInfo->ri_RangeTableIndex, 
+
estate->es_range_table)->modifiedCols); 

http://archives.postgresql.org/message-id/6C0B27F7206C9E4CA54AE035729E9C3828
52DE51@szxeml509-mbs

1. However Heikki has pointed, it has some problems similar to for HOT
implementation and that is the reason we have done memcmp for HOT.
2. Also we have found in initial readings that this doesn't have any
performance difference as compare to current Approach.
> I've moved this to the next CF. I'm planning to review this one first.

Thank you.

With Regards,
Amit Kapila.




Re: Performance Improvement by reducing WAL for Update Operation

From
Alvaro Herrera
Date:
Simon Riggs wrote:
> On 28 December 2012 10:21, Simon Riggs <simon@2ndquadrant.com> wrote:
>
> > * There is a fixed 75% heuristic in the patch.
>
> I'm concerned that we're doing extra work while holding the buffer
> locked, which will exacerbate any block contention that exists.
>
> We have a list of the columns that the UPDATE is touching since we use
> that to check column permissions for the UPDATE. Which means we should
> be able to use that list to check only the columns actually changing
> in this UPDATE statement.

But that doesn't include columns changed by triggers, AFAIR, so you
could only use that if there weren't any triggers.

I was also worried about the high variance in the results.  Those
averages look rather meaningless.  Which would be okay, I think, because
it'd mean that performance-wise the patch is a wash, but it is still
achieving a lower WAL volume, which is good.

--
Álvaro Herrera                http://www.2ndQuadrant.com/
PostgreSQL Development, 24x7 Support, Training & Services



Re: Performance Improvement by reducing WAL for Update Operation

From
Simon Riggs
Date:
On 11 January 2013 14:29, Alvaro Herrera <alvherre@2ndquadrant.com> wrote:

> But that doesn't include columns changed by triggers, AFAIR, so you
> could only use that if there weren't any triggers.

True, well spotted

-- Simon Riggs                   http://www.2ndQuadrant.com/PostgreSQL Development, 24x7 Support, Training & Services



Re: Performance Improvement by reducing WAL for Update Operation

From
Simon Riggs
Date:
On 11 January 2013 14:24, Amit Kapila <amit.kapila@huawei.com> wrote:

> http://archives.postgresql.org/message-id/6C0B27F7206C9E4CA54AE035729E9C3828
> 52DE51@szxeml509-mbs
>
> 1. However Heikki has pointed, it has some problems similar to for HOT
> implementation and that is the reason we have done memcmp for HOT.
> 2. Also we have found in initial readings that this doesn't have any
> performance difference as compare to current Approach.

OK, forget that idea.

>> I've moved this to the next CF. I'm planning to review this one first.
>
> Thank you.

Just reviewing the patch now, making more sense with comments added.

In heap_delta_encode() do we store which columns have changed? Do we
store the whole new column value?

-- Simon Riggs                   http://www.2ndQuadrant.com/PostgreSQL Development, 24x7 Support, Training & Services



Re: Performance Improvement by reducing WAL for Update Operation

From
Amit kapila
Date:
On Friday, January 11, 2013 9:27 PM Simon Riggs wrote:
On 11 January 2013 14:24, Amit Kapila <amit.kapila@huawei.com> wrote:

>> http://archives.postgresql.org/message-id/6C0B27F7206C9E4CA54AE035729E9C3828
>> 52DE51@szxeml509-mbs
>
>> 1. However Heikki has pointed, it has some problems similar to for HOT
>> implementation and that is the reason we have done memcmp for HOT.
>> 2. Also we have found in initial readings that this doesn't have any
>> performance difference as compare to current Approach.

>OK, forget that idea.

>>> I've moved this to the next CF. I'm planning to review this one first.
>
>> Thank you.

> Just reviewing the patch now, making more sense with comments added.

>In heap_delta_encode() do we store which columns have changed?

Not the attribute bumberwise, but offsetwise it is stored.

> Do we store the whole new column value?

Yes, please refer else part of code

+         else
+         {
+             data_len = new_tup_off - change_off;
+             if ((bp + (2 * data_len)) - bstart >= result_max)
+                 return false;
+
+             /* Copy the modified column data to the output buffer if present */
+             pglz_out_add(ctrlp, ctrlb, ctrl, bp, data_len, dp);
+

With Regards,
Amit Kapila.


Re: Performance Improvement by reducing WAL for Update Operation

From
Amit kapila
Date:
On Friday, January 11, 2013 7:59 PM Alvaro Herrera wrote:
Simon Riggs wrote:
> On 28 December 2012 10:21, Simon Riggs <simon@2ndquadrant.com> wrote:
>

> I was also worried about the high variance in the results.  Those
> averages look rather meaningless.  Which would be okay, I think, because
> it'd mean that performance-wise the patch is a wash,

For larger tuple sizes (>1000 && < 1800), the performance gain will be good.
Please refer performance results by me and Kyotaro-san in below links:

http://archives.postgresql.org/message-id/6C0B27F7206C9E4CA54AE035729E9C383BEAAE32@szxeml509-mbx
http://archives.postgresql.org/message-id/20121228.170748.90887322.horiguchi.kyotaro@lab.ntt.co.jp

In fact, I believe for all tuples with length between 200 to 1800 bytes and changed values around 15~20%, there will be
bothperformance gain as well as WAL reduction. 
The reason for keeping the logic same for smaller tuples (<=128 bytes) also same, that there is no much performance
differencebut still WAL reduction gain is visible. 

> but it is still achieving a lower WAL volume, which is good.

With Regards,
Amit Kapila.


Re: Performance Improvement by reducing WAL for Update Operation

From
Simon Riggs
Date:
On 11 January 2013 17:08, Amit kapila <amit.kapila@huawei.com> wrote:

>> Just reviewing the patch now, making more sense with comments added.
>
>>In heap_delta_encode() do we store which columns have changed?
>
> Not the attribute bumberwise, but offsetwise it is stored.

(Does that mean "numberwise"??)

Can we identify which columns have changed? i.e. 1st, 3rd and 12th columns?


>> Do we store the whole new column value?
>
> Yes, please refer else part of code
>
> +               else
> +               {
> +                       data_len = new_tup_off - change_off;
> +                       if ((bp + (2 * data_len)) - bstart >= result_max)
> +                               return false;
> +
> +                       /* Copy the modified column data to the output buffer if present */
> +                       pglz_out_add(ctrlp, ctrlb, ctrl, bp, data_len, dp);
> +
>

"modified column data" could mean either 1) (modified column) data
i.e. the data for the modified column, or 2) modified (column data)
i.e. the modified data in the column. I read that as (2) and didn't
look at the code. ;-)

Happy now that I know its (1)

-- Simon Riggs                   http://www.2ndQuadrant.com/PostgreSQL Development, 24x7 Support, Training & Services



Re: Performance Improvement by reducing WAL for Update Operation

From
Simon Riggs
Date:
On 11 January 2013 17:30, Amit kapila <amit.kapila@huawei.com> wrote:
> On Friday, January 11, 2013 7:59 PM Alvaro Herrera wrote:
> Simon Riggs wrote:
>> On 28 December 2012 10:21, Simon Riggs <simon@2ndquadrant.com> wrote:
>>
>
>> I was also worried about the high variance in the results.  Those
>> averages look rather meaningless.  Which would be okay, I think, because
>> it'd mean that performance-wise the patch is a wash,
>
> For larger tuple sizes (>1000 && < 1800), the performance gain will be good.
> Please refer performance results by me and Kyotaro-san in below links:
>
> http://archives.postgresql.org/message-id/6C0B27F7206C9E4CA54AE035729E9C383BEAAE32@szxeml509-mbx
> http://archives.postgresql.org/message-id/20121228.170748.90887322.horiguchi.kyotaro@lab.ntt.co.jp

AFAICS your tests are badly variable, but as Alvaro says, they aren't
accurate enough to tell there's a regression.

I'll assume not and carry on.

(BTW the rejection of the null bitmap patch because of a performance
regression may also need to be reconsidered).

-- Simon Riggs                   http://www.2ndQuadrant.com/PostgreSQL Development, 24x7 Support, Training & Services



Re: Performance Improvement by reducing WAL for Update Operation

From
Amit kapila
Date:
On Friday, January 11, 2013 11:09 PM Simon Riggs wrote:
On 11 January 2013 17:08, Amit kapila <amit.kapila@huawei.com> wrote:

>>> Just reviewing the patch now, making more sense with comments added.
>
>>>In heap_delta_encode() do we store which columns have changed?
>
>> Not the attribute bumberwise, but offsetwise it is stored.

> (Does that mean "numberwise"??)  Yes.

> Can we identify which columns have changed? i.e. 1st, 3rd and 12th columns? As per current algorithm, we can't as it
isbased on offsets. What I mean to say is that the basic idea to reconstruct tuple during recovery  is copy data from
oldtuple offset-wise (offsets stored in encoded tuple) and use new data (modified column data) from encoded tuple
directly.So we don't need exact column numbers. 

With Regards,
Amit Kapila.


Re: Performance Improvement by reducing WAL for Update Operation

From
Amit kapila
Date:
On Friday, January 11, 2013 11:12 PM Simon Riggs wrote:
On 11 January 2013 17:30, Amit kapila <amit.kapila@huawei.com> wrote:
> On Friday, January 11, 2013 7:59 PM Alvaro Herrera wrote:
> Simon Riggs wrote:
>> On 28 December 2012 10:21, Simon Riggs <simon@2ndquadrant.com> wrote:
>>
>
>>> I was also worried about the high variance in the results.  Those
>>> averages look rather meaningless.  Which would be okay, I think, because
>>> it'd mean that performance-wise the patch is a wash,
>
>> For larger tuple sizes (>1000 && < 1800), the performance gain will be good.
>> Please refer performance results by me and Kyotaro-san in below links:
>
>> http://archives.postgresql.org/message-id/6C0B27F7206C9E4CA54AE035729E9C383BEAAE32@szxeml509-mbx
>> http://archives.postgresql.org/message-id/20121228.170748.90887322.horiguchi.kyotaro@lab.ntt.co.jp

>AFAICS your tests are badly variable, but as Alvaro says, they aren't
>accurate enough to tell there's a regression.

>I'll assume not and carry on.

> (BTW the rejection of the null bitmap patch because of a performance
> regression may also need to be reconsidered).
 I can post detailed numbers during next commit fest.

With Regards,
Amit Kapila.


Re: Performance Improvement by reducing WAL for Update Operation

From
Simon Riggs
Date:
On 11 January 2013 18:11, Amit kapila <amit.kapila@huawei.com> wrote:

>> Can we identify which columns have changed? i.e. 1st, 3rd and 12th columns?
>   As per current algorithm, we can't as it is based on offsets.
>   What I mean to say is that the basic idea to reconstruct tuple during recovery
>   is copy data from old tuple offset-wise (offsets stored in encoded tuple) and use new data (modified column data)
>   from encoded tuple directly. So we don't need exact column numbers.

Another patch is going through next CF related to reassembling changes
from WAL records.

To do that efficiently, we would want to store a bitmap showing which
columns had changed in each update. Would that be an easy addition, or
is that blocked by some aspect of the current design?

The idea would be that we could re-construct an UPDATE statement that
would perform exactly the same change, yet without needing to refer to
a base tuple.

-- Simon Riggs                   http://www.2ndQuadrant.com/PostgreSQL Development, 24x7 Support, Training & Services



Re: Performance Improvement by reducing WAL for Update Operation

From
Amit kapila
Date:
On Saturday, January 12, 2013 12:23 AM Simon Riggs wrote:
On 11 January 2013 18:11, Amit kapila <amit.kapila@huawei.com> wrote:

>>> Can we identify which columns have changed? i.e. 1st, 3rd and 12th columns?
>>   As per current algorithm, we can't as it is based on offsets.
>>   What I mean to say is that the basic idea to reconstruct tuple during recovery
>>   is copy data from old tuple offset-wise (offsets stored in encoded tuple) and use new data (modified column data)
>>   from encoded tuple directly. So we don't need exact column numbers.

> Another patch is going through next CF related to reassembling changes
> from WAL records.

> To do that efficiently, we would want to store a bitmap showing which
> columns had changed in each update. Would that be an easy addition, or
> is that blocked by some aspect of the current design?
 I don't think it should be a problem, as it can go in current way of WAL tuple construction as  we do in this patch
whenold and new buf are different. This differentiation is done in  log_heap_update. 
 IMO, for now we can avoid this optimization (way we have done incase updated tuple is not on same page)  for the
bitmapstoring patch and later we can evaluate if we can do this optimization for  the feature of that patch.  

> The idea would be that we could re-construct an UPDATE statement that
> would perform exactly the same change, yet without needing to refer to
> a base tuple.
 I understood, that such a functionality would be needed by logical replication.


With Regards,
Amit Kapila.


Re: Performance Improvement by reducing WAL for Update Operation

From
Simon Riggs
Date:
On 12 January 2013 03:50, Amit kapila <amit.kapila@huawei.com> wrote:
> On Saturday, January 12, 2013 12:23 AM Simon Riggs wrote:
> On 11 January 2013 18:11, Amit kapila <amit.kapila@huawei.com> wrote:
>
>>>> Can we identify which columns have changed? i.e. 1st, 3rd and 12th columns?
>>>   As per current algorithm, we can't as it is based on offsets.
>>>   What I mean to say is that the basic idea to reconstruct tuple during recovery
>>>   is copy data from old tuple offset-wise (offsets stored in encoded tuple) and use new data (modified column
data)
>>>   from encoded tuple directly. So we don't need exact column numbers.
>
>> Another patch is going through next CF related to reassembling changes
>> from WAL records.
>
>> To do that efficiently, we would want to store a bitmap showing which
>> columns had changed in each update. Would that be an easy addition, or
>> is that blocked by some aspect of the current design?
>
>   I don't think it should be a problem, as it can go in current way of WAL tuple construction as
>   we do in this patch when old and new buf are different. This differentiation is done in
>   log_heap_update.
>
>   IMO, for now we can avoid this optimization (way we have done incase updated tuple is not on same page)
>   for the bitmap storing patch and later we can evaluate if we can do this optimization for
>   the feature of that patch.

Yes, we can simply disable this feature. But that is just bad planning
and we should give some thought to having new features play nicely
together.

I would like to work out how to modify this so it can work with wal
decoding enabled. I know we can do this, I want to look at how,
because we know we're going to do it.

>> The idea would be that we could re-construct an UPDATE statement that
>> would perform exactly the same change, yet without needing to refer to
>> a base tuple.
>
>   I understood, that such a functionality would be needed by logical replication.

Yes, though the features being added are to allow decoding of WAL for
any purpose.

-- Simon Riggs                   http://www.2ndQuadrant.com/PostgreSQL Development, 24x7 Support, Training & Services



Re: Performance Improvement by reducing WAL for Update Operation

From
Simon Riggs
Date:
On 11 January 2013 15:57, Simon Riggs <simon@2ndquadrant.com> wrote:

>>> I've moved this to the next CF. I'm planning to review this one first.
>>
>> Thank you.
>
> Just reviewing the patch now, making more sense with comments added.

Making more sense, but not yet making complete sense.

I'd like you to revisit the patch comments since some of them are
completely unreadable.

Examples

"Frames the original tuple which needs to be inserted into the heap by
decoding the WAL tuplewith the help of old Heap tuple."
"The delta tuples for update WAL is to eliminate copying the entire
the new record to WAL for the update operation."

I don't mind rewording the odd line here and there, that's just normal
editing, but this needs extensive work in terms of number of places
requiring change and the level of change at each place. That's not
easy for me to do when I'm trying to understand the patch in the first
place. My own written English isn't that great, so please read some of
the other comments in other parts of the code so you can see the level
of clarity that's needed in PostgreSQL.

Copying chunks of text from other comments doesn't help much either,
especially when you miss out parts of the explanation. You refer to a
"history tag" but don't define it that well, and don't explain why it
might sometimes be 3 bytes, or what that means. pg_lzcompress doesn't
call it that either, which is confusing. If you use a concept from
elsewhere you should either use the same name, or if you rename it,
rename it in both places.

/** Do only the delta encode when the update is going to the same page and* buffer doesn't need a backup block in case
offull-pagewrite is on.*/
 
if ((oldbuf == newbuf) && !XLogCheckBufferNeedsBackup(newbuf))

The comment above says nothing. I can see that oldbuf and newbuf must
be the same and the call to XLogCheckBufferNeedsBackup is clear
because the function is already well named.

What I'd expect to see here is a discussion of why this test is being
applied and maybe why it is applied here. Such an important test
deserves a long discussion, perhaps 10-20 lines of comment.

Thanks

-- Simon Riggs                   http://www.2ndQuadrant.com/PostgreSQL Development, 24x7 Support, Training & Services



Re: Performance Improvement by reducing WAL for Update Operation

From
Amit kapila
Date:
On Saturday, January 12, 2013 3:45 PM Simon Riggs wrote:
On 12 January 2013 03:50, Amit kapila <amit.kapila@huawei.com> wrote:
> On Saturday, January 12, 2013 12:23 AM Simon Riggs wrote:
> On 11 January 2013 18:11, Amit kapila <amit.kapila@huawei.com> wrote:
>
>>>>> Can we identify which columns have changed? i.e. 1st, 3rd and 12th columns?
>>>>   As per current algorithm, we can't as it is based on offsets.
>>>>   What I mean to say is that the basic idea to reconstruct tuple during recovery
>>>>   is copy data from old tuple offset-wise (offsets stored in encoded tuple) and use new data (modified column
data)
>>>>   from encoded tuple directly. So we don't need exact column numbers.
>
>>> Another patch is going through next CF related to reassembling changes
>>> from WAL records.
>
>>> To do that efficiently, we would want to store a bitmap showing which
>>> columns had changed in each update. Would that be an easy addition, or
>>> is that blocked by some aspect of the current design?
>
>>   I don't think it should be a problem, as it can go in current way of WAL tuple construction as
>>   we do in this patch when old and new buf are different. This differentiation is done in
>>   log_heap_update.
>
>>   IMO, for now we can avoid this optimization (way we have done incase updated tuple is not on same page)
>>   for the bitmap storing patch and later we can evaluate if we can do this optimization for
>>   the feature of that patch.

> Yes, we can simply disable this feature. But that is just bad planning
> and we should give some thought to having new features play nicely
> together.

> I would like to work out how to modify this so it can work with wal
> decoding enabled. I know we can do this, I want to look at how,
> because we know we're going to do it.
 I am sure this can be done, as for WAL decoding we mainly new values and column numbers So if we include bitmap in WAL
tupleand teach WAL decoding method how to decode this new format WAL tuple it can be done. However it will need changes
inalgorithm for both the patches and it can be risk for one or for both patches. I am open to have discussion about how
bothcan work together, but IMHO at this moment (as this will be last CF) it will be little risky. If there is some way
suchthat with minor modifications, we can address this scenario, I will be happy to see both working together. 

With Regards,
Amit Kapila.


Re: Performance Improvement by reducing WAL for Update Operation

From
Amit kapila
Date:
On Saturday, January 12, 2013 4:36 PM Simon Riggs wrote:
On 11 January 2013 15:57, Simon Riggs <simon@2ndquadrant.com> wrote:

>>>> I've moved this to the next CF. I'm planning to review this one first.
>>
>>> Thank you.
>
>> Just reviewing the patch now, making more sense with comments added.

> Making more sense, but not yet making complete sense.

> I'd like you to revisit the patch comments since some of them are
> completely unreadable.
 I will once again review all the comments and make them more meaningful.

With Regards,
Amit Kapila.