definp.h File Reference

#include <string.h>
#include <iostream>
#include "wcpplib/stream/prstream.h"
#include "wcpplib/util/String.h"
#include "wcpplib/util/FunNameStack.h"
#include "wcpplib/safetl/AbsArr.h"

Go to the source code of this file.

Classes
class	definp_endpar

Macros
#define	DEFINPPAREND   dep
#define	DEFINPAP(name)   definp_any_par(name, String(#name "="), DEFINPPAREND)

Functions
int	definp_int (const String &str=String())
long	definp_long (const String &str=String())
double	definp_double (const String &str=String())
String	definp_String (const String &str=String())
long	set_position (const String &word, std::istream &istrm, int s_rewind, int s_req_sep)
template<class T >
void	definp_any_par (T &inp, const String &word, const definp_endpar &dep, int fs_short=0)
template<class T >
void	definp_any_2par (T &inp1, T &inp2, const String &word, const definp_endpar &dep, int fs_short=0)
void	remove_end_comments (std::istream &istr, String commark, DynLinArr< char > &istring)

Macro Definition Documentation

DEFINPAP

#define DEFINPAP

(

name

)

definp_any_par(name, String(#name "="), DEFINPPAREND)

Definition at line 91 of file definp.h.

DEFINPPAREND

#define DEFINPPAREND   dep

Definition at line 90 of file definp.h.

Function Documentation

definp_any_2par()

template<class T >

void definp_any_2par	(	T &	inp1,
		T &	inp2,
		const String &	word,
		const definp_endpar &	dep,
		int	fs_short = 0
	)

Definition at line 98 of file definp.h.

                                                                 {
  mfunnamep("template< class T > definp_any_par(...)");
  if (fs_short == 0)
    if (dep.s_short == 0)
      set_position(word, *dep.istrm, dep.s_rewind, dep.s_req_sep);
  (*(dep.istrm)) >> inp1 >> inp2;
  if (dep.s_print == 1)
    Imcout << "definp_any_par: " << word << ' ' << inp1 << ' ' << inp2 << '\n';
  //Iprintn(mcout, inp);
  check_econd11a(
      dep.istrm->good(), != 1,
      "after input of variables after word "
          << word << "\nwhose input values are " << inp1 << ' ' << inp2 << '\n',
      mcerr);
}

definp_any_par()

template<class T >

void definp_any_par	(	T &	inp,
		const String &	word,
		const definp_endpar &	dep,
		int	fs_short = 0
	)

Definition at line 66 of file definp.h.

                                      {
  mfunnamep("template< class T > definp_any_par(...)");
  check_econd11a(dep.istrm->good(), != 1,
                 "before input of variable named " << word << '\n', mcerr);
  //mcout<<"definp_any_par:\n";
  //Iprint2n(mcout, word, dep.s_short);
  if (fs_short == 0)
    if (dep.s_short == 0)
      set_position(word, *dep.istrm, dep.s_rewind, dep.s_req_sep);
  (*(dep.istrm)) >> inp;
  if (dep.s_print == 1)
    //Iprintn(mcout, dep.s_print);
    Imcout << "definp_any_par: " << word << ' ' << inp << '\n';
  //Iprintn(mcout, inp);
  check_econd11a(dep.istrm->good(), != 1,
                 "after input of variable named "
                     << word << "\nwhose input value is " << inp << '\n',
                 mcerr);
}

Referenced by operator>>().

definp_double()

double definp_double

(

const String &

str = String()

)

Definition at line 39 of file definp.cpp.

                                        {
  mfunnamep("int definp_double(void)");
  double d;
  mcout << "definp_double: starting, read double " << str << "\n";
  if (str != String()) {
    // search for mark
    int i_ret = findmark(cin, str.c_str());
    check_econd11(i_ret, != 1, mcerr);
  }
  cin >> d;
  Iprintn(mcout, d);
  check_econd11(cin.good(), != 1, mcerr);
  mcout << "double is read\n";
  return d;
}

definp_int()

int definp_int

(

const String &

str = String()

)

Definition at line 7 of file definp.cpp.

                                  {
  mfunnamep("int definp_int(const String& str)");
  int i = 0;
  mcout << "definp_int: starting, read int " << str << "\n";
  if (str != String()) {
    // search for mark
    int i_ret = findmark(std::cin, str.c_str());
    check_econd11(i_ret, != 1, mcerr);
  }
  cin >> i;
  Iprintn(mcout, i);
  check_econd11(cin.good(), != 1, mcerr);
  mcout << "int is read\n";
  return i;
}

definp_long()

long definp_long

(

const String &

str = String()

)

Definition at line 23 of file definp.cpp.

                                    {
  mfunnamep("int definp_long(const String& str)");
  long i = 0;
  mcout << "definp_long: starting, read long " << str << "\n";
  if (str != String()) {
    // search for mark
    int i_ret = findmark(cin, str.c_str());
    check_econd11(i_ret, != 1, mcerr);
  }
  cin >> i;
  Iprintn(mcout, i);
  check_econd11(cin.good(), != 1, mcerr);
  mcout << "long is read\n";
  return i;
}

definp_String()

String definp_String

(

const String &

str = String()

)

Definition at line 55 of file definp.cpp.

                                        {
  mfunnamep("int definp_String(const String& str)");
  String istr;
  mcout << "definp_String: starting, read String " << str << "\n";
  if (str != String()) {
    // search for mark
    int i_ret = findmark(cin, str.c_str());
    check_econd11(i_ret, != 1, mcerr);
  }
  cin >> istr;
  Iprintn(mcout, istr);
  check_econd11(cin.good(), != 1, mcerr);
  mcout << "String is read\n";
  return istr;
}

remove_end_comments()

void remove_end_comments	(	std::istream &	istr,
		String	commark,
		DynLinArr< char > &	istring
	)

Definition at line 114 of file definp.cpp.

                                                   {
  mfunnamep("void remove_end_comments(...)");
  //mcout<<"remove_end_comments is started\n";
  long marklen = commark.length();
  //Iprintn(mcout, marklen);
  DynLinArr<char> inpmark(marklen +
                          1);  // temporary array for testing for "mark"
                               //                       +1 for '\0'
  inpmark[marklen] = '\0';
  long qel = 0;
  istring.put_qel(1);
  int ic;
  int s_com = 0;  // sign of comment
  while ((ic = istr.get()) != EOF) {
    //mcout<<"read new ic="<<char(ic)<<'\n';
    //Iprint2n(mcout, qel, s_com);
    if (s_com == 1) {
      if (ic == '\n') {
        //mcout<<"comment will be annulled\n";
        s_com = 0;
 
        if (qel >= istring.get_qel() - 2) {
          istring.put_qel(istring.get_qel() * 2);
          //Iprint2n(mcout, qel, istring.get_qel());
        }
        istring[qel++] = ic;
      }
    } else {
      long n;
      for (n = 1; n < marklen; n++) {
        inpmark[n - 1] = inpmark[n];
      }
      inpmark[marklen - 1] = ic;
      //Iprintn(mcout, inpmark);
      if (strcmp(commark.c_str(), &(inpmark[0])) ==
          0) {  // yes, mark of comment is found
                //mcout<<"comment is recognized\n";
        s_com = 1;
        qel = qel - (marklen - 1);  // to annul beginning of the comment mark
      } else {                      // just add new symbol
        if (qel >= istring.get_qel() - 2) {
          istring.put_qel(istring.get_qel() * 2);
          //Iprint2n(mcout, qel, istring.get_qel());
        }
        //for debug:
        //if(char(ic) == ' ')
        //  istring[qel++] = '_';
        //else
        istring[qel++] = ic;
      }
    }
  }
  istring[qel++] = '\0';
  //mcout<<"remove_end_comments is finished\n";
}

set_position()

long set_position	(	const String &	word,
		std::istream &	istrm,
		int	s_rewind,
		int	s_req_sep
	)

Definition at line 71 of file definp.cpp.

                                 {
  mfunnamep("int set_position(const String& word, std::istream& istrm, int "
            "s_rewind, int s_req_sep)");
  check_econd11a(istrm.good(), != 1,
                 "before seekg, call for variable named " << word << '\n',
                 mcerr);
  long nbeg, nnext;
  char prev;
  if (s_rewind == 1) istrm.seekg(0);
  if (s_req_sep == 0) {
    //int iret = findmark(istrm, word.c_str());
    int iret = findmark_b(istrm, word, word.length(), nbeg, nnext, prev);
 
    check_econd11a(iret, != 1,
                   "The keyword \"" << word.c_str() << "\" is not found\n",
                   mcerr);
    check_econd11a(
        istrm.good(), != 1,
        "after the call of findmark for variable named " << word << '\n',
        mcerr);
  } else {
    do {
      int iret = findmark_b(istrm, word, word.length(),
                            //  DynLinArr< T > ws, long qws,
                            nbeg, nnext, prev);
      check_econd11a(iret, != 1,
                     "The keyword \"" << word.c_str() << "\" is not found\n",
                     mcerr);
      check_econd11a(
          istrm.good(), != 1,
          "after the call of findmark for variable named " << word << '\n',
          mcerr);
      if (nbeg == 0) return nbeg;  // no need to search for separator
      if (prev == '\n' || prev == ' ') return nbeg;  // good separator
    } while (1);                                     // infinite loop
  }
  check_econd11a(istrm.good(), != 1,
                 "after findmark_b, call for variable named " << word << '\n',
                 mcerr);
  return nbeg;
}

Referenced by definp_any_2par(), definp_any_par(), and operator>>().