Function par_alias_list

src/gpre/sqe.cpp:1697–1792

//

static gpre_ctx* par_alias_list( gpre_req* request, gpre_nod* alias_list)
{
	assert_IS_REQ(request);
	assert_IS_NOD(alias_list);

	gpre_nod** arg = alias_list->nod_arg;
	const gpre_nod* const* const end = alias_list->nod_arg + alias_list->nod_count;

	// check the first alias in the list with the relations
	// in the current context for a match

	gpre_rel* relation = 0; // unreliable test many lines below without initializing.
	gpre_ctx* context = par_alias(request, (const TEXT*) *arg);
	if (context)
	{
		if (alias_list->nod_count == 1)
			return context;
		relation = context->ctx_relation;
	}

	SCHAR error_string[ERROR_LENGTH];

	// if the first alias didn't specify a table in the context stack,
	// look through all contexts to find one which might be a view with
	// a base table having a matching table name or alias

	if (!context)
	{
		for (context = request->req_contexts; context; context = context->ctx_next)
		{
			if (context->ctx_scope_level != request->req_scope_level)
				continue;
			if (!context->ctx_relation)
				continue;
			if (relation = par_base_table(request, context->ctx_relation, (const TEXT*) *arg))
			{
				break;
			}
		}
	}

	if (!context)
	{
		fb_utils::snprintf(error_string, sizeof(error_string),
			"there is no alias or table named %s at this scope level",
			(TEXT*) *arg);
		PAR_error(error_string);
	}

	// find the base table using the specified alias list, skipping the first one
	// since we already matched it to the context

	for (arg++; arg < end; arg++)
	{
		if (!(relation = par_base_table(request, relation, (const TEXT*) *arg)))
			break;
	}