/* naytto.cpp */
/****************************************************************************/
/*
**        N A Y T T O . C P P
**
** N„ytt”-luokan toteutus
**
**  Tekij„t:          Vesa Lappalainen
**                    Ohjelmointikurssi 1991
**  Tehty:            20.12.1991
**  Muutettu:         10.12.1995
**  Mit„ muutettu:    Muutettu C++ luokaksi
**  Muutettu:         28.12.1995/vl
**  Mit„ muutettu:    Laitettu uuden j„senen lukeminen toimivaksi
**  Muutettu:         02.01.1996/vl
**  Mit„ muutettu:    Lis„tty oikeellisuustarkistus ja valmius
**                    lista-tyyppisiin kenttiin
**                    ks. kysy_tavallinen_kentta ja kysy_listakentta
**                    Lis„tty helpin k„ytt”
**  Muutettu:         07.01.1996/vl
**  Mit„ muutettu:    Lis„tty mahdollisuus k„„nt„„ m„„rittelem„ll„
**                    vakio USE_CONSOLE ja lis„„m„ll„ t„ll”in editlue.c:n
**                    vaatimat muut tiedosto projektiin.  N„in voidaan
**                    saada n„ytt”editointi mukaan silloin kuin
**                    console.c on kohdelaitteistolle sovitettu
**                    (7.1.1996: BorlandC, HP-UX, Linux, AIX, ks. console.c)
**  Muutettu:         20.01.1997/vl
**  Mit„ muutettu:    J„senet erilleen kerhosta
**                    lue_tiedosto ja cNaytto(...) parametrilistaa muutettu
**                    jotta voidaan lukea esim. komento rivill„ annettu tied.
**
**
** Tietorakenne on seuraava:
**
**
**   cNaytto    cKerho
**   ------
**   | o-----> |---|
**   |    |    |   |
**   |    |    |   |
**   |    |    |   |
**   |    |    |---|
**   ------
**
**  K„yt”ss„ voi olla monta n„ytt”„, joista jokainen voi osoittaa samaan
**  tai eri kerhoon.  N„ytt” huolehtii kaikesta k„ytt”liittym„„n
**  liittyv„st„.  N„ytt” ei tied„ kerhon rakenteesta muuta kuin, ett„
**  kerhon voi lukea levylt„ ja kirjoittaa levylle sek„ siihen voi
**  lis„t„ ja etsi„ j„seni„.  N„ytt” tiet„„ ett„ on olemassa j„sen,
**  muttei se tied„ j„senen yksityiskohtia.
**
**  N„ytt”luokka voidaan kirjoittaa uusiksi esimerkiksi Windows-
**  toteuteusta varten.  T„m„ n„ytt”luokka on ANSI C++:n mukainen,
**  standardi-p„„tett„ k„ytt„v„ versio.
**  7.1.1996 lis„tty mahdollisuus k„ytt””n console.c:hen perustuvaa
**  n„yt”n k„sittely„.
**
** Public-metodeja:
** ================
**  cNaytto(cKerho *p)
**   - alustetaan naytto kayttaen naytossa kerhoa johon p osoittaa
**
**  ~cNaytto()
**   - h„vitet„„n n„ytt”.  Talletetaan jollei ole viel„ tehty
**
**  void ohjeet(void);
**   - lyhyt tiedotus ohjelmasta
**
**  void kiitokset(void);
**   - poistumiskiitokset
**
**  int  lue_tiedostosta(tied);
**   - luetaan kerhon nimi ja sitten luetaan kerho tiedostosta
**     Luodaan uusi, jollei kerhoa l”ydy levylt„.
**
**  int  talleta();
**   - talletaan kerho levylle (jos siin„ on muutoksia).
**     vanha kerho j„„ .bak -nimelle
**
**  int  paavalinta();
**   - tulostetaan p„„menu ja odotetaan valintaa sek„ suoritetaan
**     valittu toimenpide.  Toistetaan silmukassa kunnes valitaan
**     poistuminen.
**     Toistaiseksi vasta lis„„minen toimii Aku Ankalla ja
**     tulostus alkeellisesti n„ytt””n
**
**
*/

