// ==========================================================================
// Implementation for a string array with random selection
// A. Fischer, June 4, Nov 14, 2000                        file: rstrings.cpp

#include "tools.hpp"
#include "rstrings.hpp"
// ==========================================================================
RandString::RandString( istream& vocin, int sz ) {
    //cerr << "\nConstructing RandString  ";
    data = new const char*[sz];
    for (int k=0; k<sz; k++) data[k]=NULL;
    n=0;
    maxData=sz;

    char line[80];                      // input buffer
    srand( time( NULL ) );              // start up random number generator.

    for(;;) {
        vocin >> ws;
        vocin.getline( line, 80 );
        if (!vocin.good()) break;
        put(line, vocin.gcount());      // store the string
    }
    //cerr << "\nRead " <<Many <<" Data from vocabulary file " << endl;
    if ( !vocin.eof() ) fatal( "Read error on vocabulary file" );
}

// -------------------------------------------------------------------------
RandString::~RandString() {
    delete [] data;
}

// -------------------------------------------------------------------------
void
RandString::put( const char* s, int len ) {
    if (n >= maxData) fatal("Sorry, vocabulary too large");
    data[n++] = store.put(s, len);  // Add to SStore & FlexArray.
}

// -------------------------------------------------------------------------
void
RandString::print( ostream& outs ) const {
    outs << "The vocabulary: \n";
    for (int k=0; k<n; k++) outs << data[k] << endl;
}

// -------------------------------------------------------------------------
const char*
RandString::randword() {
    if (n < 1) fatal( "Sorry, out of Data!");
    int r = rand();
    return remove( r % n );
}