Function par_plan

src/jrd/par.cpp:920–1167

static PlanNode* par_plan(thread_db* tdbb, CompilerScratch* csb)
{
/**************************************
 *
 *	p a r _ p l a n
 *
 **************************************
 *
 * Functional description
 *	Parse an access plan expression.
 *	At this stage we are just generating the
 *	parse tree and checking contexts
 *	and indices.
 *
 **************************************/
	SET_TDBB(tdbb);

	auto blrOp = csb->csb_blr_reader.getByte();

	// a join type indicates a cross of two or more streams

	if (blrOp == blr_join || blrOp == blr_merge)
	{
		// CVC: bottleneck
		int count = (USHORT) csb->csb_blr_reader.getByte();
		PlanNode* plan = FB_NEW_POOL(csb->csb_pool) PlanNode(csb->csb_pool, PlanNode::TYPE_JOIN);

		while (count-- > 0)
			plan->subNodes.add(par_plan(tdbb, csb));

		return plan;
	}

	// we have hit a stream; parse the context number and access type

	jrd_rel* relation = nullptr;
	jrd_prc* procedure = nullptr;

	if (blrOp == blr_retrieve)
	{
		PlanNode* plan = FB_NEW_POOL(csb->csb_pool) PlanNode(csb->csb_pool, PlanNode::TYPE_RETRIEVE);

		// parse the relation name and context--the relation
		// itself is redundant except in the case of a view,
		// in which case the base relation (and alias) must be specified

		blrOp = csb->csb_blr_reader.getByte();

		// Don't make RecordSourceNode::parse() to parse the context, because
		// this would add a new context, while this is a reference to
		// an existing context

		switch (blrOp)
		{
			case blr_relation:
			case blr_rid:
			case blr_relation2:
			case blr_rid2: