Function store_array

src/jrd/blb.cpp:2894–2941

static blb* store_array(thread_db* tdbb, jrd_tra* transaction, bid* blob_id)
{
/**************************************
 *
 *      s t o r e _ a r r a y
 *
 **************************************
 *
 * Functional description
 *      Actually store an array.  Oh boy!
 *
 **************************************/
	SET_TDBB(tdbb);

	// Validate array

	const ArrayField* array = find_array(transaction, blob_id);
	if (!array)
		return NULL;

	// Create blob for array

	blb* blob = blb::create2(tdbb, transaction, blob_id, 0, NULL);
	blob->blb_flags |= BLB_stream;

	// Write out array descriptor

	blob->BLB_put_segment(tdbb, reinterpret_cast<const UCHAR*>(&array->arr_desc),
					array->arr_desc.iad_length);

	// Write out actual array
	const USHORT seg_limit = 32768;
	const BLOB_PTR* p = array->arr_data;
	SLONG length = array->arr_effective_length;
	while (length > seg_limit)
	{
		blob->BLB_put_segment(tdbb, p, seg_limit);
		length -= seg_limit;
		p += seg_limit;
	}

	if (length)
		blob->BLB_put_segment(tdbb, p, (USHORT) length);

	blob->BLB_close(tdbb);

	return blob;
}

void blb::fromPageHeader(const Ods::blh* header)
{