#include <iostream.h>
#include <string.h>
#include <string>
using namespace std;
#include "naytto.h"
#include "ioali.h"
#include "mjonotpp.h"
#include "mjonot.h"
#include "editlue.h" // T„m„ vaikuttaa vain jos on vakio USE_CONSOLE
#include "wout.h"
#include "help.h"

//============================================================================
// Vakiota
//============================================================================
#define VERSIO "1996.01.14"

static const int   OLET_ALKU = 19;
static const int   VAKANEN   = 33;

static const char *TARKENNIN = ".dat";
static const char *VANHATARK = ".bak";


//============================================================================
// Merkkijonot, jotka tarkoittavat jotakin toimintoa ja niiden k„sittely
//============================================================================
typedef struct {
  eToiminto komento;
  const char *jono;
} tKomento;

static tKomento komennot[] = {
  { TOIM_LOPETA      , "q"   },
  { TOIM_EDELLINEN   , "^"   },
  { TOIM_LOPUT_OLETUS, ",|." },
  { TOIM_JATKA       , NULL  }
};

static eToiminto mika_komento(const char *s)
{
  for (int i=0; komennot[i].jono; i++)
    if ( joku_jono(s,komennot[i].jono,"|") == 0 ) return komennot[i].komento;
  return TOIM_JATKA;
}

//============================================================================
// N„yt”n yleinen k„sittely:
//============================================================================

void cNaytto::logo(void)
{
  cout << endl;
  cout << "      ###################################" << endl;
  cout << "      #   J Ž S E N R E K I S T E R I   #" << endl;
  cout << "      #     versio " << VERSIO << "           #" << endl;
  cout << "      #             vl                  #" << endl;
  cout << "      ###################################" << endl;
}


void cNaytto::ohjeet(void)
{
  logo();
  cout << endl;
  cout << "T„ll„ ohjelmalla yll„pidet„„n kerhon j„senrekisteri„." << endl;
}


void cNaytto::kiitokset(void)
{
  cout << endl;
  cout << "KIITOS KŽYT™STŽ JA TERVETULOA UUDELLEEN" << endl;
  cout << endl << endl << endl;
}


//============================================================================
// N„yt”n kerhon tunteva osuus:
//============================================================================

//----------------------------------------------------------------------------
int cNaytto::lue_tiedosto(const char *tied_nimi)
/*
** Luetaan kerho levylt„.
** Ensin kysyt„„n kerhon nimi.  Jos kerhoa ei ole, utellaan
** lis„tietoja ja luodaan se.
----------------------------------------------------------------------------*/
{
  string nimi,tied; int maksimi;
  
  if ( tied_nimi != NULL ) { tied = tied_nimi; goto jatka; }
  if ( kerho->Jasenet().Tiedoston_nimi() != "" ) {
    tied = kerho->Jasenet().Tiedoston_nimi(); goto jatka;
  }  // Poista goto??

  do { // Kysell„„n kunnes tiedosto aukeaa tai luodaan uusi
    cout << endl;
    cout << "Anna kerhon nimi>";  lue_rivi(cin,tied);
    if ( tied == "" ) return ilmoitus("Tiedoston nime„ ei annettu");
jatka:
    laita_tarkennin(tied,TARKENNIN);
    if ( onko_tiedostoa(tied) ) return ilmoitus(kerho->lue_tiedostosta(tied));

    cout << "Tiedostoa " << tied << " ei ole!" << endl;
  } while ( kylla_kysymys("Luodaanko uusi tiedosto?") == 0 );

  cout << endl;
  cout << "Anna kerhon koko nimi    >";  lue_rivi(cin,nimi);
  cout << "Anna kerhon maksimi koko >";  lue_rivi(cin,maksimi);

  return ilmoitus(kerho->luo(tied,nimi,maksimi));

}


