/* jasen.cpp */
/****************************************************************************/
/*
** J„sen-luokan toteutus
**
**  Tekij„t:          Vesa Lappalainen
**                    Ohjelmointikurssi 1991
**  Tehty:            20.12.1991
**  Muutettu:         09.12.1995
**  Mit„ muutettu:    Muutettu C++ luokaksi
**  Muutettu:         28.12.1995
**  Mit„ muutettu:    Lis„tty kentt„tietoja palauttavia metodeja
**
** Public-metodeja:
** ================
**
**  cJasen()
**   - alustaa j„senen tyhj„ksi
**
**  void alusta();
**   - alustaa j„senen tyhj„ksi
**
**  void alusta(const char *rivi);
**  void alusta(const string &st);
**   - alustaa j„senen merkkijonolla Ankka Aku|0....|..
**
**  cJasen(const cJasen &jasen)
**   - alustaa j„senen toisen j„senen tiedoilla
**
**  const cJasen &operator=(const cJasen &jasen)
**   - sijoitaa j„sen tiedot toiseen j„seneen
**
**  const cJasen &sijoita(const cJasen &jasen);
**   - sijoitaa j„sen tiedot toiseen j„seneen
**
**  void vastaa_aku_ankka();
**   - t„ytt„„ j„senen Aku Ankan tiedoilla (testitarkoituksiin)
**
**  int operator==(const cJasen &jasen) const;
**   - tutkii onko kaksi j„sent„ samat ( 0 = ei, 1 = juu )
**
**  void tulosta(ostream &os) const;
**   - tulostaa j„senen valittuun tietovirtaan (tiedostoon) "tarra"-muodossa
**
**  friend ostream &operator<<(ostream &os,const cJasen &jasen);
**   - tulostaa j„senen rivimuodossa tietovirtaan
**
**  friend istream &operator>>(istream &is,cJasen &jasen);
**   - ottaa rivimuodossa olevan j„senen tietovirrasta
**
**  const string kentta_jonoksi(int k) const
**   - paluttaa k:n kent„n merkkijonona
**
**  int sijoita(int k,const string &st)
**   - sijoittaa merkkijonon k:nteen kentt„„n
**
**  const char *kysymys(int k) const
**   - paluttaa k:ta kentt„„ vastaavan kysymyksen
**
**  int kenttia() const
**   - palauttaa j„senen kenttien lukum„„r„n
**
**  int tyhjenna_omat()
**   - tyhjent„„ j„senen ne tiedot, jotka ovat omia uudelle
**     j„senelle
**
** J„senen rivimuoto:
** ==================
**  Ankka Aku          |010245-123U|Ankkakuja 6 |12345|...
**
*/

#include <iostream.h>
#include <strstream.h>
#include <stdlib.h>
#include <string>
#include "jasen.h"
#include "muunnos.h"
#include "mjonot.h"


//============================================================================
// Apufunktioita muunnoksiin:
//============================================================================
static inline const string &jonoksi(const string &st)
{
  return (st);
}

static string jonoksi(int i)
{
  char st[20];
  int_jonoksi(N_S(st),i,"%d");
  return string(st);
}

static string jonoksi(double d)
{
  char st[40];
  double_jonoksi(N_S(st),d,"%4.2lf");
  return string(st);
}

inline void muunna_jono(const char *s,string &st)
{
  st = s;
}

inline void muunna_jono(const char *s,int &i)
{
  i = jono_intiksi(s,"%d");
}

inline void muunna_jono(const char *s,double &d)
{
  d = jono_doubleksi(s,"%lf");
}

template <class TYPE>
void muunna_jono(const string &st,TYPE *a)
{
  muunna_jono(st.c_str(),*a);
}


//============================================================================
// Apufunktioita lukemiseen, palauttavat 0 jos OK ja 1 jos loppuu kesken.
//============================================================================
static int ota_seuraava(istream &is, char *s, int max_koko, char erotin)
{
  if ( max_koko <= 0 ) return 0;
  s[0] = 0;
  if ( !is ) return 1;
  is.getline(s,max_koko,erotin);
  poista_tyhjat(s);
  return ( is == 0 );
}

