/**********************************************************************
zyGrib: meteorological GRIB file viewer
Copyright (C) 2008-2012 - Jacques Zaninetti - http://www.zygrib.org

This program is free software: you can redistribute it and/or modify
it under the terms of the GNU General Public License as published by
the Free Software Foundation, either version 3 of the License, or
(at your option) any later version.

This program is distributed in the hope that it will be useful,
but WITHOUT ANY WARRANTY; without even the implied warranty of
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
GNU General Public License for more details.

You should have received a copy of the GNU General Public License
along with this program.  If not, see <http://www.gnu.org/licenses/>.
***********************************************************************/

#include <QDir>
#include <QStringList>
#include <QMessageBox>

#include "Settings.h"
#include "Util.h"

//---------------------------------------------------------------------
// Variables globales... yes I know, it's bad :)
//---------------------------------------------------------------------
QString GLOB_SettingsDir;
QString GLOB_SettingsFilename;
QString GLOB_SettingsFilename_POI;

QSettings *GLOB_NatSettings;
QSettings *GLOB_IniSettings;
QSettings *GLOB_IniSettings_POI;

//---------------------------------------------------------------------
// Priorité :
// 1. le répertoire_de_zygrib/data/config/
// 2. le dossier perso
// 3. le dossier temporaire (bad news)
//---------------------------------------------------------------------
void Settings::initializeSettingsDir ()
{
	QString path="";
	QDir dir;
	
	if (path == "")
	{	// try zygrib_directory/config
		dir = QDir::current();
		if ( dir.exists(Util::pathGshhs())
					&& dir.exists(Util::pathGis()) )
		{   // seem's zygrib directory, try yo write a file
			if (Util::isDirWritable(dir))
			{
				QString path2 = dir.absolutePath()+"/"+Util::pathConfig();
				QDir dir2 = QDir (path2);
				if (! dir2.exists()) {
					// try to create the directory
					dir2.mkpath(dir2.absolutePath());
				}
				if (Util::isDirWritable(dir2)) {
					path = path2;
				}
			}
		}
	}
	if (path == "")
	{	// try user directory
		#ifdef Q_OS_WIN32
			dir = QDir( QDir::homePath()+"/zygrib/config" );
		#else
			dir = QDir( QDir::homePath()+"/.zygrib/config" );
		#endif
		if (! dir.exists()) {
			// create a directory in user home if it don't exists
			dir.mkpath(dir.absolutePath());
		}
		if (Util::isDirWritable(dir)) {
			path = dir.absolutePath();
		}
	}
	
	if (path == "")
	{	// try temp directory
		dir = QDir::temp();
		if (Util::isDirWritable(dir)) {
			path = dir.absolutePath();
		}
	}

	if (path != "") {
		GLOB_SettingsDir = path;
		GLOB_SettingsFilename	 	= GLOB_SettingsDir + "/zygrib.ini";
		GLOB_SettingsFilename_POI	= GLOB_SettingsDir + "/zygrib_poi.ini";

		// A. Degwerth [Cassidian] added to make sure that the user dir contains an updated .ini file
		Settings::checkAndCopyDefaultIni(GLOB_SettingsFilename, QDir::current().absolutePath() + "/" + Util::pathConfig() + "/zygrib.ini");
		Settings::checkAndCopyDefaultIni(GLOB_SettingsFilename_POI, QDir::current().absolutePath() + "/" + Util::pathConfig() + "/zygrib_poi.ini");

		GLOB_IniSettings     = new QSettings (GLOB_SettingsFilename, QSettings::IniFormat);
		GLOB_IniSettings_POI = new QSettings (GLOB_SettingsFilename_POI, QSettings::IniFormat);
	}
	else {
		GLOB_SettingsDir = "";
		GLOB_SettingsFilename	  = "";
		GLOB_SettingsFilename_POI = "";
		GLOB_IniSettings     = NULL;
		GLOB_IniSettings_POI = NULL;
	}
	GLOB_NatSettings = new QSettings ("zyGrib");
			
	//-----------------------------------------------------------------------
	// Si les settings.ini ne sont pas définis, cherche d'anciennes valeurs
	// au format native (versions <= 3.3.0)
	//-----------------------------------------------------------------------
	if (! QFile::exists (GLOB_SettingsFilename)) {
		Settings::copyOldNativeSettingsToIniFile ();
	}

	if (! QFile::exists (GLOB_SettingsFilename_POI)) {
		Settings::copyOldNativeSettingsToIniFile_POI ();
	}
}

