/*-------------------------------------------------------------------------
 *
 * bitmapxlog.c
 *	WAL replay logic for the bitmap index.
 *
 * Copyright (c) 2006-2008, PostgreSQL Global Development Group
 * 
 * IDENTIFICATION
 *	$PostgreSQL$
 *
 *-------------------------------------------------------------------------
 */
#include "postgres.h"

#include <unistd.h>

#include "access/bitmap.h"
#include "access/xlogutils.h"
#include "utils/guc.h"

static void forget_incomplete_insert_bitmapwords(RelFileNode node,
									 xl_bm_bitmapwords* newWords);
/*
 * We must keep track of expected insertion of bitmap words when these
 * bitmap words are inserted into multiple bitmap pages. We need to manually
 * insert these words if they are not seen in the WAL log during replay.
 * This makes it safe for page insertion to be a multiple-WAL-action process.
 */
typedef xl_bm_bitmapwords bm_incomplete_action;

static List *incomplete_actions;

static void
log_incomplete_insert_bitmapwords(RelFileNode node,
								  xl_bm_bitmapwords* newWords)
{
	int					lastTids_size;
	int					cwords_size;
	int					hwords_size;
	int					total_size;
	bm_incomplete_action *action;

	/* Delete the previous entry */
	forget_incomplete_insert_bitmapwords(node, newWords);	

	lastTids_size = newWords->bm_num_cwords * sizeof(uint64);
	cwords_size = newWords->bm_num_cwords * sizeof(BM_HRL_WORD);
	hwords_size = (BM_CALC_H_WORDS(newWords->bm_num_cwords)) *
		sizeof(BM_HRL_WORD);
	total_size = MAXALIGN(sizeof(bm_incomplete_action)) + MAXALIGN(lastTids_size) +
		MAXALIGN(cwords_size) + MAXALIGN(hwords_size);

	action = palloc0(total_size);
	memcpy(action, newWords, total_size);

	/* Reset the following fields */
	action->bm_blkno = newWords->bm_next_blkno;
	action->bm_next_blkno = InvalidBlockNumber;
	action->bm_start_wordno =
		newWords->bm_start_wordno + newWords->bm_words_written;
	action->bm_words_written = 0;

	incomplete_actions = lappend(incomplete_actions, action);
}

static void
forget_incomplete_insert_bitmapwords(RelFileNode node,
									 xl_bm_bitmapwords* newWords)
{
	ListCell* l;

	foreach (l, incomplete_actions)
	{
		bm_incomplete_action *action = (bm_incomplete_action *) lfirst(l);

		if (RelFileNodeEquals(node, action->bm_node) &&
			(action->bm_lov_blkno == newWords->bm_lov_blkno &&
			 action->bm_lov_offset == newWords->bm_lov_offset &&
			 action->bm_last_setbit == newWords->bm_last_setbit) &&
			!action->bm_is_last)
		{
			Assert(action->bm_blkno == newWords->bm_blkno);

			incomplete_actions = list_delete_ptr(incomplete_actions, action);
			pfree(action);
			break;
		}		
	}
}

/*
 * _bitmap_xlog_newpage() -- create a new page.
 */
static void
_bitmap_xlog_newpage(XLogRecPtr lsn, XLogRecord *record)
{
	MIRROREDLOCK_BUFMGR_DECLARE;

	xl_bm_newpage	*xlrec = (xl_bm_newpage *) XLogRecGetData(record);

	Relation		reln;
	Page			page;
	uint8			info;
	Buffer		buffer;

	info = record->xl_info & ~XLR_INFO_MASK;

	reln = XLogOpenRelation(xlrec->bm_node);
	if (!RelationIsValid(reln))
		return;

	// -------- MirroredLock ----------
	MIRROREDLOCK_BUFMGR_LOCK;

	buffer = XLogReadBuffer(reln, xlrec->bm_new_blkno, true);
	Assert(BufferIsValid(buffer));

	page = BufferGetPage(buffer);
	Assert(PageIsNew(page));

	REDO_PRINT_LSN_APPLICATION(reln, xlrec->bm_new_blkno, page, lsn);
	if (XLByteLT(PageGetLSN(page), lsn))
	{
		switch (info)
		{
			case XLOG_BITMAP_INSERT_NEWLOV:
				_bitmap_init_lovpage(reln, buffer);
				break;
			default:
				elog(PANIC, "_bitmap_xlog_newpage: unknown newpage op code %u",
					 info);
		}

		PageSetLSN(page, lsn);
		PageSetTLI(page, ThisTimeLineID);
		_bitmap_wrtbuf(buffer);
	}
	else
		_bitmap_relbuf(buffer);
	
	MIRROREDLOCK_BUFMGR_UNLOCK;
	// -------- MirroredLock ----------
	
}