template <class TYPE>
int ota_seuraava(istream &is, TYPE &a,  char erotin)
{
  char s[100];
  int err = ota_seuraava(is,s,sizeof(s),erotin);
  muunna_jono(s,a);
  return err;
}



//============================================================================
// J„sen-luokan public-metodeja:
//============================================================================

//----------------------------------------------------------------------------
int cJasen::alusta()
{
  return alusta("");
}


//----------------------------------------------------------------------------
int cJasen::tyhjenna_omat()
{
  nimi        = "";
  hetu        = "";
  autopuhelin = "";
  lisatietoja = "";
  return 0;
}


//----------------------------------------------------------------------------
int cJasen::alusta(const char *rivi)
{
  char *urivi = tee_jono(rivi); // Kopio, koska ei ole const char * alustajaa
  istrstream sstr(urivi);       // merkkivirralle
  sstr >> *this;
  free(urivi);
  return 0;
}

//----------------------------------------------------------------------------
void cJasen::vastaa_aku_ankka()
{
  char apuhetu[50];
  sprintf(apuhetu,"%02d%02d%02d-%03d%c",
          rand()%31+1,rand()%12+1,rand()%91+1,rand()%1000,rand()%25+'A');
  apuhetu[11]=0;

  nimi           = "Ankka Aku";
  hetu           = apuhetu;
  katuosoite     = "Ankkakuja 6";
  postinumero    = "12345";
  postiosoite    = "ANKKALINNA";
  kotipuhelin    = "12-1234";
  tyopuhelin     = "";
  autopuhelin    = "";
  liittymisvuosi = 1996;
  jmaksu         = 50.00;
  maksu          = 30.00;
  lisatietoja    = "Velkaa Roopelle";
}


//----------------------------------------------------------------------------
void cJasen::tulosta(ostream &os) const
{
  os << "  " << nimi << "  " << hetu << endl;
  os << "  " << katuosoite << "  " <<
                postinumero << " " << postiosoite << endl;
  os << "  k: " << kotipuhelin <<
         " t: " << tyopuhelin  <<
         " a: " << autopuhelin << endl;
  os << "  Liittynyt "  << jonoksi(liittymisvuosi) << "."
        "  J„senmaksu " << jonoksi(jmaksu) << " mk."
        "  Maksettu "   << jonoksi(maksu)  << " mk." << endl;
  os << "  " << lisatietoja << endl;
}


//----------------------------------------------------------------------------
int cJasen::operator==(const cJasen &jasen) const
{
  if ( nimi           != jasen.nimi           ) return 0;
  if ( hetu           != jasen.hetu           ) return 0;
  if ( katuosoite     != jasen.katuosoite     ) return 0;
  if ( postinumero    != jasen.postinumero    ) return 0;
  if ( postiosoite    != jasen.postiosoite    ) return 0;
  if ( kotipuhelin    != jasen.kotipuhelin    ) return 0;
  if ( tyopuhelin     != jasen.tyopuhelin     ) return 0;
  if ( autopuhelin    != jasen.autopuhelin    ) return 0;
  if ( liittymisvuosi != jasen.liittymisvuosi ) return 0;
  if ( jmaksu         != jasen.jmaksu         ) return 0;
  if ( maksu          != jasen.maksu          ) return 0;
  if ( lisatietoja    != jasen.lisatietoja    ) return 0;
  return 1;
}

//----------------------------------------------------------------------------
const cJasen &cJasen::sijoita(const cJasen &jasen)
{
  nimi           = jasen.nimi;
  hetu           = jasen.hetu;
  katuosoite     = jasen.katuosoite;
  postinumero    = jasen.postinumero;
  postiosoite    = jasen.postiosoite;
  kotipuhelin    = jasen.kotipuhelin;
  tyopuhelin     = jasen.tyopuhelin;
  autopuhelin    = jasen.autopuhelin;
  liittymisvuosi = jasen.liittymisvuosi;
  jmaksu         = jasen.jmaksu;
  maksu          = jasen.maksu;
  lisatietoja    = jasen.lisatietoja;
  return *this;
}


char cJasen::erotin = '|';

