Function filter_format

src/jrd/filters.cpp:294–424

ISC_STATUS filter_format(USHORT action, BlobControl* control)
{
/**************************************
 *
 *	f i l t e r _ f o r m a t
 *
 **************************************
 *
 * Functional description
 *	Get next segment from a record format blob.
 *
 **************************************/

	if (action != isc_blob_filter_open)
		return string_filter(action, control);

	//                           1         2         3         4         5         6
	//                  12345678901234567890123456789012345678901234567890123456789012345678
	const char* head1 = " id offset type           length sub_type flags";	// descriptors
	const char* sep1  = "--- ------ -------------- ------ -------- -----";

	const char* head2 = " id type           length default value";			// defaults
	const char* sep2  = "--- -------------- ------ -----------------------------------";

	const char* fmt1 = "%3d %6d %2d %-11s %6d %8d  0x%02x";		// descriptors
	const char* fmt2 = "%3d %2d %-11s %6d %s";					// defaults

	const char* name1 = "Fields:";
	const char* name2 = "Defaults:";

	string str;
	USHORT length;
	ISC_STATUS status;

	// read number of fields descriptors

	USHORT num;
	status = caller(isc_blob_filter_get_segment, control,
		sizeof(USHORT), reinterpret_cast<UCHAR*>(&num), &length);
	if (status != FB_SUCCESS && status != isc_segment)
		return status;

	if (num)
	{
		string_put(control, name1);
		string_put(control, head1);
		string_put(control, sep1);
	}

	// read fields descriptors
	for (int id = 0; num; --num, id++)
	{
		Ods::Descriptor desc;
		memset(&desc, 0, sizeof(desc));

		status = caller(isc_blob_filter_get_segment, control,
			sizeof(desc), reinterpret_cast<UCHAR*>(&desc), &length);
		if (status != FB_SUCCESS && status != isc_segment)