diff options
Diffstat (limited to 'kcontrol/konqhtml/main.cpp')
| -rw-r--r-- | kcontrol/konqhtml/main.cpp | 190 |
1 files changed, 190 insertions, 0 deletions
diff --git a/kcontrol/konqhtml/main.cpp b/kcontrol/konqhtml/main.cpp new file mode 100644 index 000000000..a752a3a88 --- /dev/null +++ b/kcontrol/konqhtml/main.cpp @@ -0,0 +1,190 @@ +/* + * main.cpp + * + * Copyright (c) 1999 Matthias Hoelzer-Kluepfel <[email protected]> + * Copyright (c) 2000 Daniel Molkentin <[email protected]> + * + * Requires the Qt widget libraries, available at no cost at + * http://www.troll.no/ + * + * 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., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA. + */ + + +#include <unistd.h> + +#include <tdeapplication.h> +#include <dcopclient.h> +#include <tqtabwidget.h> +#include <tqlayout.h> + +#include "jsopts.h" +#include "javaopts.h" +#include "pluginopts.h" +#include "appearance.h" +#include "htmlopts.h" +#include "filteropts.h" +#include "userInterConfig.h" + +#include "main.h" +#include <tdeaboutdata.h> +#include "main.moc" + +extern "C" +{ + KDE_EXPORT TDECModule *create_tdehtml_behavior(TQWidget *parent, const char *name) + { + TDEConfig *c = new TDEConfig( "konquerorrc", false, false ); + return new KMiscHTMLOptions(c, "HTML Settings", parent, name); + } + + KDE_EXPORT TDECModule *create_tdehtml_fonts(TQWidget *parent, const char *name) + { + TDEConfig *c = new TDEConfig( "konquerorrc", false, false ); + return new KAppearanceOptions(c, "HTML Settings", parent, name); + } + + KDE_EXPORT TDECModule *create_tdehtml_java_js(TQWidget *parent, const char* /*name*/) + { + TDEConfig *c = new TDEConfig( "konquerorrc", false, false ); + return new KJSParts(c, parent, "kcmkonqhtml"); + } + + KDE_EXPORT TDECModule *create_tdehtml_plugins(TQWidget *parent, const char *name) + { + TDEConfig *c = new TDEConfig( "konquerorrc", false, false ); + return new KPluginOptions(c, "Java/JavaScript Settings", parent, name); + } + + KDE_EXPORT TDECModule *create_tdehtml_filter(TQWidget *parent, const char *name ) + { + TDEConfig *c = new TDEConfig( "tdehtmlrc", false, false ); + return new KCMFilter(c, "Filter Settings", parent, name); + } + + KDE_EXPORT TDECModule *create_tdehtml_userinterface(TQWidget *parent, const char *name ) + { + TDEConfig *c = new TDEConfig( "konquerorrc", false, false ); + return new userInterConfig(c, "FMSettings", parent, name); + } +} + + +KJSParts::KJSParts(TDEConfig *config, TQWidget *parent, const char *name) + : TDECModule(parent, name), mConfig(config) +{ + TDEAboutData *about = + new TDEAboutData(I18N_NOOP("kcmkonqhtml"), I18N_NOOP("Konqueror Browsing Control Module"), + 0, 0, TDEAboutData::License_GPL, + I18N_NOOP("(c) 1999 - 2001 The Konqueror Developers")); + + about->addAuthor("Waldo Bastian",0,"[email protected]"); + about->addAuthor("David Faure",0,"[email protected]"); + about->addAuthor("Matthias Kalle Dalheimer",0,"[email protected]"); + about->addAuthor("Lars Knoll",0,"[email protected]"); + about->addAuthor("Dirk Mueller",0,"[email protected]"); + about->addAuthor("Daniel Molkentin",0,"[email protected]"); + about->addAuthor("Wynn Wilkes",0,"[email protected]"); + + about->addCredit("Leo Savernik",I18N_NOOP("JavaScript access controls\n" + "Per-domain policies extensions"), + "[email protected]"); + + setAboutData( about ); + + TQVBoxLayout *layout = new TQVBoxLayout(this); + tab = new TQTabWidget(this); + layout->addWidget(tab); + + // ### the groupname is duplicated in KJSParts::save + java = new KJavaOptions( config, "Java/JavaScript Settings", this, name ); + tab->addTab( java, i18n( "&Java" ) ); + connect( java, TQT_SIGNAL( changed( bool ) ), TQT_SIGNAL( changed( bool ) ) ); + + javascript = new KJavaScriptOptions( config, "Java/JavaScript Settings", this, name ); + tab->addTab( javascript, i18n( "Java&Script" ) ); + connect( javascript, TQT_SIGNAL( changed( bool ) ), TQT_SIGNAL( changed( bool ) ) ); +} + +KJSParts::~KJSParts() +{ + delete mConfig; +} + +void KJSParts::load() +{ + javascript->load(); + java->load(); +} + + +void KJSParts::save() +{ + javascript->save(); + java->save(); + + // delete old keys after they have been migrated + if (javascript->_removeJavaScriptDomainAdvice + || java->_removeJavaScriptDomainAdvice) { + mConfig->setGroup("Java/JavaScript Settings"); + mConfig->deleteEntry("JavaScriptDomainAdvice"); + javascript->_removeJavaScriptDomainAdvice = false; + java->_removeJavaScriptDomainAdvice = false; + } + + mConfig->sync(); + + // Send signal to konqueror + // Warning. In case something is added/changed here, keep kfmclient in sync + TQByteArray data; + if ( !kapp->dcopClient()->isAttached() ) + kapp->dcopClient()->attach(); + kapp->dcopClient()->send( "konqueror*", "KonquerorIface", "reparseConfiguration()", data ); +} + + +void KJSParts::defaults() +{ + javascript->defaults(); + java->defaults(); +} + +TQString KJSParts::quickHelp() const +{ + return i18n("<h2>JavaScript</h2>On this page, you can configure " + "whether JavaScript programs embedded in web pages should " + "be allowed to be executed by Konqueror." + "<h2>Java</h2>On this page, you can configure " + "whether Java applets embedded in web pages should " + "be allowed to be executed by Konqueror." + "<br><br><b>Note:</b> Active content is always a " + "security risk, which is why Konqueror allows you to specify very " + "fine-grained from which hosts you want to execute Java and/or " + "JavaScript programs." ); +} + +TQString KJSParts::handbookSection() const +{ + int index = tab->currentPageIndex(); + if (index == 0) { + return "kbrowse-java"; + } + else if (index == 1) { + return "kbrowse-javascript"; + } + else { + return TQString::null; + } +} |