/*
 * _bitmap_xlog_insert_lovitem() -- insert a new lov item.
 */
static void
_bitmap_xlog_insert_lovitem(XLogRecPtr lsn, XLogRecord *record)
{
	MIRROREDLOCK_BUFMGR_DECLARE;

	xl_bm_lovitem	*xlrec = (xl_bm_lovitem *) XLogRecGetData(record);
	Relation reln;
	Buffer			lovBuffer;
	Page			lovPage;

	reln = XLogOpenRelation(xlrec->bm_node);
	if (!RelationIsValid(reln))
		return;

	// -------- MirroredLock ----------
	MIRROREDLOCK_BUFMGR_LOCK;

	if (xlrec->bm_is_new_lov_blkno)
	{
		lovBuffer = XLogReadBuffer(reln, xlrec->bm_lov_blkno, true);
		Assert(BufferIsValid(lovBuffer));
	}
	else
	{
		lovBuffer = XLogReadBuffer(reln, xlrec->bm_lov_blkno, false);
		REDO_PRINT_READ_BUFFER_NOT_FOUND(reln, xlrec->bm_lov_blkno, lovBuffer, lsn);
		if (!BufferIsValid(lovBuffer))
		{
			MIRROREDLOCK_BUFMGR_UNLOCK;
			// -------- MirroredLock ----------
			
			return;
		}
	}

	lovPage = BufferGetPage(lovBuffer);

	if (PageIsNew(lovPage))
		_bitmap_init_lovpage(reln, lovBuffer);

	elog(DEBUG1, "In redo, processing a lovItem: (blockno, offset)=(%d,%d)",
		 xlrec->bm_lov_blkno, xlrec->bm_lov_offset);

	REDO_PRINT_LSN_APPLICATION(reln, xlrec->bm_lov_blkno, lovPage, lsn);
	if (XLByteLT(PageGetLSN(lovPage), lsn))
	{
		OffsetNumber	newOffset, itemSize;

		newOffset = OffsetNumberNext(PageGetMaxOffsetNumber(lovPage));
		if (newOffset > xlrec->bm_lov_offset)
			elog(PANIC, "_bitmap_xlog_insert_lovitem: LOV item is not inserted "
						"in pos %d (requested %d)",
				 newOffset, xlrec->bm_lov_offset);

		/*
		 * The value newOffset could be smaller than xlrec->bm_lov_offset because
		 * of aborted transactions.
		 */
		if (newOffset < xlrec->bm_lov_offset)
		{
			_bitmap_relbuf(lovBuffer);

			MIRROREDLOCK_BUFMGR_UNLOCK;
			// -------- MirroredLock ----------
			
			return;
		}

		itemSize = sizeof(BMLOVItemData);
		if (itemSize > PageGetFreeSpace(lovPage))
			elog(PANIC, 
				 "_bitmap_xlog_insert_lovitem: not enough space in LOV page %d",
				 xlrec->bm_lov_blkno);
		
		if (PageAddItem(lovPage, (Item)&(xlrec->bm_lovItem), itemSize, 
						newOffset, LP_USED) == InvalidOffsetNumber)
			ereport(ERROR,
					(errcode(ERRCODE_INTERNAL_ERROR),
					errmsg("_bitmap_xlog_insert_lovitem: failed to add LOV "
						   "item to \"%s\"",
					RelationGetRelationName(reln))));

		PageSetLSN(lovPage, lsn);
		PageSetTLI(lovPage, ThisTimeLineID);

		_bitmap_wrtbuf(lovBuffer);
	}
	else
		_bitmap_relbuf(lovBuffer);
 
 	/* Update the meta page when needed */
 	if (xlrec->bm_is_new_lov_blkno)
 	{
 		Buffer metabuf = XLogReadBuffer(reln, BM_METAPAGE, false);
 		BMMetaPage metapage;
		REDO_PRINT_READ_BUFFER_NOT_FOUND(reln, BM_METAPAGE, metabuf, lsn);
		if (!BufferIsValid(metabuf))
		{
			MIRROREDLOCK_BUFMGR_UNLOCK;
			// -------- MirroredLock ----------
			
 			return;
		}
		
 		metapage = (BMMetaPage)
 			PageGetContents(BufferGetPage(metabuf));
 		
 		if (XLByteLT(PageGetLSN(BufferGetPage(metabuf)), lsn))
 		{
 			metapage->bm_lov_lastpage = xlrec->bm_lov_blkno;
 			
 			PageSetLSN(BufferGetPage(metabuf), lsn);
 			PageSetTLI(BufferGetPage(metabuf), ThisTimeLineID);

 			_bitmap_wrtbuf(metabuf);
 		}
 		else
 		{
 			_bitmap_relbuf(metabuf);
 		}
 	}
	
	MIRROREDLOCK_BUFMGR_UNLOCK;
	// -------- MirroredLock ----------
	
}

