/*-------------------------------------------------------------------------
 *
 * indexvalid.c--
 *	  index tuple qualification validity checking code
 *
 * Copyright (c) 1994, Regents of the University of California
 *
 *
 * IDENTIFICATION
 *	  $Header: /cvsroot/pgsql/src/backend/access/common/Attic/indexvalid.c,v 1.19 1998/06/15 19:27:45 momjian Exp $
 *
 *-------------------------------------------------------------------------
 */

#include <postgres.h>
#include <fmgr.h>

#include <access/htup.h>
#include <access/iqual.h>
#include <access/itup.h>
#include <access/skey.h>
#include <executor/execdebug.h>

/* ----------------------------------------------------------------
 *				  index scan key qualification code
 * ----------------------------------------------------------------
 */
int			NIndexTupleProcessed;

/* ----------------
 *		index_keytest
 *
 * old comments
 *		May eventually combine with other tests (like timeranges)?
 *		Should have Buffer buffer; as an argument and pass it to amgetattr.
 * ----------------
 */
bool
index_keytest(IndexTuple tuple,
			  TupleDesc tupdesc,
			  int scanKeySize,
			  ScanKey key)
{
	bool		isNull;
	Datum		datum;
	int			test;

	IncrIndexProcessed();

	while (scanKeySize > 0)
	{
		datum = index_getattr(tuple,
							  key[0].sk_attno,
							  tupdesc,
							  &isNull);

		if (isNull)
		{
			/* XXX eventually should check if SK_ISNULL */
			return (false);
		}

		if (key[0].sk_flags & SK_ISNULL)
			return (false);

		if (key[0].sk_flags & SK_COMMUTE)
		{
			test = (*(fmgr_faddr(&key[0].sk_func)))
				(DatumGetPointer(key[0].sk_argument),
				 datum) ? 1 : 0;
		}
		else
		{
			test = (*(fmgr_faddr(&key[0].sk_func)))
				(datum,
				 DatumGetPointer(key[0].sk_argument)) ? 1 : 0;
		}

		if (!test == !(key[0].sk_flags & SK_NEGATE))
			return (false);

		scanKeySize -= 1;
		key++;
	}

	return (true);
}