Blame bibutils/strsearch.c

Packit 89ede9
/* strsearch.c
Packit 89ede9
 *
Packit 89ede9
 * Copyright (c) Chris Putnam 1995-2018
Packit 89ede9
 *
Packit 89ede9
 * Source code released under the GPL version 2
Packit 89ede9
 *
Packit 89ede9
 * strsearch() locates a case-independent substring
Packit 89ede9
 *    e.g. a case-independent version of strstr()
Packit 89ede9
 *
Packit 89ede9
 * returns pointer to first occurrence of substring needle in
Packit 89ede9
 * the string haystack when found, NULL if not found
Packit 89ede9
 *
Packit 89ede9
 * '\0' characters terminating strings are not compared
Packit 89ede9
 *
Packit 89ede9
 * strsearch returns haystack when needle is empty as per strstr()
Packit 89ede9
 * conventions
Packit 89ede9
 *
Packit 89ede9
 */
Packit 89ede9
#include <stdio.h>
Packit 89ede9
#include <ctype.h>
Packit 89ede9
#include "strsearch.h"
Packit 89ede9
Packit 89ede9
char *strsearch (const char *haystack, const char *needle)
Packit 89ede9
{
Packit 89ede9
	char *returnptr=NULL;
Packit 89ede9
	unsigned long pos=0;
Packit 89ede9
Packit 89ede9
	if ( !(*needle) ) returnptr = (char *) haystack;
Packit 89ede9
Packit 89ede9
	while (*(haystack+pos) && returnptr==NULL) {
Packit 89ede9
		if ( toupper((unsigned char)*(haystack+pos)) == toupper((unsigned char)*(needle+pos)) )
Packit 89ede9
			pos++;
Packit 89ede9
		else {
Packit 89ede9
			pos = 0;
Packit 89ede9
			haystack++;
Packit 89ede9
		}
Packit 89ede9
		if ( ! (*(needle+pos)) ) returnptr = (char *) haystack;
Packit 89ede9
	}
Packit 89ede9
	return returnptr;
Packit 89ede9
}
Packit 89ede9