/*
 * _bitmap_xlog_insert_meta() -- update a metapage.
 */
static void
_bitmap_xlog_insert_meta(XLogRecPtr lsn, XLogRecord *record)
{
	MIRROREDLOCK_BUFMGR_DECLARE;

	xl_bm_metapage	*xlrec = (xl_bm_metapage *) XLogRecGetData(record);
	Relation		reln;
	Buffer			metabuf;
	Page			mp;
	BMMetaPage		metapage;

	reln = XLogOpenRelation(xlrec->bm_node);
	if (!RelationIsValid(reln))
		return;

	// -------- MirroredLock ----------
	MIRROREDLOCK_BUFMGR_LOCK;

	metabuf = XLogReadBuffer(reln, BM_METAPAGE, true);

	mp = BufferGetPage(metabuf);
	if (PageIsNew(mp))
		PageInit(mp, BufferGetPageSize(metabuf), 0);

	REDO_PRINT_LSN_APPLICATION(reln, BM_METAPAGE, mp, lsn);
	if (XLByteLT(PageGetLSN(mp), lsn))
	{
		metapage = (BMMetaPage)PageGetContents(mp);

		metapage->bm_magic = BITMAP_MAGIC;
		metapage->bm_version = BITMAP_VERSION;
		metapage->bm_lov_heapId = xlrec->bm_lov_heapId;
		metapage->bm_lov_indexId = xlrec->bm_lov_indexId;
		metapage->bm_lov_lastpage = xlrec->bm_lov_lastpage;

		PageSetLSN(mp, lsn);
		PageSetTLI(mp, ThisTimeLineID);
		_bitmap_wrtbuf(metabuf);
	}
	else
		_bitmap_relbuf(metabuf);
	
	MIRROREDLOCK_BUFMGR_UNLOCK;
	// -------- MirroredLock ----------
	
}

/*
 * _bitmap_xlog_insert_bitmap_lastwords() -- update the last two words
 * in a bitmap vector.
 */
static void
_bitmap_xlog_insert_bitmap_lastwords(XLogRecPtr lsn, 
									 XLogRecord *record)
{
	MIRROREDLOCK_BUFMGR_DECLARE;

	Relation reln;
	xl_bm_bitmap_lastwords *xlrec;

	Buffer		lovBuffer;
	Page		lovPage;
	BMLOVItem	lovItem;

	xlrec = (xl_bm_bitmap_lastwords *) XLogRecGetData(record);

	reln = XLogOpenRelation(xlrec->bm_node);
	if (!RelationIsValid(reln))
		return;

	// -------- MirroredLock ----------
	MIRROREDLOCK_BUFMGR_LOCK;

	lovBuffer = XLogReadBuffer(reln, xlrec->bm_lov_blkno, false);
	REDO_PRINT_READ_BUFFER_NOT_FOUND(reln, xlrec->bm_lov_blkno, lovBuffer, lsn);
	if (BufferIsValid(lovBuffer))
	{
		lovPage = BufferGetPage(lovBuffer);

		REDO_PRINT_LSN_APPLICATION(reln, xlrec->bm_lov_blkno, lovPage, lsn);
		if (XLByteLT(PageGetLSN(lovPage), lsn))
		{
			ItemId item = PageGetItemId(lovPage, xlrec->bm_lov_offset);

			if (ItemIdIsUsed(item))
			{
				lovItem = (BMLOVItem)PageGetItem(lovPage, item);

				lovItem->bm_last_compword = xlrec->bm_last_compword;
				lovItem->bm_last_word = xlrec->bm_last_word;
				lovItem->lov_words_header = xlrec->lov_words_header;
				lovItem->bm_last_setbit = xlrec->bm_last_setbit;
				lovItem->bm_last_tid_location = xlrec->bm_last_tid_location;
				
				PageSetLSN(lovPage, lsn);
				PageSetTLI(lovPage, ThisTimeLineID);

				_bitmap_wrtbuf(lovBuffer);
			}
			else
				_bitmap_relbuf(lovBuffer);
		}
		else
			_bitmap_relbuf(lovBuffer);
	}
	
	MIRROREDLOCK_BUFMGR_UNLOCK;
	// -------- MirroredLock ----------
	
}