//---------------------------------------------------------------------
void Settings::copyOldNativeSettingsToIniFile()
{
	if (GLOB_SettingsDir == "")
		return;
	QString group = "main";
	QSettings natSettings("zyGrib");
	QSettings iniSettings(GLOB_SettingsFilename, QSettings::IniFormat);
	// Read All settings from global storage (childKeys)
	// and write it to user directory
	natSettings.setFallbacksEnabled(false);
	natSettings.beginGroup(group);
	iniSettings.beginGroup(group);
	QStringList oldkeys = natSettings.childKeys();
	QStringListIterator it(oldkeys);
	while (it.hasNext()) {
		QString key = it.next();
		if ( key != "POI_Font"		// obsolete data
			)
		{
			QVariant val = natSettings.value(key);
			iniSettings.setValue(key, val);
		}
	}
	natSettings.endGroup();
	iniSettings.endGroup();
}
//---------------------------------------------------------------------
void Settings::copyOldNativeSettingsToIniFile_POI ()
{
	if (GLOB_SettingsDir == "")
		return;
	POI *poi = NULL;
	QString group = "poi";
	QSettings natSettings("zyGrib");
	// Read All childKeys (old style POI's, version<=3.3.0),
	// translate it to new style (one group by POI).
	// Delete old POI.
	// Write new POI to ini file and to Native Setting.
	natSettings.beginGroup(group);
	QStringList oldkeys = natSettings.childKeys();	// old keys: a number for each poi
	QStringListIterator it(oldkeys);
	bool  found = false;
	
	while (it.hasNext()) {
		QString  key = it.next();
		QString  serialized = natSettings.value(key).toString();
		poi = new POI (serialized);	 // try to create POI with settings value
		if (poi != NULL)
		{
			found = true;
			natSettings.remove(key);  // remove old poi format from native settings
			if (poi->isValid()) {
				poi->writeSettings();  // write new format to settings
			}
			delete poi;
			poi = NULL;
		}
	}
	
	if (!found) {
		// perhaps there are new format POI's in native settings
		QStringList oldgroups = natSettings.childGroups(); // pois are in groups
		QStringListIterator it(oldgroups);
		while (it.hasNext()) {
			QString  group = it.next();
			bool ok;
			uint code = group.toUInt(&ok);
			//printf("poi code: %d\n", code);
			if (ok) {
				poi = new POI (code);
				if (poi!=NULL) {
					if (poi->isValid()) {
						//printf("poi valid\n");
						poi->writeSettings();  // write new format to settings
					}
					delete poi;
					poi = NULL;
				}
			}
		}		
	}
	natSettings.endGroup();
}

//---------------------------------------------------------------------
void Settings::setApplicationNativeSetting
			(const QString &group, const QString &key, const QVariant &value)
{
	if (GLOB_NatSettings != NULL)
	{
		GLOB_NatSettings->beginGroup(group);
		GLOB_NatSettings->setValue(key, value);
		GLOB_NatSettings->endGroup();
		GLOB_NatSettings->sync();
	}
}
//---------------------------------------------------------------------
QVariant Settings::getApplicationNativeSetting
			(const QString &group, const QString &key, const QVariant &defaultValue)
{
	QVariant val;
	if (GLOB_NatSettings != NULL)
	{
		GLOB_NatSettings->beginGroup (group);
		val = GLOB_NatSettings->value (key, defaultValue);
		GLOB_NatSettings->endGroup();
		GLOB_NatSettings->sync();
	}
	return val;
}

