/*
 * Stellarium
 * Copyright (C) 2008 Matthew Gates
 *
 * 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 2
 * 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, write to the Free Software
 * Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA  02111-1307, USA.
 */

#include "StelIniParser.hpp"

#include <QSettings>
#include <QString>
#include <QVariant>
#include <QStringList>
#include <QIODevice>
#include <QRegExp>

bool readStelIniFile(QIODevice &device, QSettings::SettingsMap &map)
{
	// Is this the right conversion?
	const QString& data = QString::fromUtf8(device.readAll().data());

	// Split by a RE which should match any platform's line breaking rules
	QRegExp matchLbr("[\\n\\r]+");
	const QStringList& lines = data.split(matchLbr, QString::SkipEmptyParts);

	QString currentSection = "";
	QRegExp sectionRe("^\\[(.+)\\]$");
	QRegExp keyRe("^([^=]+)\\s*=\\s*(.+)$");
	QRegExp cleanComment("#.*$");
	QRegExp cleanWhiteSpaces("^\\s+");
	QRegExp reg1("\\s+$");

	for(int i=0; i<lines.size(); i++)
	{
		QString l = lines.at(i);
		l.replace(cleanComment, "");		// clean comments
		l.replace(cleanWhiteSpaces, "");	// clean whitespace
		l.replace(reg1, "");

		// If it's a section marker set the section variable
		if (sectionRe.exactMatch(l))
			currentSection = sectionRe.cap(1);

		// Otherwise only process if it macthes an re which looks like: key = value
		else if (keyRe.exactMatch(l))
		{
			// Let REs do the work for us exatracting the key and value
			// and cleaning them up by removing whitespace
			QString k = keyRe.cap(1);
			QString v = keyRe.cap(2);
			v.replace(cleanWhiteSpaces, "");
			k.replace(reg1, "");

			// keys with no section should have no leading /, so only
			// add it when there is a valid section.
			if (currentSection != "")
				k = currentSection + "/" + k;

			// Set the map item.
			map[k] = QVariant(v);
		}
	}

	return true;
}

bool writeStelIniFile(QIODevice &device, const QSettings::SettingsMap &map)
{
	int maxKeyWidth = 30;
	QRegExp reKeyXt("^(.+)/(.+)$");  // for extracting keys/values

	// first go over map and find longest key length
	for(int i=0; i<map.keys().size(); i++)
	{
		QString k = map.keys().at(i);
		QString key = k;
		if (reKeyXt.exactMatch(k))
			key = reKeyXt.cap(2);
		if (key.size() > maxKeyWidth) maxKeyWidth = key.size();
	}

	// OK, this time actually write to the file - first non-section values
	QString outputLine;
	for(int i=0; i<map.keys().size(); i++)
	{
		QString k = map.keys().at(i);
		if (!reKeyXt.exactMatch(k))
		{
			// this is for those keys without a section
			outputLine = QString("%1").arg(k,0-maxKeyWidth) + " = " + map[k].toString() + stelEndl;
			device.write(outputLine.toUtf8());
		}
	}

	// Now those values with sections.
	QString currentSection("");
	for(int i=0; i<map.keys().size(); i++)
	{
		QString k = map.keys().at(i);
		if (reKeyXt.exactMatch(k))
		{
			QString sec = reKeyXt.cap(1); QString key = reKeyXt.cap(2);

			// detect new sections and write section headers in file
			if (sec != currentSection)
			{
				currentSection = sec;

				outputLine = stelEndl + "[" + currentSection + "]" + stelEndl;
				device.write(outputLine.toUtf8());
			}
			outputLine = QString("%1").arg(key,0-maxKeyWidth) + " = " + map[k].toString() + stelEndl;
			device.write(outputLine.toUtf8());
		}
	}
	return true;
}