static void
_bitmap_xlog_insert_bitmapwords(XLogRecPtr lsn, XLogRecord *record)
{
	MIRROREDLOCK_BUFMGR_DECLARE;

	Relation reln;
	xl_bm_bitmapwords *xlrec;

	Buffer		bitmapBuffer;
	Page		bitmapPage;
	BMBitmapOpaque	bitmapPageOpaque;
	BMTIDBuffer newWords;
	uint64		words_written;

	int					lastTids_size;
	int					cwords_size;
	int					hwords_size;

	Buffer lovBuffer;
	Page lovPage;
	BMLOVItem lovItem;

    MemSet(&newWords, '\0', sizeof(newWords));
	
	xlrec = (xl_bm_bitmapwords *) XLogRecGetData(record);

	reln = XLogOpenRelation(xlrec->bm_node);
	if (!RelationIsValid(reln))
		return;

	// -------- MirroredLock ----------
	MIRROREDLOCK_BUFMGR_LOCK;

	bitmapBuffer = XLogReadBuffer(reln, xlrec->bm_blkno, true);
	bitmapPage = BufferGetPage(bitmapBuffer);

	if (PageIsNew(bitmapPage))
		_bitmap_init_bitmappage(reln, bitmapBuffer);

	bitmapPageOpaque =
		(BMBitmapOpaque)PageGetSpecialPointer(bitmapPage);

	REDO_PRINT_LSN_APPLICATION(reln, xlrec->bm_blkno, bitmapPage, lsn);
	if (XLByteLT(PageGetLSN(bitmapPage), lsn))
	{
		uint64      *last_tids;
		BM_HRL_WORD *cwords;
		BM_HRL_WORD *hwords;

		newWords.curword = xlrec->bm_num_cwords;
		newWords.start_wordno = xlrec->bm_start_wordno;

		lastTids_size = newWords.curword * sizeof(uint64);
		cwords_size = newWords.curword * sizeof(BM_HRL_WORD);
		hwords_size = (BM_CALC_H_WORDS(newWords.curword)) *
			sizeof(BM_HRL_WORD);

		newWords.last_tids = (uint64*)palloc0(lastTids_size);
		newWords.cwords = (BM_HRL_WORD*)palloc0(cwords_size);

		last_tids = 
			(uint64*)(((char*)xlrec) + MAXALIGN(sizeof(xl_bm_bitmapwords)));
		cwords =
			(BM_HRL_WORD*)(((char*)xlrec) +
						 MAXALIGN(sizeof(xl_bm_bitmapwords)) + MAXALIGN(lastTids_size));
		hwords =
			(BM_HRL_WORD*)(((char*)xlrec) +
						   MAXALIGN(sizeof(xl_bm_bitmapwords)) + MAXALIGN(lastTids_size) +
						   MAXALIGN(cwords_size));
		memcpy(newWords.last_tids, last_tids, lastTids_size);
		memcpy(newWords.cwords, cwords, cwords_size);
		memcpy(newWords.hwords, hwords, hwords_size);

		/*
		 * If no words are written to this bitmap page, it means
		 * this bitmap page is full.
		 */
		if (xlrec->bm_words_written == 0)
		{
			Assert(BM_NUM_OF_HRL_WORDS_PER_PAGE -
				   bitmapPageOpaque->bm_hrl_words_used == 0);
			words_written = 0;
		}
		else
			words_written =
				_bitmap_write_bitmapwords(bitmapBuffer, &newWords);

		Assert(words_written == xlrec->bm_words_written);

		bitmapPageOpaque->bm_bitmap_next = xlrec->bm_next_blkno;
		Assert(bitmapPageOpaque->bm_last_tid_location == xlrec->bm_last_tid);

		if (xlrec->bm_is_last)
		{
			forget_incomplete_insert_bitmapwords(xlrec->bm_node, xlrec);
		}

		else {

			Buffer	nextBuffer;
			Page	nextPage;

			/* create a new bitmap page */
			nextBuffer = XLogReadBuffer(reln, xlrec->bm_next_blkno, true);
			nextPage = BufferGetPage(nextBuffer);

			_bitmap_init_bitmappage(reln, nextBuffer);
			
			PageSetLSN(nextPage, lsn);
			PageSetTLI(nextPage, ThisTimeLineID);

			_bitmap_wrtbuf(nextBuffer);

			log_incomplete_insert_bitmapwords(xlrec->bm_node, xlrec);
		}

		PageSetLSN(bitmapPage, lsn);
		PageSetTLI(bitmapPage, ThisTimeLineID);

		_bitmap_wrtbuf(bitmapBuffer);

		_bitmap_free_tidbuf(&newWords);
	}

	else {
		_bitmap_relbuf(bitmapBuffer);
	}

 	/* Update lovPage when needed */
 	lovBuffer = XLogReadBuffer(reln, xlrec->bm_lov_blkno, false);
	REDO_PRINT_READ_BUFFER_NOT_FOUND(reln, xlrec->bm_lov_blkno, lovBuffer, lsn);
 	if (!BufferIsValid(lovBuffer))
	{
		MIRROREDLOCK_BUFMGR_UNLOCK;
		// -------- MirroredLock ----------
		
 		return;
	}
 	
 	lovPage = BufferGetPage(lovBuffer);
 	lovItem = (BMLOVItem)
 		PageGetItem(lovPage, 
 					PageGetItemId(lovPage, xlrec->bm_lov_offset));
 	
 	if (xlrec->bm_is_last && XLByteLT(PageGetLSN(lovPage), lsn))
 	{
 		lovItem->bm_last_compword = xlrec->bm_last_compword;
 		lovItem->bm_last_word = xlrec->bm_last_word;
 		lovItem->lov_words_header = xlrec->lov_words_header;
 		lovItem->bm_last_setbit = xlrec->bm_last_setbit;
 		lovItem->bm_last_tid_location = xlrec->bm_last_setbit -
 			xlrec->bm_last_setbit % BM_HRL_WORD_SIZE;
 		lovItem->bm_lov_tail = xlrec->bm_blkno;
 		if (lovItem->bm_lov_head == InvalidBlockNumber)
 			lovItem->bm_lov_head = lovItem->bm_lov_tail;
 		
 		PageSetLSN(lovPage, lsn);
 		PageSetTLI(lovPage, ThisTimeLineID);
 		
 		_bitmap_wrtbuf(lovBuffer);
 		
 	}
 	
 	else if (xlrec->bm_is_first && XLByteLT(PageGetLSN(lovPage), lsn))
 	{
 		lovItem->bm_lov_head = xlrec->bm_blkno;
 		lovItem->bm_lov_tail = lovItem->bm_lov_head;
 		
 		PageSetLSN(lovPage, lsn);
 		PageSetTLI(lovPage, ThisTimeLineID);
 		
 		_bitmap_wrtbuf(lovBuffer);
 	}
 	
 	else
 	{
 		_bitmap_relbuf(lovBuffer);
 	}
	
	MIRROREDLOCK_BUFMGR_UNLOCK;
	// -------- MirroredLock ----------
	
}