//---------------------------------------------------------------------
void Settings::setUserSetting (const QString &key, const QVariant &value)
{
	// save 2 times the settings
	Settings::setApplicationNativeSetting("main", key, value);

	if (GLOB_IniSettings != NULL)
	{
		GLOB_IniSettings->beginGroup("main");
		GLOB_IniSettings->setValue(key, value);
		GLOB_IniSettings->endGroup();
		GLOB_IniSettings->sync();
	}
}
//---------------------------------------------------------------------
QVariant Settings::getUserSetting (const QString &key, const QVariant &defaultValue)
{
	QVariant val;
	if (GLOB_IniSettings != NULL)
	{
		GLOB_IniSettings->beginGroup("main");
		val = GLOB_IniSettings->value(key, defaultValue);
		GLOB_IniSettings->endGroup();
		GLOB_IniSettings->sync();
	}
	// .ini file corrupted ? Try to read native settings.
	if (! val.isValid()) {
		val = getApplicationNativeSetting("main", key, defaultValue);
	}

	return val.isValid() ?  val  : defaultValue;
}

//---------------------------------------------------------------------
QStringList Settings::getAllKeys()
{
	QStringList list;
	if (GLOB_IniSettings != NULL)
	{
		GLOB_IniSettings->beginGroup ("main");
		list = GLOB_IniSettings->allKeys();
		GLOB_IniSettings->endGroup();
	}
	else if (GLOB_NatSettings != NULL)
	{
		GLOB_NatSettings->beginGroup ("main");
		list = GLOB_NatSettings->allKeys();
		GLOB_NatSettings->endGroup();
	}
	return list;
}

//======================================================================
// POI's
//======================================================================
QVariant Settings::getSettingPOI
				( uint code, const QString &key, const QVariant &defaultValue,
				  bool fromOldNativeSettings
				 )
{
	QString poikey = QString::number(code)+"/"+key;
	QVariant val;
	if ( ! fromOldNativeSettings
		&&  GLOB_IniSettings_POI != NULL)
	{
		GLOB_IniSettings_POI->beginGroup("poi");
		val = GLOB_IniSettings_POI->value(poikey, defaultValue);
		GLOB_IniSettings_POI->endGroup();
		GLOB_IniSettings_POI->sync();
	}
	// .ini file corrupted ? Try to read native settings.
	if (  fromOldNativeSettings
		 ||  ! val.isValid()) {
		val = getApplicationNativeSetting("poi", poikey, defaultValue);
	}
	return val;
}
//---------------------------------------------------------------------
void Settings::setSettingPOI
				(uint code, const QString &key, const QVariant &value)
{
	QString poikey = QString::number(code)+"/"+key;
	
	// save 2 times the settings : native and in ini file
	Settings::setApplicationNativeSetting ("poi", poikey, value);
	
	if (GLOB_IniSettings_POI != NULL)
	{
		GLOB_IniSettings_POI->beginGroup("poi");
		GLOB_IniSettings_POI->setValue  (poikey, value);
		GLOB_IniSettings_POI->endGroup();
		GLOB_IniSettings_POI->sync();
	}
}
//---------------------------------------------------------------------
QList<uint> Settings::getSettingAllCodesPOIs()
{
	QList<uint> reslist;
	if (GLOB_SettingsDir != "")
	{
		QSettings settings(GLOB_SettingsFilename_POI, QSettings::IniFormat);
		settings.beginGroup("poi");
		QString poicode;
		QStringList slist = settings.childGroups();
		for (int i=0; i<slist.size(); ++i) {
			poicode = slist.at(i);
			bool ok;
			uint code = poicode.toUInt(&ok);
			if (ok)
				reslist.append (code);
		}
		settings.endGroup();
	}
	else
	{	// try to load from native settings
		QSettings settings("zyGrib");
		settings.beginGroup("poi");
		QString poicode;
		QStringList slist = settings.childGroups();
		for (int i=0; i<slist.size(); ++i) {
			poicode = slist.at(i);
			bool ok;
			uint code = poicode.toUInt(&ok);
			if (ok)
				reslist.append (code);
		}
		settings.endGroup();
	}
	return reslist;
}
//---------------------------------------------------------------------
void Settings::deleteSettingsPOI(uint code)
{
	QSettings natSettings("zyGrib");
	natSettings.beginGroup("poi");
	QStringList allgroups = natSettings.childGroups(); // pois are in groups
	QStringListIterator it(allgroups);
	while (it.hasNext()) {
		bool ok;
		QString gr = it.next();
		uint codepoi = gr.toUInt(&ok);
		if (ok && codepoi==code) {
			natSettings.remove (gr);
		}
	}
	if (GLOB_SettingsDir != "")
	{
		QSettings settings(GLOB_SettingsFilename_POI, QSettings::IniFormat);
		settings.beginGroup("poi");
		QStringList allgroups = settings.childGroups(); // pois are in groups
		QStringListIterator it(allgroups);
		while (it.hasNext()) {
			bool ok;
			QString gr = it.next();
			uint codepoi = gr.toUInt(&ok);
			if (ok && codepoi==code) {
				settings.remove (gr);
			}
		}
	}
}
    