//----------------------------------------------------------------------------
ostream &operator<<(ostream &os,const cJasen &jasen)
{
  char erotin = jasen.erotin;
  os << jonoksi(jasen.nimi)           << erotin
     << jonoksi(jasen.hetu)           << erotin
     << jonoksi(jasen.katuosoite)     << erotin
     << jonoksi(jasen.postinumero)    << erotin
     << jonoksi(jasen.postiosoite)    << erotin
     << jonoksi(jasen.kotipuhelin)    << erotin
     << jonoksi(jasen.tyopuhelin)     << erotin
     << jonoksi(jasen.autopuhelin)    << erotin
     << jonoksi(jasen.liittymisvuosi) << erotin
     << jonoksi(jasen.jmaksu)         << erotin
     << jonoksi(jasen.maksu)          << erotin
     << jonoksi(jasen.lisatietoja)    << erotin;
  return os;
}

//----------------------------------------------------------------------------
istream &operator>>(istream &is,cJasen &jasen)
{
  char erotin = jasen.erotin;
  ota_seuraava(is,jasen.nimi            ,erotin);
  ota_seuraava(is,jasen.hetu            ,erotin);
  ota_seuraava(is,jasen.katuosoite      ,erotin);
  ota_seuraava(is,jasen.postinumero     ,erotin);
  ota_seuraava(is,jasen.postiosoite     ,erotin);
  ota_seuraava(is,jasen.kotipuhelin     ,erotin);
  ota_seuraava(is,jasen.tyopuhelin      ,erotin);
  ota_seuraava(is,jasen.autopuhelin     ,erotin);
  ota_seuraava(is,jasen.liittymisvuosi  ,erotin);
  ota_seuraava(is,jasen.jmaksu          ,erotin);
  ota_seuraava(is,jasen.maksu           ,erotin);
  ota_seuraava(is,jasen.lisatietoja     ,erotin);
  return is;
}


//----------------------------------------------------------------------------
const string cJasen::kentta_jonoksi(int k) const
{
  switch ( k ) {
    case  0: return jonoksi(nimi);
    case  1: return jonoksi(hetu);
    case  2: return jonoksi(katuosoite);
    case  3: return jonoksi(postinumero);
    case  4: return jonoksi(postiosoite);
    case  5: return jonoksi(kotipuhelin);
    case  6: return jonoksi(tyopuhelin);
    case  7: return jonoksi(autopuhelin);
    case  8: return jonoksi(liittymisvuosi);
    case  9: return jonoksi(jmaksu);
    case 10: return jonoksi(maksu);
    case 11: return jonoksi(lisatietoja);
    default: return string("VIRHE");
  }
}


//----------------------------------------------------------------------------
int cJasen::sijoita(int k,const string &st)
{
  switch ( k ) {
    case  0: muunna_jono(st,&nimi);            return 0;
    case  1: muunna_jono(st,&hetu);            return 0;
    case  2: muunna_jono(st,&katuosoite);      return 0;
    case  3: muunna_jono(st,&postinumero);     return 0;
    case  4: muunna_jono(st,&postiosoite);     return 0;
    case  5: muunna_jono(st,&kotipuhelin);     return 0;
    case  6: muunna_jono(st,&tyopuhelin);      return 0;
    case  7: muunna_jono(st,&autopuhelin);     return 0;
    case  8: muunna_jono(st,&liittymisvuosi);  return 0;
    case  9: muunna_jono(st,&jmaksu);          return 0;
    case 10: muunna_jono(st,&maksu);           return 0;
    case 11: muunna_jono(st,&lisatietoja);     return 0;
    default:                                   return 1;
  }
}


//----------------------------------------------------------------------------
const char *cJasen::kysymys(int k) const
{
  switch ( k ) {
    case  0: return "J„senen nimi";
    case  1: return "Hetu";
    case  2: return "Katuosoite";
    case  3: return "Postinumero";
    case  4: return "Postiosoite";
    case  5: return "Kotipuhelin";
    case  6: return "Ty”puhelin";
    case  7: return "Autopuhelin";
    case  8: return "Liittymisvuosi";
    case  9: return "J„senmaksu mk";
    case 10: return "Maksettu maksu mk";
    case 11: return "Lis„tietoja";
    default: return "VIRHE!";
  }
}