//File chset.cpp

#include "chset.h"
#include "concglob.h"
#include <iostream.h>
#include <string.h>

chset::chset(const char* s) {
  if (s==NULL)
    set=NULL;
  else {
    int size=strlen(s)+1;
    char* temp1=new char[size]; //allocates space to hold s
    memset(temp1,'\0',size);
    int k=0;
    for (int j=0;j<size-1;j++) {
      if (strchr(temp1,s[j])==NULL) {
        temp1[k]=s[j];
        k++;
      };
    };
    temp1[k]='\0';
    char* temp=new char[k+1]; //allocates space to hold set members
    strcpy(temp,temp1);
    delete[] temp1;
    set=temp;
  };
};

chset::~chset() {
  delete[] set;
  set=NULL;
};

boolean chset::in(char ch) const {
  return boolean(strchr(set,ch)!=NULL);
};

void chset::incl(char ch) {
  if (!in(ch)) {
    int k=strlen(set);
    char* temp=new char[k+2]; //1 space for ch & another space for NULL
    strcpy(temp,set);
    temp[k]=ch;
    temp[k+1]='\0';
    delete[] set;
    set=temp;
  };
};

void chset::operator<(char ch) {
  if (!in(ch)) {
    int k=strlen(set);
    char* temp=new char[k+2];
    strcpy(temp,set);
    temp[k]=ch;
    temp[k+1]='\0';
    delete[] set;
    set=temp;
  };
};

chset operator+(const chset& c1,const chset& c2) {
  int i;
  int k=strlen(c1.set);
  int j=k;
  for (int i=0;i<strlen(c2.set);i++) {
    if (!c1.in(c2.set[i]))
      k++;
  };
  char* temp=new char[k+1];
  strcpy(temp,c1.set);
  for (i=0;i<strlen(c2.set);i++) {
    if (!c1.in(c2.set[i])) {
      temp[j]=c2.set[i];
      j++;
    };
  };
  temp[j]='\0';
  return temp;
};

chset& chset::operator=(const chset& c) {
  if (set!=0)
    delete[] set;
  set=new char[strlen(c.set)+1];
  strcpy(set,c.set);
  return *this;
};

ostream& operator<<(ostream& co,const chset& c) {
  co<<"{"<<c.set<<"}";
  return co;
};