//---------------------------------------------------------------------
uint Settings::getNewCodePOI()
{
	QSettings settings("zyGrib");
	settings.beginGroup("poi");
	uint v, max = 0;
	QStringList slist = settings.childGroups();
 	for (int i=0; i<slist.size(); ++i)
 	{
		bool ok;
  		QString poicode = slist.at(i);
  		v = poicode.toUInt (&ok);
  		if (ok  && v > max)
  			max = v;
	}
	settings.endGroup();
	return max+1;
}
    
//============================================================================
void Settings::initializeGribFilesDir ()
{
	QString path="";
	QDir dir;

	// Test if path found in settings is writable
	path = getUserSetting("gribFilePath", "").toString();
	if (path != "") {
		dir = QDir(path);
		if (Util::isDirWritable(dir)) {
			return;			// ok, nothing to do
		}
		else {
			path = "";
		}
	}
	if (path == "")
	{	// try zygrib_directory/grib
		dir = QDir::current();
		if ( dir.exists("maps") && dir.exists("img") )
		{   // seem's zygrib directory, try yo write a file
			if (Util::isDirWritable(dir))
			{
				QString path2 = dir.absolutePath()+"/grib";
				QDir dir2 = QDir(path2);
				if (! dir2.exists()) {
					// try to create the directory
					dir2.mkpath(dir2.absolutePath());
				}
				if (Util::isDirWritable(dir2)) {
					path = path2;
				}
			}
		}
	}
	
	if (path == "")
	{	// try user directory
		#ifdef Q_OS_WIN32
			dir = QDir( QDir::homePath()+"/zygrib/grib" );
		#else
			dir = QDir( QDir::homePath()+"/.zygrib/grib" );
		#endif
		if (! dir.exists()) {
			// create a directory in user home if it don't exists
			dir.mkpath(dir.absolutePath());
		}
		if (Util::isDirWritable(dir)) {
			path = dir.absolutePath();
		}
	}
	
	if (path == "")
	{	// try temp directory
		dir = QDir::temp();
		if (dir.exists() && Util::isDirWritable(dir)) {
			path = dir.absolutePath();
		}
	}
	
	// save path (even if path=="")
	setUserSetting("gribFilePath",  path);
}

// check if the file strIniUser exists and if its newer than the file strIniDefault
// if the file doesn't exist or is older than strIniDefault then the strIniUser is
// replaced by strIniDefault
// A. Degwerth [Cassidian]
void Settings::checkAndCopyDefaultIni(const QString& strIniUser, const QString& strIniDefault)
{
    // check if we have a default zyGrib.ini file
    if (QFile::exists(strIniDefault))
    {
        // yes the file exists

        bool fCopyDefaultIni = false;

        // check if there exists a zyGrib.ini in the user profile
        if (!QFile::exists(strIniUser))
        {
            fCopyDefaultIni = true;
        }
        else {
            // file exist in the user profile
            // check if it is older than the default
            QFileInfo fiIniUser(strIniUser);
            QFileInfo fiIniDefault(strIniDefault);
            if (fiIniUser.lastModified() < fiIniDefault.lastModified())
            {
                // the user ini file is older
                // -> replace it
                fCopyDefaultIni = true;
            }
        }

        if (fCopyDefaultIni == true)
        {
            QFile::remove(strIniUser);
            QFile::copy(strIniDefault, strIniUser);
            // set the write permission to the copied file
            QFile::setPermissions(strIniUser, QFile::WriteOwner | QFile::WriteGroup);
        }
    }
}

