|
|
|
|
/* Write KConfig() entries - for use in shell scripts.
|
|
|
|
|
* (c) 2001 Red Hat, Inc. & Lu<EFBFBD>s Pedro Coelho
|
|
|
|
|
* Programmed by Lu<EFBFBD>s Pedro Coelho <luis_pedro@netcabo.pt>
|
|
|
|
|
* based on kreadconfig by Bernhard Rosenkraenzer <bero@redhat.com>
|
|
|
|
|
*
|
|
|
|
|
* License: GPL
|
|
|
|
|
*
|
|
|
|
|
*/
|
|
|
|
|
#include <kconfig.h>
|
|
|
|
|
#include <kglobal.h>
|
|
|
|
|
#include <kapplication.h>
|
|
|
|
|
#include <kcmdlineargs.h>
|
|
|
|
|
#include <klocale.h>
|
|
|
|
|
#include <kaboutdata.h>
|
|
|
|
|
#include <stdio.h>
|
|
|
|
|
|
|
|
|
|
static KCmdLineOptions options[] =
|
|
|
|
|
{
|
|
|
|
|
{ "file <file>", I18N_NOOP("Use <file> instead of global config"), 0 },
|
|
|
|
|
{ "group <group>", I18N_NOOP("Group to look in"), "KDE" },
|
|
|
|
|
{ "key <key>", I18N_NOOP("Key to look for"), 0 },
|
|
|
|
|
{ "type <type>", I18N_NOOP("Type of variable. Use \"bool\" for a boolean, otherwise it is treated as a string"), 0 },
|
|
|
|
|
{ "+value", I18N_NOOP( "The value to write. Mandatory, on a shell use '' for empty" ), 0 },
|
|
|
|
|
KCmdLineLastOption
|
|
|
|
|
};
|
|
|
|
|
int main(int argc, char **argv)
|
|
|
|
|
{
|
|
|
|
|
KAboutData aboutData("kwriteconfig", I18N_NOOP("KWriteConfig"),
|
|
|
|
|
"1.0.0",
|
|
|
|
|
I18N_NOOP("Write KConfig entries - for use in shell scripts"),
|
|
|
|
|
KAboutData::License_GPL,
|
|
|
|
|
"(c) 2001 Red Hat, Inc. & Lu<4C>s Pedro Coelho");
|
|
|
|
|
aboutData.addAuthor("Lu<EFBFBD>s Pedro Coelho", 0, "luis_pedro@netcabo.pt");
|
|
|
|
|
aboutData.addAuthor("Bernhard Rosenkraenzer", "Wrote kreadconfig on which this is based", "bero@redhat.com");
|
|
|
|
|
KCmdLineArgs::init(argc, argv, &aboutData);
|
|
|
|
|
KCmdLineArgs::addCmdLineOptions(options);
|
|
|
|
|
KCmdLineArgs *args=KCmdLineArgs::parsedArgs();
|
|
|
|
|
|
|
|
|
|
TQString group=TQString::fromLocal8Bit(args->getOption("group"));
|
|
|
|
|
TQString key=TQString::fromLocal8Bit(args->getOption("key"));
|
|
|
|
|
TQString file=TQString::fromLocal8Bit(args->getOption("file"));
|
|
|
|
|
TQCString type=args->getOption("type").lower();
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
if (key.isNull() || !args->count()) {
|
|
|
|
|
KCmdLineArgs::usage();
|
|
|
|
|
return 1;
|
|
|
|
|
}
|
|
|
|
|
TQCString value = args->arg( 0 );
|
|
|
|
|
|
|
|
|
|
KInstance inst(&aboutData);
|
|
|
|
|
|
|
|
|
|
KConfig *konfig;
|
|
|
|
|
if (file.isEmpty())
|
|
|
|
|
konfig = new KConfig(TQString::tqfromLatin1("kdeglobals"), false, false);
|
|
|
|
|
else
|
|
|
|
|
konfig = new KConfig(file, false, false);
|
|
|
|
|
|
|
|
|
|
konfig->setGroup(group);
|
|
|
|
|
if ( konfig->getConfigState() != KConfig::ReadWrite || konfig->entryIsImmutable( key ) ) return 2;
|
|
|
|
|
|
|
|
|
|
if(type=="bool") {
|
|
|
|
|
// For symmetry with kreadconfig we accept a wider range of values as true than Qt
|
|
|
|
|
bool boolvalue=(value=="true" || value=="on" || value=="yes" || value=="1");
|
|
|
|
|
konfig->writeEntry( key, boolvalue );
|
|
|
|
|
} else if (type=="path") {
|
|
|
|
|
konfig->writePathEntry( key, TQString::fromLocal8Bit( value ) );
|
|
|
|
|
} else {
|
|
|
|
|
konfig->writeEntry( key, TQString(TQString::fromLocal8Bit( value )) );
|
|
|
|
|
}
|
|
|
|
|
konfig->sync();
|
|
|
|
|
delete konfig;
|
|
|
|
|
return 0;
|
|
|
|
|
}
|
|
|
|
|
|