//-----------------------------------------------------------------------------
//
// TDE xscreensaver launcher
//
// Copyright (c)  Martin R. Jones <mjones@kde.org> 1999
//
// 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;
// version 2 of the License.
//
// 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; see the file COPYING.  If not, write to
// the Free Software Foundation, Inc., 51 Franklin Street, Fifth Floor,
// Boston, MA 02110-1301, USA.

#include <config.h>

#include <stdlib.h>
#include <stdio.h>
#include <unistd.h>

#include <tqptrlist.h>
#include <tqfile.h>
#include <tqfileinfo.h>

#include <kdebug.h>
#include <tdeapplication.h>
#include <tdeconfig.h>
#include <kstandarddirs.h>
#include <tdelocale.h>
#include <tdecmdlineargs.h>

#include "kxsitem.h"
#include "kxsxml.h"

#define MAX_ARGS  30

template class TQPtrList<KXSConfigItem>;

//===========================================================================
static const char appName[] = "kxsrun";

static const char description[] = I18N_NOOP("TDE X Screen Saver Launcher");

static const char version[] = "3.0.0";

static const TDECmdLineOptions options[] =
{
   {"+screensaver", I18N_NOOP("Filename of the screen saver to start"), 0},
   {"+-- [options]", I18N_NOOP("Extra options to pass to the screen saver"), 0},
   TDECmdLineLastOption
};

int main(int argc, char *argv[])
{
    TDELocale::setMainCatalogue("kxsconfig");
    TDECmdLineArgs::init(argc, argv, appName, I18N_NOOP("KXSRun"), description, version);

    TDECmdLineArgs::addCmdLineOptions(options);

    TDEApplication app( false, false );

    TDECmdLineArgs *args = TDECmdLineArgs::parsedArgs();

    if ( !args->count() )
	exit( 1 );

    TQString filename = args->arg(0);
    TQString configFile(filename);

    // Get the config filename
    int slash = filename.findRev('/');
    if (slash >= 0)
	configFile = filename.mid(slash+1);

    TQString exeName = configFile;
    configFile += "rc";

    // read configuration args
    TDEConfig config(configFile);

    TQPtrList<KXSConfigItem> configItemList;

    TQString xmlFile = "/doesntexist";
    xmlFile += "/" + exeName + ".xml";
#ifdef XSCREENSAVER_CONFIG_DIRS
    TQFileInfo checkXml;
    TQStringList saverConfigPaths = TQStringList::split(':', XSCREENSAVER_CONFIG_DIRS);
    for (TQStringList::ConstIterator it = saverConfigPaths.begin(); it != saverConfigPaths.end(); ++it)
    {
        checkXml.setFile((*it) + "/" + exeName + ".xml");
        if (checkXml.exists())
        {
            xmlFile = checkXml.absFilePath();
            break;
        }
    }
#endif
    if ( TQFile::exists( xmlFile ) ) {
	// We can use the xscreensaver xml config files.
	KXSXml xmlParser(0);
	xmlParser.parse(xmlFile);
	configItemList = *xmlParser.items();
	TQPtrListIterator<KXSConfigItem> it( configItemList );
	KXSConfigItem *item;
	while ( (item = it.current()) != 0 ) {
	    ++it;
	    item->read( config );
	}
    } else {
	// fall back to TDE's old config files.
	int idx = 0;
	while (true)
	{
	    TQString group = TQString("Arg%1").arg(idx);
	    if (config.hasGroup(group)) {
		config.setGroup(group);
		TQString type = config.readEntry("Type");
		if (type == "Range") {
		    KXSRangeItem *rc = new KXSRangeItem(group, config);
		    configItemList.append(rc);
		} else if (type == "DoubleRange") {
		    KXSDoubleRangeItem *rc = new KXSDoubleRangeItem(group, config);
		    configItemList.append(rc);
		} else if (type == "Check") {
		    KXSBoolItem *cc = new KXSBoolItem(group, config);
		    configItemList.append(cc);
		} else if (type == "DropList") {
		    KXSSelectItem *si = new KXSSelectItem(group, config);
		    configItemList.append(si);
		}
	    } else {
		break;
	    }
	    idx++;
	}
    }

    // find the xscreensaver executable
    //work around a KStandarDirs::findExe() "feature" where it looks in $TDEDIR/bin first no matter what and sometimes finds the wrong executable
    TQString exeFile;
    TQFileInfo checkExe;
    TQStringList saverPaths = TQStringList::split(':', XSCREENSAVER_HACKS_DIRS);
    for (TQStringList::ConstIterator it = saverPaths.begin(); it != saverPaths.end(); ++it)
    {
        checkExe.setFile((*it) + "/" + filename);
        if (checkExe.exists() && checkExe.isExecutable() && checkExe.isFile())
        {
            exeFile = checkExe.absFilePath();
            kdDebug() << "saverdir is" << exeFile << endl;
            break;
        }
    }

    if (exeFile.isEmpty())
    {
        // Executable not present in XScreenSaver directory!
        // Try standard paths
        exeFile = TDEStandardDirs::findExe(filename);
    }

    if (!exeFile.isEmpty()) {
	char *sargs[MAX_ARGS];
	sargs[0] = new char [strlen(filename.ascii())+1];
	strcpy(sargs[0], filename.ascii());

	// add the command line options
	TQString cmd;
	unsigned int i;
	for (i = 1; i < (unsigned)args->count(); i++)
	    cmd += " " + TQString(args->arg(i));

	// add the config options
	KXSConfigItem *item;
	for (item = configItemList.first(); item != 0; item = configItemList.next()) {
	    cmd += " " + item->command();
	}

	// put into char * array for execv
	TQString word;
	int si = 1;
	i = 0;
	bool inQuotes = false;
	while (i < cmd.length() && si < MAX_ARGS-1) {
	    word = "";
	    while ( cmd[i].isSpace() && i < cmd.length() ) i++;
	    while ( (!cmd[i].isSpace() || inQuotes) && i < cmd.length() ) {
		if ( cmd[i] == '\"' ) {
		    inQuotes = !inQuotes;
		} else {
		    word += cmd[i];
		}
		i++;
	    }
	    if (!word.isEmpty()) {
		sargs[si] = new char [strlen(word.ascii())+1];
		strcpy(sargs[si], word.ascii());
		si++;
	    }
	}

	sargs[si] = 0;

	// here goes...
	execv(exeFile.ascii(), sargs);
    }
}


