Method walk_record

src/jrd/validation.cpp:2727–2895

Validation::RTN Validation::walk_record(jrd_rel* relation, const rhd* header, USHORT length,
	RecordNumber number, bool delta_flag)
{
/**************************************
 *
 *	w a l k _ r e c o r d
 *
 **************************************
 *
 * Functional description
 *	Walk a record.
 *
 **************************************/

#ifdef DEBUG_VAL_VERBOSE
	if (VAL_debug_level)
	{
		fprintf(stdout, "record: number %ld (%d/%d) ",
				   number,
				   (USHORT) number / tdbb->getDatabase()->dbb_max_records,
				   (USHORT) number % tdbb->getDatabase()->dbb_max_records);
		print_rhd(length, header);
	}
#endif

	if (header->rhd_flags & rhd_damaged)
	{
		corrupt(VAL_REC_DAMAGED, relation, number.getValue());
		return rtn_ok;
	}

	const TraNumber transaction = Ods::getTraNum(header);

	if (transaction > vdr_max_transaction)
		corrupt(VAL_REC_BAD_TID, relation, number.getValue(), transaction);

	// If there's a back pointer, verify that it's good

	if (header->rhd_b_page && !(header->rhd_flags & rhd_chain))
	{
		const RTN result = walk_chain(relation, header, number);
		if (result != rtn_ok)
			return result;
	}

	// If the record is a fragment, not large, or we're not interested in
	// chasing records, skip the record

	if ((header->rhd_flags & (rhd_fragment | rhd_deleted)) ||
		!((header->rhd_flags & rhd_large) || (vdr_flags & VDR_records)))
	{
		return rtn_ok;
	}

	// Pick up what length there is on the fragment

	const rhdf* fragment = (rhdf*) header;