/*
 *
 *  Iter Vehemens ad Necem (IVAN)
 *  Copyright (C) Timo Kiviluoto
 *  Released under the GNU General
 *  Public License
 *
 *  See LICENSING which should be included
 *  along with this file for more details
 *
 */

#include "config.h"
#include "save.h"
#include "felist.h"
#include "feio.h"

configoption* configsystem::Option[MAX_CONFIG_OPTIONS];
festring configsystem::ConfigFileName;
int configsystem::Options;

void configsystem::AddOption(configoption* O) { Option[Options++] = O; }
void configsystem::NormalStringChanger(stringoption* O, const festring& What)
{ O->Value = What; }
void configsystem::NormalNumberChanger(numberoption* O, long What)
{ O->Value = What; }
void configsystem::NormalTruthChanger(truthoption* O, truth What)
{ O->Value = What; }

configoption::configoption(const char* Name, const char* Description)
: Name(Name), Description(Description) { }

stringoption::stringoption(const char* Name, const char* Desc,
			   const festring& Value,
			   void (*ValueDisplayer)(const stringoption*,
						  festring&),
			   truth (*ChangeInterface)(stringoption*),
			   void (*ValueChanger)(stringoption*,
						const festring&))
: configoption(Name, Desc),
  Value(Value), ValueDisplayer(ValueDisplayer),
  ChangeInterface(ChangeInterface),
  ValueChanger(ValueChanger) { }

numberoption::numberoption(const char* Name, const char* Desc, long Value,
			   void (*ValueDisplayer)(const numberoption*,
						  festring&),
			   truth (*ChangeInterface)(numberoption*),
			   void (*ValueChanger)(numberoption*, long))
: configoption(Name, Desc),
  Value(Value), ValueDisplayer(ValueDisplayer),
  ChangeInterface(ChangeInterface),
  ValueChanger(ValueChanger) { }

scrollbaroption::scrollbaroption(const char* Name,
				 const char* Desc, long Value,
				 void (*ValueDisplayer)(const numberoption*,
							festring&),
				 truth (*ChangeInterface)(numberoption*),
				 void (*ValueChanger)(numberoption*, long),
				 void (*BarHandler)(long))
: numberoption(Name, Desc, Value, ValueDisplayer,
	       ChangeInterface, ValueChanger),
  BarHandler(BarHandler) { }


truthoption::truthoption(const char* Name, const char* Desc, truth Value,
			 void (*ValueDisplayer)(const truthoption*, festring&),
			 truth (*ChangeInterface)(truthoption*),
			 void (*ValueChanger)(truthoption*, truth))
: configoption(Name, Desc),
  Value(Value), ValueDisplayer(ValueDisplayer),
  ChangeInterface(ChangeInterface),
  ValueChanger(ValueChanger) { }

truth configsystem::Save()
{
  std::ofstream SaveFile(ConfigFileName.CStr(), std::ios::out);

  if(!SaveFile.is_open())
    return false;

  for(int c = 0; c < Options; ++c)
  {
    SaveFile << Option[c]->Name << " = ";
    Option[c]->SaveValue(SaveFile);
    SaveFile << ";\n";
  }

  return true;
}

truth configsystem::Load()
{
  inputfile SaveFile(ConfigFileName, 0, false);

  if(!SaveFile.IsOpen())
    return false;

  festring Word;

  for(SaveFile.ReadWord(Word, false);
      !SaveFile.Eof();
      SaveFile.ReadWord(Word, false))
  {
    /* Inefficient, but speed is probably not an issue here */

    for(int c = 0; c < Options; ++c)
      if(Word == Option[c]->Name)
	Option[c]->LoadValue(SaveFile);
  }

  return true;
}

void configsystem::Show(void (*BackGroundDrawer)(),
			void (*ListAttributeInitializer)(felist&),
			truth SlaveScreen)
{
  int Chosen;
  truth TruthChange = false;

  felist List(CONST_S("Which setting do you wish to configure?"));
  List.AddDescription(CONST_S(""));
  List.AddDescription(CONST_S("Setting                                                        Value"));

  for(;;)
  {
    if(SlaveScreen)
      BackGroundDrawer();

    List.Empty();

    for(int c = 0; c < Options; ++c)
    {
      festring Entry = Option[c]->Description;
      Entry.Capitalize();
      Entry.Resize(60);
      Option[c]->DisplayeValue(Entry);
      List.AddEntry(Entry, LIGHT_GRAY);
    }

    if(SlaveScreen && ListAttributeInitializer)
      ListAttributeInitializer(List);

    List.SetFlags(SELECTABLE|(SlaveScreen ? DRAW_BACKGROUND_AFTERWARDS : 0)
		  |(!SlaveScreen && !TruthChange ? FADE : 0));
    Chosen = List.Draw();
    festring String;

    if(Chosen < Options)
      TruthChange = Option[Chosen]->ActivateChangeInterface();
    else
    {
      Save();
      return;
    }
  }
}

void configsystem::NormalStringDisplayer(const stringoption* O,
					 festring& Entry)
{
  if(!O->Value.IsEmpty())
    Entry << O->Value;
  else
    Entry << '-';
}

void configsystem::NormalNumberDisplayer(const numberoption* O,
					 festring& Entry)
{
  Entry << O->Value;
}

void configsystem::NormalTruthDisplayer(const truthoption* O,
					festring& Entry)
{
  Entry << (O->Value ? "yes" : "no");
}

truth configsystem::NormalTruthChangeInterface(truthoption* O)
{
  O->ChangeValue(!O->Value);
  return true;
}

truth configsystem::NormalStringChangeInterface(stringoption* O)
{
  festring String;

  if(iosystem::StringQuestion(String, CONST_S("Set new ")
			      + O->Description + ':',
			      v2(30, 30), WHITE, 0, 80,
			      true, true) == NORMAL_EXIT)
    O->ChangeValue(String);

  return false;
}

truth configsystem::NormalNumberChangeInterface(numberoption* O)
{
  O->ChangeValue(iosystem::NumberQuestion(CONST_S("Set new ")
					  + O->Description + ':',
					  v2(30, 30), WHITE, true));
  return false;
}

void stringoption::SaveValue(std::ofstream& SaveFile) const
{
  SaveFile << '\"' << Value.CStr() << '\"';
}

void stringoption::LoadValue(inputfile& SaveFile)
{
  SaveFile.ReadWord();
  SaveFile.ReadWord(Value);
}

/* ??? */

void numberoption::SaveValue(std::ofstream& SaveFile) const
{ SaveFile << Value; }
void numberoption::LoadValue(inputfile& SaveFile)
{ Value = SaveFile.ReadNumber(); }
void truthoption::SaveValue(std::ofstream& SaveFile) const
{ SaveFile << Value; }
void truthoption::LoadValue(inputfile& SaveFile)
{ Value = SaveFile.ReadNumber(); }