findmark.cpp

Go to the documentation of this file.

#include <iostream>
#include <cstdio>
 
#include "wcpplib/stream/findmark.h"
#include "wcpplib/stream/prstream.h"
 
/*
Copyright (c) 2000 I. B. Smirnov
 
Permission to use, copy, modify, distribute and sell this file for any purpose
is hereby granted without fee, provided that the above copyright notice,
this permission notice, and notices about any modifications of the original
text appear in all copies and in supporting documentation.
The file is provided "as is" without express or implied warranty.
*/
 
namespace Heed {
 
int findmark(std::istream &file, const char *s) {
  int ic;
  int l = strlen(s);  // length does not include end symbol
  char *fs = new char[l + 1];
  for (int n = 0; n < l; n++) {
    if ((ic = file.get()) == EOF) {
      delete[] fs;
      return 0;
    }
    fs[n] = ic;
  }
  fs[l] = '\0';
  while (strcmp(fs, s) != 0) {
    for (int n = 1; n < l; n++) fs[n - 1] = fs[n];
    if ((ic = file.get()) == EOF) {
      delete[] fs;
      return 0;
    }
    fs[l - 1] = ic;
    fs[l] = '\0';
  }
  delete[] fs;
  return 1;
}
 
int find1ofnmark(std::istream &file, int q, char *s[]) {
  // mcout<<"find1ofnmark is started\n";
  // char c;
  int ic;
  int *l = new int[q];
  int *pos_fs = new int[q];
  int s_init_pos_fs = 0;
  int i;
  int l_max = -1;
  for (i = 0; i < q; i++) {
    l[i] = strlen(s[i]);  // length does not include end symbol
    if (l[i] > l_max) l_max = l[i];
  }
  // l_max++;
  // Iprintn(mcout, q);
  // Iprintn(mcout, l_max);
  char *fs = new char[l_max + 1];
  // int qfs=0;                   // number of symbols in fs
  for (i = 0; i < q; i++) {
    pos_fs[i] = l_max;
  }
  fs[l_max] = '\0';
  // Iprintn(mcout, file.good());
  // Iprintn(mcout, file.eof());
  // Iprintn(mcout, file.fail());
  // Iprintn(mcout, file.bad());
  // mcout<<"State:"<< file.rdstate() <<'\n';
  while ((ic = file.get()) != EOF) {
    // Iprintn(mcout, ic);
    for (i = 1; i < l_max; i++) {
      fs[i - 1] = fs[i];
    }
    fs[l_max - 1] = ic;        // new symbol
    if (s_init_pos_fs == 0) {  // shift positions
      int ss = 1;
      for (i = 0; i < q; i++) {
        if (l_max - pos_fs[i] < l[i]) {
          pos_fs[i]--;
          ss = 0;
          // mcout<<"s[i]="<<s[i]<<'\n';
          // mcout<<"i="<<i<<" l_max="<<l_max<<" pos_fs[i]="<<pos_fs[i]
          //     <<" l[i]="<<l[i]<<" "<< &(fs[ pos_fs[i] ])<<'\n';
        }
      }
      if (ss == 1) s_init_pos_fs = 1;
    }
    for (i = 0; i < q; i++) {
      if (strcmp(&(fs[pos_fs[i]]), s[i]) == 0) {
        delete[] l;
        delete[] fs;
        delete[] pos_fs;
        return i;
      }
    }
  }
  // Iprintn(mcout, ic);
  delete[] l;
  delete[] fs;
  delete[] pos_fs;
  return -1;
}
 
int find1ofnmark(std::istream &file, int q,  // number of strings
                 const std::string str[])         // addresses
{
  char **s = new char *[q];
  for (int i = 0; i < q; i++) {
    s[i] = new char[strlen(str[i].c_str()) + 1];
    strcpy(s[i], str[i].c_str());
  }
  int iret = find1ofnmark(file, q, s);
  for (int i = 0; i < q; i++) {
    delete[] s[i];
  }
  delete[] s;
  return iret;
}
 
}