//----------------------------------------------------------------------------
int cNaytto::talleta()
/*
** Jos kerhossa muutoksia, niin
** Nimet„„n vanha tiedosto .bak -nimelle ja talletetaan
** nykyinen tiedosto vanhan tilalle.
----------------------------------------------------------------------------*/
{
  logo();
  if ( !kerho->Muutettu() ) return 0;
  int vanhat_pilalla = kerho->TeeBak(VANHATARK);

  if ( ilmoitus(kerho->talleta()) ) return 1;

  cout << endl;
  cout << "Tiedot talletettu tiedostoon "
       << kerho->Jasenet().Tiedoston_nimi() << endl;
  if ( !vanhat_pilalla )
    cout << "Vanhat tiedot tiedostossa    "
         << kerho->Jasenet().Bak_nimi() << endl;

  return 0;
}


//----------------------------------------------------------------------------
int cNaytto::kysy_talleta()
{
  if ( !kerho->Muutettu() ) return 0;
  if ( kylla_kysymys("Talletetaanko tiedot") ) return talleta();
  return 0;
}


//----------------------------------------------------------------------------
void cNaytto::tulosta(ostream &os,const cJasen &jasen)
{
  jasen.tulosta(os);
}


/****************************************************************************/
static eToiminto          /*                                                */
kysy_kentta(              /*                                                */
  const char *viesti     ,/* s   Viesti joka tulee n„yt”lle                 */
  string &jono            /* t   Jono johon kent„n vastaus luetaan.         */
)
/*
** Funktiolla luetaan vastaus kentt„„n.
**
** Globaalit: POIS (jono, jolla sy”tt” katkaistaan)
** Sy”tt”:    p„„tteelt„
** Tulostus:  n„ytt””n
** Kutsuu:    lue_jono_oletus
----------------------------------------------------------------------------*/
{
  char apu[80]; int paluu;
  eToiminto toim;

  kopioi_jono(N_S(apu),jono.c_str());

  paluu = lue_jono_oletus(viesti,OLET_ALKU,VAKANEN,apu,N_S(apu));

  if ( paluu < OLETUS ) return TOIM_LOPETA;
  if ( ( toim  = mika_komento(apu) ) != TOIM_JATKA ) return toim;

  poista_tyhjat(apu);
  jono = apu;

  return TOIM_JATKA;
}

//----------------------------------------------------------------------------
eToiminto cNaytto::kysy_tavallinen_kentta(cJasen &jasen, int k)
/*
** Kysyt„„n tavallisen kent„n tiedot.  Palautetaan tieto miten pit„„
** jatkaa:
**  TOIM_LOPETA          - ei kysell„ en„„, eik„ j„senen tietoja saa k„ytt„„
**  TOIM_SEURAAVA        - voi kysy„ seuraav kent„n tiedot
**  TOIM_EDELLINEN       - t„ytyy kysy„ edellisen kent„n tiedot
**  TOIM_KYSY_UUDELLEEN  - tiedot t„ytyy kysy„ uudelleen
**
** 1. kysymyksest„ p„„see pois pelk„ll„ RETURNin painamisella.
** Jos yritet„„n lis„t„ sellaisia kentti„,, joista t„ytyy olla
** yksik„sitteinen arvo, joko varoitetaan tai kielt„ydyt„„n lis„„misest„.
** Kent„n sijoittaminen osaa ilmoittaa t„m„n.
**
** Toteuteuksessa on viel„ se vika, ett„ jos palataan edelliseen jo
** kerran varmistettuun kentt„„n, niin taas kent„st„ poistuttaessa
** varmistus kysyt„„n uudelleen.  Vika saataisiin pois m„„rittelem„ll„
** taulukko, johon merkit„„n mitk„ kent„t on jo hyv„ksytty.  Hyv„ksynt„
** pit„„ tietysti aina poistaa jos kent„n sis„lt” muuttuu!
----------------------------------------------------------------------------*/
{
  int lkm,kuka;
  cKenttavirhe virhe;
  eToiminto toiminto;
  string edell; // Apumuuttuja johon jemmataan kent„n vanha arvo
  string jono;

  edell = jono = jasen.kentta_jonoksi(k);

  edit_vaihda_muunnos(jasen.kentta_muunnos(k));  // Jos n„ytt”editointi

  toiminto = kysy_kentta(jasen.kysymys(k),jono);
  if (  toiminto != TOIM_JATKA ) return toiminto;

  if ( k == jasen.eka_kysymys() && jono == "" )
    return TOIM_LOPETA; // 1. kys. pois pelk. ret

  if ( jono == HELP_JONO ) {
    help_aihe(jasen.help_aihe(k));
    return TOIM_KYSY_UUDELLEEN;
  }

  virhe = jasen.sijoita(k,jono);

  switch ( virhe.Taso() ) {
    case KENTTA_OK:
      return TOIM_SEURAAVA;

    case KENTTA_VAROITUS:
      cout << virhe.Virhe() << endl;
      return TOIM_SEURAAVA;

    case KENTTA_UUDELLEEN:
    case KENTTA_MUUTETTU_KYSY:
      cout << virhe.Virhe() << endl;
      return TOIM_KYSY_UUDELLEEN;

    case KENTTA_OK_ONKO_AINOA:
      lkm = kerho->Jasenet().laske_montako_muuta(jasen,k,kuka);
      if ( lkm == 0 ) return TOIM_SEURAAVA;
      kerho->Jasenet().anna(kuka).tulosta(cout);
      cout << "On jo ennest„„n!" << endl;
      jasen.sijoita(k,edell);
      return TOIM_KYSY_UUDELLEEN;

    case KENTTA_OK_VAROITA_MUUT:
      lkm = kerho->Jasenet().laske_montako_muuta(jasen,k,kuka);
      if ( lkm == 0 ) return TOIM_SEURAAVA;
      kerho->Jasenet().anna(kuka).tulosta(cout);
      if ( kylla_kysymys("On jo, lis„t„„nk” silti uusi!") )
        return TOIM_SEURAAVA;
      jasen.sijoita(k,edell);
      return TOIM_KYSY_UUDELLEEN;

    default: ;
  } // virhe.Taso()
  return TOIM_SEURAAVA;
}