static void
_bitmap_xlog_updateword(XLogRecPtr lsn, XLogRecord *record)
{
	MIRROREDLOCK_BUFMGR_DECLARE;

	Relation reln;
	xl_bm_updateword *xlrec;

	Buffer			bitmapBuffer;
	Page			bitmapPage;
	BMBitmapOpaque	bitmapOpaque;
	BMBitmap 		bitmap;

	xlrec = (xl_bm_updateword *) XLogRecGetData(record);
	reln = XLogOpenRelation(xlrec->bm_node);
	if (!RelationIsValid(reln))
		return;

	elog(DEBUG1, "_bitmap_xlog_updateword: (blkno, word_no, cword, hword)="
		 "(%d, %d, " INT64_FORMAT ", " INT64_FORMAT ")", xlrec->bm_blkno,
		 xlrec->bm_word_no, xlrec->bm_cword,
		 xlrec->bm_hword);

	// -------- MirroredLock ----------
	MIRROREDLOCK_BUFMGR_LOCK;

	bitmapBuffer = XLogReadBuffer(reln, xlrec->bm_blkno, false);
	REDO_PRINT_READ_BUFFER_NOT_FOUND(reln, xlrec->bm_blkno, bitmapBuffer, lsn);
	if (BufferIsValid(bitmapBuffer))
	{
		bitmapPage = BufferGetPage(bitmapBuffer);
		bitmapOpaque =
			(BMBitmapOpaque)PageGetSpecialPointer(bitmapPage);
		bitmap = (BMBitmap) PageGetContentsMaxAligned(bitmapPage);

		REDO_PRINT_LSN_APPLICATION(reln, xlrec->bm_blkno, bitmapPage, lsn);
		if (XLByteLT(PageGetLSN(bitmapPage), lsn))
		{
			Assert(bitmapOpaque->bm_hrl_words_used > xlrec->bm_word_no);

			bitmap->cwords[xlrec->bm_word_no] = xlrec->bm_cword;
			bitmap->hwords[xlrec->bm_word_no/BM_HRL_WORD_SIZE] = xlrec->bm_hword;

			PageSetLSN(bitmapPage, lsn);
			PageSetTLI(bitmapPage, ThisTimeLineID);
			_bitmap_wrtbuf(bitmapBuffer);
		}

		else
			_bitmap_relbuf(bitmapBuffer);
	}
	
	MIRROREDLOCK_BUFMGR_UNLOCK;
	// -------- MirroredLock ----------
	
}

