/*
* Function to search string in string with ignoring case sensitivity
* and times of blank
* Copyright (c) by Dirk Kalis<dirk.kalis@t-online.de>
*
*
* This program is free software; you can redistribute it and/or modify
* it under the terms of the GNU General Public License as published by
* the Free Software Foundation; either version 2 of the License, or
* (at your option) any later version.
*
* This program is distributed in the hope that it will be useful,
* but WITHOUT ANY WARRANTY; without even the implied warranty of
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
* GNU General Public License for more details.
*
* You should have received a copy of the GNU General Public License
* along with this program; if not, write to the Free Software
* Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
*
*/
#include <string.h>
#include <ctype.h>
#ifndef MAX_SEARCH_FILED_LENGTH
#define MAX_SEARCH_FIELD_LENGTH 1024
#endif
#ifndef SEP_CHAR
#define SEP_CHAR ' '
#endif
#ifndef NOTFOUND
#define NOTFOUND -1
#endif
/*
* Search string in string with ignoring case sensitivity and times of blank
* and comment lines.
* Blanks will be replaced with SEP_CHAR before compare.
* Comment lines are lines beginning with first non blank character '#'.
* Return value is the position in string1 relative to the begin of string1.
*/
int strstr_icase_blank(const char * const string1, const char * const string2)
{
int position, i, j;
char line[MAX_SEARCH_FIELD_LENGTH];
char cmp_line[MAX_SEARCH_FIELD_LENGTH];
char search_string[MAX_SEARCH_FIELD_LENGTH];
char *pstr;
int pos_first_non_blank;
strncpy(search_string, string2, MAX_SEARCH_FIELD_LENGTH);
search_string[MAX_SEARCH_FIELD_LENGTH - 1] = '\0';
pos_first_non_blank = -1;
// convert search string in upper case
for (i = 0; i < strlen(search_string); i++)
{
if ((pos_first_non_blank < 0) && (!isblank(search_string[i])))
pos_first_non_blank = i;
search_string[i] = (char)toupper(search_string[i]);
}
// replace blanks in search string with SEP_CHAR to compare without blanks
i = pos_first_non_blank;
j = 0;
while(i < strlen(search_string))
{
if (j > 0) {
cmp_line[j] = SEP_CHAR;
j++;
}
sscanf(&search_string[i], "%s", cmp_line + j);
i += strlen(cmp_line + j) + 1;
j += strlen(cmp_line + j);
for(; i < strlen(search_string); i++)
{
if (isblank(search_string[i])) {
continue
;
} else {
break
;
}
}
}
strncpy(search_string, cmp_line, strlen(search_string));
position = 0;
while (position < strlen(string1))
{
strncpy(line, (string1 + (position * sizeof(char))), MAX_SEARCH_FIELD_LENGTH);
line[MAX_SEARCH_FIELD_LENGTH - 1] = '\0';
pos_first_non_blank = -1;
for (i = 0; i < strlen(line); i++)
{
if ((pos_first_non_blank < 0) && (!isblank(line[i])))
pos_first_non_blank = i;
line[i] = (char)toupper(line[i]);
if (line[i] == '\n') {
line[i] = '\0';
break
;
}
}
// no compare with comment lines or empty lines
if ((line[pos_first_non_blank] != '#') && strlen(line) > 0) {
// replace blanks between entities in input line with SEP_CHAR to compare without blanks
i = pos_first_non_blank;
j = 0;
while(i < strlen(line))
{
if (j > 0) {
cmp_line[j] = SEP_CHAR;
j++;
}
sscanf(&line[i], "%s", cmp_line + j);
i += strlen(cmp_line + j) + 1;
j += strlen(cmp_line + j);
for(; i < strlen(line); i++)
{
if (isblank(line[i])) {
continue
;
} else {
break
;
}
}
}
if ((pstr = strstr(cmp_line, search_string)) != NULL) {
position += (pstr - cmp_line)/sizeof(char) + pos_first_non_blank;
break
;
}
}
position += strlen(line) + 1;
}
if (position >= strlen(string1)) {
position = NOTFOUND;
}
return position;
}