//----------------------------------------------------------------------------
int cNaytto::kysy_tiedot(cJasen &jasen)
{
  cJasen apujasen(jasen);
  int k,eka=apujasen.eka_kysymys(),kenttia = apujasen.kenttia();
  eToiminto toiminto;

  k = eka;

  do {
    if ( k < eka ) k = eka;

    switch ( apujasen.kentan_tyyppi(k) ) {
      case KENTTA_NORMAALI:
        toiminto = kysy_tavallinen_kentta(apujasen,k);
        break;
      case KENTTA_LISTA:
        toiminto = kysy_listakentta(apujasen,k);
        break;
      default: return 1;
    }

    switch ( toiminto ) {
      case TOIM_SEURAAVA:       k++;         break;
      case TOIM_EDELLINEN:      k--;         break;
      case TOIM_KYSY_UUDELLEEN:              break;
      case TOIM_LOPUT_OLETUS:   k = kenttia; break;
      case TOIM_LOPETA:                      return 1;
      default: ;
    }

  } while ( k < kenttia );

  jasen = apujasen;
  return 0;
}


//----------------------------------------------------------------------------
eToiminto cNaytto::kysy_listakentta(cJasen &, int )
/*
** Kysyt„„n listatyyppisen kent„n tiedot.
** Ei toteutettu!
----------------------------------------------------------------------------*/
{
  return TOIM_SEURAAVA;
}


//----------------------------------------------------------------------------
//----------------------------------------------------------------------------
void cNaytto::lisaa_uusi_jasen(char valinta)
/*
** Kysell„„n uusien j„senien tietoja ja lis„t„„n j„senet.
----------------------------------------------------------------------------*/
{
  cJasen jasen(kerho->Jasenet().anna(nykyjasen));  // Kerho hoitaa jos -1

  otsikko(valinta,"Uuden j„senen lis„ys");

  while ( 1 ) {
    jasen.tyhjenna_omat();
    jasen.rekisteroi();
    cout << endl;
    cout << "J„seni„ on nyt " << kerho->Jasenia() << "." << endl;
    cout << "Anna uusi nimi muodossa sukunimi etunimi" << endl;

    do {
      if ( kysy_tiedot(jasen) != 0 ) return;

      cout << "Lis„t„„nk”" << endl;
      jasen.tulosta(cout);
    } while ( kylla_kysymys("") == 0 );

    if ( ilmoitus(kerho->Jasenet().lisaa(jasen)) ) return;
    nykyjasen = kerho->Jasenia()-1;
  }
}


