* Copyright (c) 1989 The Regents of the University of California.
* This code is derived from software contributed to Berkeley by
* Redistribution and use in source and binary forms are permitted
* provided that the above copyright notice and this paragraph are
* duplicated in all such forms and that any documentation,
* advertising materials, and other materials related to such
* distribution and use acknowledge that the software was developed
* by the University of California, Berkeley. The name of the
* University may not be used to endorse or promote products derived
* from this software without specific prior written permission.
* THIS SOFTWARE IS PROVIDED ``AS IS'' AND WITHOUT ANY EXPRESS OR
* IMPLIED WARRANTIES, INCLUDING, WITHOUT LIMITATION, THE IMPLIED
* WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE.
#if defined(LIBC_SCCS) && !defined(lint)
static char sccsid
[] = "@(#)lsearch.c 5.2 (Berkeley) %G%";
#endif /* LIBC_SCCS and not lint */
lsearch(key
, base
, nelp
, width
, compar
)
return(linear_base(key
, base
, nelp
, width
, compar
, 1));
lfind(key
, base
, nelp
, width
, compar
)
return(linear_base(key
, base
, nelp
, width
, compar
, 0));
linear_base(key
, base
, nelp
, width
, compar
, add_flag
)
int (*compar
)(), add_flag
;
register char *element
, *end
;
end
= base
+ *nelp
* width
;
for (element
= base
; element
< end
; element
+= width
)
if (!compar(element
, key
)) /* key found */
if (!add_flag
) /* key not found */
* The UNIX System User's Manual, 1986 edition claims that
* a NULL pointer is returned by lsearch with errno set
* appropriately, if there is not enough room in the table
* to add a new item. This can't be done as none of these
* routines have any method of determining the size of the
* table. This comment was isn't in the 1986-87 System V
bcopy(key
, end
, (int)width
);