static void
_bitmap_xlog_updatewords(XLogRecPtr lsn, XLogRecord *record)
{
	MIRROREDLOCK_BUFMGR_DECLARE;

	Relation reln;
	xl_bm_updatewords *xlrec;
	Buffer			firstBuffer;
	Buffer			secondBuffer = InvalidBuffer;
	Page			firstPage;
	Page			secondPage = NULL;
	BMBitmapOpaque	firstOpaque;
	BMBitmapOpaque	secondOpaque = NULL;
	BMBitmap 		firstBitmap;
	BMBitmap		secondBitmap = NULL;

	xlrec = (xl_bm_updatewords *) XLogRecGetData(record);
	reln = XLogOpenRelation(xlrec->bm_node);
	if (!RelationIsValid(reln))
		return;

	elog(DEBUG1, "_bitmap_xlog_updatewords: (first_blkno, num_cwords, last_tid, next_blkno)="
		 "(%d, " INT64_FORMAT ", " INT64_FORMAT ", %d), (second_blkno, num_cwords, last_tid, next_blkno)="
		 "(%d, " INT64_FORMAT ", " INT64_FORMAT ", %d)",
		 xlrec->bm_first_blkno, xlrec->bm_first_num_cwords, xlrec->bm_first_last_tid,
		 xlrec->bm_two_pages ? xlrec->bm_second_blkno : xlrec->bm_next_blkno,
		 xlrec->bm_second_blkno, xlrec->bm_second_num_cwords,
		 xlrec->bm_second_last_tid, xlrec->bm_next_blkno);

	// -------- MirroredLock ----------
	MIRROREDLOCK_BUFMGR_LOCK;

	firstBuffer = XLogReadBuffer(reln, xlrec->bm_first_blkno, false);
	REDO_PRINT_READ_BUFFER_NOT_FOUND(reln, xlrec->bm_first_blkno, firstBuffer, lsn);
	if (BufferIsValid(firstBuffer))
	{
		firstPage = BufferGetPage(firstBuffer);
		firstOpaque =
			(BMBitmapOpaque)PageGetSpecialPointer(firstPage);
		firstBitmap = (BMBitmap) PageGetContentsMaxAligned(firstPage);

		REDO_PRINT_LSN_APPLICATION(reln, xlrec->bm_first_blkno, firstPage, lsn);
		if (XLByteLT(PageGetLSN(firstPage), lsn))
		{
			memcpy(firstBitmap->cwords, xlrec->bm_first_cwords,
				   BM_NUM_OF_HRL_WORDS_PER_PAGE * sizeof(BM_HRL_WORD));
			memcpy(firstBitmap->hwords, xlrec->bm_first_hwords,
				   BM_NUM_OF_HEADER_WORDS *	sizeof(BM_HRL_WORD));
			firstOpaque->bm_hrl_words_used = xlrec->bm_first_num_cwords;
			firstOpaque->bm_last_tid_location = xlrec->bm_first_last_tid;

			if (xlrec->bm_two_pages)
				firstOpaque->bm_bitmap_next = xlrec->bm_second_blkno;
			else
				firstOpaque->bm_bitmap_next = xlrec->bm_next_blkno;

			PageSetLSN(firstPage, lsn);
			PageSetTLI(firstPage, ThisTimeLineID);
			_bitmap_wrtbuf(firstBuffer);
		}
		else
			_bitmap_relbuf(firstBuffer);
	}

 	/* Update secondPage when needed */
 	if (xlrec->bm_two_pages)
 	{
 		secondBuffer = XLogReadBuffer(reln, xlrec->bm_second_blkno, true);
 		secondPage = BufferGetPage(secondBuffer);
 		if (PageIsNew(secondPage))
 			_bitmap_init_bitmappage(reln, secondBuffer);
 		
 		secondOpaque =
 			(BMBitmapOpaque)PageGetSpecialPointer(secondPage);
 		secondBitmap = (BMBitmap) PageGetContentsMaxAligned(secondPage);
 
 		if (XLByteLT(PageGetLSN(secondPage), lsn))
 		{
 			memcpy(secondBitmap->cwords, xlrec->bm_second_cwords,
 				   BM_NUM_OF_HRL_WORDS_PER_PAGE * sizeof(BM_HRL_WORD));
 			memcpy(secondBitmap->hwords, xlrec->bm_second_hwords,
 				   BM_NUM_OF_HEADER_WORDS *	sizeof(BM_HRL_WORD));
 			secondOpaque->bm_hrl_words_used = xlrec->bm_second_num_cwords;
 			secondOpaque->bm_last_tid_location = xlrec->bm_second_last_tid;
 			secondOpaque->bm_bitmap_next = xlrec->bm_next_blkno;
 			
 			PageSetLSN(secondPage, lsn);
 			PageSetTLI(secondPage, ThisTimeLineID);
 			_bitmap_wrtbuf(secondBuffer);
 		}
 		
 		else
 		{
 			_bitmap_relbuf(secondBuffer);
 		}
 	}
 
 	/* Update lovPage when needed */
 	if (xlrec->bm_new_lastpage)
 	{
 		Buffer lovBuffer;
 		Page lovPage;
 		BMLOVItem lovItem;
 		
 		lovBuffer = XLogReadBuffer(reln, xlrec->bm_lov_blkno, false);
 		if (!BufferIsValid(lovBuffer))
		{	
			MIRROREDLOCK_BUFMGR_UNLOCK;
			// -------- MirroredLock ----------
			
 			return;
		}
 		
 		lovPage = BufferGetPage(lovBuffer);
 		
 		if (XLByteLT(PageGetLSN(lovPage), lsn))
 		{
 			lovItem = (BMLOVItem)
 				PageGetItem(lovPage, 
 							PageGetItemId(lovPage, xlrec->bm_lov_offset));
 			
 			lovItem->bm_lov_tail = xlrec->bm_second_blkno;
 			
 			PageSetLSN(lovPage, lsn);
 			PageSetTLI(lovPage, ThisTimeLineID);
 			
 			_bitmap_wrtbuf(lovBuffer);
 		}
 		else
 		{
 			_bitmap_relbuf(lovBuffer);
 		}
 	}
	
	MIRROREDLOCK_BUFMGR_UNLOCK;
	// -------- MirroredLock ----------
	
}

