Method BLB_put_segment

src/jrd/blb.cpp:1588–1724

void blb::BLB_put_segment(thread_db* tdbb, const void* seg, USHORT segment_length)
{
/**************************************
 *
 *      b l b : : p u t _ s e g m e n t
 *
 **************************************
 *
 * Functional description
 *      Add a segment to a blob.
 *
 **************************************/
	SET_TDBB(tdbb);
	Database* dbb = tdbb->getDatabase();
	const UCHAR* segment = static_cast<const UCHAR*>(seg);

	// Make sure blob is a temporary blob.  If not, complain bitterly.

	if (!(blb_flags & BLB_temporary) || (blb_flags & BLB_closed))
		ERR_post(Arg::Gds(isc_cannot_update_old_blob));

	if (blb_filter)
	{
		BLF_put_segment(tdbb, &blb_filter, segment_length, segment);
		return;
	}

	// Account for new segment

	blb_count++;
	blb_length += segment_length;

	if (segment_length > blb_max_segment)
		blb_max_segment = segment_length;

	// Compute the effective length of the segment (counts length unless
	// the blob is a stream blob).

	ULONG length;				// length of segment + overhead
	bool length_flag;
	if (isSegmented())
	{
		length = segment_length + 2;
		length_flag = true;
	}
	else
	{
		length = segment_length;
		length_flag = false;
	}

	// Case 0: Transition from small blob to medium size blob.  This really
	// just does a form transformation and drops into the next case.

	if (blb_level == 0 && length > (ULONG) blb_space_remaining)
	{
		blb_pages = vcl::newVector(*blb_transaction->tra_pool, 0);
		const USHORT l = dbb->dbb_page_size - BLP_SIZE;