Function define_file

src/gpre/sql.cpp:5230–5267

//

static gpre_file* define_file()
{
	gpre_file* file = (gpre_file*) MSC_alloc(FIL_LEN);
	if (isQuoted(gpreGlob.token_global.tok_type))
	{
		TEXT* string = (TEXT*) MSC_alloc(gpreGlob.token_global.tok_length + 1);
		file->fil_name = string;
		MSC_copy(gpreGlob.token_global.tok_string, gpreGlob.token_global.tok_length, string);
		gpreGlob.token_global.tok_length += 2;
		PAR_get_token();
	}
	else
		CPR_s_error("<quoted filename>");

	if (!check_filename(file->fil_name))
		PAR_error("node name not permitted");	// A node name is not permitted in a shadow or secondary file name

	while (true)
	{
		if (MSC_match(KW_LENGTH))
		{
			MSC_match(KW_EQUALS);
			file->fil_length = EXP_ULONG_ordinal(true);
			MSC_match(KW_PAGES);
			MSC_match(KW_PAGE);
		}
		else if (MSC_match(KW_STARTS) || MSC_match(KW_STARTING))
		{
			MSC_match(KW_AT);
			MSC_match(KW_PAGE);
			file->fil_start = EXP_ULONG_ordinal(true);
		}
		else
			break;
	}

	return file;
}


//____________________________________________________________