void
bitmap_redo(XLogRecPtr beginLoc, XLogRecPtr lsn, XLogRecord *record)
{
	uint8	info = record->xl_info & ~XLR_INFO_MASK;

	switch (info)
	{
		case XLOG_BITMAP_INSERT_NEWLOV:
			_bitmap_xlog_newpage(lsn, record);
			break;
		case XLOG_BITMAP_INSERT_LOVITEM:
			_bitmap_xlog_insert_lovitem(lsn, record);
			break;
		case XLOG_BITMAP_INSERT_META:
			_bitmap_xlog_insert_meta(lsn, record);
			break;
		case XLOG_BITMAP_INSERT_BITMAP_LASTWORDS:
			_bitmap_xlog_insert_bitmap_lastwords(lsn, record);
			break;
		case XLOG_BITMAP_INSERT_WORDS:
			_bitmap_xlog_insert_bitmapwords(lsn, record);
			break;
		case XLOG_BITMAP_UPDATEWORD:
			_bitmap_xlog_updateword(lsn, record);
			break;
		case XLOG_BITMAP_UPDATEWORDS:
			_bitmap_xlog_updatewords(lsn, record);
			break;
		default:
			elog(PANIC, "bitmap_redo: unknown op code %u", info);
	}
}

static void
out_target(StringInfo buf, RelFileNode *node)
{
	appendStringInfo(buf, "rel %u/%u/%u",
			node->spcNode, node->dbNode, node->relNode);
}