//----------------------------------------------------------------------------
void cNaytto::etsi_jasenen_tiedot(char valinta)
{
  otsikko(valinta,"Etsi j„senen tiedot");
  ei_toimi();
}


//----------------------------------------------------------------------------
void cNaytto::tulosteet(char valinta)
/*
** Tulostetaan kaikki j„senet n„yt”lle.
----------------------------------------------------------------------------*/
{
  otsikko(valinta,"Tulosteet");
  cout << "Toimii toistaiseksi vain n„yt”lle" << endl;
  viivarivi(78,'-');

  for (int i=0; i<kerho->Jasenia(); i++) {
    const cJasen &jasen = kerho->Jasenet().anna(i);
    tulosta(cout,jasen);
    cout << endl;
  }

  viivarivi(78,'-');
  odota_jotakin();
}


//----------------------------------------------------------------------------
void cNaytto::tietojen_korjailu(char valinta)
{
  otsikko(valinta,"Tietojen korjailu");
  ei_toimi();
}


//----------------------------------------------------------------------------
void cNaytto::paivita_jasenmaksuja(char valinta)
{
  otsikko(valinta,"P„ivit„ j„senmaksuja");
  ei_toimi();
}


//----------------------------------------------------------------------------
void cNaytto::avustus(char valinta)
{
  otsikko(valinta,"Avustus");
  help(NULL);
}


//----------------------------------------------------------------------------
void cNaytto::paamenu()
{
  cout << endl << endl << endl << endl << endl << endl;
  cout << "J„senrekisteri"                            << endl;
  cout << "=============="                            << endl;
  cout << ""                                          << endl;
  cout << "Kerhossa " << kerho->Kerhon_nimi() << " on " <<
          kerho->Jasenia() << " j„sent„."             << endl;
  cout << ""                                          << endl;
  cout << "Valitse:"                                  << endl;
  cout << "   ?  = avustus"                           << endl;
  cout << "   0  = lopetus"                           << endl;
  cout << "   1  = lis„„ uusi j„sen"                  << endl;
  cout << "   2  = etsi j„senen tiedot"               << endl;
  cout << "   3  = tulosteet"                         << endl;
  cout << "   4  = tietojen korjailu"                 << endl;
  cout << "   5  = p„ivit„ j„senmaksuja"              << endl;
  cout << "   :";
}


//----------------------------------------------------------------------------
int cNaytto::paavalinta()
{
  char nappain;

  while (1) {

    paamenu();

    nappain = odota_nappain("?012345",EI_OLETUSTA,MERKKI_ISOKSI);

    switch (nappain) {
      case '?': avustus(nappain);                     break;
      case '0': return 0;
      case '1': lisaa_uusi_jasen(nappain);            break;
      case '2': etsi_jasenen_tiedot(nappain);         break;
      case '3': tulosteet(nappain);                   break;
      case '4': tietojen_korjailu(nappain);           break;
      case '5': paivita_jasenmaksuja(nappain);        break;
      default : cout << "N„in ei voi k„yd„!" << endl; return 1;
    }

  }
}


//----------------------------------------------------------------------------
cNaytto::cNaytto(cKerho *p,const char *ohj_nimi)
{
  nykyjasen = -1;
  kerho = p;
  if ( ohj_nimi == NULL || ohj_nimi[0] == 0 )
    KOPIOI(ohjelman_nimi,"kerho");
  else
    KOPIOI(ohjelman_nimi,ohj_nimi);
  alusta_help(ohjelman_nimi);
  edit_alusta("kerho.lyh");
}

//----------------------------------------------------------------------------
cNaytto::~cNaytto()
{
  kysy_talleta();
  edit_vapauta("kerho.lyh");
  vapauta_help();
}