cgi_search.c

Go to the documentation of this file.

/******************************************************************************/
/* cgi_search.c © Copyright 1998-2005 by Raosoft Inc. All Rights Reserved.    */
/*                                                                            */
/* You may use and modify this file for your own use, but may not distribute  */
/* it or derivative works without the prior written consent of Raosoft, Inc.  */
/*                                                                            */
/* If you choose to share your modifications with Raosoft, Inc. the company   */
/* will attempt to incorporate them into future versions of this file.        */
/*                                                                            */
/* This software is provided "as is," and Raosoft makes no warranty, express  */
/* or implied, of fitness for a particular application. Every measure has been*/
/* taken to anticipate risks inherent to computer networks, but we cannot     */
/* guarantee safety or reliability of this program in every situation.        */
/*                                                                            */
/******************************************************************************/

#include "cgi.h"

#ifndef XP_WIN
#ifndef AIX3
#include <sys/file.h>
#endif

#endif

char * strn2istr(char *s1, char *s2,size_t l2);

char * stristr(char *s1, char *s2);

/* the new way of doing it */
int DatabaseFindNextRecord(DATABASE * database,
                           CGINameValue* header,
                           CGINameValue* cgidata,
                           char* query)
{
 int ret = 0;
 char * Comparison = strdup(query);

 while (1)
   {
    int flags = 0;

    if (DatabaseReadRecord(database, header,&flags) == 0) break;
    if (flags != 0) continue; /* indicates a deleted record */

    if (query == NULL) {ret = 1; break;}

    if (EvaluateLogic(Comparison,header,cgidata)) {ret = 1; break;}
    strcpy(Comparison,query);
  }
 CGIFREE(Comparison);
 return ret; /* ran out */
}

int Matches(CGINameValue* header,
                     CGINameValue* query)
{
 int x;

    for (x=0; query[x].name != NULL ;x++)
    {
     CGINameValue* f;
     if (!query[x].name[0]) continue;
     f = GetField(header,query[x].name);
     if (!f) continue;
     if (strcmp(f->value?f->value:"",query[x].value)) return 0;
    }

    return 1; /* ha! found it */
}

int DatabaseFindFast(DATABASE * database,
                     CGINameValue* header,
                     CGINameValue* query,int* pos)
{
 while (1)
   {
    int flags = 0;
    if (pos) *pos = ftell(database);
    if (DatabaseReadRecord(database, header,&flags) == 0) break;
    if (flags != 0) continue; /* indicates a deleted record */

    if (query == NULL) return 1;

    if (Matches(header,query)) return 1;
   }
 return 0; /* ran out */
}

#if 0 /* the old way of doing it */
int DatabaseFindNextRecord(DATABASE * database,
                           CGINameValue* header,
                           CGINameValue* query,
                           int cs)
{
 while (1)
   {
    int flags = 0;
    if (DatabaseReadRecord(database, header,&flags) == 0) break;
    if (flags != 0) continue; /* indicates a deleted record */

    if (query == NULL) return 1;
    if (DatabaseEvalQuery(header,query,cs)) return 1;
  }
 return 0; /* ran out */
}

int QueryCompare(char* data, char* compare, int cs)
/* use SQL-style comparisons: _ is regex(.), % is regex(.*) */
/* comparsions are not case sensitive */
 {
  int i=0;
  while (data[i] && compare[i])
   {
    if (cs)
     {
      if (data[i] == compare[i]) {i++;  continue;}
     }
    else
     {
      if (toupper(data[i]) == toupper(compare[i])) {i++; continue;}
     }
    if (compare[i] == '_' || compare[i] == '?') {i++; continue;}
    if (compare[i] == '%' || compare[i] == '*') return 1;
    return 0;
   }

  if ((data[i] == 0)
       && (compare[i] == '%' || compare[i] == '*' || compare[i] == 0))
       return 1;
  /* wildcard match or the strings are at their ends */
  return 0;

 }

int DatabaseEvalQuery(CGINameValue* header, CGINameValue* query, int cs)
{
 int x;
 char* c;
 if (query == NULL) return 1; /* anything goes */

    for (x=0; query[x].name != NULL ;x++)
    {
     if (!query[x].name[0]) continue;
     if (query[x].name[0] == '_') continue;

     c = GetFieldValue(header, query[x].name);

     if (!QueryCompare(c,query[x].value,cs)) return 0;
    }

    return 1; /* ha! found it */
}
#endif

int DatabaseSearchRecord(DATABASE * database, char * querystr, int casesensitive)
{
 int c;
 char *name = malloc(MAXDATA);
 long int fpos;
 int column=0;

 fpos = ftell(database);
 if (fpos < 0)
  {
   CGIFREE(name);
   return -1;
  }
 do {
    c = ReadUntilChar(database,name,MAXDATA,"\t\n",'\r');
    if (column++ == 0 && name[0] == '#')
     { /* skip comment lines and deleted records */
      ReadUntilChar(database,name,MAXDATA,"\n",'\r');
      CGIFREE(name);
      return 0;
     }

    if (name[0] == 0)  continue; /* skip blank fields */
    if (casesensitive)
     {
      if (strstr(name,querystr))
       {
        fseek(database,fpos,0);
        CGIFREE(name);
        return 1;
       }
     }
    else
     {
      if (stristr(name,querystr))
       {
        fseek(database,fpos,0);
        CGIFREE(name);
        return 1;
       }
     }
   } while (c != '\r' && c != '\n' && c != EOF);

 CGIFREE(name);
 return 0;
}

Raosoft EZReport, EZSurvey, InterForm, RapidReport, Raosoft, and SurveyWin are registered trademarks of Raosoft, Inc. Page contents © 1996-2007 by Raosoft, Inc. You may use and modify this file for your own use, but may not distribute it or derivative works without the prior written consent of Raosoft, Inc. This software is provided "as is," and Raosoft makes no warranty, express or implied, of fitness for a particular application. Every measure has been taken to anticipate risks inherent to computer networks, but we cannot guarantee safety or reliability of this program in every situation.

Tel: 206-525-4025 (US) Email: raosoft@raosoft.com
http://www.raosoft.com/