void
bitmap_desc(StringInfo buf, XLogRecPtr beginLoc, XLogRecord *record)
{
	uint8		info = record->xl_info & ~XLR_INFO_MASK;
	char		*rec = XLogRecGetData(record);

	switch (info)
	{
		case XLOG_BITMAP_INSERT_NEWLOV:
		{
			xl_bm_newpage *xlrec = (xl_bm_newpage *)rec;

			appendStringInfo(buf, "insert a new LOV page: ");
			out_target(buf, &(xlrec->bm_node));
			break;
		}
		case XLOG_BITMAP_INSERT_LOVITEM:
		{
			xl_bm_lovitem *xlrec = (xl_bm_lovitem *)rec;

			appendStringInfo(buf, "insert a new LOV item: ");
			out_target(buf, &(xlrec->bm_node));
			break;
		}
		case XLOG_BITMAP_INSERT_META:
		{
			xl_bm_metapage *xlrec = (xl_bm_metapage *)rec;

			appendStringInfo(buf, "update the metapage: ");
			out_target(buf, &(xlrec->bm_node));
			break;
		}

		case XLOG_BITMAP_INSERT_BITMAP_LASTWORDS:
		{
			xl_bm_bitmap_lastwords *xlrec = (xl_bm_bitmap_lastwords *)rec;

			appendStringInfo(buf, "update the last two words in a bitmap: ");
			out_target(buf, &(xlrec->bm_node));
			break;
		}

		case XLOG_BITMAP_INSERT_WORDS:
		{
			xl_bm_bitmapwords *xlrec = (xl_bm_bitmapwords *)rec;

			appendStringInfo(buf, "insert words in a not-last bitmap page: ");
			out_target(buf, &(xlrec->bm_node));
			break;
		}

		case XLOG_BITMAP_UPDATEWORD:
		{
			xl_bm_updateword *xlrec = (xl_bm_updateword *)rec;

			appendStringInfo(buf, "update a word in a bitmap page: ");
			out_target(buf, &(xlrec->bm_node));
			break;
		}
		case XLOG_BITMAP_UPDATEWORDS:
		{
			xl_bm_updatewords *xlrec = (xl_bm_updatewords*)rec;

			appendStringInfo(buf, "update words in bitmap pages: ");
			out_target(buf, &(xlrec->bm_node));
			break;
		}
		default:
			appendStringInfo(buf, "UNKNOWN");
			break;
	}
}

void
bitmap_xlog_startup(void)
{
	incomplete_actions = NIL;
	/* sleep(30); */
}

void
bitmap_xlog_cleanup(void)
{
	MIRROREDLOCK_BUFMGR_DECLARE;

	ListCell* l;
	foreach (l, incomplete_actions)
	{
		Relation 			reln;
		Buffer				lovBuffer;
		BMTIDBuffer 	    newWords;

		int					lastTids_size;
		int					cwords_size;
		int					hwords_size;
		BM_HRL_WORD        *hwords;

		bm_incomplete_action *action = (bm_incomplete_action *) lfirst(l);

		reln = XLogOpenRelation(action->bm_node);
		if (!RelationIsValid(reln))
			return;

        MemSet(&newWords, '\0', sizeof(newWords));

		// -------- MirroredLock ----------
		MIRROREDLOCK_BUFMGR_LOCK;

		lovBuffer = XLogReadBuffer(reln, action->bm_lov_blkno, false);

		newWords.num_cwords = action->bm_num_cwords;
		newWords.start_wordno = action->bm_start_wordno;

		lastTids_size = newWords.num_cwords * sizeof(uint64);
		cwords_size = newWords.num_cwords * sizeof(BM_HRL_WORD);
		hwords_size = (BM_CALC_H_WORDS(newWords.num_cwords)) *
			sizeof(BM_HRL_WORD);

		newWords.last_tids =
			(uint64*)(((char*)action) + MAXALIGN(sizeof(xl_bm_bitmapwords)));
		newWords.cwords =
			(BM_HRL_WORD*)(((char*)action) +
						 MAXALIGN(sizeof(xl_bm_bitmapwords)) + MAXALIGN(lastTids_size));
		hwords =
			(BM_HRL_WORD*)(((char*)action) +
						   MAXALIGN(sizeof(xl_bm_bitmapwords)) + MAXALIGN(lastTids_size) +
						   MAXALIGN(cwords_size));
		memcpy(newWords.hwords, hwords, hwords_size);

		newWords.last_compword = action->bm_last_compword;
		newWords.last_word = action->bm_last_word;
		newWords.is_last_compword_fill = (action->lov_words_header == 2);
		newWords.last_tid = action->bm_last_setbit;

		/* Finish an incomplete insert */
		_bitmap_write_new_bitmapwords(reln,
							  lovBuffer, action->bm_lov_offset,
							  &newWords, false);

		MIRROREDLOCK_BUFMGR_UNLOCK;
		// -------- MirroredLock ----------

 		elog(DEBUG1, "finish incomplete insert of bitmap words: last_tid: " INT64_FORMAT
 			 ", lov_blkno=%d, lov_offset=%d",
 			 newWords.last_tids[newWords.num_cwords-1], action->bm_lov_blkno,
 			 action->bm_lov_offset);
	}
	incomplete_actions = NIL;
}

bool
bitmap_safe_restartpoint(void)
{
	if (incomplete_actions)
		return false;
	return true;
}