36 lines
1.2 KiB
C
36 lines
1.2 KiB
C
#if !defined(lint) && defined(SCCSIDS)
|
|
static char sccsid[] = "@(#)lfind.c 1.1 92/07/30 SMI"; /* from S5R2 1.1 */
|
|
#endif
|
|
|
|
/*LINTLIBRARY*/
|
|
/*
|
|
* Linear search algorithm, generalized from Knuth (6.1) Algorithm Q.
|
|
*
|
|
* This version no longer has anything to do with Knuth's Algorithm Q,
|
|
* which first copies the new element into the table, then looks for it.
|
|
* The assumption there was that the cost of checking for the end of the
|
|
* table before each comparison outweighed the cost of the comparison, which
|
|
* isn't true when an arbitrary comparison function must be called and when the
|
|
* copy itself takes a significant number of cycles.
|
|
* Actually, it has now reverted to Algorithm S, which is "simpler."
|
|
*/
|
|
|
|
typedef char *POINTER;
|
|
extern POINTER memcpy();
|
|
|
|
POINTER
|
|
lfind(key, base, nelp, width, compar)
|
|
register POINTER key; /* Key to be located */
|
|
register POINTER base; /* Beginning of table */
|
|
unsigned *nelp; /* Pointer to current table size */
|
|
register unsigned width; /* Width of an element (bytes) */
|
|
int (*compar)(); /* Comparison function */
|
|
{
|
|
register POINTER next = base + *nelp * width; /* End of table */
|
|
|
|
for ( ; base < next; base += width)
|
|
if ((*compar)(key, base) == 0)
|
|
return (base); /* Key found */
|
|
return (POINTER)0;
|
|
}
|