summaryrefslogtreecommitdiffstats
path: root/khtml/khtml_part.cpp
diff options
context:
space:
mode:
Diffstat (limited to 'khtml/khtml_part.cpp')
-rw-r--r--khtml/khtml_part.cpp7471
1 files changed, 0 insertions, 7471 deletions
diff --git a/khtml/khtml_part.cpp b/khtml/khtml_part.cpp
deleted file mode 100644
index c0733c990..000000000
--- a/khtml/khtml_part.cpp
+++ /dev/null
@@ -1,7471 +0,0 @@
-// -*- c-basic-offset: 2 -*-
-/* This file is part of the KDE project
- *
- * Copyright (C) 1998, 1999 Torben Weis <[email protected]>
- * 1999 Lars Knoll <[email protected]>
- * 1999 Antti Koivisto <[email protected]>
- * 2000 Simon Hausmann <[email protected]>
- * 2000 Stefan Schimanski <[email protected]>
- * 2001-2003 George Staikos <[email protected]>
- * 2001-2003 Dirk Mueller <[email protected]>
- * 2000-2005 David Faure <[email protected]>
- * 2002 Apple Computer, Inc.
- *
- * This library is free software; you can redistribute it and/or
- * modify it under the terms of the GNU Library General Public
- * License as published by the Free Software Foundation; either
- * version 2 of the License, or (at your option) any later version.
- *
- * This library 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
- * Library General Public License for more details.
- *
- * You should have received a copy of the GNU Library General Public License
- * along with this library; see the file COPYING.LIB. If not, write to
- * the Free Software Foundation, Inc., 51 Franklin Street, Fifth Floor,
- * Boston, MA 02110-1301, USA.
- */
-
-//#define SPEED_DEBUG
-#include "khtml_part.h"
-
-#include "khtml_pagecache.h"
-
-#include "dom/dom_string.h"
-#include "dom/dom_element.h"
-#include "dom/dom_exception.h"
-#include "html/html_documentimpl.h"
-#include "html/html_baseimpl.h"
-#include "html/html_objectimpl.h"
-#include "html/html_miscimpl.h"
-#include "html/html_imageimpl.h"
-#include "html/html_objectimpl.h"
-#include "rendering/render_text.h"
-#include "rendering/render_frames.h"
-#include "rendering/render_layer.h"
-#include "misc/htmlhashes.h"
-#include "misc/loader.h"
-#include "xml/dom2_eventsimpl.h"
-#include "xml/dom2_rangeimpl.h"
-#include "xml/xml_tokenizer.h"
-#include "css/cssstyleselector.h"
-#include "css/csshelper.h"
-using namespace DOM;
-
-#include "khtmlview.h"
-#include <kparts/partmanager.h>
-#include "ecma/kjs_proxy.h"
-#include "ecma/kjs_window.h"
-#include "khtml_settings.h"
-#include "kjserrordlg.h"
-
-#include <kjs/function.h>
-#include <kjs/interpreter.h>
-
-#include "htmlpageinfo.h"
-
-#include <sys/types.h>
-#include <assert.h>
-#include <unistd.h>
-
-#include <config.h>
-
-#include <dcopclient.h>
-#include <dcopref.h>
-#include <kstandarddirs.h>
-#include <kstringhandler.h>
-#include <kio/job.h>
-#include <kio/global.h>
-#include <kio/netaccess.h>
-#include <kprotocolmanager.h>
-#include <kdebug.h>
-#include <kiconloader.h>
-#include <klocale.h>
-#include <kcharsets.h>
-#include <kmessagebox.h>
-#include <kstdaction.h>
-#include <kfiledialog.h>
-#include <ktrader.h>
-#include <kdatastream.h>
-#include <ktempfile.h>
-#include <kglobalsettings.h>
-#include <kurldrag.h>
-#include <kapplication.h>
-#include <kparts/browserinterface.h>
-#if !defined(QT_NO_DRAGANDDROP)
-#include <kmultipledrag.h>
-#endif
-#include "../kutils/kfinddialog.h"
-#include "../kutils/kfind.h"
-
-#include <ksslcertchain.h>
-#include <ksslinfodlg.h>
-
-#include <kfileitem.h>
-#include <kurifilter.h>
-#include <kstatusbar.h>
-#include <kurllabel.h>
-
-#include <tqclipboard.h>
-#include <tqfile.h>
-#include <tqtooltip.h>
-#include <tqmetaobject.h>
-#include <tqucomextra_p.h>
-
-#include "khtmlpart_p.h"
-#include "kpassivepopup.h"
-#include "kpopupmenu.h"
-#include "rendering/render_form.h"
-#include <twin.h>
-
-#define HINT_UTF8 106
-
-namespace khtml {
- class PartStyleSheetLoader : public CachedObjectClient
- {
- public:
- PartStyleSheetLoader(KHTMLPart *part, DOM::DOMString url, DocLoader* dl)
- {
- m_part = part;
- m_cachedSheet = dl->requestStyleSheet(url, TQString(), "text/css",
- true /* "user sheet" */);
- if (m_cachedSheet)
- m_cachedSheet->ref( this );
- }
- virtual ~PartStyleSheetLoader()
- {
- if ( m_cachedSheet ) m_cachedSheet->deref(this);
- }
- virtual void setStyleSheet(const DOM::DOMString&, const DOM::DOMString &sheet, const DOM::DOMString &)
- {
- if ( m_part )
- m_part->setUserStyleSheet( sheet.string() );
-
- delete this;
- }
- virtual void error( int, const TQString& ) {
- delete this;
- }
- TQGuardedPtr<KHTMLPart> m_part;
- khtml::CachedCSSStyleSheet *m_cachedSheet;
- };
-}
-
-void khtml::ChildFrame::liveConnectEvent(const unsigned long, const TQString & event, const KParts::LiveConnectExtension::ArgList & args)
-{
- if (!m_part || !m_frame || !m_liveconnect)
- // hmmm
- return;
-
- TQString script;
- script.sprintf("%s(", event.latin1());
-
- KParts::LiveConnectExtension::ArgList::const_iterator i = args.begin();
- const KParts::LiveConnectExtension::ArgList::const_iterator argsBegin = i;
- const KParts::LiveConnectExtension::ArgList::const_iterator argsEnd = args.end();
-
- for ( ; i != argsEnd; ++i) {
- if (i != argsBegin)
- script += ",";
- if ((*i).first == KParts::LiveConnectExtension::TypeString) {
- script += "\"";
- script += TQString((*i).second).replace('\\', "\\\\").replace('"', "\\\"");
- script += "\"";
- } else
- script += (*i).second;
- }
- script += ")";
- kdDebug(6050) << "khtml::ChildFrame::liveConnectEvent " << script << endl;
-
- KHTMLPart * part = ::tqqt_cast<KHTMLPart *>(m_part->parent());
- if (!part)
- return;
- if (!m_jscript)
- part->framejScript(m_part);
- if (m_jscript) {
- // we have a jscript => a part in an iframe
- KJS::Completion cmp;
- m_jscript->evaluate(TQString(), 1, script, 0L, &cmp);
- } else
- part->executeScript(m_frame->element(), script);
-}
-
-KHTMLFrameList::Iterator KHTMLFrameList::find( const TQString &name )
-{
- Iterator it = begin();
- const Iterator e = end();
-
- for (; it!=e; ++it )
- if ( (*it)->m_name==name )
- break;
-
- return it;
-}
-
-KHTMLPart::KHTMLPart( TQWidget *parentWidget, const char *widgetname, TQObject *parent, const char *name, GUIProfile prof )
-: KParts::ReadOnlyPart( parent, name )
-{
- d = 0;
- KHTMLFactory::registerPart( this );
- setInstance( KHTMLFactory::instance(), prof == BrowserViewGUI && !parentPart() );
- // TODO KDE4 - don't load plugins yet
- //setInstance( KHTMLFactory::instance(), false );
- init( new KHTMLView( this, parentWidget, widgetname ), prof );
-}
-
-KHTMLPart::KHTMLPart( KHTMLView *view, TQObject *parent, const char *name, GUIProfile prof )
-: KParts::ReadOnlyPart( parent, name )
-{
- d = 0;
- KHTMLFactory::registerPart( this );
- setInstance( KHTMLFactory::instance(), prof == BrowserViewGUI && !parentPart() );
- // TODO KDE4 - don't load plugins yet
- //setInstance( KHTMLFactory::instance(), false );
- assert( view );
- init( view, prof );
-}
-
-void KHTMLPart::init( KHTMLView *view, GUIProfile prof )
-{
- if ( prof == DefaultGUI )
- setXMLFile( "khtml.rc" );
- else if ( prof == BrowserViewGUI )
- setXMLFile( "khtml_browser.rc" );
-
- d = new KHTMLPartPrivate(parent());
-
- d->m_view = view;
- setWidget( d->m_view );
-
- d->m_guiProfile = prof;
- d->m_extension = new KHTMLPartBrowserExtension( this, "KHTMLBrowserExtension" );
- d->m_hostExtension = new KHTMLPartBrowserHostExtension( this );
- d->m_statusBarExtension = new KParts::StatusBarExtension( this );
- d->m_statusBarIconLabel = 0L;
- d->m_statusBarPopupLabel = 0L;
- d->m_openableSuppressedPopups = 0;
-
- d->m_bSecurityInQuestion = false;
- d->m_paLoadImages = 0;
- d->m_paDebugScript = 0;
- d->m_bMousePressed = false;
- d->m_bRightMousePressed = false;
- d->m_bCleared = false;
- d->m_paViewDocument = new KAction( i18n( "View Do&cument Source" ), CTRL + Key_U, this, TQT_SLOT( slotViewDocumentSource() ), actionCollection(), "viewDocumentSource" );
- d->m_paViewFrame = new KAction( i18n( "View Frame Source" ), 0, this, TQT_SLOT( slotViewFrameSource() ), actionCollection(), "viewFrameSource" );
- d->m_paViewInfo = new KAction( i18n( "View Document Information" ), CTRL+Key_I, this, TQT_SLOT( slotViewPageInfo() ), actionCollection(), "viewPageInfo" );
- d->m_paSaveBackground = new KAction( i18n( "Save &Background Image As..." ), 0, this, TQT_SLOT( slotSaveBackground() ), actionCollection(), "saveBackground" );
- d->m_paSaveDocument = KStdAction::saveAs( this, TQT_SLOT( slotSaveDocument() ), actionCollection(), "saveDocument" );
- if ( parentPart() )
- d->m_paSaveDocument->setShortcut( KShortcut() ); // avoid clashes
- d->m_paSaveFrame = new KAction( i18n( "Save &Frame As..." ), 0, this, TQT_SLOT( slotSaveFrame() ), actionCollection(), "saveFrame" );
- d->m_paSecurity = new KAction( i18n( "Security..." ), "decrypted", 0, this, TQT_SLOT( slotSecurity() ), actionCollection(), "security" );
- d->m_paSecurity->setWhatsThis( i18n( "Security Settings<p>"
- "Shows the certificate of the displayed page. Only "
- "pages that have been transmitted using a secure, encrypted connection have a "
- "certificate.<p> "
- "Hint: If the image shows a closed lock, the page has been transmitted over a "
- "secure connection.") );
- d->m_paDebugRenderTree = new KAction( i18n( "Print Rendering Tree to STDOUT" ), ALT + CTRL + SHIFT + Key_A, this, TQT_SLOT( slotDebugRenderTree() ), actionCollection(), "debugRenderTree" );
- d->m_paDebugDOMTree = new KAction( i18n( "Print DOM Tree to STDOUT" ), ALT + CTRL + SHIFT + Key_D, this, TQT_SLOT( slotDebugDOMTree() ), actionCollection(), "debugDOMTree" );
- d->m_paStopAnimations = new KAction( i18n( "Stop Animated Images" ), 0, this, TQT_SLOT( slotStopAnimations() ), actionCollection(), "stopAnimations" );
-
- d->m_paSetEncoding = new KActionMenu( i18n( "Set &Encoding" ), "charset", actionCollection(), "setEncoding" );
- d->m_paSetEncoding->setDelayed( false );
-
- d->m_automaticDetection = new KPopupMenu( 0L );
-
- d->m_automaticDetection->insertItem( i18n( "Semi-Automatic" ), 0 );
- d->m_automaticDetection->insertItem( i18n( "Arabic" ), 1 );
- d->m_automaticDetection->insertItem( i18n( "Baltic" ), 2 );
- d->m_automaticDetection->insertItem( i18n( "Central European" ), 3 );
- //d->m_automaticDetection->insertItem( i18n( "Chinese" ), 4 );
- d->m_automaticDetection->insertItem( i18n( "Greek" ), 5 );
- d->m_automaticDetection->insertItem( i18n( "Hebrew" ), 6 );
- d->m_automaticDetection->insertItem( i18n( "Japanese" ), 7 );
- //d->m_automaticDetection->insertItem( i18n( "Korean" ), 8 );
- d->m_automaticDetection->insertItem( i18n( "Russian" ), 9 );
- //d->m_automaticDetection->insertItem( i18n( "Thai" ), 10 );
- d->m_automaticDetection->insertItem( i18n( "Turkish" ), 11 );
- d->m_automaticDetection->insertItem( i18n( "Ukrainian" ), 12 );
- //d->m_automaticDetection->insertItem( i18n( "Unicode" ), 13 );
- d->m_automaticDetection->insertItem( i18n( "Western European" ), 14 );
-
- connect( d->m_automaticDetection, TQT_SIGNAL( activated( int ) ), this, TQT_SLOT( slotAutomaticDetectionLanguage( int ) ) );
-
- d->m_paSetEncoding->popupMenu()->insertItem( i18n( "Automatic Detection" ), d->m_automaticDetection, 0 );
-
- d->m_paSetEncoding->insert( new KActionSeparator( actionCollection() ) );
-
-
- d->m_manualDetection = new KSelectAction( i18n( "short for Manual Detection", "Manual" ), 0, this, TQT_SLOT( slotSetEncoding() ), actionCollection(), "manualDetection" );
- TQStringList encodings = TDEGlobal::charsets()->descriptiveEncodingNames();
- d->m_manualDetection->setItems( encodings );
- d->m_manualDetection->setCurrentItem( -1 );
- d->m_paSetEncoding->insert( d->m_manualDetection );
-
-
- TDEConfig *config = TDEGlobal::config();
- if ( config->hasGroup( "HTML Settings" ) ) {
- config->setGroup( "HTML Settings" );
- khtml::Decoder::AutoDetectLanguage language;
- TQCString name = TQTextCodec::codecForLocale()->name();
- name = name.lower();
-
- if ( name == "cp1256" || name == "iso-8859-6" ) {
- language = khtml::Decoder::Arabic;
- }
- else if ( name == "cp1257" || name == "iso-8859-13" || name == "iso-8859-4" ) {
- language = khtml::Decoder::Baltic;
- }
- else if ( name == "cp1250" || name == "ibm852" || name == "iso-8859-2" || name == "iso-8859-3" ) {
- language = khtml::Decoder::CentralEuropean;
- }
- else if ( name == "cp1251" || name == "koi8-r" || name == "iso-8859-5" ) {
- language = khtml::Decoder::Russian;
- }
- else if ( name == "koi8-u" ) {
- language = khtml::Decoder::Ukrainian;
- }
- else if ( name == "cp1253" || name == "iso-8859-7" ) {
- language = khtml::Decoder::Greek;
- }
- else if ( name == "cp1255" || name == "iso-8859-8" || name == "iso-8859-8-i" ) {
- language = khtml::Decoder::Hebrew;
- }
- else if ( name == "jis7" || name == "eucjp" || name == "sjis" ) {
- language = khtml::Decoder::Japanese;
- }
- else if ( name == "cp1254" || name == "iso-8859-9" ) {
- language = khtml::Decoder::Turkish;
- }
- else if ( name == "cp1252" || name == "iso-8859-1" || name == "iso-8859-15" ) {
- language = khtml::Decoder::WesternEuropean;
- }
- else
- language = khtml::Decoder::SemiautomaticDetection;
-
- int _id = config->readNumEntry( "AutomaticDetectionLanguage", language );
- d->m_automaticDetection->setItemChecked( _id, true );
- d->m_paSetEncoding->popupMenu()->setItemChecked( 0, true );
-
- d->m_autoDetectLanguage = static_cast< khtml::Decoder::AutoDetectLanguage >( _id );
- }
-
-
- d->m_paUseStylesheet = new KSelectAction( i18n( "Use S&tylesheet"), 0, this, TQT_SLOT( slotUseStylesheet() ), actionCollection(), "useStylesheet" );
-
- if ( prof == BrowserViewGUI ) {
- d->m_paIncZoomFactor = new KHTMLZoomFactorAction( this, true, i18n(
- "Enlarge Font" ), "viewmag+", "CTRL++;CTRL+=", this,
- TQT_SLOT( slotIncZoomFast() ), actionCollection(), "incFontSizes" );
- d->m_paIncZoomFactor->setWhatsThis( i18n( "Enlarge Font<p>"
- "Make the font in this window bigger. "
- "Click and hold down the mouse button for a menu with all available font sizes." ) );
- d->m_paDecZoomFactor = new KHTMLZoomFactorAction( this, false, i18n(
- "Shrink Font" ), "viewmag-", CTRL + Key_Minus, this,
- TQT_SLOT( slotDecZoomFast() ), actionCollection(), "decFontSizes" );
- d->m_paDecZoomFactor->setWhatsThis( i18n( "Shrink Font<p>"
- "Make the font in this window smaller. "
- "Click and hold down the mouse button for a menu with all available font sizes." ) );
- }
-
- d->m_paFind = KStdAction::find( this, TQT_SLOT( slotFind() ), actionCollection(), "find" );
- d->m_paFind->setWhatsThis( i18n( "Find text<p>"
- "Shows a dialog that allows you to find text on the displayed page." ) );
-
- d->m_paFindNext = KStdAction::findNext( this, TQT_SLOT( slotFindNext() ), actionCollection(), "findNext" );
- d->m_paFindNext->setWhatsThis( i18n( "Find next<p>"
- "Find the next occurrence of the text that you "
- "have found using the <b>Find Text</b> function" ) );
-
- d->m_paFindPrev = KStdAction::findPrev( this, TQT_SLOT( slotFindPrev() ), actionCollection(), "findPrevious" );
- d->m_paFindPrev->setWhatsThis( i18n( "Find previous<p>"
- "Find the previous occurrence of the text that you "
- "have found using the <b>Find Text</b> function" ) );
-
- d->m_paFindAheadText = new KAction( i18n("Find Text as You Type"), KShortcut( '/' ), this, TQT_SLOT( slotFindAheadText()),
- actionCollection(), "findAheadText");
- d->m_paFindAheadLinks = new KAction( i18n("Find Links as You Type"), KShortcut( '\'' ), this, TQT_SLOT( slotFindAheadLink()),
- actionCollection(), "findAheadLink");
- d->m_paFindAheadText->setEnabled( false );
- d->m_paFindAheadLinks->setEnabled( false );
-
- if ( parentPart() )
- {
- d->m_paFind->setShortcut( KShortcut() ); // avoid clashes
- d->m_paFindNext->setShortcut( KShortcut() ); // avoid clashes
- d->m_paFindPrev->setShortcut( KShortcut() ); // avoid clashes
- d->m_paFindAheadText->setShortcut( KShortcut());
- d->m_paFindAheadLinks->setShortcut( KShortcut());
- }
-
- d->m_paPrintFrame = new KAction( i18n( "Print Frame..." ), "frameprint", 0, this, TQT_SLOT( slotPrintFrame() ), actionCollection(), "printFrame" );
- d->m_paPrintFrame->setWhatsThis( i18n( "Print Frame<p>"
- "Some pages have several frames. To print only a single frame, click "
- "on it and then use this function." ) );
-
- d->m_paSelectAll = KStdAction::selectAll( this, TQT_SLOT( slotSelectAll() ), actionCollection(), "selectAll" );
- if ( parentPart() )
- d->m_paSelectAll->setShortcut( KShortcut() ); // avoid clashes
-
- d->m_paToggleCaretMode = new KToggleAction(i18n("Toggle Caret Mode"),
- Key_F7, this, TQT_SLOT(slotToggleCaretMode()),
- actionCollection(), "caretMode");
- d->m_paToggleCaretMode->setChecked(isCaretMode());
- if (parentPart())
- d->m_paToggleCaretMode->setShortcut(KShortcut()); // avoid clashes
-
- // set the default java(script) flags according to the current host.
- d->m_bOpenMiddleClick = d->m_settings->isOpenMiddleClickEnabled();
- d->m_bBackRightClick = d->m_settings->isBackRightClickEnabled();
- d->m_bJScriptEnabled = d->m_settings->isJavaScriptEnabled();
- setDebugScript( d->m_settings->isJavaScriptDebugEnabled() );
- d->m_bJavaEnabled = d->m_settings->isJavaEnabled();
- d->m_bPluginsEnabled = d->m_settings->isPluginsEnabled();
-
- // Set the meta-refresh flag...
- d->m_metaRefreshEnabled = d->m_settings->isAutoDelayedActionsEnabled ();
-
- connect( view, TQT_SIGNAL( zoomView( int ) ), TQT_SLOT( slotZoomView( int ) ) );
-
- connect( this, TQT_SIGNAL( completed() ),
- this, TQT_SLOT( updateActions() ) );
- connect( this, TQT_SIGNAL( completed( bool ) ),
- this, TQT_SLOT( updateActions() ) );
- connect( this, TQT_SIGNAL( started( TDEIO::Job * ) ),
- this, TQT_SLOT( updateActions() ) );
-
- d->m_popupMenuXML = KXMLGUIFactory::readConfigFile( locate( "data", "khtml/khtml_popupmenu.rc", KHTMLFactory::instance() ) );
-
- connect( khtml::Cache::loader(), TQT_SIGNAL( requestStarted( khtml::DocLoader*, khtml::CachedObject* ) ),
- this, TQT_SLOT( slotLoaderRequestStarted( khtml::DocLoader*, khtml::CachedObject* ) ) );
- connect( khtml::Cache::loader(), TQT_SIGNAL( requestDone( khtml::DocLoader*, khtml::CachedObject *) ),
- this, TQT_SLOT( slotLoaderRequestDone( khtml::DocLoader*, khtml::CachedObject *) ) );
- connect( khtml::Cache::loader(), TQT_SIGNAL( requestFailed( khtml::DocLoader*, khtml::CachedObject *) ),
- this, TQT_SLOT( slotLoaderRequestDone( khtml::DocLoader*, khtml::CachedObject *) ) );
-
- connect ( &d->m_progressUpdateTimer, TQT_SIGNAL( timeout() ), this, TQT_SLOT( slotProgressUpdate() ) );
-
- findTextBegin(); //reset find variables
-
- connect( &d->m_redirectionTimer, TQT_SIGNAL( timeout() ),
- this, TQT_SLOT( slotRedirect() ) );
-
- d->m_dcopobject = new KHTMLPartIface(this);
-
- // TODO KDE4 - load plugins now (see also the constructors)
- //if ( prof == BrowserViewGUI && !parentPart() )
- // loadPlugins( partObject(), this, instance() );
-
- // "khtml" catalog does not exist, our translations are in tdelibs.
- // removing this catalog from TDEGlobal::locale() prevents problems
- // with changing the language in applications at runtime -Thomas Reitelbach
- TDEGlobal::locale()->removeCatalogue("khtml");
-}
-
-KHTMLPart::~KHTMLPart()
-{
- //kdDebug(6050) << "KHTMLPart::~KHTMLPart " << this << endl;
-
- TDEConfig *config = TDEGlobal::config();
- config->setGroup( "HTML Settings" );
- config->writeEntry( "AutomaticDetectionLanguage", d->m_autoDetectLanguage );
-
- delete d->m_automaticDetection;
- delete d->m_manualDetection;
-
- slotWalletClosed();
- if (!parentPart()) { // only delete it if the top khtml_part closes
- removeJSErrorExtension();
- delete d->m_statusBarPopupLabel;
- }
-
- d->m_find = 0; // deleted by its parent, the view.
-
- if ( d->m_manager )
- {
- d->m_manager->setActivePart( 0 );
- // We specify "this" as parent qobject for d->manager, so no need to delete it.
- }
-
- stopAutoScroll();
- d->m_redirectionTimer.stop();
-
- if (!d->m_bComplete)
- closeURL();
-
- disconnect( khtml::Cache::loader(), TQT_SIGNAL( requestStarted( khtml::DocLoader*, khtml::CachedObject* ) ),
- this, TQT_SLOT( slotLoaderRequestStarted( khtml::DocLoader*, khtml::CachedObject* ) ) );
- disconnect( khtml::Cache::loader(), TQT_SIGNAL( requestDone( khtml::DocLoader*, khtml::CachedObject *) ),
- this, TQT_SLOT( slotLoaderRequestDone( khtml::DocLoader*, khtml::CachedObject *) ) );
- disconnect( khtml::Cache::loader(), TQT_SIGNAL( requestFailed( khtml::DocLoader*, khtml::CachedObject *) ),
- this, TQT_SLOT( slotLoaderRequestDone( khtml::DocLoader*, khtml::CachedObject *) ) );
-
- clear();
-
- if ( d->m_view )
- {
- d->m_view->hide();
- d->m_view->viewport()->hide();
- d->m_view->m_part = 0;
- }
-
- // Have to delete this here since we forward declare it in khtmlpart_p and
- // at least some compilers won't call the destructor in this case.
- delete d->m_jsedlg;
- d->m_jsedlg = 0;
-
- if (!parentPart()) // only delete d->m_frame if the top khtml_part closes
- delete d->m_frame;
- delete d; d = 0;
- KHTMLFactory::deregisterPart( this );
-}
-
-bool KHTMLPart::restoreURL( const KURL &url )
-{
- kdDebug( 6050 ) << "KHTMLPart::restoreURL " << url.url() << endl;
-
- d->m_redirectionTimer.stop();
-
- /*
- * That's not a good idea as it will call closeURL() on all
- * child frames, preventing them from further loading. This
- * method gets called from restoreState() in case of a full frameset
- * restoral, and restoreState() calls closeURL() before restoring
- * anyway.
- kdDebug( 6050 ) << "closing old URL" << endl;
- closeURL();
- */
-
- d->m_bComplete = false;
- d->m_bLoadEventEmitted = false;
- d->m_workingURL = url;
-
- // set the java(script) flags according to the current host.
- d->m_bJScriptEnabled = KHTMLFactory::defaultHTMLSettings()->isJavaScriptEnabled(url.host());
- setDebugScript( KHTMLFactory::defaultHTMLSettings()->isJavaScriptDebugEnabled() );
- d->m_bJavaEnabled = KHTMLFactory::defaultHTMLSettings()->isJavaEnabled(url.host());
- d->m_bPluginsEnabled = KHTMLFactory::defaultHTMLSettings()->isPluginsEnabled(url.host());
-
- m_url = url;
-
- d->m_restoreScrollPosition = true;
- disconnect(d->m_view, TQT_SIGNAL(finishedLayout()), this, TQT_SLOT(restoreScrollPosition()));
- connect(d->m_view, TQT_SIGNAL(finishedLayout()), this, TQT_SLOT(restoreScrollPosition()));
-
- KHTMLPageCache::self()->fetchData( d->m_cacheId, this, TQT_SLOT(slotRestoreData(const TQByteArray &)));
-
- emit started( 0L );
-
- return true;
-}
-
-
-bool KHTMLPart::openURL( const KURL &url )
-{
- kdDebug( 6050 ) << "KHTMLPart(" << this << ")::openURL " << url.url() << endl;
-
- d->m_redirectionTimer.stop();
-
- // check to see if this is an "error://" URL. This is caused when an error
- // occurs before this part was loaded (e.g. KonqRun), and is passed to
- // khtmlpart so that it can display the error.
- if ( url.protocol() == "error" && url.hasSubURL() ) {
- closeURL();
-
- if( d->m_bJScriptEnabled )
- d->m_statusBarText[BarOverrideText] = d->m_statusBarText[BarDefaultText] = TQString();
-
- /**
- * The format of the error url is that two variables are passed in the query:
- * error = int kio error code, errText = TQString error text from kio
- * and the URL where the error happened is passed as a sub URL.
- */
- KURL::List urls = KURL::split( url );
- //kdDebug(6050) << "Handling error URL. URL count:" << urls.count() << endl;
-
- if ( urls.count() > 1 ) {
- KURL mainURL = urls.first();
- int error = mainURL.queryItem( "error" ).toInt();
- // error=0 isn't a valid error code, so 0 means it's missing from the URL
- if ( error == 0 ) error = TDEIO::ERR_UNKNOWN;
- TQString errorText = mainURL.queryItem( "errText", HINT_UTF8 );
- urls.pop_front();
- d->m_workingURL = KURL::join( urls );
- //kdDebug(6050) << "Emitting fixed URL " << d->m_workingURL.prettyURL() << endl;
- emit d->m_extension->setLocationBarURL( d->m_workingURL.prettyURL() );
- htmlError( error, errorText, d->m_workingURL );
- return true;
- }
- }
-
- if (!parentPart()) { // only do it for toplevel part
- TQString host = url.isLocalFile() ? "localhost" : url.host();
- TQString userAgent = KProtocolManager::userAgentForHost(host);
- if (userAgent != KProtocolManager::userAgentForHost(TQString())) {
- if (!d->m_statusBarUALabel) {
- d->m_statusBarUALabel = new KURLLabel(d->m_statusBarExtension->statusBar());
- d->m_statusBarUALabel->setFixedHeight(instance()->iconLoader()->currentSize(KIcon::Small));
- d->m_statusBarUALabel->setSizePolicy(TQSizePolicy(TQSizePolicy::Fixed, TQSizePolicy::Fixed));
- d->m_statusBarUALabel->setUseCursor(false);
- d->m_statusBarExtension->addStatusBarItem(d->m_statusBarUALabel, 0, false);
- d->m_statusBarUALabel->setPixmap(SmallIcon("agent", instance()));
- } else {
- TQToolTip::remove(d->m_statusBarUALabel);
- }
- TQToolTip::add(d->m_statusBarUALabel, i18n("The fake user-agent '%1' is in use.").arg(userAgent));
- } else if (d->m_statusBarUALabel) {
- d->m_statusBarExtension->removeStatusBarItem(d->m_statusBarUALabel);
- delete d->m_statusBarUALabel;
- d->m_statusBarUALabel = 0L;
- }
- }
-
- KParts::URLArgs args( d->m_extension->urlArgs() );
-
- // in case
- // a) we have no frameset (don't test m_frames.count(), iframes get in there)
- // b) the url is identical with the currently displayed one (except for the htmlref!)
- // c) the url request is not a POST operation and
- // d) the caller did not request to reload the page
- // e) there was no HTTP redirection meanwhile (testcase: webmin's software/tree.cgi)
- // => we don't reload the whole document and
- // we just jump to the requested html anchor
- bool isFrameSet = false;
- if ( d->m_doc && d->m_doc->isHTMLDocument() ) {
- HTMLDocumentImpl* htmlDoc = static_cast<HTMLDocumentImpl*>(d->m_doc);
- isFrameSet = htmlDoc->body() && (htmlDoc->body()->id() == ID_FRAMESET);
- }
-
- if ( url.hasRef() && !isFrameSet )
- {
- bool noReloadForced = !args.reload && !args.redirectedRequest() && !args.doPost();
- if (noReloadForced && urlcmp( url.url(), m_url.url(), true, true ))
- {
- kdDebug( 6050 ) << "KHTMLPart::openURL, jumping to anchor. m_url = " << url.url() << endl;
- m_url = url;
- emit started( 0L );
-
- if ( !gotoAnchor( url.encodedHtmlRef()) )
- gotoAnchor( url.htmlRef() );
-
- d->m_bComplete = true;
- if (d->m_doc)
- d->m_doc->setParsing(false);
-
- kdDebug( 6050 ) << "completed..." << endl;
- emit completed();
- return true;
- }
- }
-
- // Save offset of viewport when page is reloaded to be compliant
- // to every other capable browser out there.
- if (args.reload) {
- args.xOffset = d->m_view->contentsX();
- args.yOffset = d->m_view->contentsY();
- d->m_extension->setURLArgs(args);
- }
-
- if (!d->m_restored)
- closeURL();
-
- d->m_restoreScrollPosition = d->m_restored;
- disconnect(d->m_view, TQT_SIGNAL(finishedLayout()), this, TQT_SLOT(restoreScrollPosition()));
- connect(d->m_view, TQT_SIGNAL(finishedLayout()), this, TQT_SLOT(restoreScrollPosition()));
-
- // initializing m_url to the new url breaks relative links when opening such a link after this call and _before_ begin() is called (when the first
- // data arrives) (Simon)
- m_url = url;
- if(m_url.protocol().startsWith( "http" ) && !m_url.host().isEmpty() &&
- m_url.path().isEmpty()) {
- m_url.setPath("/");
- emit d->m_extension->setLocationBarURL( m_url.prettyURL() );
- }
- // copy to m_workingURL after fixing m_url above
- d->m_workingURL = m_url;
-
- args.metaData().insert("main_frame_request", parentPart() == 0 ? "TRUE" : "FALSE" );
- args.metaData().insert("ssl_parent_ip", d->m_ssl_parent_ip);
- args.metaData().insert("ssl_parent_cert", d->m_ssl_parent_cert);
- args.metaData().insert("PropagateHttpHeader", "true");
- args.metaData().insert("ssl_was_in_use", d->m_ssl_in_use ? "TRUE" : "FALSE" );
- args.metaData().insert("ssl_activate_warnings", "TRUE" );
- args.metaData().insert("cross-domain", toplevelURL().url());
-
- if (d->m_restored)
- {
- args.metaData().insert("referrer", d->m_pageReferrer);
- d->m_cachePolicy = TDEIO::CC_Cache;
- }
- else if (args.reload)
- d->m_cachePolicy = TDEIO::CC_Reload;
- else
- d->m_cachePolicy = KProtocolManager::cacheControl();
-
- if ( args.doPost() && (m_url.protocol().startsWith("http")) )
- {
- d->m_job = TDEIO::http_post( m_url, args.postData, false );
- d->m_job->addMetaData("content-type", args.contentType() );
- }
- else
- {
- d->m_job = TDEIO::get( m_url, false, false );
- d->m_job->addMetaData("cache", TDEIO::getCacheControlString(d->m_cachePolicy));
- }
-
- if (widget())
- d->m_job->setWindow(widget()->topLevelWidget());
- d->m_job->addMetaData(args.metaData());
-
- connect( d->m_job, TQT_SIGNAL( result( TDEIO::Job* ) ),
- TQT_SLOT( slotFinished( TDEIO::Job* ) ) );
- connect( d->m_job, TQT_SIGNAL( data( TDEIO::Job*, const TQByteArray& ) ),
- TQT_SLOT( slotData( TDEIO::Job*, const TQByteArray& ) ) );
- connect ( d->m_job, TQT_SIGNAL( infoMessage( TDEIO::Job*, const TQString& ) ),
- TQT_SLOT( slotInfoMessage(TDEIO::Job*, const TQString& ) ) );
- connect( d->m_job, TQT_SIGNAL(redirection(TDEIO::Job*, const KURL& ) ),
- TQT_SLOT( slotRedirection(TDEIO::Job*, const KURL&) ) );
-
- d->m_bComplete = false;
- d->m_bLoadEventEmitted = false;
-
- // delete old status bar msg's from kjs (if it _was_ activated on last URL)
- if( d->m_bJScriptEnabled )
- d->m_statusBarText[BarOverrideText] = d->m_statusBarText[BarDefaultText] = TQString();
-
- // set the javascript flags according to the current url
- d->m_bJScriptEnabled = KHTMLFactory::defaultHTMLSettings()->isJavaScriptEnabled(url.host());
- setDebugScript( KHTMLFactory::defaultHTMLSettings()->isJavaScriptDebugEnabled() );
- d->m_bJavaEnabled = KHTMLFactory::defaultHTMLSettings()->isJavaEnabled(url.host());
- d->m_bPluginsEnabled = KHTMLFactory::defaultHTMLSettings()->isPluginsEnabled(url.host());
-
-
- connect( d->m_job, TQT_SIGNAL( speed( TDEIO::Job*, unsigned long ) ),
- this, TQT_SLOT( slotJobSpeed( TDEIO::Job*, unsigned long ) ) );
-
- connect( d->m_job, TQT_SIGNAL( percent( TDEIO::Job*, unsigned long ) ),
- this, TQT_SLOT( slotJobPercent( TDEIO::Job*, unsigned long ) ) );
-
- connect( d->m_job, TQT_SIGNAL( result( TDEIO::Job* ) ),
- this, TQT_SLOT( slotJobDone( TDEIO::Job* ) ) );
-
- d->m_jobspeed = 0;
-
- // If this was an explicit reload and the user style sheet should be used,
- // do a stat to see whether the stylesheet was changed in the meanwhile.
- if ( args.reload && !settings()->userStyleSheet().isEmpty() ) {
- KURL url( settings()->userStyleSheet() );
- TDEIO::StatJob *job = TDEIO::stat( url, false /* don't show progress */ );
- connect( job, TQT_SIGNAL( result( TDEIO::Job * ) ),
- this, TQT_SLOT( slotUserSheetStatDone( TDEIO::Job * ) ) );
- }
- emit started( 0L );
-
- return true;
-}
-
-bool KHTMLPart::closeURL()
-{
- if ( d->m_job )
- {
- KHTMLPageCache::self()->cancelEntry(d->m_cacheId);
- d->m_job->kill();
- d->m_job = 0;
- }
-
- if ( d->m_doc && d->m_doc->isHTMLDocument() ) {
- HTMLDocumentImpl* hdoc = static_cast<HTMLDocumentImpl*>( d->m_doc );
-
- if ( hdoc->body() && d->m_bLoadEventEmitted ) {
- hdoc->body()->dispatchWindowEvent( EventImpl::UNLOAD_EVENT, false, false );
- if ( d->m_doc )
- d->m_doc->updateRendering();
- d->m_bLoadEventEmitted = false;
- }
- }
-
- d->m_bComplete = true; // to avoid emitting completed() in slotFinishedParsing() (David)
- d->m_bLoadEventEmitted = true; // don't want that one either
- d->m_cachePolicy = KProtocolManager::cacheControl(); // reset cache policy
-
- disconnect(d->m_view, TQT_SIGNAL(finishedLayout()), this, TQT_SLOT(restoreScrollPosition()));
-
- KHTMLPageCache::self()->cancelFetch(this);
- if ( d->m_doc && d->m_doc->parsing() )
- {
- kdDebug( 6050 ) << " was still parsing... calling end " << endl;
- slotFinishedParsing();
- d->m_doc->setParsing(false);
- }
-
- if ( !d->m_workingURL.isEmpty() )
- {
- // Aborted before starting to render
- kdDebug( 6050 ) << "Aborted before starting to render, reverting location bar to " << m_url.prettyURL() << endl;
- emit d->m_extension->setLocationBarURL( m_url.prettyURL() );
- }
-
- d->m_workingURL = KURL();
-
- if ( d->m_doc && d->m_doc->docLoader() )
- khtml::Cache::loader()->cancelRequests( d->m_doc->docLoader() );
-
- // tell all subframes to stop as well
- {
- ConstFrameIt it = d->m_frames.begin();
- const ConstFrameIt end = d->m_frames.end();
- for (; it != end; ++it )
- {
- if ( (*it)->m_run )
- (*it)->m_run->abort();
- if ( !( *it )->m_part.isNull() )
- ( *it )->m_part->closeURL();
- }
- }
- // tell all objects to stop as well
- {
- ConstFrameIt it = d->m_objects.begin();
- const ConstFrameIt end = d->m_objects.end();
- for (; it != end; ++it)
- {
- if ( !( *it )->m_part.isNull() )
- ( *it )->m_part->closeURL();
- }
- }
- // Stop any started redirections as well!! (DA)
- if ( d && d->m_redirectionTimer.isActive() )
- d->m_redirectionTimer.stop();
-
- // null node activated.
- emit nodeActivated(Node());
-
- // make sure before clear() runs, we pop out of a dialog's message loop
- if ( d->m_view )
- d->m_view->closeChildDialogs();
-
- return true;
-}
-
-DOM::HTMLDocument KHTMLPart::htmlDocument() const
-{
- if (d->m_doc && d->m_doc->isHTMLDocument())
- return static_cast<HTMLDocumentImpl*>(d->m_doc);
- else
- return static_cast<HTMLDocumentImpl*>(0);
-}
-
-DOM::Document KHTMLPart::document() const
-{
- return d->m_doc;
-}
-
-TQString KHTMLPart::documentSource() const
-{
- TQString sourceStr;
- if ( !( m_url.isLocalFile() ) && KHTMLPageCache::self()->isComplete( d->m_cacheId ) )
- {
- TQByteArray sourceArray;
- TQDataStream dataStream( sourceArray, IO_WriteOnly );
- KHTMLPageCache::self()->saveData( d->m_cacheId, &dataStream );
- TQTextStream stream( sourceArray, IO_ReadOnly );
- stream.setCodec( TQTextCodec::codecForName( encoding().latin1() ) );
- sourceStr = stream.read();
- } else
- {
- TQString tmpFile;
- if( TDEIO::NetAccess::download( m_url, tmpFile, NULL ) )
- {
- TQFile f( tmpFile );
- if ( f.open( IO_ReadOnly ) )
- {
- TQTextStream stream( &f );
- stream.setCodec( TQTextCodec::codecForName( encoding().latin1() ) );
- sourceStr = stream.read();
- f.close();
- }
- TDEIO::NetAccess::removeTempFile( tmpFile );
- }
- }
-
- return sourceStr;
-}
-
-
-KParts::BrowserExtension *KHTMLPart::browserExtension() const
-{
- return d->m_extension;
-}
-
-KParts::BrowserHostExtension *KHTMLPart::browserHostExtension() const
-{
- return d->m_hostExtension;
-}
-
-KHTMLView *KHTMLPart::view() const
-{
- return d->m_view;
-}
-
-void KHTMLPart::setStatusMessagesEnabled( bool enable )
-{
- d->m_statusMessagesEnabled = enable;
-}
-
-KJS::Interpreter *KHTMLPart::jScriptInterpreter()
-{
- KJSProxy *proxy = jScript();
- if (!proxy || proxy->paused())
- return 0;
-
- return proxy->interpreter();
-}
-
-bool KHTMLPart::statusMessagesEnabled() const
-{
- return d->m_statusMessagesEnabled;
-}
-
-void KHTMLPart::setJScriptEnabled( bool enable )
-{
- if ( !enable && jScriptEnabled() && d->m_frame && d->m_frame->m_jscript ) {
- d->m_frame->m_jscript->clear();
- }
- d->m_bJScriptForce = enable;
- d->m_bJScriptOverride = true;
-}
-
-bool KHTMLPart::jScriptEnabled() const
-{
- if(onlyLocalReferences()) return false;
-
- if ( d->m_bJScriptOverride )
- return d->m_bJScriptForce;
- return d->m_bJScriptEnabled;
-}
-
-void KHTMLPart::setMetaRefreshEnabled( bool enable )
-{
- d->m_metaRefreshEnabled = enable;
-}
-
-bool KHTMLPart::metaRefreshEnabled() const
-{
- return d->m_metaRefreshEnabled;
-}
-
-// Define this to disable dlopening kjs_html, when directly linking to it.
-// You need to edit khtml/Makefile.am to add ./ecma/libkjs_html.la to LIBADD
-// and to edit khtml/ecma/Makefile.am to s/kjs_html/libkjs_html/, remove libkhtml from LIBADD,
-// remove LDFLAGS line, and replace kde_module with either lib (shared) or noinst (static)
-// Also, change the order of "ecma" and "." in khtml's SUBDIRS line.
-// OK - that's the default now, use the opposite of the above instructions to go back
-// to "dlopening it" - but it breaks exception catching in kjs_binding.cpp
-#define DIRECT_LINKAGE_TO_ECMA
-
-#ifdef DIRECT_LINKAGE_TO_ECMA
-extern "C" { KJSProxy *kjs_html_init(khtml::ChildFrame * childframe); }
-#endif
-
-static bool createJScript(khtml::ChildFrame *frame)
-{
-#ifndef DIRECT_LINKAGE_TO_ECMA
- KLibrary *lib = KLibLoader::self()->library("kjs_html");
- if ( !lib ) {
- setJScriptEnabled( false );
- return false;
- }
- // look for plain C init function
- void *sym = lib->symbol("kjs_html_init");
- if ( !sym ) {
- lib->unload();
- setJScriptEnabled( false );
- return false;
- }
- typedef KJSProxy* (*initFunction)(khtml::ChildFrame *);
- initFunction initSym = (initFunction) sym;
- frame->m_jscript = (*initSym)(d->m_frame);
- frame->m_kjs_lib = lib;
-#else
- frame->m_jscript = kjs_html_init(frame);
- // frame->m_kjs_lib remains 0L.
-#endif
- return true;
-}
-
-KJSProxy *KHTMLPart::jScript()
-{
- if (!jScriptEnabled()) return 0;
-
- if ( !d->m_frame ) {
- KHTMLPart * p = parentPart();
- if (!p) {
- d->m_frame = new khtml::ChildFrame;
- d->m_frame->m_part = this;
- } else {
- ConstFrameIt it = p->d->m_frames.begin();
- const ConstFrameIt end = p->d->m_frames.end();
- for (; it != end; ++it)
- if ((*it)->m_part.operator->() == this) {
- d->m_frame = *it;
- break;
- }
- }
- if ( !d->m_frame )
- return 0;
- }
- if ( !d->m_frame->m_jscript )
- if (!createJScript(d->m_frame))
- return 0;
- if (d->m_bJScriptDebugEnabled)
- d->m_frame->m_jscript->setDebugEnabled(true);
-
- return d->m_frame->m_jscript;
-}
-
-TQVariant KHTMLPart::crossFrameExecuteScript(const TQString& target, const TQString& script)
-{
- KHTMLPart* destpart = this;
-
- TQString trg = target.lower();
-
- if (target == "_top") {
- while (destpart->parentPart())
- destpart = destpart->parentPart();
- }
- else if (target == "_parent") {
- if (parentPart())
- destpart = parentPart();
- }
- else if (target == "_self" || target == "_blank") {
- // we always allow these
- }
- else {
- destpart = findFrame(target);
- if (!destpart)
- destpart = this;
- }
-
- // easy way out?
- if (destpart == this)
- return executeScript(DOM::Node(), script);
-
- // now compare the domains
- if (destpart->checkFrameAccess(this))
- return destpart->executeScript(DOM::Node(), script);
-
- // eww, something went wrong. better execute it in our frame
- return executeScript(DOM::Node(), script);
-}
-
-//Enable this to see all JS scripts being executed
-//#define KJS_VERBOSE
-
-KJSErrorDlg *KHTMLPart::jsErrorExtension() {
- if (!d->m_settings->jsErrorsEnabled()) {
- return 0L;
- }
-
- if (parentPart()) {
- return parentPart()->jsErrorExtension();
- }
-
- if (!d->m_statusBarJSErrorLabel) {
- d->m_statusBarJSErrorLabel = new KURLLabel(d->m_statusBarExtension->statusBar());
- d->m_statusBarJSErrorLabel->setFixedHeight(instance()->iconLoader()->currentSize(KIcon::Small));
- d->m_statusBarJSErrorLabel->setSizePolicy(TQSizePolicy(TQSizePolicy::Fixed, TQSizePolicy::Fixed));
- d->m_statusBarJSErrorLabel->setUseCursor(false);
- d->m_statusBarExtension->addStatusBarItem(d->m_statusBarJSErrorLabel, 0, false);
- TQToolTip::add(d->m_statusBarJSErrorLabel, i18n("This web page contains coding errors."));
- d->m_statusBarJSErrorLabel->setPixmap(SmallIcon("bug", instance()));
- connect(d->m_statusBarJSErrorLabel, TQT_SIGNAL(leftClickedURL()), TQT_SLOT(launchJSErrorDialog()));
- connect(d->m_statusBarJSErrorLabel, TQT_SIGNAL(rightClickedURL()), TQT_SLOT(jsErrorDialogContextMenu()));
- }
- if (!d->m_jsedlg) {
- d->m_jsedlg = new KJSErrorDlg;
- d->m_jsedlg->setURL(m_url.prettyURL());
- if (TDEGlobalSettings::showIconsOnPushButtons()) {
- d->m_jsedlg->_clear->setIconSet(SmallIconSet("locationbar_erase"));
- d->m_jsedlg->_close->setIconSet(SmallIconSet("fileclose"));
- }
- }
- return d->m_jsedlg;
-}
-
-void KHTMLPart::removeJSErrorExtension() {
- if (parentPart()) {
- parentPart()->removeJSErrorExtension();
- return;
- }
- if (d->m_statusBarJSErrorLabel != 0) {
- d->m_statusBarExtension->removeStatusBarItem( d->m_statusBarJSErrorLabel );
- delete d->m_statusBarJSErrorLabel;
- d->m_statusBarJSErrorLabel = 0;
- }
- delete d->m_jsedlg;
- d->m_jsedlg = 0;
-}
-
-void KHTMLPart::disableJSErrorExtension() {
- removeJSErrorExtension();
- // These two lines are really kind of hacky, and it sucks to do this inside
- // KHTML but I don't know of anything that's reasonably easy as an alternative
- // right now. It makes me wonder if there should be a more clean way to
- // contact all running "KHTML" instance as opposed to Konqueror instances too.
- d->m_settings->setJSErrorsEnabled(false);
- DCOPClient::mainClient()->send("konqueror*", "KonquerorIface", "reparseConfiguration()", TQByteArray());
-}
-
-void KHTMLPart::jsErrorDialogContextMenu() {
- KPopupMenu *m = new KPopupMenu(0L);
- m->insertItem(i18n("&Hide Errors"), this, TQT_SLOT(removeJSErrorExtension()));
- m->insertItem(i18n("&Disable Error Reporting"), this, TQT_SLOT(disableJSErrorExtension()));
- m->popup(TQCursor::pos());
-}
-
-void KHTMLPart::launchJSErrorDialog() {
- KJSErrorDlg *dlg = jsErrorExtension();
- if (dlg) {
- dlg->show();
- dlg->raise();
- }
-}
-
-void KHTMLPart::launchJSConfigDialog() {
- TQStringList args;
- args << "khtml_java_js";
- TDEApplication::tdeinitExec( "kcmshell", args );
-}
-
-TQVariant KHTMLPart::executeScript(const TQString& filename, int baseLine, const DOM::Node& n, const TQString& script)
-{
-#ifdef KJS_VERBOSE
- // The script is now printed by KJS's Parser::parse
- kdDebug(6070) << "executeScript: caller='" << name() << "' filename=" << filename << " baseLine=" << baseLine /*<< " script=" << script*/ << endl;
-#endif
- KJSProxy *proxy = jScript();
-
- if (!proxy || proxy->paused())
- return TQVariant();
-
- KJS::Completion comp;
-
- TQVariant ret = proxy->evaluate(filename, baseLine, script, n, &comp);
-
- /*
- * Error handling
- */
- if (comp.complType() == KJS::Throw && !comp.value().isNull()) {
- KJSErrorDlg *dlg = jsErrorExtension();
- if (dlg) {
- KJS::UString msg = comp.value().toString(proxy->interpreter()->globalExec());
- dlg->addError(i18n("<b>Error</b>: %1: %2").arg(filename, msg.qstring()));
- }
- }
-
- // Handle immediate redirects now (e.g. location='foo')
- if ( !d->m_redirectURL.isEmpty() && d->m_delayRedirect == -1 )
- {
- kdDebug(6070) << "executeScript done, handling immediate redirection NOW" << endl;
- // Must abort tokenizer, no further script must execute.
- khtml::Tokenizer* t = d->m_doc->tokenizer();
- if(t)
- t->abort();
- d->m_redirectionTimer.start( 0, true );
- }
-
- return ret;
-}
-
-TQVariant KHTMLPart::executeScript( const TQString &script )
-{
- return executeScript( DOM::Node(), script );
-}
-
-TQVariant KHTMLPart::executeScript( const DOM::Node &n, const TQString &script )
-{
-#ifdef KJS_VERBOSE
- kdDebug(6070) << "KHTMLPart::executeScript caller='" << name() << "' node=" << n.nodeName().string().latin1() << "(" << (n.isNull() ? 0 : n.nodeType()) << ") " /* << script */ << endl;
-#endif
- KJSProxy *proxy = jScript();
-
- if (!proxy || proxy->paused())
- return TQVariant();
- ++(d->m_runningScripts);
- KJS::Completion comp;
- const TQVariant ret = proxy->evaluate( TQString(), 1, script, n, &comp );
- --(d->m_runningScripts);
-
- /*
- * Error handling
- */
- if (comp.complType() == KJS::Throw && !comp.value().isNull()) {
- KJSErrorDlg *dlg = jsErrorExtension();
- if (dlg) {
- KJS::UString msg = comp.value().toString(proxy->interpreter()->globalExec());
- dlg->addError(i18n("<b>Error</b>: node %1: %2").arg(n.nodeName().string()).arg(msg.qstring()));
- }
- }
-
- if (!d->m_runningScripts && d->m_doc && !d->m_doc->parsing() && d->m_submitForm )
- submitFormAgain();
-
-#ifdef KJS_VERBOSE
- kdDebug(6070) << "KHTMLPart::executeScript - done" << endl;
-#endif
- return ret;
-}
-
-bool KHTMLPart::scheduleScript(const DOM::Node &n, const TQString& script)
-{
- //kdDebug(6050) << "KHTMLPart::scheduleScript "<< script << endl;
-
- d->scheduledScript = script;
- d->scheduledScriptNode = n;
-
- return true;
-}
-
-TQVariant KHTMLPart::executeScheduledScript()
-{
- if( d->scheduledScript.isEmpty() )
- return TQVariant();
-
- //kdDebug(6050) << "executing delayed " << d->scheduledScript << endl;
-
- TQVariant ret = executeScript( d->scheduledScriptNode, d->scheduledScript );
- d->scheduledScript = TQString();
- d->scheduledScriptNode = DOM::Node();
-
- return ret;
-}
-
-void KHTMLPart::setJavaEnabled( bool enable )
-{
- d->m_bJavaForce = enable;
- d->m_bJavaOverride = true;
-}
-
-bool KHTMLPart::javaEnabled() const
-{
- if (onlyLocalReferences()) return false;
-
-#ifndef Q_WS_QWS
- if( d->m_bJavaOverride )
- return d->m_bJavaForce;
- return d->m_bJavaEnabled;
-#else
- return false;
-#endif
-}
-
-KJavaAppletContext *KHTMLPart::javaContext()
-{
- return 0;
-}
-
-KJavaAppletContext *KHTMLPart::createJavaContext()
-{
- return 0;
-}
-
-void KHTMLPart::setPluginsEnabled( bool enable )
-{
- d->m_bPluginsForce = enable;
- d->m_bPluginsOverride = true;
-}
-
-bool KHTMLPart::pluginsEnabled() const
-{
- if (onlyLocalReferences()) return false;
-
- if ( d->m_bPluginsOverride )
- return d->m_bPluginsForce;
- return d->m_bPluginsEnabled;
-}
-
-static int s_DOMTreeIndentLevel = 0;
-
-void KHTMLPart::slotDebugDOMTree()
-{
- if ( d->m_doc && d->m_doc->firstChild() )
- tqDebug("%s", d->m_doc->firstChild()->toString().string().latin1());
-
- // Now print the contents of the frames that contain HTML
-
- const int indentLevel = s_DOMTreeIndentLevel++;
-
- ConstFrameIt it = d->m_frames.begin();
- const ConstFrameIt end = d->m_frames.end();
- for (; it != end; ++it )
- if ( !( *it )->m_part.isNull() && (*it)->m_part->inherits( "KHTMLPart" ) ) {
- KParts::ReadOnlyPart* const p = ( *it )->m_part;
- kdDebug(6050) << TQString().leftJustify(s_DOMTreeIndentLevel*4,' ') << "FRAME " << p->name() << " " << endl;
- static_cast<KHTMLPart*>( p )->slotDebugDOMTree();
- }
- s_DOMTreeIndentLevel = indentLevel;
-}
-
-void KHTMLPart::slotDebugScript()
-{
- if (jScript())
- jScript()->showDebugWindow();
-}
-
-void KHTMLPart::slotDebugRenderTree()
-{
-#ifndef NDEBUG
- if ( d->m_doc ) {
- d->m_doc->renderer()->printTree();
- // dump out the contents of the rendering & DOM trees
-// TQString dumps;
-// TQTextStream outputStream(dumps,IO_WriteOnly);
-// d->m_doc->renderer()->layer()->dump( outputStream );
-// kdDebug() << "dump output:" << "\n" + dumps;
- }
-#endif
-}
-
-void KHTMLPart::slotStopAnimations()
-{
- stopAnimations();
-}
-
-void KHTMLPart::setAutoloadImages( bool enable )
-{
- if ( d->m_doc && d->m_doc->docLoader()->autoloadImages() == enable )
- return;
-
- if ( d->m_doc )
- d->m_doc->docLoader()->setAutoloadImages( enable );
-
- unplugActionList( "loadImages" );
-
- if ( enable ) {
- delete d->m_paLoadImages;
- d->m_paLoadImages = 0;
- }
- else if ( !d->m_paLoadImages )
- d->m_paLoadImages = new KAction( i18n( "Display Images on Page" ), "images_display", 0, this, TQT_SLOT( slotLoadImages() ), actionCollection(), "loadImages" );
-
- if ( d->m_paLoadImages ) {
- TQPtrList<KAction> lst;
- lst.append( d->m_paLoadImages );
- plugActionList( "loadImages", lst );
- }
-}
-
-bool KHTMLPart::autoloadImages() const
-{
- if ( d->m_doc )
- return d->m_doc->docLoader()->autoloadImages();
-
- return true;
-}
-
-void KHTMLPart::clear()
-{
- if ( d->m_bCleared )
- return;
-
- d->m_bCleared = true;
-
- d->m_bClearing = true;
-
- {
- ConstFrameIt it = d->m_frames.begin();
- const ConstFrameIt end = d->m_frames.end();
- for(; it != end; ++it )
- {
- // Stop HTMLRun jobs for frames
- if ( (*it)->m_run )
- (*it)->m_run->abort();
- }
- }
-
- {
- ConstFrameIt it = d->m_objects.begin();
- const ConstFrameIt end = d->m_objects.end();
- for(; it != end; ++it )
- {
- // Stop HTMLRun jobs for objects
- if ( (*it)->m_run )
- (*it)->m_run->abort();
- }
- }
-
-
- findTextBegin(); // resets d->m_findNode and d->m_findPos
- d->m_mousePressNode = DOM::Node();
-
-
- if ( d->m_doc )
- {
- if (d->m_doc->attached()) //the view may have detached it already
- d->m_doc->detach();
- }
-
- // Moving past doc so that onUnload works.
- if ( d->m_frame && d->m_frame->m_jscript )
- d->m_frame->m_jscript->clear();
-
- // stopping marquees
- if (d->m_doc && d->m_doc->renderer() && d->m_doc->renderer()->layer())
- d->m_doc->renderer()->layer()->suspendMarquees();
-
- if ( d->m_view )
- d->m_view->clear();
-
- // do not dereference the document before the jscript and view are cleared, as some destructors
- // might still try to access the document.
- if ( d->m_doc ) {
- d->m_doc->deref();
- }
- d->m_doc = 0;
-
- delete d->m_decoder;
- d->m_decoder = 0;
-
- // We don't want to change between parts if we are going to delete all of them anyway
- disconnect( partManager(), TQT_SIGNAL( activePartChanged( KParts::Part * ) ),
- this, TQT_SLOT( slotActiveFrameChanged( KParts::Part * ) ) );
-
- if (d->m_frames.count())
- {
- KHTMLFrameList frames = d->m_frames;
- d->m_frames.clear();
- ConstFrameIt it = frames.begin();
- const ConstFrameIt end = frames.end();
- for(; it != end; ++it )
- {
- if ( (*it)->m_part )
- {
- partManager()->removePart( (*it)->m_part );
- delete (KParts::ReadOnlyPart *)(*it)->m_part;
- }
- delete *it;
- }
- }
- d->m_suppressedPopupOriginParts.clear();
-
- if (d->m_objects.count())
- {
- KHTMLFrameList objects = d->m_objects;
- d->m_objects.clear();
- ConstFrameIt oi = objects.begin();
- const ConstFrameIt oiEnd = objects.end();
-
- for (; oi != oiEnd; ++oi )
- delete *oi;
- }
-
- // Listen to part changes again
- connect( partManager(), TQT_SIGNAL( activePartChanged( KParts::Part * ) ),
- this, TQT_SLOT( slotActiveFrameChanged( KParts::Part * ) ) );
-
- d->m_delayRedirect = 0;
- d->m_redirectURL = TQString();
- d->m_redirectionTimer.stop();
- d->m_redirectLockHistory = true;
- d->m_bClearing = false;
- d->m_frameNameId = 1;
- d->m_bFirstData = true;
-
- d->m_bMousePressed = false;
-
- d->m_selectionStart = DOM::Node();
- d->m_selectionEnd = DOM::Node();
- d->m_startOffset = 0;
- d->m_endOffset = 0;
-#ifndef QT_NO_CLIPBOARD
- connect( kapp->clipboard(), TQT_SIGNAL( selectionChanged()), TQT_SLOT( slotClearSelection()));
-#endif
-
- d->m_jobPercent = 0;
-
- if ( !d->m_haveEncoding )
- d->m_encoding = TQString();
-#ifdef SPEED_DEBUG
- d->m_parsetime.restart();
-#endif
-}
-
-bool KHTMLPart::openFile()
-{
- return true;
-}
-
-DOM::HTMLDocumentImpl *KHTMLPart::docImpl() const
-{
- if ( d && d->m_doc && d->m_doc->isHTMLDocument() )
- return static_cast<HTMLDocumentImpl*>(d->m_doc);
- return 0;
-}
-
-DOM::DocumentImpl *KHTMLPart::xmlDocImpl() const
-{
- if ( d )
- return d->m_doc;
- return 0;
-}
-
-void KHTMLPart::slotInfoMessage(TDEIO::Job* kio_job, const TQString& msg)
-{
- assert(d->m_job == kio_job);
-
- if (!parentPart())
- setStatusBarText(msg, BarDefaultText);
-}
-
-void KHTMLPart::setPageSecurity( PageSecurity sec )
-{
- emit d->m_extension->setPageSecurity( sec );
- if ( sec != NotCrypted && !d->m_statusBarIconLabel && !parentPart() ) {
- d->m_statusBarIconLabel = new KURLLabel( d->m_statusBarExtension->statusBar() );
- d->m_statusBarIconLabel->setFixedHeight( instance()->iconLoader()->currentSize(KIcon::Small) );
- d->m_statusBarIconLabel->setSizePolicy(TQSizePolicy( TQSizePolicy::Fixed, TQSizePolicy::Fixed ));
- d->m_statusBarIconLabel->setUseCursor( false );
- d->m_statusBarExtension->addStatusBarItem( d->m_statusBarIconLabel, 0, false );
- connect( d->m_statusBarIconLabel, TQT_SIGNAL( leftClickedURL() ), TQT_SLOT( slotSecurity() ) );
- } else if (d->m_statusBarIconLabel) {
- TQToolTip::remove(d->m_statusBarIconLabel);
- }
-
- if (d->m_statusBarIconLabel) {
- if (d->m_ssl_in_use)
- TQToolTip::add(d->m_statusBarIconLabel,
- i18n("Session is secured with %1 bit %2.").arg(d->m_ssl_cipher_used_bits).arg(d->m_ssl_cipher));
- else TQToolTip::add(d->m_statusBarIconLabel, i18n("Session is not secured."));
- }
-
- TQString iconName;
- switch (sec) {
- case NotCrypted:
- iconName = "decrypted";
- if ( d->m_statusBarIconLabel ) {
- d->m_statusBarExtension->removeStatusBarItem( d->m_statusBarIconLabel );
- delete d->m_statusBarIconLabel;
- d->m_statusBarIconLabel = 0L;
- }
- break;
- case Encrypted:
- iconName = "encrypted";
- break;
- case Mixed:
- iconName = "halfencrypted";
- break;
- }
- d->m_paSecurity->setIcon( iconName );
- if ( d->m_statusBarIconLabel )
- d->m_statusBarIconLabel->setPixmap( SmallIcon( iconName, instance() ) );
-}
-
-void KHTMLPart::slotData( TDEIO::Job* kio_job, const TQByteArray &data )
-{
- assert ( d->m_job == kio_job );
-
- //kdDebug( 6050 ) << "slotData: " << data.size() << endl;
- // The first data ?
- if ( !d->m_workingURL.isEmpty() )
- {
- //kdDebug( 6050 ) << "begin!" << endl;
-
- // We must suspend KIO while we're inside begin() because it can cause
- // crashes if a window (such as kjsdebugger) goes back into the event loop,
- // more data arrives, and begin() gets called again (re-entered).
- d->m_job->suspend();
- begin( d->m_workingURL, d->m_extension->urlArgs().xOffset, d->m_extension->urlArgs().yOffset );
- d->m_job->resume();
-
- if (d->m_cachePolicy == TDEIO::CC_Refresh)
- d->m_doc->docLoader()->setCachePolicy(TDEIO::CC_Verify);
- else
- d->m_doc->docLoader()->setCachePolicy(d->m_cachePolicy);
-
- d->m_workingURL = KURL();
-
- d->m_cacheId = KHTMLPageCache::self()->createCacheEntry();
-
- // When the first data arrives, the metadata has just been made available
- d->m_httpHeaders = d->m_job->queryMetaData("HTTP-Headers");
- time_t cacheCreationDate = d->m_job->queryMetaData("cache-creation-date").toLong();
- d->m_doc->docLoader()->setCacheCreationDate(cacheCreationDate);
-
- d->m_pageServices = d->m_job->queryMetaData("PageServices");
- d->m_pageReferrer = d->m_job->queryMetaData("referrer");
- d->m_bSecurityInQuestion = false;
- d->m_ssl_in_use = (d->m_job->queryMetaData("ssl_in_use") == "TRUE");
-
- {
- KHTMLPart *p = parentPart();
- if (p && p->d->m_ssl_in_use != d->m_ssl_in_use) {
- while (p->parentPart()) p = p->parentPart();
-
- p->setPageSecurity( Mixed );
- p->d->m_bSecurityInQuestion = true;
- }
- }
-
- setPageSecurity( d->m_ssl_in_use ? Encrypted : NotCrypted );
-
- // Shouldn't all of this be done only if ssl_in_use == true ? (DF)
- d->m_ssl_parent_ip = d->m_job->queryMetaData("ssl_parent_ip");
- d->m_ssl_parent_cert = d->m_job->queryMetaData("ssl_parent_cert");
- d->m_ssl_peer_certificate = d->m_job->queryMetaData("ssl_peer_certificate");
- d->m_ssl_peer_chain = d->m_job->queryMetaData("ssl_peer_chain");
- d->m_ssl_peer_ip = d->m_job->queryMetaData("ssl_peer_ip");
- d->m_ssl_cipher = d->m_job->queryMetaData("ssl_cipher");
- d->m_ssl_cipher_desc = d->m_job->queryMetaData("ssl_cipher_desc");
- d->m_ssl_cipher_version = d->m_job->queryMetaData("ssl_cipher_version");
- d->m_ssl_cipher_used_bits = d->m_job->queryMetaData("ssl_cipher_used_bits");
- d->m_ssl_cipher_bits = d->m_job->queryMetaData("ssl_cipher_bits");
- d->m_ssl_cert_state = d->m_job->queryMetaData("ssl_cert_state");
-
- if (d->m_statusBarIconLabel) {
- TQToolTip::remove(d->m_statusBarIconLabel);
- if (d->m_ssl_in_use) {
- TQToolTip::add(d->m_statusBarIconLabel, i18n("Session is secured with %1 bit %2.").arg(d->m_ssl_cipher_used_bits).arg(d->m_ssl_cipher));
- } else {
- TQToolTip::add(d->m_statusBarIconLabel, i18n("Session is not secured."));
- }
- }
-
- // Check for charset meta-data
- TQString qData = d->m_job->queryMetaData("charset");
- if ( !qData.isEmpty() && !d->m_haveEncoding ) // only use information if the user didn't override the settings
- d->m_encoding = qData;
-
-
- // Support for http-refresh
- qData = d->m_job->queryMetaData("http-refresh");
- if( !qData.isEmpty())
- d->m_doc->processHttpEquiv("refresh", qData);
-
- // DISABLED: Support Content-Location per section 14.14 of RFC 2616.
- // See BR# 51185,BR# 82747
- /*
- TQString baseURL = d->m_job->queryMetaData ("content-location");
- if (!baseURL.isEmpty())
- d->m_doc->setBaseURL(KURL( d->m_doc->completeURL(baseURL) ));
- */
-
- // Support for Content-Language
- TQString language = d->m_job->queryMetaData("content-language");
- if (!language.isEmpty())
- d->m_doc->setContentLanguage(language);
-
- if ( !m_url.isLocalFile() ) {
- // Support for http last-modified
- d->m_lastModified = d->m_job->queryMetaData("modified");
- } else
- d->m_lastModified = TQString(); // done on-demand by lastModified()
- }
-
- KHTMLPageCache::self()->addData(d->m_cacheId, data);
- write( data.data(), data.size() );
- if (d->m_frame && d->m_frame->m_jscript)
- d->m_frame->m_jscript->dataReceived();
-}
-
-void KHTMLPart::slotRestoreData(const TQByteArray &data )
-{
- // The first data ?
- if ( !d->m_workingURL.isEmpty() )
- {
- long saveCacheId = d->m_cacheId;
- TQString savePageReferrer = d->m_pageReferrer;
- TQString saveEncoding = d->m_encoding;
- begin( d->m_workingURL, d->m_extension->urlArgs().xOffset, d->m_extension->urlArgs().yOffset );
- d->m_encoding = saveEncoding;
- d->m_pageReferrer = savePageReferrer;
- d->m_cacheId = saveCacheId;
- d->m_workingURL = KURL();
- }
-
- //kdDebug( 6050 ) << "slotRestoreData: " << data.size() << endl;
- write( data.data(), data.size() );
-
- if (data.size() == 0)
- {
- //kdDebug( 6050 ) << "slotRestoreData: <<end of data>>" << endl;
- // End of data.
- if (d->m_doc && d->m_doc->parsing())
- end(); //will emit completed()
- }
-}
-
-void KHTMLPart::showError( TDEIO::Job* job )
-{
- kdDebug(6050) << "KHTMLPart::showError d->m_bParsing=" << (d->m_doc && d->m_doc->parsing()) << " d->m_bComplete=" << d->m_bComplete
- << " d->m_bCleared=" << d->m_bCleared << endl;
-
- if (job->error() == TDEIO::ERR_NO_CONTENT)
- return;
-
- if ( (d->m_doc && d->m_doc->parsing()) || d->m_workingURL.isEmpty() ) // if we got any data already
- job->showErrorDialog( /*d->m_view*/ );
- else
- {
- htmlError( job->error(), job->errorText(), d->m_workingURL );
- }
-}
-
-// This is a protected method, placed here because of it's relevance to showError
-void KHTMLPart::htmlError( int errorCode, const TQString& text, const KURL& reqUrl )
-{
- kdDebug(6050) << "KHTMLPart::htmlError errorCode=" << errorCode << " text=" << text << endl;
- // make sure we're not executing any embedded JS
- bool bJSFO = d->m_bJScriptForce;
- bool bJSOO = d->m_bJScriptOverride;
- d->m_bJScriptForce = false;
- d->m_bJScriptOverride = true;
- begin();
- TQString errText = TQString::fromLatin1( "<HTML dir=%1><HEAD><TITLE>" )
- .arg(TQApplication::reverseLayout() ? "rtl" : "ltr");
- errText += i18n( "Error while loading %1" ).arg( reqUrl.htmlURL() );
- errText += TQString::fromLatin1( "</TITLE></HEAD><BODY><P>" );
- errText += i18n( "An error occurred while loading <B>%1</B>:" ).arg( reqUrl.htmlURL() );
- errText += TQString::fromLatin1( "</P>" );
- errText += TQStyleSheet::convertFromPlainText( TDEIO::buildErrorString( errorCode, text ) );
- errText += TQString::fromLatin1( "</BODY></HTML>" );
- write(errText);
- end();
-
- d->m_bJScriptForce = bJSFO;
- d->m_bJScriptOverride = bJSOO;
-
- // make the working url the current url, so that reload works and
- // emit the progress signals to advance one step in the history
- // (so that 'back' works)
- m_url = reqUrl; // same as d->m_workingURL
- d->m_workingURL = KURL();
- emit started( 0 );
- emit completed();
- return;
- // following disabled until 3.1
-
- TQString errorName, techName, description;
- TQStringList causes, solutions;
-
- TQByteArray raw = TDEIO::rawErrorDetail( errorCode, text, &reqUrl );
- TQDataStream stream(raw, IO_ReadOnly);
-
- stream >> errorName >> techName >> description >> causes >> solutions;
-
- TQString url, protocol, datetime;
- url = reqUrl.prettyURL();
- protocol = reqUrl.protocol();
- datetime = TDEGlobal::locale()->formatDateTime( TQDateTime::currentDateTime(),
- false );
-
- TQString doc = TQString::fromLatin1( "<html><head><title>" );
- doc += i18n( "Error: " );
- doc += errorName;
- doc += TQString::fromLatin1( " - %1</title></head><body><h1>" ).arg( url );
- doc += i18n( "The requested operation could not be completed" );
- doc += TQString::fromLatin1( "</h1><h2>" );
- doc += errorName;
- doc += TQString::fromLatin1( "</h2>" );
- if ( !techName.isNull() ) {
- doc += TQString::fromLatin1( "<h2>" );
- doc += i18n( "Technical Reason: " );
- doc += techName;
- doc += TQString::fromLatin1( "</h2>" );
- }
- doc += TQString::fromLatin1( "<h3>" );
- doc += i18n( "Details of the Request:" );
- doc += TQString::fromLatin1( "</h3><ul><li>" );
- doc += i18n( "URL: %1" ).arg( url );
- doc += TQString::fromLatin1( "</li><li>" );
- if ( !protocol.isNull() ) {
- // uncomment for 3.1... i18n change
- // doc += i18n( "Protocol: %1" ).arg( protocol ).arg( protocol );
- doc += TQString::fromLatin1( "</li><li>" );
- }
- doc += i18n( "Date and Time: %1" ).arg( datetime );
- doc += TQString::fromLatin1( "</li><li>" );
- doc += i18n( "Additional Information: %1" ).arg( text );
- doc += TQString::fromLatin1( "</li></ul><h3>" );
- doc += i18n( "Description:" );
- doc += TQString::fromLatin1( "</h3><p>" );
- doc += description;
- doc += TQString::fromLatin1( "</p>" );
- if ( causes.count() ) {
- doc += TQString::fromLatin1( "<h3>" );
- doc += i18n( "Possible Causes:" );
- doc += TQString::fromLatin1( "</h3><ul><li>" );
- doc += causes.join( "</li><li>" );
- doc += TQString::fromLatin1( "</li></ul>" );
- }
- if ( solutions.count() ) {
- doc += TQString::fromLatin1( "<h3>" );
- doc += i18n( "Possible Solutions:" );
- doc += TQString::fromLatin1( "</h3><ul><li>" );
- doc += solutions.join( "</li><li>" );
- doc += TQString::fromLatin1( "</li></ul>" );
- }
- doc += TQString::fromLatin1( "</body></html>" );
-
- write( doc );
- end();
-}
-
-void KHTMLPart::slotFinished( TDEIO::Job * job )
-{
- d->m_job = 0L;
- d->m_jobspeed = 0L;
-
- if (job->error())
- {
- KHTMLPageCache::self()->cancelEntry(d->m_cacheId);
-
- // The following catches errors that occur as a result of HTTP
- // to FTP redirections where the FTP URL is a directory. Since
- // KIO cannot change a redirection request from GET to LISTDIR,
- // we have to take care of it here once we know for sure it is
- // a directory...
- if (job->error() == TDEIO::ERR_IS_DIRECTORY)
- {
- KParts::URLArgs args;
- emit d->m_extension->openURLRequest( d->m_workingURL, args );
- }
- else
- {
- emit canceled( job->errorString() );
- // TODO: what else ?
- checkCompleted();
- showError( job );
- }
-
- return;
- }
- TDEIO::TransferJob *tjob = ::tqqt_cast<TDEIO::TransferJob*>(job);
- if (tjob && tjob->isErrorPage()) {
- khtml::RenderPart *renderPart = d->m_frame ? static_cast<khtml::RenderPart *>(d->m_frame->m_frame) : 0;
- if (renderPart) {
- HTMLObjectElementImpl* elt = static_cast<HTMLObjectElementImpl *>(renderPart->element());
- if (!elt)
- return;
- elt->renderAlternative();
- checkCompleted();
- }
- if (d->m_bComplete) return;
- }
-
- //kdDebug( 6050 ) << "slotFinished" << endl;
-
- KHTMLPageCache::self()->endData(d->m_cacheId);
- if (d->m_frame && d->m_frame->m_jscript)
- d->m_frame->m_jscript->dataReceived();
-
- if ( d->m_doc && d->m_doc->docLoader()->expireDate() && m_url.protocol().lower().startsWith("http"))
- TDEIO::http_update_cache(m_url, false, d->m_doc->docLoader()->expireDate());
-
- d->m_workingURL = KURL();
-
- if ( d->m_doc && d->m_doc->parsing())
- end(); //will emit completed()
-}
-
-void KHTMLPart::begin( const KURL &url, int xOffset, int yOffset )
-{
- // No need to show this for a new page until an error is triggered
- if (!parentPart()) {
- removeJSErrorExtension();
- setSuppressedPopupIndicator( false );
- d->m_openableSuppressedPopups = 0;
- for ( TQValueListIterator<TQGuardedPtr<KHTMLPart> > i = d->m_suppressedPopupOriginParts.begin();
- i != d->m_suppressedPopupOriginParts.end(); ++i ) {
-
- if (KHTMLPart* part = *i) {
- KJS::Window *w = KJS::Window::retrieveWindow( part );
- if (w)
- w->forgetSuppressedWindows();
- }
- }
- }
-
- clear();
- d->m_bCleared = false;
- d->m_cacheId = 0;
- d->m_bComplete = false;
- d->m_bLoadEventEmitted = false;
-
- if(url.isValid()) {
- TQString urlString = url.url();
- KHTMLFactory::vLinks()->insert( urlString );
- TQString urlString2 = url.prettyURL();
- if ( urlString != urlString2 ) {
- KHTMLFactory::vLinks()->insert( urlString2 );
- }
- }
-
-
- // ###
- //stopParser();
-
- KParts::URLArgs args( d->m_extension->urlArgs() );
- args.xOffset = xOffset;
- args.yOffset = yOffset;
- d->m_extension->setURLArgs( args );
-
- d->m_pageReferrer = TQString();
-
- KURL ref(url);
- d->m_referrer = ref.protocol().startsWith("http") ? ref.url() : "";
-
- m_url = url;
-
- bool servedAsXHTML = args.serviceType == "application/xhtml+xml";
- bool servedAsXML = KMimeType::mimeType(args.serviceType)->is( "text/xml" );
- // ### not sure if XHTML documents served as text/xml should use DocumentImpl or HTMLDocumentImpl
- if ( servedAsXML && !servedAsXHTML ) { // any XML derivative, except XHTML
- d->m_doc = DOMImplementationImpl::instance()->createDocument( d->m_view );
- } else {
- d->m_doc = DOMImplementationImpl::instance()->createHTMLDocument( d->m_view );
- // HTML or XHTML? (#86446)
- static_cast<HTMLDocumentImpl *>(d->m_doc)->setHTMLRequested( !servedAsXHTML );
- }
-#ifndef KHTML_NO_CARET
-// d->m_view->initCaret();
-#endif
-
- d->m_doc->ref();
- d->m_doc->setURL( m_url.url() );
- if (!d->m_doc->attached())
- d->m_doc->attach( );
- d->m_doc->setBaseURL( KURL() );
- d->m_doc->docLoader()->setShowAnimations( KHTMLFactory::defaultHTMLSettings()->showAnimations() );
- emit docCreated();
-
- d->m_paUseStylesheet->setItems(TQStringList());
- d->m_paUseStylesheet->setEnabled( false );
-
- setAutoloadImages( KHTMLFactory::defaultHTMLSettings()->autoLoadImages() );
- TQString userStyleSheet = KHTMLFactory::defaultHTMLSettings()->userStyleSheet();
- if ( !userStyleSheet.isEmpty() )
- setUserStyleSheet( KURL( userStyleSheet ) );
-
- d->m_doc->setRestoreState(args.docState);
- d->m_doc->open();
- connect(d->m_doc,TQT_SIGNAL(finishedParsing()),this,TQT_SLOT(slotFinishedParsing()));
-
- emit d->m_extension->enableAction( "print", true );
-
- d->m_doc->setParsing(true);
-}
-
-void KHTMLPart::write( const char *str, int len )
-{
- if ( !d->m_decoder )
- d->m_decoder = createDecoder();
-
- if ( len == -1 )
- len = strlen( str );
-
- if ( len == 0 )
- return;
-
- TQString decoded = d->m_decoder->decode( str, len );
-
- if(decoded.isEmpty()) return;
-
- if(d->m_bFirstData) {
- // determine the parse mode
- d->m_doc->determineParseMode( decoded );
- d->m_bFirstData = false;
-
- //kdDebug(6050) << "KHTMLPart::write haveEnc = " << d->m_haveEncoding << endl;
- // ### this is still quite hacky, but should work a lot better than the old solution
- if(d->m_decoder->visuallyOrdered()) d->m_doc->setVisuallyOrdered();
- d->m_doc->setDecoderCodec(d->m_decoder->codec());
- d->m_doc->recalcStyle( NodeImpl::Force );
- }
-
- khtml::Tokenizer* t = d->m_doc->tokenizer();
- if(t)
- t->write( decoded, true );
-}
-
-void KHTMLPart::write( const TQString &str )
-{
- if ( str.isNull() )
- return;
-
- if(d->m_bFirstData) {
- // determine the parse mode
- d->m_doc->setParseMode( DocumentImpl::Strict );
- d->m_bFirstData = false;
- }
- khtml::Tokenizer* t = d->m_doc->tokenizer();
- if(t)
- t->write( str, true );
-}
-
-void KHTMLPart::end()
-{
- if (d->m_doc) {
- if (d->m_decoder) {
- TQString decoded = d->m_decoder->flush();
- if (d->m_bFirstData) {
- d->m_bFirstData = false;
- d->m_doc->determineParseMode(decoded);
- }
- write(decoded);
- }
- d->m_doc->finishParsing();
- }
-}
-
-bool KHTMLPart::doOpenStream( const TQString& mimeType )
-{
- KMimeType::Ptr mime = KMimeType::mimeType(mimeType);
- if ( mime->is( "text/html" ) || mime->is( "text/xml" ) )
- {
- begin( url() );
- return true;
- }
- return false;
-}
-
-bool KHTMLPart::doWriteStream( const TQByteArray& data )
-{
- write( data.data(), data.size() );
- return true;
-}
-
-bool KHTMLPart::doCloseStream()
-{
- end();
- return true;
-}
-
-
-void KHTMLPart::paint(TQPainter *p, const TQRect &rc, int yOff, bool *more)
-{
- if (!d->m_view) return;
- d->m_view->paint(p, rc, yOff, more);
-}
-
-void KHTMLPart::stopAnimations()
-{
- if ( d->m_doc )
- d->m_doc->docLoader()->setShowAnimations( KHTMLSettings::KAnimationDisabled );
-
- ConstFrameIt it = d->m_frames.begin();
- const ConstFrameIt end = d->m_frames.end();
- for (; it != end; ++it )
- if ( !(*it)->m_part.isNull() && (*it)->m_part->inherits( "KHTMLPart" ) ) {
- KParts::ReadOnlyPart* const p = ( *it )->m_part;
- static_cast<KHTMLPart*>( p )->stopAnimations();
- }
-}
-
-void KHTMLPart::resetFromScript()
-{
- closeURL();
- d->m_bComplete = false;
- d->m_bLoadEventEmitted = false;
- disconnect(d->m_doc,TQT_SIGNAL(finishedParsing()),this,TQT_SLOT(slotFinishedParsing()));
- connect(d->m_doc,TQT_SIGNAL(finishedParsing()),this,TQT_SLOT(slotFinishedParsing()));
- d->m_doc->setParsing(true);
-
- emit started( 0L );
-}
-
-void KHTMLPart::slotFinishedParsing()
-{
- d->m_doc->setParsing(false);
- checkEmitLoadEvent();
- disconnect(d->m_doc,TQT_SIGNAL(finishedParsing()),this,TQT_SLOT(slotFinishedParsing()));
-
- if (!d->m_view)
- return; // We are probably being destructed.
-
- checkCompleted();
-}
-
-void KHTMLPart::slotLoaderRequestStarted( khtml::DocLoader* dl, khtml::CachedObject *obj )
-{
- if ( obj && obj->type() == khtml::CachedObject::Image && d->m_doc && d->m_doc->docLoader() == dl ) {
- KHTMLPart* p = this;
- while ( p ) {
- KHTMLPart* const op = p;
- ++(p->d->m_totalObjectCount);
- p = p->parentPart();
- if ( !p && op->d->m_loadedObjects <= op->d->m_totalObjectCount
- && !op->d->m_progressUpdateTimer.isActive())
- op->d->m_progressUpdateTimer.start( 200, true );
- }
- }
-}
-
-void KHTMLPart::slotLoaderRequestDone( khtml::DocLoader* dl, khtml::CachedObject *obj )
-{
- if ( obj && obj->type() == khtml::CachedObject::Image && d->m_doc && d->m_doc->docLoader() == dl ) {
- KHTMLPart* p = this;
- while ( p ) {
- KHTMLPart* const op = p;
- ++(p->d->m_loadedObjects);
- p = p->parentPart();
- if ( !p && op->d->m_loadedObjects <= op->d->m_totalObjectCount && op->d->m_jobPercent <= 100
- && !op->d->m_progressUpdateTimer.isActive())
- op->d->m_progressUpdateTimer.start( 200, true );
- }
- }
-
- checkCompleted();
-}
-
-void KHTMLPart::slotProgressUpdate()
-{
- int percent;
- if ( d->m_loadedObjects < d->m_totalObjectCount )
- percent = d->m_jobPercent / 4 + ( d->m_loadedObjects*300 ) / ( 4*d->m_totalObjectCount );
- else
- percent = d->m_jobPercent;
-
- if( d->m_bComplete )
- percent = 100;
-
- if (d->m_statusMessagesEnabled) {
- if( d->m_bComplete )
- emit d->m_extension->infoMessage( i18n( "Page loaded." ));
- else if ( d->m_loadedObjects < d->m_totalObjectCount && percent >= 75 )
- emit d->m_extension->infoMessage( i18n( "%n Image of %1 loaded.", "%n Images of %1 loaded.", d->m_loadedObjects).arg(d->m_totalObjectCount) );
- }
-
- emit d->m_extension->loadingProgress( percent );
-}
-
-void KHTMLPart::slotJobSpeed( TDEIO::Job* /*job*/, unsigned long speed )
-{
- d->m_jobspeed = speed;
- if (!parentPart())
- setStatusBarText(jsStatusBarText(), BarOverrideText);
-}
-
-void KHTMLPart::slotJobPercent( TDEIO::Job* /*job*/, unsigned long percent )
-{
- d->m_jobPercent = percent;
-
- if ( !parentPart() )
- d->m_progressUpdateTimer.start( 0, true );
-}
-
-void KHTMLPart::slotJobDone( TDEIO::Job* /*job*/ )
-{
- d->m_jobPercent = 100;
-
- if ( !parentPart() )
- d->m_progressUpdateTimer.start( 0, true );
-}
-
-void KHTMLPart::slotUserSheetStatDone( TDEIO::Job *_job )
-{
- using namespace TDEIO;
-
- if ( _job->error() ) {
- showError( _job );
- return;
- }
-
- const UDSEntry entry = dynamic_cast<TDEIO::StatJob *>( _job )->statResult();
- UDSEntry::ConstIterator it = entry.begin();
- const UDSEntry::ConstIterator end = entry.end();
- for ( ; it != end; ++it ) {
- if ( ( *it ).m_uds == UDS_MODIFICATION_TIME ) {
- break;
- }
- }
-
- // If the filesystem supports modification times, only reload the
- // user-defined stylesheet if necessary - otherwise always reload.
- if ( it != end ) {
- const time_t lastModified = static_cast<time_t>( ( *it ).m_long );
- if ( d->m_userStyleSheetLastModified >= lastModified ) {
- return;
- }
- d->m_userStyleSheetLastModified = lastModified;
- }
-
- setUserStyleSheet( KURL( settings()->userStyleSheet() ) );
-}
-
-void KHTMLPart::checkCompleted()
-{
-// kdDebug( 6050 ) << "KHTMLPart::checkCompleted() " << this << " " << name() << endl;
-// kdDebug( 6050 ) << " parsing: " << (d->m_doc && d->m_doc->parsing()) << endl;
-// kdDebug( 6050 ) << " complete: " << d->m_bComplete << endl;
-
- // restore the cursor position
- if (d->m_doc && !d->m_doc->parsing() && !d->m_focusNodeRestored)
- {
- if (d->m_focusNodeNumber >= 0)
- d->m_doc->setFocusNode(d->m_doc->nodeWithAbsIndex(d->m_focusNodeNumber));
-
- d->m_focusNodeRestored = true;
- }
-
- bool bPendingChildRedirection = false;
- // Any frame that hasn't completed yet ?
- ConstFrameIt it = d->m_frames.begin();
- const ConstFrameIt end = d->m_frames.end();
- for (; it != end; ++it ) {
- if ( !(*it)->m_bCompleted )
- {
- //kdDebug( 6050 ) << this << " is waiting for " << (*it)->m_part << endl;
- return;
- }
- // Check for frames with pending redirections
- if ( (*it)->m_bPendingRedirection )
- bPendingChildRedirection = true;
- }
-
- // Any object that hasn't completed yet ?
- {
- ConstFrameIt oi = d->m_objects.begin();
- const ConstFrameIt oiEnd = d->m_objects.end();
-
- for (; oi != oiEnd; ++oi )
- if ( !(*oi)->m_bCompleted )
- return;
- }
- // Are we still parsing - or have we done the completed stuff already ?
- if ( d->m_bComplete || (d->m_doc && d->m_doc->parsing()) )
- return;
-
- // Still waiting for images/scripts from the loader ?
- int requests = 0;
- if ( d->m_doc && d->m_doc->docLoader() )
- requests = khtml::Cache::loader()->numRequests( d->m_doc->docLoader() );
-
- if ( requests > 0 )
- {
- //kdDebug(6050) << "still waiting for images/scripts from the loader - requests:" << requests << endl;
- return;
- }
-
- // OK, completed.
- // Now do what should be done when we are really completed.
- d->m_bComplete = true;
- d->m_cachePolicy = KProtocolManager::cacheControl(); // reset cache policy
- d->m_totalObjectCount = 0;
- d->m_loadedObjects = 0;
-
- KHTMLPart* p = this;
- while ( p ) {
- KHTMLPart* op = p;
- p = p->parentPart();
- if ( !p && !op->d->m_progressUpdateTimer.isActive())
- op->d->m_progressUpdateTimer.start( 0, true );
- }
-
- checkEmitLoadEvent(); // if we didn't do it before
-
- bool pendingAction = false;
-
- if ( !d->m_redirectURL.isEmpty() )
- {
- // DA: Do not start redirection for frames here! That action is
- // deferred until the parent emits a completed signal.
- if ( parentPart() == 0 ) {
- //kdDebug(6050) << this << " starting redirection timer" << endl;
- d->m_redirectionTimer.start( 1000 * d->m_delayRedirect, true );
- } else {
- //kdDebug(6050) << this << " not toplevel -> not starting redirection timer. Waiting for slotParentCompleted." << endl;
- }
-
- pendingAction = true;
- }
- else if ( bPendingChildRedirection )
- {
- pendingAction = true;
- }
-
- // the view will emit completed on our behalf,
- // either now or at next repaint if one is pending
-
- //kdDebug(6050) << this << " asks the view to emit completed. pendingAction=" << pendingAction << endl;
- d->m_view->complete( pendingAction );
-
- // find the alternate stylesheets
- TQStringList sheets;
- if (d->m_doc)
- sheets = d->m_doc->availableStyleSheets();
- sheets.prepend( i18n( "Automatic Detection" ) );
- d->m_paUseStylesheet->setItems( sheets );
-
- d->m_paUseStylesheet->setEnabled( sheets.count() > 2);
- if (sheets.count() > 2)
- {
- d->m_paUseStylesheet->setCurrentItem(kMax(sheets.findIndex(d->m_sheetUsed), 0));
- slotUseStylesheet();
- }
-
- setJSDefaultStatusBarText(TQString());
-
-#ifdef SPEED_DEBUG
- kdDebug(6050) << "DONE: " <<d->m_parsetime.elapsed() << endl;
-#endif
-}
-
-void KHTMLPart::checkEmitLoadEvent()
-{
- if ( d->m_bLoadEventEmitted || !d->m_doc || d->m_doc->parsing() ) return;
-
- ConstFrameIt it = d->m_frames.begin();
- const ConstFrameIt end = d->m_frames.end();
- for (; it != end; ++it )
- if ( !(*it)->m_bCompleted ) // still got a frame running -> too early
- return;
-
- ConstFrameIt oi = d->m_objects.begin();
- const ConstFrameIt oiEnd = d->m_objects.end();
-
- for (; oi != oiEnd; ++oi )
- if ( !(*oi)->m_bCompleted ) // still got a object running -> too early
- return;
-
- // Still waiting for images/scripts from the loader ?
- // (onload must happen afterwards, #45607)
- // ## This makes this method very similar to checkCompleted. A brave soul should try merging them.
- int requests = 0;
- if ( d->m_doc && d->m_doc->docLoader() )
- requests = khtml::Cache::loader()->numRequests( d->m_doc->docLoader() );
-
- if ( requests > 0 )
- return;
-
- d->m_bLoadEventEmitted = true;
- if (d->m_doc)
- d->m_doc->close();
-}
-
-const KHTMLSettings *KHTMLPart::settings() const
-{
- return d->m_settings;
-}
-
-#ifndef KDE_NO_COMPAT
-KURL KHTMLPart::baseURL() const
-{
- if ( !d->m_doc ) return KURL();
-
- return d->m_doc->baseURL();
-}
-
-TQString KHTMLPart::baseTarget() const
-{
- if ( !d->m_doc ) return TQString();
-
- return d->m_doc->baseTarget();
-}
-#endif
-
-KURL KHTMLPart::completeURL( const TQString &url )
-{
- if ( !d->m_doc ) return KURL( url );
-
- if (d->m_decoder)
- return KURL(d->m_doc->completeURL(url), d->m_decoder->codec()->mibEnum());
-
- return KURL( d->m_doc->completeURL( url ) );
-}
-
-// Called by ecma/kjs_window in case of redirections from Javascript,
-// and by xml/dom_docimpl.cpp in case of http-equiv meta refresh.
-void KHTMLPart::scheduleRedirection( int delay, const TQString &url, bool doLockHistory )
-{
- kdDebug(6050) << "KHTMLPart::scheduleRedirection delay=" << delay << " url=" << url << endl;
- kdDebug(6050) << "current redirectURL=" << d->m_redirectURL << " with delay " << d->m_delayRedirect << endl;
- if( delay < 24*60*60 &&
- ( d->m_redirectURL.isEmpty() || delay <= d->m_delayRedirect) ) {
- d->m_delayRedirect = delay;
- d->m_redirectURL = url;
- d->m_redirectLockHistory = doLockHistory;
- kdDebug(6050) << " d->m_bComplete=" << d->m_bComplete << endl;
- if ( d->m_bComplete ) {
- d->m_redirectionTimer.stop();
- d->m_redirectionTimer.start( kMax(0, 1000 * d->m_delayRedirect), true );
- }
- }
-}
-
-void KHTMLPart::slotRedirect()
-{
- kdDebug(6050) << this << " slotRedirect()" << endl;
- TQString u = d->m_redirectURL;
- d->m_delayRedirect = 0;
- d->m_redirectURL = TQString();
-
- // SYNC check with ecma/kjs_window.cpp::goURL !
- if ( u.find( TQString::fromLatin1( "javascript:" ), 0, false ) == 0 )
- {
- TQString script = KURL::decode_string( u.right( u.length() - 11 ) );
- kdDebug( 6050 ) << "KHTMLPart::slotRedirect script=" << script << endl;
- TQVariant res = executeScript( DOM::Node(), script );
- if ( res.type() == TQVariant::String ) {
- begin( url() );
- write( res.asString() );
- end();
- }
- emit completed();
- return;
- }
- KParts::URLArgs args;
- KURL cUrl( m_url );
- KURL url( u );
-
- // handle windows opened by JS
- if ( openedByJS() && d->m_opener )
- cUrl = d->m_opener->url();
-
- if (!kapp || !kapp->authorizeURLAction("redirect", cUrl, url))
- {
- kdWarning(6050) << "KHTMLPart::scheduleRedirection: Redirection from " << cUrl << " to " << url << " REJECTED!" << endl;
- emit completed();
- return;
- }
-
- if ( urlcmp( u, m_url.url(), true, true ) )
- {
- args.metaData().insert("referrer", d->m_pageReferrer);
- }
-
- // For javascript and META-tag based redirections:
- // - We don't take cross-domain-ness in consideration if we are the
- // toplevel frame because the new URL may be in a different domain as the current URL
- // but that's ok.
- // - If we are not the toplevel frame then we check against the toplevelURL()
- if (parentPart())
- args.metaData().insert("cross-domain", toplevelURL().url());
-
- args.setLockHistory( d->m_redirectLockHistory );
- // _self: make sure we don't use any <base target=>'s
-
- d->m_urlSelectedOpenedURL = true; // In case overriden, default to success
- urlSelected( u, 0, 0, "_self", args );
-
- if ( !d->m_urlSelectedOpenedURL ) // urlSelected didn't open a url, so emit completed ourselves
- emit completed();
-}
-
-void KHTMLPart::slotRedirection(TDEIO::Job*, const KURL& url)
-{
- // the slave told us that we got redirected
- //kdDebug( 6050 ) << "redirection by KIO to " << url.url() << endl;
- emit d->m_extension->setLocationBarURL( url.prettyURL() );
- d->m_workingURL = url;
-}
-
-bool KHTMLPart::setEncoding( const TQString &name, bool override )
-{
- d->m_encoding = name;
- d->m_haveEncoding = override;
-
- if( !m_url.isEmpty() ) {
- // reload document
- closeURL();
- KURL url = m_url;
- m_url = 0;
- d->m_restored = true;
- openURL(url);
- d->m_restored = false;
- }
-
- return true;
-}
-
-TQString KHTMLPart::encoding() const
-{
- if(d->m_haveEncoding && !d->m_encoding.isEmpty())
- return d->m_encoding;
-
- if(d->m_decoder && d->m_decoder->encoding())
- return TQString(d->m_decoder->encoding());
-
- return defaultEncoding();
-}
-
-TQString KHTMLPart::defaultEncoding() const
-{
- TQString encoding = settings()->encoding();
- if ( !encoding.isEmpty() )
- return encoding;
- // HTTP requires the default encoding to be latin1, when neither
- // the user nor the page requested a particular encoding.
- if ( url().protocol().startsWith( "http" ) )
- return "iso-8859-1";
- else
- return TDEGlobal::locale()->encoding();
-}
-
-void KHTMLPart::setUserStyleSheet(const KURL &url)
-{
- if ( d->m_doc && d->m_doc->docLoader() )
- (void) new khtml::PartStyleSheetLoader(this, url.url(), d->m_doc->docLoader());
-}
-
-void KHTMLPart::setUserStyleSheet(const TQString &styleSheet)
-{
- if ( d->m_doc )
- d->m_doc->setUserStyleSheet( styleSheet );
-}
-
-bool KHTMLPart::gotoAnchor( const TQString &name )
-{
- if (!d->m_doc)
- return false;
-
- HTMLCollectionImpl *anchors =
- new HTMLCollectionImpl( d->m_doc, HTMLCollectionImpl::DOC_ANCHORS);
- anchors->ref();
- NodeImpl *n = anchors->namedItem(name);
- anchors->deref();
-
- if(!n) {
- n = d->m_doc->getElementById( name );
- }
-
- d->m_doc->setCSSTarget(n); // Setting to null will clear the current target.
-
- // Implement the rule that "" and "top" both mean top of page as in other browsers.
- bool quirkyName = !n && !d->m_doc->inStrictMode() && (name.isEmpty() || name.lower() == "top");
-
- if (quirkyName) {
- d->m_view->setContentsPos(0, 0);
- return true;
- } else if (!n) {
- kdDebug(6050) << "KHTMLPart::gotoAnchor node '" << name << "' not found" << endl;
- return false;
- }
-
- int x = 0, y = 0;
- int gox, dummy;
- HTMLElementImpl *a = static_cast<HTMLElementImpl *>(n);
-
- a->getUpperLeftCorner(x, y);
- if (x <= d->m_view->contentsX())
- gox = x - 10;
- else {
- gox = d->m_view->contentsX();
- if ( x + 10 > d->m_view->contentsX()+d->m_view->visibleWidth()) {
- a->getLowerRightCorner(x, dummy);
- gox = x - d->m_view->visibleWidth() + 10;
- }
- }
-
- d->m_view->setContentsPos(gox, y);
-
- return true;
-}
-
-bool KHTMLPart::nextAnchor()
-{
- if (!d->m_doc)
- return false;
- d->m_view->focusNextPrevNode ( true );
-
- return true;
-}
-
-bool KHTMLPart::prevAnchor()
-{
- if (!d->m_doc)
- return false;
- d->m_view->focusNextPrevNode ( false );
-
- return true;
-}
-
-void KHTMLPart::setStandardFont( const TQString &name )
-{
- d->m_settings->setStdFontName(name);
-}
-
-void KHTMLPart::setFixedFont( const TQString &name )
-{
- d->m_settings->setFixedFontName(name);
-}
-
-void KHTMLPart::setURLCursor( const TQCursor &c )
-{
- d->m_linkCursor = c;
-}
-
-TQCursor KHTMLPart::urlCursor() const
-{
- return d->m_linkCursor;
-}
-
-bool KHTMLPart::onlyLocalReferences() const
-{
- return d->m_onlyLocalReferences;
-}
-
-void KHTMLPart::setOnlyLocalReferences(bool enable)
-{
- d->m_onlyLocalReferences = enable;
-}
-
-void KHTMLPartPrivate::setFlagRecursively(
- bool KHTMLPartPrivate::*flag, bool value)
-{
- // first set it on the current one
- this->*flag = value;
-
- // descend into child frames recursively
- {
- TQValueList<khtml::ChildFrame*>::Iterator it = m_frames.begin();
- const TQValueList<khtml::ChildFrame*>::Iterator itEnd = m_frames.end();
- for (; it != itEnd; ++it) {
- KHTMLPart* const part = static_cast<KHTMLPart *>((KParts::ReadOnlyPart *)(*it)->m_part);
- if (part->inherits("KHTMLPart"))
- part->d->setFlagRecursively(flag, value);
- }/*next it*/
- }
- // do the same again for objects
- {
- TQValueList<khtml::ChildFrame*>::Iterator it = m_objects.begin();
- const TQValueList<khtml::ChildFrame*>::Iterator itEnd = m_objects.end();
- for (; it != itEnd; ++it) {
- KHTMLPart* const part = static_cast<KHTMLPart *>((KParts::ReadOnlyPart *)(*it)->m_part);
- if (part->inherits("KHTMLPart"))
- part->d->setFlagRecursively(flag, value);
- }/*next it*/
- }
-}
-
-void KHTMLPart::setCaretMode(bool enable)
-{
-#ifndef KHTML_NO_CARET
- kdDebug(6200) << "setCaretMode(" << enable << ")" << endl;
- if (isCaretMode() == enable) return;
- d->setFlagRecursively(&KHTMLPartPrivate::m_caretMode, enable);
- // FIXME: this won't work on frames as expected
- if (!isEditable()) {
- if (enable) {
- view()->initCaret(true);
- view()->ensureCaretVisible();
- } else
- view()->caretOff();
- }/*end if*/
-#endif // KHTML_NO_CARET
-}
-
-bool KHTMLPart::isCaretMode() const
-{
- return d->m_caretMode;
-}
-
-void KHTMLPart::setEditable(bool enable)
-{
-#ifndef KHTML_NO_CARET
- if (isEditable() == enable) return;
- d->setFlagRecursively(&KHTMLPartPrivate::m_designMode, enable);
- // FIXME: this won't work on frames as expected
- if (!isCaretMode()) {
- if (enable) {
- view()->initCaret(true);
- view()->ensureCaretVisible();
- } else
- view()->caretOff();
- }/*end if*/
-#endif // KHTML_NO_CARET
-}
-
-bool KHTMLPart::isEditable() const
-{
- return d->m_designMode;
-}
-
-void KHTMLPart::setCaretPosition(DOM::Node node, long offset, bool extendSelection)
-{
-#ifndef KHTML_NO_CARET
-#if 0
- kdDebug(6200) << k_funcinfo << "node: " << node.handle() << " nodeName: "
- << node.nodeName().string() << " offset: " << offset
- << " extendSelection " << extendSelection << endl;
-#endif
- if (view()->moveCaretTo(node.handle(), offset, !extendSelection))
- emitSelectionChanged();
- view()->ensureCaretVisible();
-#endif // KHTML_NO_CARET
-}
-
-KHTMLPart::CaretDisplayPolicy KHTMLPart::caretDisplayPolicyNonFocused() const
-{
-#ifndef KHTML_NO_CARET
- return (CaretDisplayPolicy)view()->caretDisplayPolicyNonFocused();
-#else // KHTML_NO_CARET
- return CaretInvisible;
-#endif // KHTML_NO_CARET
-}
-
-void KHTMLPart::setCaretDisplayPolicyNonFocused(CaretDisplayPolicy policy)
-{
-#ifndef KHTML_NO_CARET
- view()->setCaretDisplayPolicyNonFocused(policy);
-#endif // KHTML_NO_CARET
-}
-
-void KHTMLPart::setCaretVisible(bool show)
-{
-#ifndef KHTML_NO_CARET
- if (show) {
-
- NodeImpl *caretNode = xmlDocImpl()->focusNode();
- if (isCaretMode() || isEditable()
- || (caretNode && caretNode->contentEditable())) {
- view()->caretOn();
- }/*end if*/
-
- } else {
-
- view()->caretOff();
-
- }/*end if*/
-#endif // KHTML_NO_CARET
-}
-
-void KHTMLPart::findTextBegin()
-{
- d->m_findPos = -1;
- d->m_findNode = 0;
- d->m_findPosEnd = -1;
- d->m_findNodeEnd= 0;
- d->m_findPosStart = -1;
- d->m_findNodeStart = 0;
- d->m_findNodePrevious = 0;
- delete d->m_find;
- d->m_find = 0L;
-}
-
-bool KHTMLPart::initFindNode( bool selection, bool reverse, bool fromCursor )
-{
- if ( !d->m_doc )
- return false;
-
- DOM::NodeImpl* firstNode = 0L;
- if (d->m_doc->isHTMLDocument())
- firstNode = static_cast<HTMLDocumentImpl*>(d->m_doc)->body();
- else
- firstNode = d->m_doc;
-
- if ( !firstNode )
- {
- //kdDebug(6050) << k_funcinfo << "no first node (body or doc) -> return false" << endl;
- return false;
- }
- if ( firstNode->id() == ID_FRAMESET )
- {
- //kdDebug(6050) << k_funcinfo << "FRAMESET -> return false" << endl;
- return false;
- }
-
- if ( selection && hasSelection() )
- {
- //kdDebug(6050) << k_funcinfo << "using selection" << endl;
- if ( !fromCursor )
- {
- d->m_findNode = reverse ? d->m_selectionEnd.handle() : d->m_selectionStart.handle();
- d->m_findPos = reverse ? d->m_endOffset : d->m_startOffset;
- }
- d->m_findNodeEnd = reverse ? d->m_selectionStart.handle() : d->m_selectionEnd.handle();
- d->m_findPosEnd = reverse ? d->m_startOffset : d->m_endOffset;
- d->m_findNodeStart = !reverse ? d->m_selectionStart.handle() : d->m_selectionEnd.handle();
- d->m_findPosStart = !reverse ? d->m_startOffset : d->m_endOffset;
- d->m_findNodePrevious = d->m_findNodeStart;
- }
- else // whole document
- {
- //kdDebug(6050) << k_funcinfo << "whole doc" << endl;
- if ( !fromCursor )
- {
- d->m_findNode = firstNode;
- d->m_findPos = reverse ? -1 : 0;
- }
- d->m_findNodeEnd = reverse ? firstNode : 0;
- d->m_findPosEnd = reverse ? 0 : -1;
- d->m_findNodeStart = !reverse ? firstNode : 0;
- d->m_findPosStart = !reverse ? 0 : -1;
- d->m_findNodePrevious = d->m_findNodeStart;
- if ( reverse )
- {
- // Need to find out the really last object, to start from it
- khtml::RenderObject* obj = d->m_findNode ? d->m_findNode->renderer() : 0;
- if ( obj )
- {
- // find the last object in the render tree
- while ( obj->lastChild() )
- {
- obj = obj->lastChild();
- }
- // now get the last object with a NodeImpl associated
- while ( !obj->element() && obj->objectAbove() )
- {
- obj = obj->objectAbove();
- }
- d->m_findNode = obj->element();
- }
- }
- }
- return true;
-}
-
-// Old method (its API limits the available features - remove in KDE-4)
-bool KHTMLPart::findTextNext( const TQString &str, bool forward, bool caseSensitive, bool isRegExp )
-{
- if ( !initFindNode( false, !forward, d->m_findNode ) )
- return false;
- while(1)
- {
- if( (d->m_findNode->nodeType() == Node::TEXT_NODE || d->m_findNode->nodeType() == Node::CDATA_SECTION_NODE) && d->m_findNode->renderer() )
- {
- DOMString nodeText = d->m_findNode->nodeValue();
- DOMStringImpl *t = nodeText.implementation();
- TQConstString s(t->s, t->l);
-
- int matchLen = 0;
- if ( isRegExp ) {
- TQRegExp matcher( str );
- matcher.setCaseSensitive( caseSensitive );
- d->m_findPos = matcher.search(s.string(), d->m_findPos+1);
- if ( d->m_findPos != -1 )
- matchLen = matcher.matchedLength();
- }
- else {
- d->m_findPos = s.string().find(str, d->m_findPos+1, caseSensitive);
- matchLen = str.length();
- }
-
- if(d->m_findPos != -1)
- {
- int x = 0, y = 0;
- if(static_cast<khtml::RenderText *>(d->m_findNode->renderer())
- ->posOfChar(d->m_findPos, x, y))
- d->m_view->setContentsPos(x-50, y-50);
-
- d->m_selectionStart = d->m_findNode;
- d->m_startOffset = d->m_findPos;
- d->m_selectionEnd = d->m_findNode;
- d->m_endOffset = d->m_findPos + matchLen;
- d->m_startBeforeEnd = true;
-
- d->m_doc->setSelection( d->m_selectionStart.handle(), d->m_startOffset,
- d->m_selectionEnd.handle(), d->m_endOffset );
- emitSelectionChanged();
- return true;
- }
- }
- d->m_findPos = -1;
-
- NodeImpl *next;
-
- if ( forward )
- {
- next = d->m_findNode->firstChild();
-
- if(!next) next = d->m_findNode->nextSibling();
- while(d->m_findNode && !next) {
- d->m_findNode = d->m_findNode->parentNode();
- if( d->m_findNode ) {
- next = d->m_findNode->nextSibling();
- }
- }
- }
- else
- {
- next = d->m_findNode->lastChild();
-
- if (!next ) next = d->m_findNode->previousSibling();
- while ( d->m_findNode && !next )
- {
- d->m_findNode = d->m_findNode->parentNode();
- if( d->m_findNode )
- {
- next = d->m_findNode->previousSibling();
- }
- }
- }
-
- d->m_findNode = next;
- if(!d->m_findNode) return false;
- }
-}
-
-
-void KHTMLPart::slotFind()
-{
- KParts::ReadOnlyPart *part = currentFrame();
- if (!part)
- return;
- if (!part->inherits("KHTMLPart") )
- {
- kdError(6000) << "slotFind: part is a " << part->className() << ", can't do a search into it" << endl;
- return;
- }
- static_cast<KHTMLPart *>( part )->findText();
-}
-
-void KHTMLPart::slotFindNext()
-{
- KParts::ReadOnlyPart *part = currentFrame();
- if (!part)
- return;
- if (!part->inherits("KHTMLPart") )
- {
- kdError(6000) << "slotFindNext: part is a " << part->className() << ", can't do a search into it" << endl;
- return;
- }
- static_cast<KHTMLPart *>( part )->findTextNext();
-}
-
-void KHTMLPart::slotFindPrev()
-{
- KParts::ReadOnlyPart *part = currentFrame();
- if (!part)
- return;
- if (!part->inherits("KHTMLPart") )
- {
- kdError(6000) << "slotFindNext: part is a " << part->className() << ", can't do a search into it" << endl;
- return;
- }
- static_cast<KHTMLPart *>( part )->findTextNext( true ); // reverse
-}
-
-void KHTMLPart::slotFindDone()
-{
- // ### remove me
-}
-
-void KHTMLPart::slotFindAheadText()
-{
-#ifndef KHTML_NO_TYPE_AHEAD_FIND
- KParts::ReadOnlyPart *part = currentFrame();
- if (!part)
- return;
- if (!part->inherits("KHTMLPart") )
- {
- kdError(6000) << "slotFindNext: part is a " << part->className() << ", can't do a search into it" << endl;
- return;
- }
- static_cast<KHTMLPart *>( part )->view()->startFindAhead( false );
-#endif // KHTML_NO_TYPE_AHEAD_FIND
-}
-
-void KHTMLPart::slotFindAheadLink()
-{
-#ifndef KHTML_NO_TYPE_AHEAD_FIND
- KParts::ReadOnlyPart *part = currentFrame();
- if (!part)
- return;
- if (!part->inherits("KHTMLPart") )
- {
- kdError(6000) << "slotFindNext: part is a " << part->className() << ", can't do a search into it" << endl;
- return;
- }
- static_cast<KHTMLPart *>( part )->view()->startFindAhead( true );
-#endif // KHTML_NO_TYPE_AHEAD_FIND
-}
-
-void KHTMLPart::enableFindAheadActions( bool enable )
-{
- // only the topmost one has shortcuts
- KHTMLPart* p = this;
- while( p->parentPart())
- p = p->parentPart();
- p->d->m_paFindAheadText->setEnabled( enable );
- p->d->m_paFindAheadLinks->setEnabled( enable );
-}
-
-void KHTMLPart::slotFindDialogDestroyed()
-{
- d->m_lastFindState.options = d->m_findDialog->options();
- d->m_lastFindState.history = d->m_findDialog->findHistory();
- d->m_findDialog->deleteLater();
- d->m_findDialog = 0L;
-}
-
-void KHTMLPart::findText()
-{
- // First do some init to make sure we can search in this frame
- if ( !d->m_doc )
- return;
-
- // Raise if already opened
- if ( d->m_findDialog )
- {
- KWin::activateWindow( d->m_findDialog->winId() );
- return;
- }
-
- // The lineedit of the dialog would make khtml lose its selection, otherwise
-#ifndef QT_NO_CLIPBOARD
- disconnect( kapp->clipboard(), TQT_SIGNAL(selectionChanged()), this, TQT_SLOT(slotClearSelection()) );
-#endif
-
- // Now show the dialog in which the user can choose options.
- d->m_findDialog = new KFindDialog( false /*non-modal*/, widget(), "khtmlfind" );
- d->m_findDialog->setHasSelection( hasSelection() );
- d->m_findDialog->setHasCursor( d->m_findNode != 0 );
- if ( d->m_findNode ) // has a cursor -> default to 'FromCursor'
- d->m_lastFindState.options |= KFindDialog::FromCursor;
-
- // TODO? optionsDialog.setPattern( d->m_lastFindState.text );
- d->m_findDialog->setFindHistory( d->m_lastFindState.history );
- d->m_findDialog->setOptions( d->m_lastFindState.options );
-
- d->m_lastFindState.options = -1; // force update in findTextNext
- d->m_lastFindState.last_dir = -1;
-
- d->m_findDialog->show();
- connect( d->m_findDialog, TQT_SIGNAL(okClicked()), this, TQT_SLOT(slotFindNext()) );
- connect( d->m_findDialog, TQT_SIGNAL(finished()), this, TQT_SLOT(slotFindDialogDestroyed()) );
-
- findText( d->m_findDialog->pattern(), 0 /*options*/, widget(), d->m_findDialog );
-}
-
-void KHTMLPart::findText( const TQString &str, long options, TQWidget *parent, KFindDialog *findDialog )
-{
- // First do some init to make sure we can search in this frame
- if ( !d->m_doc )
- return;
-
-#ifndef QT_NO_CLIPBOARD
- connect( kapp->clipboard(), TQT_SIGNAL(selectionChanged()), TQT_SLOT(slotClearSelection()) );
-#endif
-
- // Create the KFind object
- delete d->m_find;
- d->m_find = new KFind( str, options, parent, findDialog );
- d->m_find->closeFindNextDialog(); // we use KFindDialog non-modal, so we don't want other dlg popping up
- connect( d->m_find, TQT_SIGNAL( highlight( const TQString &, int, int ) ),
- this, TQT_SLOT( slotHighlight( const TQString &, int, int ) ) );
- //connect(d->m_find, TQT_SIGNAL( findNext() ),
- // this, TQT_SLOT( slotFindNext() ) );
-
- if ( !findDialog )
- {
- d->m_lastFindState.options = options;
- initFindNode( options & KFindDialog::SelectedText,
- options & KFindDialog::FindBackwards,
- options & KFindDialog::FromCursor );
- }
-}
-
-bool KHTMLPart::findTextNext()
-{
- return findTextNext( false );
-}
-
-// New method
-bool KHTMLPart::findTextNext( bool reverse )
-{
- if (!d->m_find)
- {
- // We didn't show the find dialog yet, let's do it then (#49442)
- findText();
- return false;
- }
-
- view()->updateFindAheadTimeout();
- long options = 0;
- if ( d->m_findDialog ) // 0 when we close the dialog
- {
- if ( d->m_find->pattern() != d->m_findDialog->pattern() ) {
- d->m_find->setPattern( d->m_findDialog->pattern() );
- d->m_find->resetCounts();
- }
- options = d->m_findDialog->options();
- if ( d->m_lastFindState.options != options )
- {
- d->m_find->setOptions( options );
-
- if ( options & KFindDialog::SelectedText )
- Q_ASSERT( hasSelection() );
-
- long difference = d->m_lastFindState.options ^ options;
- if ( difference & (KFindDialog::SelectedText | KFindDialog::FromCursor ) )
- {
- // Important options changed -> reset search range
- (void) initFindNode( options & KFindDialog::SelectedText,
- options & KFindDialog::FindBackwards,
- options & KFindDialog::FromCursor );
- }
- d->m_lastFindState.options = options;
- }
- } else
- options = d->m_lastFindState.options;
- if( reverse )
- options = options ^ KFindDialog::FindBackwards;
- if( d->m_find->options() != options )
- d->m_find->setOptions( options );
-
- // Changing find direction. Start and end nodes must be switched.
- // Additionally since d->m_findNode points after the last node
- // that was searched, it needs to be "after" it in the opposite direction.
- if( d->m_lastFindState.last_dir != -1
- && bool( d->m_lastFindState.last_dir ) != bool( options & KFindDialog::FindBackwards ))
- {
- tqSwap( d->m_findNodeEnd, d->m_findNodeStart );
- tqSwap( d->m_findPosEnd, d->m_findPosStart );
- tqSwap( d->m_findNode, d->m_findNodePrevious );
- // d->m_findNode now point at the end of the last searched line - advance one node
- khtml::RenderObject* obj = d->m_findNode ? d->m_findNode->renderer() : 0;
- khtml::RenderObject* end = d->m_findNodeEnd ? d->m_findNodeEnd->renderer() : 0;
- if ( obj == end )
- obj = 0L;
- else if ( obj )
- {
- do {
- obj = (options & KFindDialog::FindBackwards) ? obj->objectAbove() : obj->objectBelow();
- } while ( obj && ( !obj->element() || obj->isInlineContinuation() ) );
- }
- if ( obj )
- d->m_findNode = obj->element();
- else
- d->m_findNode = 0;
- }
- d->m_lastFindState.last_dir = ( options & KFindDialog::FindBackwards ) ? 1 : 0;
-
- KFind::Result res = KFind::NoMatch;
- khtml::RenderObject* obj = d->m_findNode ? d->m_findNode->renderer() : 0;
- khtml::RenderObject* end = d->m_findNodeEnd ? d->m_findNodeEnd->renderer() : 0;
- khtml::RenderTextArea *tmpTextArea=0L;
- //kdDebug(6050) << k_funcinfo << "obj=" << obj << " end=" << end << endl;
- while( res == KFind::NoMatch )
- {
- if ( d->m_find->needData() )
- {
- if ( !obj ) {
- //kdDebug(6050) << k_funcinfo << "obj=0 -> done" << endl;
- break; // we're done
- }
- //kdDebug(6050) << k_funcinfo << " gathering data" << endl;
- // First make up the TQString for the current 'line' (i.e. up to \n)
- // We also want to remember the DOMNode for every portion of the string.
- // We store this in an index->node list.
-
- d->m_stringPortions.clear();
- bool newLine = false;
- TQString str;
- DOM::NodeImpl* lastNode = d->m_findNode;
- while ( obj && !newLine )
- {
- // Grab text from render object
- TQString s;
- bool renderAreaText = obj->parent() && (TQCString(obj->parent()->renderName())== "RenderTextArea");
- bool renderLineText = (TQCString(obj->renderName())== "RenderLineEdit");
- if ( renderAreaText )
- {
- khtml::RenderTextArea *parent= static_cast<khtml::RenderTextArea *>(obj->parent());
- s = parent->text();
- s = s.replace(0xa0, ' ');
- tmpTextArea = parent;
- }
- else if ( renderLineText )
- {
- khtml::RenderLineEdit *parentLine= static_cast<khtml::RenderLineEdit *>(obj);
- if (parentLine->widget()->echoMode() == TQLineEdit::Normal)
- s = parentLine->widget()->text();
- s = s.replace(0xa0, ' ');
- }
- else if ( obj->isText() )
- {
- bool isLink = false;
-
- // checks whether the node has a <A> parent
- if ( options & FindLinksOnly )
- {
- DOM::NodeImpl *parent = obj->element();
- while ( parent )
- {
- if ( parent->nodeType() == Node::ELEMENT_NODE && parent->id() == ID_A )
- {
- isLink = true;
- break;
- }
- parent = parent->parentNode();
- }
- }
- else
- {
- isLink = true;
- }
-
- if ( isLink && obj->parent()!=tmpTextArea )
- {
- s = static_cast<khtml::RenderText *>(obj)->data().string();
- s = s.replace(0xa0, ' ');
- }
- }
- else if ( obj->isBR() )
- s = '\n';
- else if ( !obj->isInline() && !str.isEmpty() )
- s = '\n';
-
- if ( lastNode == d->m_findNodeEnd )
- s.truncate( d->m_findPosEnd );
- if ( !s.isEmpty() )
- {
- newLine = s.find( '\n' ) != -1; // did we just get a newline?
- if( !( options & KFindDialog::FindBackwards ))
- {
- //kdDebug(6050) << "StringPortion: " << index << "-" << index+s.length()-1 << " -> " << lastNode << endl;
- d->m_stringPortions.append( KHTMLPartPrivate::StringPortion( str.length(), lastNode ) );
- str += s;
- }
- else // KFind itself can search backwards, so str must not be built backwards
- {
- for( TQValueList<KHTMLPartPrivate::StringPortion>::Iterator it = d->m_stringPortions.begin();
- it != d->m_stringPortions.end();
- ++it )
- (*it).index += s.length();
- d->m_stringPortions.prepend( KHTMLPartPrivate::StringPortion( 0, lastNode ) );
- str.prepend( s );
- }
- }
- // Compare obj and end _after_ we processed the 'end' node itself
- if ( obj == end )
- obj = 0L;
- else
- {
- // Move on to next object (note: if we found a \n already, then obj (and lastNode)
- // will point to the _next_ object, i.e. they are in advance.
- do {
- // We advance until the next RenderObject that has a NodeImpl as its element().
- // Otherwise (if we keep the 'last node', and it has a '\n') we might be stuck
- // on that object forever...
- obj = (options & KFindDialog::FindBackwards) ? obj->objectAbove() : obj->objectBelow();
- } while ( obj && ( !obj->element() || obj->isInlineContinuation() ) );
- }
- if ( obj )
- lastNode = obj->element();
- else
- lastNode = 0;
- } // end while
- //kdDebug()<<" str : "<<str<<endl;
- if ( !str.isEmpty() )
- {
- d->m_find->setData( str, d->m_findPos );
- }
-
- d->m_findPos = -1; // not used during the findnext loops. Only during init.
- d->m_findNodePrevious = d->m_findNode;
- d->m_findNode = lastNode;
- }
- if ( !d->m_find->needData() ) // happens if str was empty
- {
- // Let KFind inspect the text fragment, and emit highlighted if a match is found
- res = d->m_find->find();
- }
- } // end while
-
- if ( res == KFind::NoMatch ) // i.e. we're done
- {
- kdDebug() << "No more matches." << endl;
- if ( !(options & FindNoPopups) && d->m_find->shouldRestart() )
- {
- //kdDebug(6050) << "Restarting" << endl;
- initFindNode( false, options & KFindDialog::FindBackwards, false );
- d->m_find->resetCounts();
- findTextNext( reverse );
- }
- else // really done
- {
- //kdDebug(6050) << "Finishing" << endl;
- //delete d->m_find;
- //d->m_find = 0L;
- initFindNode( false, options & KFindDialog::FindBackwards, false );
- d->m_find->resetCounts();
- slotClearSelection();
- }
- kdDebug() << "Dialog closed." << endl;
- }
-
- return res == KFind::Match;
-}
-
-void KHTMLPart::slotHighlight( const TQString& /*text*/, int index, int length )
-{
- //kdDebug(6050) << "slotHighlight index=" << index << " length=" << length << endl;
- TQValueList<KHTMLPartPrivate::StringPortion>::Iterator it = d->m_stringPortions.begin();
- const TQValueList<KHTMLPartPrivate::StringPortion>::Iterator itEnd = d->m_stringPortions.end();
- TQValueList<KHTMLPartPrivate::StringPortion>::Iterator prev = it;
- // We stop at the first portion whose index is 'greater than', and then use the previous one
- while ( it != itEnd && (*it).index <= index )
- {
- prev = it;
- ++it;
- }
- Q_ASSERT ( prev != itEnd );
- DOM::NodeImpl* node = (*prev).node;
- Q_ASSERT( node );
-
- d->m_selectionStart = node;
- d->m_startOffset = index - (*prev).index;
-
- khtml::RenderObject* obj = node->renderer();
- khtml::RenderTextArea *parent = 0L;
- khtml::RenderLineEdit *parentLine = 0L;
- bool renderLineText =false;
-
- TQRect highlightedRect;
- bool renderAreaText =false;
- Q_ASSERT( obj );
- if ( obj )
- {
- int x = 0, y = 0;
- renderAreaText = (TQCString(obj->parent()->renderName())== "RenderTextArea");
- renderLineText = (TQCString(obj->renderName())== "RenderLineEdit");
-
-
- if( renderAreaText )
- parent= static_cast<khtml::RenderTextArea *>(obj->parent());
- if ( renderLineText )
- parentLine= static_cast<khtml::RenderLineEdit *>(obj);
- if ( !renderLineText )
- //if (static_cast<khtml::RenderText *>(node->renderer())
- // ->posOfChar(d->m_startOffset, x, y))
- {
- int dummy;
- static_cast<khtml::RenderText *>(node->renderer())
- ->caretPos( d->m_startOffset, false, x, y, dummy, dummy ); // more precise than posOfChar
- //kdDebug(6050) << "topleft: " << x << "," << y << endl;
- if ( x != -1 || y != -1 )
- {
- int gox = d->m_view->contentsX();
- if (x+50 > d->m_view->contentsX() + d->m_view->visibleWidth())
- gox = x - d->m_view->visibleWidth() + 50;
- if (x-10 < d->m_view->contentsX())
- gox = x - d->m_view->visibleWidth() - 10;
- if (gox < 0) gox = 0;
- d->m_view->setContentsPos(gox, y-50);
- highlightedRect.setTopLeft( d->m_view->mapToGlobal(TQPoint(x, y)) );
- }
- }
- }
- // Now look for end node
- it = prev; // no need to start from beginning again
- while ( it != itEnd && (*it).index < index + length )
- {
- prev = it;
- ++it;
- }
- Q_ASSERT ( prev != itEnd );
-
- d->m_selectionEnd = (*prev).node;
- d->m_endOffset = index + length - (*prev).index;
- d->m_startBeforeEnd = true;
-
- // if the selection is limited to a single link, that link gets focus
- if(d->m_selectionStart == d->m_selectionEnd)
- {
- bool isLink = false;
-
- // checks whether the node has a <A> parent
- DOM::NodeImpl *parent = d->m_selectionStart.handle();
- while ( parent )
- {
- if ( parent->nodeType() == Node::ELEMENT_NODE && parent->id() == ID_A )
- {
- isLink = true;
- break;
- }
- parent = parent->parentNode();
- }
-
- if(isLink == true)
- {
- d->m_doc->setFocusNode( parent );
- }
- }
-
-#if 0
- kdDebug(6050) << "slotHighlight: " << d->m_selectionStart.handle() << "," << d->m_startOffset << " - " <<
- d->m_selectionEnd.handle() << "," << d->m_endOffset << endl;
- it = d->m_stringPortions.begin();
- for ( ; it != d->m_stringPortions.end() ; ++it )
- kdDebug(6050) << " StringPortion: from index=" << (*it).index << " -> node=" << (*it).node << endl;
-#endif
- if( renderAreaText )
- {
- if( parent )
- parent->highLightWord( length, d->m_endOffset-length );
- }
- else if ( renderLineText )
- {
- if( parentLine )
- parentLine->highLightWord( length, d->m_endOffset-length );
- }
- else
- {
- d->m_doc->setSelection( d->m_selectionStart.handle(), d->m_startOffset,
- d->m_selectionEnd.handle(), d->m_endOffset );
- if (d->m_selectionEnd.handle()->renderer() )
- {
- int x, y, height, dummy;
- static_cast<khtml::RenderText *>(d->m_selectionEnd.handle()->renderer())
- ->caretPos( d->m_endOffset, false, x, y, dummy, height ); // more precise than posOfChar
- //kdDebug(6050) << "bottomright: " << x << "," << y+height << endl;
- if ( x != -1 || y != -1 )
- {
- // if ( static_cast<khtml::RenderText *>(d->m_selectionEnd.handle()->renderer())
- // ->posOfChar(d->m_endOffset-1, x, y))
- highlightedRect.setBottomRight( d->m_view->mapToGlobal( TQPoint(x, y+height) ) );
- }
- }
- }
- emitSelectionChanged();
-
- // make the finddialog move away from the selected area
- if ( d->m_findDialog && !highlightedRect.isNull() )
- {
- highlightedRect.moveBy( -d->m_view->contentsX(), -d->m_view->contentsY() );
- //kdDebug(6050) << "avoiding " << highlightedRect << endl;
- KDialog::avoidArea( d->m_findDialog, highlightedRect );
- }
-}
-
-TQString KHTMLPart::selectedTextAsHTML() const
-{
- if(!hasSelection()) {
- kdDebug() << "selectedTextAsHTML(): selection is not valid. Returning empty selection" << endl;
- return TQString();
- }
- if(d->m_startOffset < 0 || d->m_endOffset <0) {
- kdDebug() << "invalid values for end/startOffset " << d->m_startOffset << " " << d->m_endOffset << endl;
- return TQString();
- }
- DOM::Range r = selection();
- if(r.isNull() || r.isDetached())
- return TQString();
- int exceptioncode = 0; //ignore the result
- return r.handle()->toHTML(exceptioncode).string();
-}
-
-TQString KHTMLPart::selectedText() const
-{
- bool hasNewLine = true;
- bool seenTDTag = false;
- TQString text;
- DOM::Node n = d->m_selectionStart;
- while(!n.isNull()) {
- if(n.nodeType() == DOM::Node::TEXT_NODE && n.handle()->renderer()) {
- DOM::DOMStringImpl *dstr = static_cast<DOM::TextImpl*>(n.handle())->renderString();
- TQString str(dstr->s, dstr->l);
- if(!str.isEmpty()) {
- if(seenTDTag) {
- text += " ";
- seenTDTag = false;
- }
- hasNewLine = false;
- if(n == d->m_selectionStart && n == d->m_selectionEnd)
- text = str.mid(d->m_startOffset, d->m_endOffset - d->m_startOffset);
- else if(n == d->m_selectionStart)
- text = str.mid(d->m_startOffset);
- else if(n == d->m_selectionEnd)
- text += str.left(d->m_endOffset);
- else
- text += str;
- }
- }
- else {
- // This is our simple HTML -> ASCII transformation:
- unsigned short id = n.elementId();
- switch(id) {
- case ID_TEXTAREA:
- text += static_cast<HTMLTextAreaElementImpl*>(n.handle())->value().string();
- break;
- case ID_INPUT:
- if (static_cast<HTMLInputElementImpl*>(n.handle())->inputType() != HTMLInputElementImpl::PASSWORD)
- text += static_cast<HTMLInputElementImpl*>(n.handle())->value().string();
- break;
- case ID_SELECT:
- text += static_cast<HTMLSelectElementImpl*>(n.handle())->value().string();
- break;
- case ID_BR:
- text += "\n";
- hasNewLine = true;
- break;
- case ID_IMG:
- text += static_cast<HTMLImageElementImpl*>(n.handle())->altText().string();
- break;
- case ID_TD:
- break;
- case ID_TH:
- case ID_HR:
- case ID_OL:
- case ID_UL:
- case ID_LI:
- case ID_DD:
- case ID_DL:
- case ID_DT:
- case ID_PRE:
- case ID_BLOCKQUOTE:
- case ID_DIV:
- if (!hasNewLine)
- text += "\n";
- hasNewLine = true;
- break;
- case ID_P:
- case ID_TR:
- case ID_H1:
- case ID_H2:
- case ID_H3:
- case ID_H4:
- case ID_H5:
- case ID_H6:
- if (!hasNewLine)
- text += "\n";
-// text += "\n";
- hasNewLine = true;
- break;
- }
- }
- if(n == d->m_selectionEnd) break;
- DOM::Node next = n.firstChild();
- if(next.isNull()) next = n.nextSibling();
- while( next.isNull() && !n.parentNode().isNull() ) {
- n = n.parentNode();
- next = n.nextSibling();
- unsigned short id = n.elementId();
- switch(id) {
- case ID_TD:
- seenTDTag = true; //Add two spaces after a td if then followed by text.
- break;
- case ID_TH:
- case ID_HR:
- case ID_OL:
- case ID_UL:
- case ID_LI:
- case ID_DD:
- case ID_DL:
- case ID_DT:
- case ID_PRE:
- case ID_BLOCKQUOTE:
- case ID_DIV:
- seenTDTag = false;
- if (!hasNewLine)
- text += "\n";
- hasNewLine = true;
- break;
- case ID_P:
- case ID_TR:
- case ID_H1:
- case ID_H2:
- case ID_H3:
- case ID_H4:
- case ID_H5:
- case ID_H6:
- if (!hasNewLine)
- text += "\n";
-// text += "\n";
- hasNewLine = true;
- break;
- }
- }
-
- n = next;
- }
-
- if(text.isEmpty())
- return TQString();
-
- int start = 0;
- int end = text.length();
-
- // Strip leading LFs
- while ((start < end) && (text[start] == '\n'))
- ++start;
-
- // Strip excessive trailing LFs
- while ((start < (end-1)) && (text[end-1] == '\n') && (text[end-2] == '\n'))
- --end;
-
- return text.mid(start, end-start);
-}
-
-bool KHTMLPart::hasSelection() const
-{
- if ( d->m_selectionStart.isNull() || d->m_selectionEnd.isNull() )
- return false;
- if ( d->m_selectionStart == d->m_selectionEnd &&
- d->m_startOffset == d->m_endOffset )
- return false; // empty
- return true;
-}
-
-DOM::Range KHTMLPart::selection() const
-{
- if( d->m_selectionStart.isNull() || d->m_selectionEnd.isNull() )
- return DOM::Range();
- DOM::Range r = document().createRange();
- RangeImpl *rng = r.handle();
- int exception = 0;
- NodeImpl *n = d->m_selectionStart.handle();
- if(!n->parentNode() ||
- !n->renderer() ||
- (!n->renderer()->isReplaced() && !n->renderer()->isBR())) {
- rng->setStart( n, d->m_startOffset, exception );
- if(exception) {
- kdDebug(6000) << "1 -selection() threw the exception " << exception << ". Returning empty range." << endl;
- return DOM::Range();
- }
- } else {
- int o_start = 0;
- while ((n = n->previousSibling()))
- o_start++;
- rng->setStart( d->m_selectionStart.parentNode().handle(), o_start + d->m_startOffset, exception );
- if(exception) {
- kdDebug(6000) << "2 - selection() threw the exception " << exception << ". Returning empty range." << endl;
- return DOM::Range();
- }
-
- }
-
- n = d->m_selectionEnd.handle();
- if(!n->parentNode() ||
- !n->renderer() ||
- (!n->renderer()->isReplaced() && !n->renderer()->isBR())) {
-
- rng->setEnd( n, d->m_endOffset, exception );
- if(exception) {
- kdDebug(6000) << "3 - selection() threw the exception " << exception << ". Returning empty range." << endl;
- return DOM::Range();
- }
-
- } else {
- int o_end = 0;
- while ((n = n->previousSibling()))
- o_end++;
- rng->setEnd( d->m_selectionEnd.parentNode().handle(), o_end + d->m_endOffset, exception);
- if(exception) {
- kdDebug(6000) << "4 - selection() threw the exception " << exception << ". Returning empty range." << endl;
- return DOM::Range();
- }
-
- }
-
- return r;
-}
-
-void KHTMLPart::selection(DOM::Node &s, long &so, DOM::Node &e, long &eo) const
-{
- s = d->m_selectionStart;
- so = d->m_startOffset;
- e = d->m_selectionEnd;
- eo = d->m_endOffset;
-}
-
-void KHTMLPart::setSelection( const DOM::Range &r )
-{
- // Quick-fix: a collapsed range shouldn't select the whole node.
- // The real problem is in RenderCanvas::setSelection though (when index==0 the whole node is selected).
- if ( r.collapsed() )
- slotClearSelection();
- else {
- d->m_selectionStart = r.startContainer();
- d->m_startOffset = r.startOffset();
- d->m_selectionEnd = r.endContainer();
- d->m_endOffset = r.endOffset();
- d->m_doc->setSelection(d->m_selectionStart.handle(),d->m_startOffset,
- d->m_selectionEnd.handle(),d->m_endOffset);
-#ifndef KHTML_NO_CARET
- bool v = d->m_view->placeCaret();
- emitCaretPositionChanged(v ? d->caretNode() : 0, d->caretOffset());
-#endif
- }
-}
-
-void KHTMLPart::slotClearSelection()
-{
- bool hadSelection = hasSelection();
-#ifndef KHTML_NO_CARET
- //kdDebug(6000) << "d->m_selectionStart " << d->m_selectionStart.handle()
- // << " d->m_selectionEnd " << d->m_selectionEnd.handle() << endl;
- // nothing, leave selection parameters as is
-#else
- d->m_selectionStart = 0;
- d->m_startOffset = 0;
- d->m_selectionEnd = 0;
- d->m_endOffset = 0;
-#endif
- if ( d->m_doc ) d->m_doc->clearSelection();
- if ( hadSelection )
- emitSelectionChanged();
-#ifndef KHTML_NO_CARET
- bool v = d->m_view->placeCaret();
- emitCaretPositionChanged(v ? d->caretNode() : 0, d->caretOffset());
-#endif
-}
-
-void KHTMLPart::resetHoverText()
-{
- if( !d->m_overURL.isEmpty() ) // Only if we were showing a link
- {
- d->m_overURL = d->m_overURLTarget = TQString();
- emit onURL( TQString() );
- // revert to default statusbar text
- setStatusBarText(TQString(), BarHoverText);
- emit d->m_extension->mouseOverInfo(0);
- }
-}
-
-void KHTMLPart::overURL( const TQString &url, const TQString &target, bool /*shiftPressed*/ )
-{
- KURL u = completeURL(url);
-
- // special case for <a href="">
- if ( url.isEmpty() )
- u.setFileName( url );
-
- emit onURL( url );
-
- if ( url.isEmpty() ) {
- setStatusBarText(u.htmlURL(), BarHoverText);
- return;
- }
-
- if (url.find( TQString::fromLatin1( "javascript:" ),0, false ) == 0 ) {
- TQString jscode = KURL::decode_string( url.mid( url.find( "javascript:", 0, false ) ) );
- jscode = KStringHandler::rsqueeze( jscode, 80 ); // truncate if too long
- if (url.startsWith("javascript:window.open"))
- jscode += i18n(" (In new window)");
- setStatusBarText( TQStyleSheet::escape( jscode ), BarHoverText );
- return;
- }
-
- KFileItem item(u, TQString(), KFileItem::Unknown);
- emit d->m_extension->mouseOverInfo(&item);
-
- TQString com;
-
- KMimeType::Ptr typ = KMimeType::findByURL( u );
-
- if ( typ )
- com = typ->comment( u, false );
-
- if ( !u.isValid() ) {
- setStatusBarText(u.htmlURL(), BarHoverText);
- return;
- }
-
- if ( u.isLocalFile() )
- {
- // TODO : use TDEIO::stat() and create a KFileItem out of its result,
- // to use KFileItem::statusBarText()
- TQCString path = TQFile::encodeName( u.path() );
-
- struct stat buff;
- bool ok = !stat( path.data(), &buff );
-
- struct stat lbuff;
- if (ok) ok = !lstat( path.data(), &lbuff );
-
- TQString text = u.htmlURL();
- TQString text2 = text;
-
- if (ok && S_ISLNK( lbuff.st_mode ) )
- {
- TQString tmp;
- if ( com.isNull() )
- tmp = i18n( "Symbolic Link");
- else
- tmp = i18n("%1 (Link)").arg(com);
- char buff_two[1024];
- text += " -> ";
- int n = readlink ( path.data(), buff_two, 1022);
- if (n == -1)
- {
- text2 += " ";
- text2 += tmp;
- setStatusBarText(text2, BarHoverText);
- return;
- }
- buff_two[n] = 0;
-
- text += buff_two;
- text += " ";
- text += tmp;
- }
- else if ( ok && S_ISREG( buff.st_mode ) )
- {
- if (buff.st_size < 1024)
- text = i18n("%2 (%1 bytes)").arg((long) buff.st_size).arg(text2); // always put the URL last, in case it contains '%'
- else
- {
- float d = (float) buff.st_size/1024.0;
- text = i18n("%2 (%1 K)").arg(TDEGlobal::locale()->formatNumber(d, 2)).arg(text2); // was %.2f
- }
- text += " ";
- text += com;
- }
- else if ( ok && S_ISDIR( buff.st_mode ) )
- {
- text += " ";
- text += com;
- }
- else
- {
- text += " ";
- text += com;
- }
- setStatusBarText(text, BarHoverText);
- }
- else
- {
- TQString extra;
- if (target.lower() == "_blank")
- {
- extra = i18n(" (In new window)");
- }
- else if (!target.isEmpty() &&
- (target.lower() != "_top") &&
- (target.lower() != "_self") &&
- (target.lower() != "_parent"))
- {
- KHTMLPart *p = this;
- while (p->parentPart())
- p = p->parentPart();
- if (!p->frameExists(target))
- extra = i18n(" (In new window)");
- else
- extra = i18n(" (In other frame)");
- }
-
- if (u.protocol() == TQString::fromLatin1("mailto")) {
- TQString mailtoMsg /* = TQString::fromLatin1("<img src=%1>").arg(locate("icon", TQString::fromLatin1("locolor/16x16/actions/mail_send.png")))*/;
- mailtoMsg += i18n("Email to: ") + KURL::decode_string(u.path());
- TQStringList queries = TQStringList::split('&', u.query().mid(1));
- TQStringList::Iterator it = queries.begin();
- const TQStringList::Iterator itEnd = queries.end();
- for (; it != itEnd; ++it)
- if ((*it).startsWith(TQString::fromLatin1("subject=")))
- mailtoMsg += i18n(" - Subject: ") + KURL::decode_string((*it).mid(8));
- else if ((*it).startsWith(TQString::fromLatin1("cc=")))
- mailtoMsg += i18n(" - CC: ") + KURL::decode_string((*it).mid(3));
- else if ((*it).startsWith(TQString::fromLatin1("bcc=")))
- mailtoMsg += i18n(" - BCC: ") + KURL::decode_string((*it).mid(4));
- mailtoMsg = TQStyleSheet::escape(mailtoMsg);
- mailtoMsg.replace(TQRegExp("([\n\r\t]|[ ]{10})"), TQString());
- setStatusBarText("<qt>"+mailtoMsg, BarHoverText);
- return;
- }
- // Is this check necessary at all? (Frerich)
-#if 0
- else if (u.protocol() == TQString::fromLatin1("http")) {
- DOM::Node hrefNode = nodeUnderMouse().parentNode();
- while (hrefNode.nodeName().string() != TQString::fromLatin1("A") && !hrefNode.isNull())
- hrefNode = hrefNode.parentNode();
-
- if (!hrefNode.isNull()) {
- DOM::Node hreflangNode = hrefNode.attributes().getNamedItem("HREFLANG");
- if (!hreflangNode.isNull()) {
- TQString countryCode = hreflangNode.nodeValue().string().lower();
- // Map the language code to an appropriate country code.
- if (countryCode == TQString::fromLatin1("en"))
- countryCode = TQString::fromLatin1("gb");
- TQString flagImg = TQString::fromLatin1("<img src=%1>").arg(
- locate("locale", TQString::fromLatin1("l10n/")
- + countryCode
- + TQString::fromLatin1("/flag.png")));
- emit setStatusBarText(flagImg + u.prettyURL() + extra);
- }
- }
- }
-#endif
- setStatusBarText(u.htmlURL() + extra, BarHoverText);
- }
-}
-
-//
-// This executes in the active part on a click or other url selection action in
-// that active part.
-//
-void KHTMLPart::urlSelected( const TQString &url, int button, int state, const TQString &_target, KParts::URLArgs args )
-{
- // The member var is so that slotRedirection still calls the virtual urlSelected
- // but is able to know if is opened a url. KDE4: just make urlSelected return a bool
- // and move the urlSelectedIntern code back here.
- d->m_urlSelectedOpenedURL = urlSelectedIntern( url, button, state, _target, args );
-}
-
-// Return value: true if an url was opened, false if not (e.g. error, or jumping to anchor)
-bool KHTMLPart::urlSelectedIntern( const TQString &url, int button, int state, const TQString &_target, KParts::URLArgs args )
-{
- bool hasTarget = false;
-
- TQString target = _target;
- if ( target.isEmpty() && d->m_doc )
- target = d->m_doc->baseTarget();
- if ( !target.isEmpty() )
- hasTarget = true;
-
- if ( url.find( TQString::fromLatin1( "javascript:" ), 0, false ) == 0 )
- {
- crossFrameExecuteScript( target, KURL::decode_string( url.mid( 11 ) ) );
- return false;
- }
-
- KURL cURL = completeURL(url);
- // special case for <a href=""> (IE removes filename, mozilla doesn't)
- if ( url.isEmpty() )
- cURL.setFileName( url ); // removes filename
-
- if ( !cURL.isValid() )
- // ### ERROR HANDLING
- return false;
-
- kdDebug(6050) << this << " urlSelected: complete URL:" << cURL.url() << " target=" << target << endl;
-
- if ( state & ControlButton )
- {
- args.setNewTab(true);
- emit d->m_extension->createNewWindow( cURL, args );
- return true;
- }
-
- if ( button == Qt::LeftButton && ( state & ShiftButton ) )
- {
- TDEIO::MetaData metaData;
- metaData["referrer"] = d->m_referrer;
- KHTMLPopupGUIClient::saveURL( d->m_view, i18n( "Save As" ), cURL, metaData );
- return false;
- }
-
- if (!checkLinkSecurity(cURL,
- i18n( "<qt>This untrusted page links to<BR><B>%1</B>.<BR>Do you want to follow the link?" ),
- i18n( "Follow" )))
- return false;
-
- args.frameName = target;
-
- args.metaData().insert("main_frame_request",
- parentPart() == 0 ? "TRUE":"FALSE");
- args.metaData().insert("ssl_parent_ip", d->m_ssl_parent_ip);
- args.metaData().insert("ssl_parent_cert", d->m_ssl_parent_cert);
- args.metaData().insert("PropagateHttpHeader", "true");
- args.metaData().insert("ssl_was_in_use", d->m_ssl_in_use ? "TRUE":"FALSE");
- args.metaData().insert("ssl_activate_warnings", "TRUE");
-
- if ( hasTarget && target != "_self" && target != "_top" && target != "_blank" && target != "_parent" )
- {
- // unknown frame names should open in a new window.
- khtml::ChildFrame *frame = recursiveFrameRequest( this, cURL, args, false );
- if ( frame )
- {
- args.metaData()["referrer"] = d->m_referrer;
- requestObject( frame, cURL, args );
- return true;
- }
- }
-
- if (!d->m_referrer.isEmpty() && !args.metaData().contains("referrer"))
- args.metaData()["referrer"] = d->m_referrer;
-
-
- if ( button == Qt::NoButton && (state & ShiftButton) && (state & ControlButton) )
- {
- emit d->m_extension->createNewWindow( cURL, args );
- return true;
- }
-
- if ( state & ShiftButton)
- {
- KParts::WindowArgs winArgs;
- winArgs.lowerWindow = true;
- KParts::ReadOnlyPart *newPart = 0;
- emit d->m_extension->createNewWindow( cURL, args, winArgs, newPart );
- return true;
- }
-
- //If we're asked to open up an anchor in the current URL, in current window,
- //merely gotoanchor, and do not reload the new page. Note that this does
- //not apply if the URL is the same page, but without a ref
- if (cURL.hasRef() && (!hasTarget || target == "_self"))
- {
- KURL curUrl = this->url();
- if (urlcmp(cURL.url(), curUrl.url(),
- false, // ignore trailing / diff, IE does, even if FFox doesn't
- true)) // don't care if the ref changes!
- {
- m_url = cURL;
- emit d->m_extension->openURLNotify();
- if ( !gotoAnchor( m_url.encodedHtmlRef()) )
- gotoAnchor( m_url.htmlRef() );
- emit d->m_extension->setLocationBarURL( m_url.prettyURL() );
- return false; // we jumped, but we didn't open a URL
- }
- }
-
- if ( !d->m_bComplete && !hasTarget )
- closeURL();
-
- view()->viewport()->unsetCursor();
- emit d->m_extension->openURLRequest( cURL, args );
- return true;
-}
-
-void KHTMLPart::slotViewDocumentSource()
-{
- KURL url(m_url);
- bool isTempFile = false;
- if (!(url.isLocalFile()) && KHTMLPageCache::self()->isComplete(d->m_cacheId))
- {
- KTempFile sourceFile(TQString(), defaultExtension());
- if (sourceFile.status() == 0)
- {
- KHTMLPageCache::self()->saveData(d->m_cacheId, sourceFile.dataStream());
- url = KURL();
- url.setPath(sourceFile.name());
- isTempFile = true;
- }
- }
-
- (void) KRun::runURL( url, TQString::fromLatin1("text/plain"), isTempFile );
-}
-
-void KHTMLPart::slotViewPageInfo()
-{
- KHTMLInfoDlg *dlg = new KHTMLInfoDlg(NULL, "KHTML Page Info Dialog", false, (WFlags)WDestructiveClose);
- dlg->_close->setGuiItem(KStdGuiItem::close());
-
- if (d->m_doc)
- dlg->_title->setText(d->m_doc->title().string());
-
- // If it's a frame, set the caption to "Frame Information"
- if ( parentPart() && d->m_doc && d->m_doc->isHTMLDocument() ) {
- dlg->setCaption(i18n("Frame Information"));
- }
-
- TQString editStr = TQString();
-
- if (!d->m_pageServices.isEmpty())
- editStr = i18n(" <a href=\"%1\">[Properties]</a>").arg(d->m_pageServices);
-
- TQString squeezedURL = KStringHandler::csqueeze( url().prettyURL(), 80 );
- dlg->_url->setText("<a href=\"" + url().url() + "\">" + squeezedURL + "</a>" + editStr);
- if (lastModified().isEmpty())
- {
- dlg->_lastModified->hide();
- dlg->_lmLabel->hide();
- }
- else
- dlg->_lastModified->setText(lastModified());
-
- const TQString& enc = encoding();
- if (enc.isEmpty()) {
- dlg->_eLabel->hide();
- dlg->_encoding->hide();
- } else {
- dlg->_encoding->setText(enc);
- }
- /* populate the list view now */
- const TQStringList headers = TQStringList::split("\n", d->m_httpHeaders);
-
- TQStringList::ConstIterator it = headers.begin();
- const TQStringList::ConstIterator itEnd = headers.end();
-
- for (; it != itEnd; ++it) {
- const TQStringList header = TQStringList::split(TQRegExp(":[ ]+"), *it);
- if (header.count() != 2)
- continue;
- new TQListViewItem(dlg->_headers, header[0], header[1]);
- }
-
- dlg->show();
- /* put no code here */
-}
-
-
-void KHTMLPart::slotViewFrameSource()
-{
- KParts::ReadOnlyPart *frame = currentFrame();
- if ( !frame )
- return;
-
- KURL url = frame->url();
- bool isTempFile = false;
- if (!(url.isLocalFile()) && frame->inherits("KHTMLPart"))
- {
- long cacheId = static_cast<KHTMLPart *>(frame)->d->m_cacheId;
-
- if (KHTMLPageCache::self()->isComplete(cacheId))
- {
- KTempFile sourceFile(TQString(), defaultExtension());
- if (sourceFile.status() == 0)
- {
- KHTMLPageCache::self()->saveData(cacheId, sourceFile.dataStream());
- url = KURL();
- url.setPath(sourceFile.name());
- isTempFile = true;
- }
- }
- }
-
- (void) KRun::runURL( url, TQString::fromLatin1("text/plain"), isTempFile );
-}
-
-KURL KHTMLPart::backgroundURL() const
-{
- // ### what about XML documents? get from CSS?
- if (!d->m_doc || !d->m_doc->isHTMLDocument())
- return KURL();
-
- TQString relURL = static_cast<HTMLDocumentImpl*>(d->m_doc)->body()->getAttribute( ATTR_BACKGROUND ).string();
-
- return KURL( m_url, relURL );
-}
-
-void KHTMLPart::slotSaveBackground()
-{
- TDEIO::MetaData metaData;
- metaData["referrer"] = d->m_referrer;
- KHTMLPopupGUIClient::saveURL( d->m_view, i18n("Save Background Image As"), backgroundURL(), metaData );
-}
-
-void KHTMLPart::slotSaveDocument()
-{
- KURL srcURL( m_url );
-
- if ( srcURL.fileName(false).isEmpty() )
- srcURL.setFileName( "index" + defaultExtension() );
-
- TDEIO::MetaData metaData;
- // Referre unknown?
- KHTMLPopupGUIClient::saveURL( d->m_view, i18n( "Save As" ), srcURL, metaData, "text/html", d->m_cacheId );
-}
-
-void KHTMLPart::slotSecurity()
-{
-// kdDebug( 6050 ) << "Meta Data:" << endl
-// << d->m_ssl_peer_cert_subject
-// << endl
-// << d->m_ssl_peer_cert_issuer
-// << endl
-// << d->m_ssl_cipher
-// << endl
-// << d->m_ssl_cipher_desc
-// << endl
-// << d->m_ssl_cipher_version
-// << endl
-// << d->m_ssl_good_from
-// << endl
-// << d->m_ssl_good_until
-// << endl
-// << d->m_ssl_cert_state
-// << endl;
-
- KSSLInfoDlg *kid = new KSSLInfoDlg(d->m_ssl_in_use, widget(), "kssl_info_dlg", true );
-
- if (d->m_bSecurityInQuestion)
- kid->setSecurityInQuestion(true);
-
- if (d->m_ssl_in_use) {
- KSSLCertificate *x = KSSLCertificate::fromString(d->m_ssl_peer_certificate.local8Bit());
- if (x) {
- // Set the chain back onto the certificate
- const TQStringList cl = TQStringList::split(TQString("\n"), d->m_ssl_peer_chain);
- TQPtrList<KSSLCertificate> ncl;
-
- ncl.setAutoDelete(true);
- TQStringList::ConstIterator it = cl.begin();
- const TQStringList::ConstIterator itEnd = cl.end();
- for (; it != itEnd; ++it) {
- KSSLCertificate* const y = KSSLCertificate::fromString((*it).local8Bit());
- if (y) ncl.append(y);
- }
-
- if (ncl.count() > 0)
- x->chain().setChain(ncl);
-
- kid->setup(x,
- d->m_ssl_peer_ip,
- m_url.url(),
- d->m_ssl_cipher,
- d->m_ssl_cipher_desc,
- d->m_ssl_cipher_version,
- d->m_ssl_cipher_used_bits.toInt(),
- d->m_ssl_cipher_bits.toInt(),
- (KSSLCertificate::KSSLValidation) d->m_ssl_cert_state.toInt()
- );
- kid->exec();
- delete x;
- } else kid->exec();
- } else kid->exec();
-}
-
-void KHTMLPart::slotSaveFrame()
-{
- KParts::ReadOnlyPart *frame = currentFrame();
- if ( !frame )
- return;
-
- KURL srcURL( frame->url() );
-
- if ( srcURL.fileName(false).isEmpty() )
- srcURL.setFileName( "index" + defaultExtension() );
-
- TDEIO::MetaData metaData;
- // Referrer unknown?
- KHTMLPopupGUIClient::saveURL( d->m_view, i18n( "Save Frame As" ), srcURL, metaData, "text/html" );
-}
-
-void KHTMLPart::slotSetEncoding()
-{
- d->m_automaticDetection->setItemChecked( int( d->m_autoDetectLanguage ), false );
- d->m_paSetEncoding->popupMenu()->setItemChecked( 0, false );
- d->m_paSetEncoding->popupMenu()->setItemChecked( d->m_paSetEncoding->popupMenu()->idAt( 2 ), true );
-
- TQString enc = TDEGlobal::charsets()->encodingForName( d->m_manualDetection->currentText() );
- setEncoding( enc, true );
-}
-
-void KHTMLPart::slotUseStylesheet()
-{
- if (d->m_doc)
- {
- bool autoselect = (d->m_paUseStylesheet->currentItem() == 0);
- d->m_sheetUsed = autoselect ? TQString() : d->m_paUseStylesheet->currentText();
- d->m_doc->updateStyleSelector();
- }
-}
-
-void KHTMLPart::updateActions()
-{
- bool frames = false;
-
- TQValueList<khtml::ChildFrame*>::ConstIterator it = d->m_frames.begin();
- const TQValueList<khtml::ChildFrame*>::ConstIterator end = d->m_frames.end();
- for (; it != end; ++it )
- if ( (*it)->m_type == khtml::ChildFrame::Frame )
- {
- frames = true;
- break;
- }
-
- d->m_paViewFrame->setEnabled( frames );
- d->m_paSaveFrame->setEnabled( frames );
-
- if ( frames )
- d->m_paFind->setText( i18n( "&Find in Frame..." ) );
- else
- d->m_paFind->setText( i18n( "&Find..." ) );
-
- KParts::Part *frame = 0;
-
- if ( frames )
- frame = currentFrame();
-
- bool enableFindAndSelectAll = true;
-
- if ( frame )
- enableFindAndSelectAll = frame->inherits( "KHTMLPart" );
-
- d->m_paFind->setEnabled( enableFindAndSelectAll );
- d->m_paSelectAll->setEnabled( enableFindAndSelectAll );
-
- bool enablePrintFrame = false;
-
- if ( frame )
- {
- TQObject *ext = KParts::BrowserExtension::childObject( frame );
- if ( ext )
- enablePrintFrame = ext->metaObject()->slotNames().contains( "print()" );
- }
-
- d->m_paPrintFrame->setEnabled( enablePrintFrame );
-
- TQString bgURL;
-
- // ### frames
- if ( d->m_doc && d->m_doc->isHTMLDocument() && static_cast<HTMLDocumentImpl*>(d->m_doc)->body() && !d->m_bClearing )
- bgURL = static_cast<HTMLDocumentImpl*>(d->m_doc)->body()->getAttribute( ATTR_BACKGROUND ).string();
-
- d->m_paSaveBackground->setEnabled( !bgURL.isEmpty() );
-
- if ( d->m_paDebugScript )
- d->m_paDebugScript->setEnabled( d->m_frame ? d->m_frame->m_jscript : 0L );
-}
-
-KParts::LiveConnectExtension *KHTMLPart::liveConnectExtension( const khtml::RenderPart *frame) const {
- const ConstFrameIt end = d->m_objects.end();
- for(ConstFrameIt it = d->m_objects.begin(); it != end; ++it )
- if ((*it)->m_frame == frame)
- return (*it)->m_liveconnect;
- return 0L;
-}
-
-bool KHTMLPart::requestFrame( khtml::RenderPart *frame, const TQString &url, const TQString &frameName,
- const TQStringList &params, bool isIFrame )
-{
- //kdDebug( 6050 ) << this << " requestFrame( ..., " << url << ", " << frameName << " )" << endl;
- FrameIt it = d->m_frames.find( frameName );
- if ( it == d->m_frames.end() )
- {
- khtml::ChildFrame * child = new khtml::ChildFrame;
- //kdDebug( 6050 ) << "inserting new frame into frame map " << frameName << endl;
- child->m_name = frameName;
- it = d->m_frames.append( child );
- }
-
- (*it)->m_type = isIFrame ? khtml::ChildFrame::IFrame : khtml::ChildFrame::Frame;
- (*it)->m_frame = frame;
- (*it)->m_params = params;
-
- // Support for <frame src="javascript:string">
- if ( url.find( TQString::fromLatin1( "javascript:" ), 0, false ) == 0 )
- {
- if ( processObjectRequest(*it, KURL("about:blank"), TQString("text/html") ) ) {
- KHTMLPart* p = static_cast<KHTMLPart*>(static_cast<KParts::ReadOnlyPart *>((*it)->m_part));
-
- // See if we want to replace content with javascript: output..
- TQVariant res = p->executeScript( DOM::Node(), KURL::decode_string( url.right( url.length() - 11) ) );
- if ( res.type() == TQVariant::String ) {
- p->begin();
- p->write( res.asString() );
- p->end();
- }
- return true;
- }
- return false;
- }
- KURL u = url.isEmpty() ? KURL() : completeURL( url );
- return requestObject( *it, u );
-}
-
-TQString KHTMLPart::requestFrameName()
-{
- return TQString::fromLatin1("<!--frame %1-->").arg(d->m_frameNameId++);
-}
-
-bool KHTMLPart::requestObject( khtml::RenderPart *frame, const TQString &url, const TQString &serviceType,
- const TQStringList &params )
-{
- //kdDebug( 6005 ) << "KHTMLPart::requestObject " << this << " frame=" << frame << endl;
- khtml::ChildFrame *child = new khtml::ChildFrame;
- FrameIt it = d->m_objects.append( child );
- (*it)->m_frame = frame;
- (*it)->m_type = khtml::ChildFrame::Object;
- (*it)->m_params = params;
-
- KParts::URLArgs args;
- args.serviceType = serviceType;
- if (!requestObject( *it, completeURL( url ), args ) && !(*it)->m_run) {
- (*it)->m_bCompleted = true;
- return false;
- }
- return true;
-}
-
-bool KHTMLPart::requestObject( khtml::ChildFrame *child, const KURL &url, const KParts::URLArgs &_args )
-{
- if (!checkLinkSecurity(url))
- {
- kdDebug(6005) << this << " KHTMLPart::requestObject checkLinkSecurity refused" << endl;
- return false;
- }
- if ( child->m_bPreloaded )
- {
- kdDebug(6005) << "KHTMLPart::requestObject preload" << endl;
- if ( child->m_frame && child->m_part )
- child->m_frame->setWidget( child->m_part->widget() );
-
- child->m_bPreloaded = false;
- return true;
- }
-
- //kdDebug(6005) << "KHTMLPart::requestObject child=" << child << " child->m_part=" << child->m_part << endl;
-
- KParts::URLArgs args( _args );
-
- if ( child->m_run )
- child->m_run->abort();
-
- if ( child->m_part && !args.reload && urlcmp( child->m_part->url().url(), url.url(), true, true ) )
- args.serviceType = child->m_serviceType;
-
- child->m_args = args;
- child->m_args.reload = (d->m_cachePolicy == TDEIO::CC_Reload);
- child->m_serviceName = TQString();
- if (!d->m_referrer.isEmpty() && !child->m_args.metaData().contains( "referrer" ))
- child->m_args.metaData()["referrer"] = d->m_referrer;
-
- child->m_args.metaData().insert("PropagateHttpHeader", "true");
- child->m_args.metaData().insert("ssl_parent_ip", d->m_ssl_parent_ip);
- child->m_args.metaData().insert("ssl_parent_cert", d->m_ssl_parent_cert);
- child->m_args.metaData().insert("main_frame_request",
- parentPart() == 0 ? "TRUE":"FALSE");
- child->m_args.metaData().insert("ssl_was_in_use",
- d->m_ssl_in_use ? "TRUE":"FALSE");
- child->m_args.metaData().insert("ssl_activate_warnings", "TRUE");
- child->m_args.metaData().insert("cross-domain", toplevelURL().url());
-
- // We want a KHTMLPart if the HTML says <frame src=""> or <frame src="about:blank">
- if ((url.isEmpty() || url.url() == "about:blank") && args.serviceType.isEmpty())
- args.serviceType = TQString::fromLatin1( "text/html" );
-
- if ( args.serviceType.isEmpty() ) {
- kdDebug(6050) << "Running new KHTMLRun for " << this << " and child=" << child << endl;
- child->m_run = new KHTMLRun( this, child, url, child->m_args, true );
- d->m_bComplete = false; // ensures we stop it in checkCompleted...
- return false;
- } else {
- return processObjectRequest( child, url, args.serviceType );
- }
-}
-
-bool KHTMLPart::processObjectRequest( khtml::ChildFrame *child, const KURL &_url, const TQString &mimetype )
-{
- //kdDebug( 6050 ) << "KHTMLPart::processObjectRequest trying to create part for " << mimetype << endl;
-
- // IMPORTANT: create a copy of the url here, because it is just a reference, which was likely to be given
- // by an emitting frame part (emit openURLRequest( blahurl, ... ) . A few lines below we delete the part
- // though -> the reference becomes invalid -> crash is likely
- KURL url( _url );
-
- // khtmlrun called us this way to indicate a loading error
- if ( d->m_onlyLocalReferences || ( url.isEmpty() && mimetype.isEmpty() ) )
- {
- child->m_bCompleted = true;
- checkCompleted();
- return true;
- }
-
- if (child->m_bNotify)
- {
- child->m_bNotify = false;
- if ( !child->m_args.lockHistory() )
- emit d->m_extension->openURLNotify();
- }
-
- if ( child->m_serviceType != mimetype || !child->m_part )
- {
- // Before attempting to load a part, check if the user wants that.
- // Many don't like getting ZIP files embedded.
- // However we don't want to ask for flash and other plugin things..
- if ( child->m_type != khtml::ChildFrame::Object )
- {
- TQString suggestedFilename;
- if ( child->m_run )
- suggestedFilename = child->m_run->suggestedFilename();
-
- KParts::BrowserRun::AskSaveResult res = KParts::BrowserRun::askEmbedOrSave(
- url, mimetype, suggestedFilename );
- switch( res ) {
- case KParts::BrowserRun::Save:
- KHTMLPopupGUIClient::saveURL( widget(), i18n( "Save As" ), url, child->m_args.metaData(), TQString(), 0, suggestedFilename);
- // fall-through
- case KParts::BrowserRun::Cancel:
- child->m_bCompleted = true;
- checkCompleted();
- return true; // done
- default: // Open
- break;
- }
- }
-
- TQStringList dummy; // the list of servicetypes handled by the part is now unused.
- KParts::ReadOnlyPart *part = createPart( d->m_view->viewport(), child->m_name.ascii(), this, child->m_name.ascii(), mimetype, child->m_serviceName, dummy, child->m_params );
-
- if ( !part )
- {
- if ( child->m_frame )
- if (child->m_frame->partLoadingErrorNotify( child, url, mimetype ))
- return true; // we succeeded after all (a fallback was used)
-
- checkEmitLoadEvent();
- return false;
- }
-
- //CRITICAL STUFF
- if ( child->m_part )
- {
- if (!::tqqt_cast<KHTMLPart*>(child->m_part) && child->m_jscript)
- child->m_jscript->clear();
- partManager()->removePart( (KParts::ReadOnlyPart *)child->m_part );
- delete (KParts::ReadOnlyPart *)child->m_part;
- if (child->m_liveconnect) {
- disconnect(child->m_liveconnect, TQT_SIGNAL(partEvent(const unsigned long, const TQString &, const KParts::LiveConnectExtension::ArgList &)), child, TQT_SLOT(liveConnectEvent(const unsigned long, const TQString&, const KParts::LiveConnectExtension::ArgList &)));
- child->m_liveconnect = 0L;
- }
- }
-
- child->m_serviceType = mimetype;
- if ( child->m_frame && part->widget() )
- child->m_frame->setWidget( part->widget() );
-
- if ( child->m_type != khtml::ChildFrame::Object )
- partManager()->addPart( part, false );
-// else
-// kdDebug(6005) << "AH! NO FRAME!!!!!" << endl;
-
- child->m_part = part;
-
- if (::tqqt_cast<KHTMLPart*>(part)) {
- static_cast<KHTMLPart*>(part)->d->m_frame = child;
- } else if (child->m_frame) {
- child->m_liveconnect = KParts::LiveConnectExtension::childObject(part);
- if (child->m_liveconnect)
- connect(child->m_liveconnect, TQT_SIGNAL(partEvent(const unsigned long, const TQString &, const KParts::LiveConnectExtension::ArgList &)), child, TQT_SLOT(liveConnectEvent(const unsigned long, const TQString&, const KParts::LiveConnectExtension::ArgList &)));
- }
- KParts::StatusBarExtension *sb = KParts::StatusBarExtension::childObject(part);
- if (sb)
- sb->setStatusBar( d->m_statusBarExtension->statusBar() );
-
- connect( part, TQT_SIGNAL( started( TDEIO::Job *) ),
- this, TQT_SLOT( slotChildStarted( TDEIO::Job *) ) );
- connect( part, TQT_SIGNAL( completed() ),
- this, TQT_SLOT( slotChildCompleted() ) );
- connect( part, TQT_SIGNAL( completed(bool) ),
- this, TQT_SLOT( slotChildCompleted(bool) ) );
- connect( part, TQT_SIGNAL( setStatusBarText( const TQString & ) ),
- this, TQT_SIGNAL( setStatusBarText( const TQString & ) ) );
- if ( part->inherits( "KHTMLPart" ) )
- {
- connect( this, TQT_SIGNAL( completed() ),
- part, TQT_SLOT( slotParentCompleted() ) );
- connect( this, TQT_SIGNAL( completed(bool) ),
- part, TQT_SLOT( slotParentCompleted() ) );
- // As soon as the child's document is created, we need to set its domain
- // (but we do so only once, so it can't be simply done in the child)
- connect( part, TQT_SIGNAL( docCreated() ),
- this, TQT_SLOT( slotChildDocCreated() ) );
- }
-
- child->m_extension = KParts::BrowserExtension::childObject( part );
-
- if ( child->m_extension )
- {
- connect( child->m_extension, TQT_SIGNAL( openURLNotify() ),
- d->m_extension, TQT_SIGNAL( openURLNotify() ) );
-
- connect( child->m_extension, TQT_SIGNAL( openURLRequestDelayed( const KURL &, const KParts::URLArgs & ) ),
- this, TQT_SLOT( slotChildURLRequest( const KURL &, const KParts::URLArgs & ) ) );
-
- connect( child->m_extension, TQT_SIGNAL( createNewWindow( const KURL &, const KParts::URLArgs & ) ),
- d->m_extension, TQT_SIGNAL( createNewWindow( const KURL &, const KParts::URLArgs & ) ) );
- connect( child->m_extension, TQT_SIGNAL( createNewWindow( const KURL &, const KParts::URLArgs &, const KParts::WindowArgs &, KParts::ReadOnlyPart *& ) ),
- d->m_extension, TQT_SIGNAL( createNewWindow( const KURL &, const KParts::URLArgs & , const KParts::WindowArgs &, KParts::ReadOnlyPart *&) ) );
-
- connect( child->m_extension, TQT_SIGNAL( popupMenu( const TQPoint &, const KFileItemList & ) ),
- d->m_extension, TQT_SIGNAL( popupMenu( const TQPoint &, const KFileItemList & ) ) );
- connect( child->m_extension, TQT_SIGNAL( popupMenu( KXMLGUIClient *, const TQPoint &, const KFileItemList & ) ),
- d->m_extension, TQT_SIGNAL( popupMenu( KXMLGUIClient *, const TQPoint &, const KFileItemList & ) ) );
- connect( child->m_extension, TQT_SIGNAL( popupMenu( KXMLGUIClient *, const TQPoint &, const KFileItemList &, const KParts::URLArgs &, KParts::BrowserExtension::PopupFlags ) ),
- d->m_extension, TQT_SIGNAL( popupMenu( KXMLGUIClient *, const TQPoint &, const KFileItemList &, const KParts::URLArgs &, KParts::BrowserExtension::PopupFlags ) ) );
- connect( child->m_extension, TQT_SIGNAL( popupMenu( const TQPoint &, const KURL &, const TQString &, mode_t ) ),
- d->m_extension, TQT_SIGNAL( popupMenu( const TQPoint &, const KURL &, const TQString &, mode_t ) ) );
- connect( child->m_extension, TQT_SIGNAL( popupMenu( KXMLGUIClient *, const TQPoint &, const KURL &, const TQString &, mode_t ) ),
- d->m_extension, TQT_SIGNAL( popupMenu( KXMLGUIClient *, const TQPoint &, const KURL &, const TQString &, mode_t ) ) );
- connect( child->m_extension, TQT_SIGNAL( popupMenu( KXMLGUIClient *, const TQPoint &, const KURL &, const KParts::URLArgs &, KParts::BrowserExtension::PopupFlags, mode_t ) ),
- d->m_extension, TQT_SIGNAL( popupMenu( KXMLGUIClient *, const TQPoint &, const KURL &, const KParts::URLArgs &, KParts::BrowserExtension::PopupFlags, mode_t ) ) );
-
- connect( child->m_extension, TQT_SIGNAL( infoMessage( const TQString & ) ),
- d->m_extension, TQT_SIGNAL( infoMessage( const TQString & ) ) );
-
- connect( child->m_extension, TQT_SIGNAL( requestFocus( KParts::ReadOnlyPart * ) ),
- this, TQT_SLOT( slotRequestFocus( KParts::ReadOnlyPart * ) ) );
-
- child->m_extension->setBrowserInterface( d->m_extension->browserInterface() );
- }
- }
- else if ( child->m_frame && child->m_part &&
- child->m_frame->widget() != child->m_part->widget() )
- child->m_frame->setWidget( child->m_part->widget() );
-
- checkEmitLoadEvent();
- // Some JS code in the load event may have destroyed the part
- // In that case, abort
- if ( !child->m_part )
- return false;
-
- if ( child->m_bPreloaded )
- {
- if ( child->m_frame && child->m_part )
- child->m_frame->setWidget( child->m_part->widget() );
-
- child->m_bPreloaded = false;
- return true;
- }
-
- child->m_args.reload = (d->m_cachePolicy == TDEIO::CC_Reload);
-
- // make sure the part has a way to find out about the mimetype.
- // we actually set it in child->m_args in requestObject already,
- // but it's useless if we had to use a KHTMLRun instance, as the
- // point the run object is to find out exactly the mimetype.
- child->m_args.serviceType = mimetype;
-
- // if not a frame set child as completed
- child->m_bCompleted = child->m_type == khtml::ChildFrame::Object;
-
- if ( child->m_extension )
- child->m_extension->setURLArgs( child->m_args );
-
- if(url.protocol() == "javascript" || url.url() == "about:blank") {
- if (!child->m_part->inherits("KHTMLPart"))
- return false;
-
- KHTMLPart* p = static_cast<KHTMLPart*>(static_cast<KParts::ReadOnlyPart *>(child->m_part));
-
- p->begin();
- if (d->m_doc && p->d->m_doc)
- p->d->m_doc->setBaseURL(d->m_doc->baseURL());
- if (!url.url().startsWith("about:")) {
- p->write(url.path());
- } else {
- p->m_url = url;
- // we need a body element. testcase: <iframe id="a"></iframe><script>alert(a.document.body);</script>
- p->write("<HTML><TITLE></TITLE><BODY></BODY></HTML>");
- }
- p->end();
- return true;
- }
- else if ( !url.isEmpty() )
- {
- //kdDebug( 6050 ) << "opening " << url.url() << " in frame " << child->m_part << endl;
- bool b = child->m_part->openURL( url );
- if (child->m_bCompleted)
- checkCompleted();
- return b;
- }
- else
- {
- child->m_bCompleted = true;
- checkCompleted();
- return true;
- }
-}
-
-KParts::ReadOnlyPart *KHTMLPart::createPart( TQWidget *parentWidget, const char *widgetName,
- TQObject *parent, const char *name, const TQString &mimetype,
- TQString &serviceName, TQStringList &serviceTypes,
- const TQStringList &params )
-{
- TQString constr;
- if ( !serviceName.isEmpty() )
- constr.append( TQString::fromLatin1( "Name == '%1'" ).arg( serviceName ) );
-
- KTrader::OfferList offers = KTrader::self()->query( mimetype, "KParts/ReadOnlyPart", constr, TQString() );
-
- if ( offers.isEmpty() ) {
- int pos = mimetype.find( "-plugin" );
- if (pos < 0)
- return 0L;
- TQString stripped_mime = mimetype.left( pos );
- offers = KTrader::self()->query( stripped_mime, "KParts/ReadOnlyPart", constr, TQString() );
- if ( offers.isEmpty() )
- return 0L;
- }
-
- KTrader::OfferList::ConstIterator it = offers.begin();
- const KTrader::OfferList::ConstIterator itEnd = offers.end();
- for ( ; it != itEnd; ++it )
- {
- KService::Ptr service = (*it);
-
- KLibFactory* const factory = KLibLoader::self()->factory( TQFile::encodeName(service->library()) );
- if ( factory ) {
- KParts::ReadOnlyPart *res = 0L;
-
- const char *className = "KParts::ReadOnlyPart";
- if ( service->serviceTypes().contains( "Browser/View" ) )
- className = "Browser/View";
-
- if ( factory->inherits( "KParts::Factory" ) )
- res = static_cast<KParts::ReadOnlyPart *>(static_cast<KParts::Factory *>( factory )->createPart( parentWidget, widgetName, parent, name, className, params ));
- else
- res = static_cast<KParts::ReadOnlyPart *>(factory->create( TQT_TQOBJECT(parentWidget), widgetName, className ));
-
- if ( res ) {
- serviceTypes = service->serviceTypes();
- serviceName = service->name();
- return res;
- }
- } else {
- // TODO KMessageBox::error and i18n, like in KonqFactory::createView?
- kdWarning() << TQString(TQString("There was an error loading the module %1.\nThe diagnostics is:\n%2")
- .arg(service->name()).arg(KLibLoader::self()->lastErrorMessage())) << endl;
- }
- }
- return 0;
-}
-
-KParts::PartManager *KHTMLPart::partManager()
-{
- if ( !d->m_manager && d->m_view )
- {
- d->m_manager = new KParts::PartManager( d->m_view->topLevelWidget(), this, "khtml part manager" );
- d->m_manager->setAllowNestedParts( true );
- connect( d->m_manager, TQT_SIGNAL( activePartChanged( KParts::Part * ) ),
- this, TQT_SLOT( slotActiveFrameChanged( KParts::Part * ) ) );
- connect( d->m_manager, TQT_SIGNAL( partRemoved( KParts::Part * ) ),
- this, TQT_SLOT( slotPartRemoved( KParts::Part * ) ) );
- }
-
- return d->m_manager;
-}
-
-void KHTMLPart::submitFormAgain()
-{
- disconnect(this, TQT_SIGNAL(completed()), this, TQT_SLOT(submitFormAgain()));
- if( d->m_doc && !d->m_doc->parsing() && d->m_submitForm)
- KHTMLPart::submitForm( d->m_submitForm->submitAction, d->m_submitForm->submitUrl, d->m_submitForm->submitFormData, d->m_submitForm->target, d->m_submitForm->submitContentType, d->m_submitForm->submitBoundary );
-
- delete d->m_submitForm;
- d->m_submitForm = 0;
-}
-
-void KHTMLPart::submitFormProxy( const char *action, const TQString &url, const TQByteArray &formData, const TQString &_target, const TQString& contentType, const TQString& boundary )
-{
- submitForm(action, url, formData, _target, contentType, boundary);
-}
-
-void KHTMLPart::submitForm( const char *action, const TQString &url, const TQByteArray &formData, const TQString &_target, const TQString& contentType, const TQString& boundary )
-{
- kdDebug(6000) << this << ": KHTMLPart::submitForm target=" << _target << " url=" << url << endl;
- if (d->m_formNotification == KHTMLPart::Only) {
- emit formSubmitNotification(action, url, formData, _target, contentType, boundary);
- return;
- } else if (d->m_formNotification == KHTMLPart::Before) {
- emit formSubmitNotification(action, url, formData, _target, contentType, boundary);
- }
-
- KURL u = completeURL( url );
-
- if ( !u.isValid() )
- {
- // ### ERROR HANDLING!
- return;
- }
-
- // Form security checks
- //
- /*
- * If these form security checks are still in this place in a month or two
- * I'm going to simply delete them.
- */
-
- /* This is separate for a reason. It has to be _before_ all script, etc,
- * AND I don't want to break anything that uses checkLinkSecurity() in
- * other places.
- */
-
- if (!d->m_submitForm) {
- if (u.protocol() != "https" && u.protocol() != "mailto") {
- if (d->m_ssl_in_use) { // Going from SSL -> nonSSL
- int rc = KMessageBox::warningContinueCancel(NULL, i18n("Warning: This is a secure form but it is attempting to send your data back unencrypted."
- "\nA third party may be able to intercept and view this information."
- "\nAre you sure you wish to continue?"),
- i18n("Network Transmission"),KGuiItem(i18n("&Send Unencrypted")));
- if (rc == KMessageBox::Cancel)
- return;
- } else { // Going from nonSSL -> nonSSL
- KSSLSettings kss(true);
- if (kss.warnOnUnencrypted()) {
- int rc = KMessageBox::warningContinueCancel(NULL,
- i18n("Warning: Your data is about to be transmitted across the network unencrypted."
- "\nAre you sure you wish to continue?"),
- i18n("Network Transmission"),
- KGuiItem(i18n("&Send Unencrypted")),
- "WarnOnUnencryptedForm");
- // Move this setting into KSSL instead
- TDEConfig *config = kapp->config();
- TQString grpNotifMsgs = TQString::fromLatin1("Notification Messages");
- TDEConfigGroupSaver saver( config, grpNotifMsgs );
-
- if (!config->readBoolEntry("WarnOnUnencryptedForm", true)) {
- config->deleteEntry("WarnOnUnencryptedForm");
- config->sync();
- kss.setWarnOnUnencrypted(false);
- kss.save();
- }
- if (rc == KMessageBox::Cancel)
- return;
- }
- }
- }
-
- if (u.protocol() == "mailto") {
- int rc = KMessageBox::warningContinueCancel(NULL,
- i18n("This site is attempting to submit form data via email.\n"
- "Do you want to continue?"),
- i18n("Network Transmission"),
- KGuiItem(i18n("&Send Email")),
- "WarnTriedEmailSubmit");
-
- if (rc == KMessageBox::Cancel) {
- return;
- }
- }
- }
-
- // End form security checks
- //
-
- TQString urlstring = u.url();
-
- if ( urlstring.find( TQString::fromLatin1( "javascript:" ), 0, false ) == 0 ) {
- urlstring = KURL::decode_string(urlstring);
- crossFrameExecuteScript( _target, urlstring.right( urlstring.length() - 11) );
- return;
- }
-
- if (!checkLinkSecurity(u,
- i18n( "<qt>The form will be submitted to <BR><B>%1</B><BR>on your local filesystem.<BR>Do you want to submit the form?" ),
- i18n( "Submit" )))
- return;
-
- KParts::URLArgs args;
-
- if (!d->m_referrer.isEmpty())
- args.metaData()["referrer"] = d->m_referrer;
-
- args.metaData().insert("PropagateHttpHeader", "true");
- args.metaData().insert("ssl_parent_ip", d->m_ssl_parent_ip);
- args.metaData().insert("ssl_parent_cert", d->m_ssl_parent_cert);
- args.metaData().insert("main_frame_request",
- parentPart() == 0 ? "TRUE":"FALSE");
- args.metaData().insert("ssl_was_in_use", d->m_ssl_in_use ? "TRUE":"FALSE");
- args.metaData().insert("ssl_activate_warnings", "TRUE");
-//WABA: When we post a form we should treat it as the main url
-//the request should never be considered cross-domain
-//args.metaData().insert("cross-domain", toplevelURL().url());
- args.frameName = _target.isEmpty() ? d->m_doc->baseTarget() : _target ;
-
- // Handle mailto: forms
- if (u.protocol() == "mailto") {
- // 1) Check for attach= and strip it
- TQString q = u.query().mid(1);
- TQStringList nvps = TQStringList::split("&", q);
- bool triedToAttach = false;
-
- TQStringList::Iterator nvp = nvps.begin();
- const TQStringList::Iterator nvpEnd = nvps.end();
-
-// cannot be a for loop as if something is removed we don't want to do ++nvp, as
-// remove returns an iterator pointing to the next item
-
- while (nvp != nvpEnd) {
- const TQStringList pair = TQStringList::split("=", *nvp);
- if (pair.count() >= 2) {
- if (pair.first().lower() == "attach") {
- nvp = nvps.remove(nvp);
- triedToAttach = true;
- } else {
- ++nvp;
- }
- } else {
- ++nvp;
- }
- }
-
- if (triedToAttach)
- KMessageBox::information(NULL, i18n("This site attempted to attach a file from your computer in the form submission. The attachment was removed for your protection."), i18n("TDE"), "WarnTriedAttach");
-
- // 2) Append body=
- TQString bodyEnc;
- if (contentType.lower() == "multipart/form-data") {
- // FIXME: is this correct? I suspect not
- bodyEnc = KURL::encode_string(TQString::fromLatin1(formData.data(),
- formData.size()));
- } else if (contentType.lower() == "text/plain") {
- // Convention seems to be to decode, and s/&/\n/
- TQString tmpbody = TQString::fromLatin1(formData.data(),
- formData.size());
- tmpbody.replace(TQRegExp("[&]"), "\n");
- tmpbody.replace(TQRegExp("[+]"), " ");
- tmpbody = KURL::decode_string(tmpbody); // Decode the rest of it
- bodyEnc = KURL::encode_string(tmpbody); // Recode for the URL
- } else {
- bodyEnc = KURL::encode_string(TQString::fromLatin1(formData.data(),
- formData.size()));
- }
-
- nvps.append(TQString("body=%1").arg(bodyEnc));
- q = nvps.join("&");
- u.setQuery(q);
- }
-
- if ( strcmp( action, "get" ) == 0 ) {
- if (u.protocol() != "mailto")
- u.setQuery( TQString::fromLatin1( formData.data(), formData.size() ) );
- args.setDoPost( false );
- }
- else {
- args.postData = formData;
- args.setDoPost( true );
-
- // construct some user headers if necessary
- if (contentType.isNull() || contentType == "application/x-www-form-urlencoded")
- args.setContentType( "Content-Type: application/x-www-form-urlencoded" );
- else // contentType must be "multipart/form-data"
- args.setContentType( "Content-Type: " + contentType + "; boundary=" + boundary );
- }
-
- if ( d->m_doc->parsing() || d->m_runningScripts > 0 ) {
- if( d->m_submitForm ) {
- kdDebug(6000) << "KHTMLPart::submitForm ABORTING!" << endl;
- return;
- }
- d->m_submitForm = new KHTMLPartPrivate::SubmitForm;
- d->m_submitForm->submitAction = action;
- d->m_submitForm->submitUrl = url;
- d->m_submitForm->submitFormData = formData;
- d->m_submitForm->target = _target;
- d->m_submitForm->submitContentType = contentType;
- d->m_submitForm->submitBoundary = boundary;
- connect(this, TQT_SIGNAL(completed()), this, TQT_SLOT(submitFormAgain()));
- }
- else
- {
- emit d->m_extension->openURLRequest( u, args );
- }
-}
-
-void KHTMLPart::popupMenu( const TQString &linkUrl )
-{
- KURL popupURL;
- KURL linkKURL;
- KParts::URLArgs args;
- TQString referrer;
- KParts::BrowserExtension::PopupFlags itemflags=KParts::BrowserExtension::ShowBookmark | KParts::BrowserExtension::ShowReload;
-
- if ( linkUrl.isEmpty() ) { // click on background
- KHTMLPart* khtmlPart = this;
- while ( khtmlPart->parentPart() )
- {
- khtmlPart=khtmlPart->parentPart();
- }
- popupURL = khtmlPart->url();
- referrer = khtmlPart->pageReferrer();
- if (hasSelection())
- itemflags = KParts::BrowserExtension::ShowTextSelectionItems;
- else
- itemflags |= KParts::BrowserExtension::ShowNavigationItems;
- } else { // click on link
- popupURL = completeURL( linkUrl );
- linkKURL = popupURL;
- referrer = this->referrer();
-
- if (!(d->m_strSelectedURLTarget).isEmpty() &&
- (d->m_strSelectedURLTarget.lower() != "_top") &&
- (d->m_strSelectedURLTarget.lower() != "_self") &&
- (d->m_strSelectedURLTarget.lower() != "_parent")) {
- if (d->m_strSelectedURLTarget.lower() == "_blank")
- args.setForcesNewWindow(true);
- else {
- KHTMLPart *p = this;
- while (p->parentPart())
- p = p->parentPart();
- if (!p->frameExists(d->m_strSelectedURLTarget))
- args.setForcesNewWindow(true);
- }
- }
- }
-
- // Danger, Will Robinson. The Popup might stay around for a much
- // longer time than KHTMLPart. Deal with it.
- KHTMLPopupGUIClient* client = new KHTMLPopupGUIClient( this, d->m_popupMenuXML, linkKURL );
- TQGuardedPtr<TQObject> guard( client );
-
- TQString mimetype = TQString::fromLatin1( "text/html" );
- args.metaData()["referrer"] = referrer;
-
- if (!linkUrl.isEmpty()) // over a link
- {
- if (popupURL.isLocalFile()) // safe to do this
- {
- mimetype = KMimeType::findByURL(popupURL,0,true,false)->name();
- }
- else // look at "extension" of link
- {
- const TQString fname(popupURL.fileName(false));
- if (!fname.isEmpty() && !popupURL.hasRef() && popupURL.query().isEmpty())
- {
- KMimeType::Ptr pmt = KMimeType::findByPath(fname,0,true);
-
- // Further check for mime types guessed from the extension which,
- // on a web page, are more likely to be a script delivering content
- // of undecidable type. If the mime type from the extension is one
- // of these, don't use it. Retain the original type 'text/html'.
- if (pmt->name() != KMimeType::defaultMimeType() &&
- !pmt->is("application/x-perl") &&
- !pmt->is("application/x-perl-module") &&
- !pmt->is("application/x-php") &&
- !pmt->is("application/x-python-bytecode") &&
- !pmt->is("application/x-python") &&
- !pmt->is("application/x-shellscript"))
- mimetype = pmt->name();
- }
- }
- }
-
- args.serviceType = mimetype;
-
- emit d->m_extension->popupMenu( client, TQCursor::pos(), popupURL, args, itemflags, S_IFREG /*always a file*/);
-
- if ( !guard.isNull() ) {
- delete client;
- emit popupMenu(linkUrl, TQCursor::pos());
- d->m_strSelectedURL = d->m_strSelectedURLTarget = TQString();
- }
-}
-
-void KHTMLPart::slotParentCompleted()
-{
- //kdDebug(6050) << this << " slotParentCompleted()" << endl;
- if ( !d->m_redirectURL.isEmpty() && !d->m_redirectionTimer.isActive() )
- {
- //kdDebug(6050) << this << ": starting timer for child redirection -> " << d->m_redirectURL << endl;
- d->m_redirectionTimer.start( 1000 * d->m_delayRedirect, true );
- }
-}
-
-void KHTMLPart::slotChildStarted( TDEIO::Job *job )
-{
- khtml::ChildFrame *child = frame( TQT_TQOBJECT_CONST(sender()) );
-
- assert( child );
-
- child->m_bCompleted = false;
-
- if ( d->m_bComplete )
- {
-#if 0
- // WABA: Looks like this belongs somewhere else
- if ( !parentPart() ) // "toplevel" html document? if yes, then notify the hosting browser about the document (url) changes
- {
- emit d->m_extension->openURLNotify();
- }
-#endif
- d->m_bComplete = false;
- emit started( job );
- }
-}
-
-void KHTMLPart::slotChildCompleted()
-{
- slotChildCompleted( false );
-}
-
-void KHTMLPart::slotChildCompleted( bool pendingAction )
-{
- khtml::ChildFrame *child = frame( TQT_TQOBJECT_CONST(sender()) );
-
- if ( child ) {
- kdDebug(6050) << this << " slotChildCompleted child=" << child << " m_frame=" << child->m_frame << endl;
- child->m_bCompleted = true;
- child->m_bPendingRedirection = pendingAction;
- child->m_args = KParts::URLArgs();
- }
- checkCompleted();
-}
-
-void KHTMLPart::slotChildDocCreated()
-{
- const KHTMLPart* htmlFrame = static_cast<const KHTMLPart *>(sender());
- // Set domain to the frameset's domain
- // This must only be done when loading the frameset initially (#22039),
- // not when following a link in a frame (#44162).
- if ( d->m_doc && d->m_doc->isHTMLDocument() )
- {
- if ( sender()->inherits("KHTMLPart") )
- {
- DOMString domain = static_cast<HTMLDocumentImpl*>(d->m_doc)->domain();
- if (htmlFrame->d->m_doc && htmlFrame->d->m_doc->isHTMLDocument() )
- //kdDebug(6050) << "KHTMLPart::slotChildDocCreated: url: " << htmlFrame->m_url.url() << endl;
- static_cast<HTMLDocumentImpl*>(htmlFrame->d->m_doc)->setDomain( domain );
- }
- }
- // So it only happens once
- disconnect( htmlFrame, TQT_SIGNAL( docCreated() ), this, TQT_SLOT( slotChildDocCreated() ) );
-}
-
-void KHTMLPart::slotChildURLRequest( const KURL &url, const KParts::URLArgs &args )
-{
- khtml::ChildFrame *child = frame( TQT_TQOBJECT_CONST(sender())->parent() );
- KHTMLPart *callingHtmlPart = const_cast<KHTMLPart *>(dynamic_cast<const KHTMLPart *>(sender()->parent()));
-
- // TODO: handle child target correctly! currently the script are always executed fur the parent
- TQString urlStr = url.url();
- if ( urlStr.find( TQString::fromLatin1( "javascript:" ), 0, false ) == 0 ) {
- TQString script = KURL::decode_string( urlStr.right( urlStr.length() - 11 ) );
- executeScript( DOM::Node(), script );
- return;
- }
-
- TQString frameName = args.frameName.lower();
- if ( !frameName.isEmpty() ) {
- if ( frameName == TQString::fromLatin1( "_top" ) )
- {
- emit d->m_extension->openURLRequest( url, args );
- return;
- }
- else if ( frameName == TQString::fromLatin1( "_blank" ) )
- {
- emit d->m_extension->createNewWindow( url, args );
- return;
- }
- else if ( frameName == TQString::fromLatin1( "_parent" ) )
- {
- KParts::URLArgs newArgs( args );
- newArgs.frameName = TQString();
-
- emit d->m_extension->openURLRequest( url, newArgs );
- return;
- }
- else if ( frameName != TQString::fromLatin1( "_self" ) )
- {
- khtml::ChildFrame *_frame = recursiveFrameRequest( callingHtmlPart, url, args );
-
- if ( !_frame )
- {
- emit d->m_extension->openURLRequest( url, args );
- return;
- }
-
- child = _frame;
- }
- }
-
- if ( child && child->m_type != khtml::ChildFrame::Object ) {
- // Inform someone that we are about to show something else.
- child->m_bNotify = true;
- requestObject( child, url, args );
- } else if ( frameName== "_self" ) // this is for embedded objects (via <object>) which want to replace the current document
- {
- KParts::URLArgs newArgs( args );
- newArgs.frameName = TQString();
- emit d->m_extension->openURLRequest( url, newArgs );
- }
-}
-
-void KHTMLPart::slotRequestFocus( KParts::ReadOnlyPart * )
-{
- emit d->m_extension->requestFocus(this);
-}
-
-khtml::ChildFrame *KHTMLPart::frame( const TQObject *obj )
-{
- assert( obj->inherits( "KParts::ReadOnlyPart" ) );
- const KParts::ReadOnlyPart* const part = static_cast<const KParts::ReadOnlyPart *>( obj );
-
- FrameIt it = d->m_frames.begin();
- const FrameIt end = d->m_frames.end();
- for (; it != end; ++it )
- if ( (KParts::ReadOnlyPart *)(*it)->m_part == part )
- return *it;
-
- FrameIt oi = d->m_objects.begin();
- const FrameIt oiEnd = d->m_objects.end();
- for (; oi != oiEnd; ++oi )
- if ( (KParts::ReadOnlyPart *)(*oi)->m_part == part )
- return *oi;
-
- return 0L;
-}
-
-//#define DEBUG_FINDFRAME
-
-bool KHTMLPart::checkFrameAccess(KHTMLPart *callingHtmlPart)
-{
- if (callingHtmlPart == this)
- return true; // trivial
-
- if (htmlDocument().isNull()) {
-#ifdef DEBUG_FINDFRAME
- kdDebug(6050) << "KHTMLPart::checkFrameAccess: Empty part " << this << " URL = " << m_url << endl;
-#endif
- return false; // we are empty?
- }
-
- // now compare the domains
- if (callingHtmlPart && !callingHtmlPart->htmlDocument().isNull() &&
- !htmlDocument().isNull()) {
- DOM::DOMString actDomain = callingHtmlPart->htmlDocument().domain();
- DOM::DOMString destDomain = htmlDocument().domain();
-
-#ifdef DEBUG_FINDFRAME
- kdDebug(6050) << "KHTMLPart::checkFrameAccess: actDomain = '" << actDomain.string() << "' destDomain = '" << destDomain.string() << "'" << endl;
-#endif
-
- if (actDomain == destDomain)
- return true;
- }
-#ifdef DEBUG_FINDFRAME
- else
- {
- kdDebug(6050) << "KHTMLPart::checkFrameAccess: Unknown part/domain " << callingHtmlPart << " tries to access part " << this << endl;
- }
-#endif
- return false;
-}
-
-KHTMLPart *
-KHTMLPart::findFrameParent( KParts::ReadOnlyPart *callingPart, const TQString &f, khtml::ChildFrame **childFrame )
-{
-#ifdef DEBUG_FINDFRAME
- kdDebug(6050) << "KHTMLPart::findFrameParent: this = " << this << " URL = " << m_url << " name = " << name() << " findFrameParent( " << f << " )" << endl;
-#endif
- // Check access
- KHTMLPart* const callingHtmlPart = dynamic_cast<KHTMLPart *>(callingPart);
-
- if (!checkFrameAccess(callingHtmlPart))
- return 0;
-
- // match encoding used in KonqView::setViewName()
- if (!childFrame && !parentPart() && (TQString::fromLocal8Bit(name()) == f))
- return this;
-
- FrameIt it = d->m_frames.find( f );
- const FrameIt end = d->m_frames.end();
- if ( it != end )
- {
-#ifdef DEBUG_FINDFRAME
- kdDebug(6050) << "KHTMLPart::findFrameParent: FOUND!" << endl;
-#endif
- if (childFrame)
- *childFrame = *it;
- return this;
- }
-
- it = d->m_frames.begin();
- for (; it != end; ++it )
- {
- KParts::ReadOnlyPart* const p = (*it)->m_part;
- if ( p && p->inherits( "KHTMLPart" ))
- {
- KHTMLPart* const frameParent = static_cast<KHTMLPart*>(p)->findFrameParent(callingPart, f, childFrame);
- if (frameParent)
- return frameParent;
- }
- }
- return 0;
-}
-
-
-KHTMLPart *KHTMLPart::findFrame( const TQString &f )
-{
- khtml::ChildFrame *childFrame;
- KHTMLPart *parentFrame = findFrameParent(this, f, &childFrame);
- if (parentFrame)
- {
- KParts::ReadOnlyPart *p = childFrame->m_part;
- if ( p && p->inherits( "KHTMLPart" ))
- return static_cast<KHTMLPart *>(p);
- }
- return 0;
-}
-
-KParts::ReadOnlyPart *KHTMLPart::findFramePart(const TQString &f)
-{
- khtml::ChildFrame *childFrame;
- return findFrameParent(this, f, &childFrame) ? static_cast<KParts::ReadOnlyPart *>(childFrame->m_part) : 0L;
-}
-
-KParts::ReadOnlyPart *KHTMLPart::currentFrame() const
-{
- KParts::ReadOnlyPart* part = (KParts::ReadOnlyPart*)(this);
- // Find active part in our frame manager, in case we are a frameset
- // and keep doing that (in case of nested framesets).
- // Just realized we could also do this recursively, calling part->currentFrame()...
- while ( part && part->inherits("KHTMLPart") &&
- static_cast<KHTMLPart *>(part)->d->m_frames.count() > 0 ) {
- KHTMLPart* frameset = static_cast<KHTMLPart *>(part);
- part = static_cast<KParts::ReadOnlyPart *>(frameset->partManager()->activePart());
- if ( !part ) return frameset;
- }
- return part;
-}
-
-bool KHTMLPart::frameExists( const TQString &frameName )
-{
- ConstFrameIt it = d->m_frames.find( frameName );
- if ( it == d->m_frames.end() )
- return false;
-
- // WABA: We only return true if the child actually has a frame
- // set. Otherwise we might find our preloaded-selve.
- // This happens when we restore the frameset.
- return (!(*it)->m_frame.isNull());
-}
-
-KJSProxy *KHTMLPart::framejScript(KParts::ReadOnlyPart *framePart)
-{
- KHTMLPart* const kp = ::tqqt_cast<KHTMLPart*>(framePart);
- if (kp)
- return kp->jScript();
-
- FrameIt it = d->m_frames.begin();
- const FrameIt itEnd = d->m_frames.end();
-
- for (; it != itEnd; ++it)
- if (framePart == (*it)->m_part) {
- if (!(*it)->m_jscript)
- createJScript(*it);
- return (*it)->m_jscript;
- }
- return 0L;
-}
-
-KHTMLPart *KHTMLPart::parentPart()
-{
- return ::tqqt_cast<KHTMLPart *>( parent() );
-}
-
-khtml::ChildFrame *KHTMLPart::recursiveFrameRequest( KHTMLPart *callingHtmlPart, const KURL &url,
- const KParts::URLArgs &args, bool callParent )
-{
-#ifdef DEBUG_FINDFRAME
- kdDebug( 6050 ) << "KHTMLPart::recursiveFrameRequest this = " << this << ", frame = " << args.frameName << ", url = " << url << endl;
-#endif
- khtml::ChildFrame *childFrame;
- KHTMLPart *childPart = findFrameParent(callingHtmlPart, args.frameName, &childFrame);
- if (childPart)
- {
- if (childPart == this)
- return childFrame;
-
- childPart->requestObject( childFrame, url, args );
- return 0;
- }
-
- if ( parentPart() && callParent )
- {
- khtml::ChildFrame *res = parentPart()->recursiveFrameRequest( callingHtmlPart, url, args, callParent );
-
- if ( res )
- parentPart()->requestObject( res, url, args );
- }
-
- return 0L;
-}
-
-#ifndef NDEBUG
-static int s_saveStateIndentLevel = 0;
-#endif
-
-void KHTMLPart::saveState( TQDataStream &stream )
-{
-#ifndef NDEBUG
- TQString indent = TQString().leftJustify( s_saveStateIndentLevel * 4, ' ' );
- const int indentLevel = s_saveStateIndentLevel++;
- kdDebug( 6050 ) << indent << "saveState this=" << this << " '" << name() << "' saving URL " << m_url.url() << endl;
-#endif
-
- stream << m_url << (TQ_INT32)d->m_view->contentsX() << (TQ_INT32)d->m_view->contentsY()
- << (TQ_INT32) d->m_view->contentsWidth() << (TQ_INT32) d->m_view->contentsHeight() << (TQ_INT32) d->m_view->marginWidth() << (TQ_INT32) d->m_view->marginHeight();
-
- // save link cursor position
- int focusNodeNumber;
- if (!d->m_focusNodeRestored)
- focusNodeNumber = d->m_focusNodeNumber;
- else if (d->m_doc && d->m_doc->focusNode())
- focusNodeNumber = d->m_doc->nodeAbsIndex(d->m_doc->focusNode());
- else
- focusNodeNumber = -1;
- stream << focusNodeNumber;
-
- // Save the doc's cache id.
- stream << d->m_cacheId;
-
- // Save the state of the document (Most notably the state of any forms)
- TQStringList docState;
- if (d->m_doc)
- {
- docState = d->m_doc->docState();
- }
- stream << d->m_encoding << d->m_sheetUsed << docState;
-
- stream << d->m_zoomFactor;
-
- stream << d->m_httpHeaders;
- stream << d->m_pageServices;
- stream << d->m_pageReferrer;
-
- // Save ssl data
- stream << d->m_ssl_in_use
- << d->m_ssl_peer_certificate
- << d->m_ssl_peer_chain
- << d->m_ssl_peer_ip
- << d->m_ssl_cipher
- << d->m_ssl_cipher_desc
- << d->m_ssl_cipher_version
- << d->m_ssl_cipher_used_bits
- << d->m_ssl_cipher_bits
- << d->m_ssl_cert_state
- << d->m_ssl_parent_ip
- << d->m_ssl_parent_cert;
-
-
- TQStringList frameNameLst, frameServiceTypeLst, frameServiceNameLst;
- KURL::List frameURLLst;
- TQValueList<TQByteArray> frameStateBufferLst;
-
- ConstFrameIt it = d->m_frames.begin();
- const ConstFrameIt end = d->m_frames.end();
- for (; it != end; ++it )
- {
- if ( !(*it)->m_part )
- continue;
-
- frameNameLst << (*it)->m_name;
- frameServiceTypeLst << (*it)->m_serviceType;
- frameServiceNameLst << (*it)->m_serviceName;
- frameURLLst << (*it)->m_part->url();
-
- TQByteArray state;
- TQDataStream frameStream( state, IO_WriteOnly );
-
- if ( (*it)->m_extension )
- (*it)->m_extension->saveState( frameStream );
-
- frameStateBufferLst << state;
- }
-
- // Save frame data
- stream << (TQ_UINT32) frameNameLst.count();
- stream << frameNameLst << frameServiceTypeLst << frameServiceNameLst << frameURLLst << frameStateBufferLst;
-#ifndef NDEBUG
- s_saveStateIndentLevel = indentLevel;
-#endif
-}
-
-void KHTMLPart::restoreState( TQDataStream &stream )
-{
- KURL u;
- TQ_INT32 xOffset, yOffset, wContents, hContents, mWidth, mHeight;
- TQ_UINT32 frameCount;
- TQStringList frameNames, frameServiceTypes, docState, frameServiceNames;
- KURL::List frameURLs;
- TQValueList<TQByteArray> frameStateBuffers;
- TQValueList<int> fSizes;
- TQString encoding, sheetUsed;
- long old_cacheId = d->m_cacheId;
-
- stream >> u >> xOffset >> yOffset >> wContents >> hContents >> mWidth >> mHeight;
-
- d->m_view->setMarginWidth( mWidth );
- d->m_view->setMarginHeight( mHeight );
-
- // restore link cursor position
- // nth node is active. value is set in checkCompleted()
- stream >> d->m_focusNodeNumber;
- d->m_focusNodeRestored = false;
-
- stream >> d->m_cacheId;
-
- stream >> encoding >> sheetUsed >> docState;
-
- d->m_encoding = encoding;
- d->m_sheetUsed = sheetUsed;
-
- int zoomFactor;
- stream >> zoomFactor;
- setZoomFactor(zoomFactor);
-
- stream >> d->m_httpHeaders;
- stream >> d->m_pageServices;
- stream >> d->m_pageReferrer;
-
- // Restore ssl data
- stream >> d->m_ssl_in_use
- >> d->m_ssl_peer_certificate
- >> d->m_ssl_peer_chain
- >> d->m_ssl_peer_ip
- >> d->m_ssl_cipher
- >> d->m_ssl_cipher_desc
- >> d->m_ssl_cipher_version
- >> d->m_ssl_cipher_used_bits
- >> d->m_ssl_cipher_bits
- >> d->m_ssl_cert_state
- >> d->m_ssl_parent_ip
- >> d->m_ssl_parent_cert;
-
- setPageSecurity( d->m_ssl_in_use ? Encrypted : NotCrypted );
-
- stream >> frameCount >> frameNames >> frameServiceTypes >> frameServiceNames
- >> frameURLs >> frameStateBuffers;
-
- d->m_bComplete = false;
- d->m_bLoadEventEmitted = false;
-
-// kdDebug( 6050 ) << "restoreState() docState.count() = " << docState.count() << endl;
-// kdDebug( 6050 ) << "m_url " << m_url.url() << " <-> " << u.url() << endl;
-// kdDebug( 6050 ) << "m_frames.count() " << d->m_frames.count() << " <-> " << frameCount << endl;
-
- if (d->m_cacheId == old_cacheId)
- {
- // Partial restore
- d->m_redirectionTimer.stop();
-
- FrameIt fIt = d->m_frames.begin();
- const FrameIt fEnd = d->m_frames.end();
-
- for (; fIt != fEnd; ++fIt )
- (*fIt)->m_bCompleted = false;
-
- fIt = d->m_frames.begin();
-
- TQStringList::ConstIterator fNameIt = frameNames.begin();
- TQStringList::ConstIterator fServiceTypeIt = frameServiceTypes.begin();
- TQStringList::ConstIterator fServiceNameIt = frameServiceNames.begin();
- KURL::List::ConstIterator fURLIt = frameURLs.begin();
- TQValueList<TQByteArray>::ConstIterator fBufferIt = frameStateBuffers.begin();
-
- for (; fIt != fEnd; ++fIt, ++fNameIt, ++fServiceTypeIt, ++fServiceNameIt, ++fURLIt, ++fBufferIt )
- {
- khtml::ChildFrame* const child = *fIt;
-
-// kdDebug( 6050 ) << *fNameIt << " ---- " << *fServiceTypeIt << endl;
-
- if ( child->m_name != *fNameIt || child->m_serviceType != *fServiceTypeIt )
- {
- child->m_bPreloaded = true;
- child->m_name = *fNameIt;
- child->m_serviceName = *fServiceNameIt;
- processObjectRequest( child, *fURLIt, *fServiceTypeIt );
- }
- if ( child->m_part )
- {
- child->m_bCompleted = false;
- if ( child->m_extension && !(*fBufferIt).isEmpty() )
- {
- TQDataStream frameStream( *fBufferIt, IO_ReadOnly );
- child->m_extension->restoreState( frameStream );
- }
- else
- child->m_part->openURL( *fURLIt );
- }
- }
-
- KParts::URLArgs args( d->m_extension->urlArgs() );
- args.xOffset = xOffset;
- args.yOffset = yOffset;
- args.docState = docState;
- d->m_extension->setURLArgs( args );
-
- d->m_view->resizeContents( wContents, hContents);
- d->m_view->setContentsPos( xOffset, yOffset );
-
- m_url = u;
- }
- else
- {
- // Full restore.
- closeURL();
- // We must force a clear because we want to be sure to delete all
- // frames.
- d->m_bCleared = false;
- clear();
- d->m_encoding = encoding;
- d->m_sheetUsed = sheetUsed;
-
- TQStringList::ConstIterator fNameIt = frameNames.begin();
- const TQStringList::ConstIterator fNameEnd = frameNames.end();
-
- TQStringList::ConstIterator fServiceTypeIt = frameServiceTypes.begin();
- TQStringList::ConstIterator fServiceNameIt = frameServiceNames.begin();
- KURL::List::ConstIterator fURLIt = frameURLs.begin();
- TQValueList<TQByteArray>::ConstIterator fBufferIt = frameStateBuffers.begin();
-
- for (; fNameIt != fNameEnd; ++fNameIt, ++fServiceTypeIt, ++fServiceNameIt, ++fURLIt, ++fBufferIt )
- {
- khtml::ChildFrame* const newChild = new khtml::ChildFrame;
- newChild->m_bPreloaded = true;
- newChild->m_name = *fNameIt;
- newChild->m_serviceName = *fServiceNameIt;
-
-// kdDebug( 6050 ) << *fNameIt << " ---- " << *fServiceTypeIt << endl;
-
- const FrameIt childFrame = d->m_frames.append( newChild );
-
- processObjectRequest( *childFrame, *fURLIt, *fServiceTypeIt );
-
- (*childFrame)->m_bPreloaded = true;
-
- if ( (*childFrame)->m_part )
- {
- if ( (*childFrame)->m_extension )
- if ( (*childFrame)->m_extension && !(*fBufferIt).isEmpty() )
- {
- TQDataStream frameStream( *fBufferIt, IO_ReadOnly );
- (*childFrame)->m_extension->restoreState( frameStream );
- }
- else
- (*childFrame)->m_part->openURL( *fURLIt );
- }
- }
-
- KParts::URLArgs args( d->m_extension->urlArgs() );
- args.xOffset = xOffset;
- args.yOffset = yOffset;
- args.docState = docState;
-
- d->m_extension->setURLArgs( args );
- if (!KHTMLPageCache::self()->isComplete(d->m_cacheId))
- {
- d->m_restored = true;
- openURL( u );
- d->m_restored = false;
- }
- else
- {
- restoreURL( u );
- }
- }
-
-}
-
-void KHTMLPart::show()
-{
- if ( d->m_view )
- d->m_view->show();
-}
-
-void KHTMLPart::hide()
-{
- if ( d->m_view )
- d->m_view->hide();
-}
-
-DOM::Node KHTMLPart::nodeUnderMouse() const
-{
- return d->m_view->nodeUnderMouse();
-}
-
-DOM::Node KHTMLPart::nonSharedNodeUnderMouse() const
-{
- return d->m_view->nonSharedNodeUnderMouse();
-}
-
-void KHTMLPart::emitSelectionChanged()
-{
- emit d->m_extension->enableAction( "copy", hasSelection() );
- if ( d->m_findDialog )
- d->m_findDialog->setHasSelection( hasSelection() );
-
- emit d->m_extension->selectionInfo( selectedText() );
- emit selectionChanged();
-}
-
-int KHTMLPart::zoomFactor() const
-{
- return d->m_zoomFactor;
-}
-
-// ### make the list configurable ?
-static const int zoomSizes[] = { 20, 40, 60, 80, 90, 95, 100, 105, 110, 120, 140, 160, 180, 200, 250, 300 };
-static const int zoomSizeCount = (sizeof(zoomSizes) / sizeof(int));
-static const int minZoom = 20;
-static const int maxZoom = 300;
-
-// My idea of useful stepping ;-) (LS)
-extern const int KDE_NO_EXPORT fastZoomSizes[] = { 20, 50, 75, 90, 100, 120, 150, 200, 300 };
-extern const int KDE_NO_EXPORT fastZoomSizeCount = sizeof fastZoomSizes / sizeof fastZoomSizes[0];
-
-void KHTMLPart::slotIncZoom()
-{
- zoomIn(zoomSizes, zoomSizeCount);
-}
-
-void KHTMLPart::slotDecZoom()
-{
- zoomOut(zoomSizes, zoomSizeCount);
-}
-
-void KHTMLPart::slotIncZoomFast()
-{
- zoomIn(fastZoomSizes, fastZoomSizeCount);
-}
-
-void KHTMLPart::slotDecZoomFast()
-{
- zoomOut(fastZoomSizes, fastZoomSizeCount);
-}
-
-void KHTMLPart::zoomIn(const int stepping[], int count)
-{
- int zoomFactor = d->m_zoomFactor;
-
- if (zoomFactor < maxZoom) {
- // find the entry nearest to the given zoomsizes
- for (int i = 0; i < count; ++i)
- if (stepping[i] > zoomFactor) {
- zoomFactor = stepping[i];
- break;
- }
- setZoomFactor(zoomFactor);
- }
-}
-
-void KHTMLPart::zoomOut(const int stepping[], int count)
-{
- int zoomFactor = d->m_zoomFactor;
- if (zoomFactor > minZoom) {
- // find the entry nearest to the given zoomsizes
- for (int i = count-1; i >= 0; --i)
- if (stepping[i] < zoomFactor) {
- zoomFactor = stepping[i];
- break;
- }
- setZoomFactor(zoomFactor);
- }
-}
-
-void KHTMLPart::setZoomFactor (int percent)
-{
- if (percent < minZoom) percent = minZoom;
- if (percent > maxZoom) percent = maxZoom;
- if (d->m_zoomFactor == percent) return;
- d->m_zoomFactor = percent;
-
- if(d->m_doc) {
- TQApplication::setOverrideCursor( tqwaitCursor );
- if (d->m_doc->styleSelector())
- d->m_doc->styleSelector()->computeFontSizes(d->m_doc->paintDeviceMetrics(), d->m_zoomFactor);
- d->m_doc->recalcStyle( NodeImpl::Force );
- TQApplication::restoreOverrideCursor();
- }
-
- ConstFrameIt it = d->m_frames.begin();
- const ConstFrameIt end = d->m_frames.end();
- for (; it != end; ++it )
- if ( !( *it )->m_part.isNull() && (*it)->m_part->inherits( "KHTMLPart" ) ) {
- KParts::ReadOnlyPart* const p = ( *it )->m_part;
- static_cast<KHTMLPart*>( p )->setZoomFactor(d->m_zoomFactor);
- }
-
- if ( d->m_guiProfile == BrowserViewGUI ) {
- d->m_paDecZoomFactor->setEnabled( d->m_zoomFactor > minZoom );
- d->m_paIncZoomFactor->setEnabled( d->m_zoomFactor < maxZoom );
- }
-}
-
-void KHTMLPart::slotZoomView( int delta )
-{
- if ( delta < 0 )
- slotIncZoom();
- else
- slotDecZoom();
-}
-
-void KHTMLPart::setStatusBarText( const TQString& text, StatusBarPriority p)
-{
- if (!d->m_statusMessagesEnabled)
- return;
-
- d->m_statusBarText[p] = text;
-
- // shift handling ?
- TQString tobe = d->m_statusBarText[BarHoverText];
- if (tobe.isEmpty())
- tobe = d->m_statusBarText[BarOverrideText];
- if (tobe.isEmpty()) {
- tobe = d->m_statusBarText[BarDefaultText];
- if (!tobe.isEmpty() && d->m_jobspeed)
- tobe += " ";
- if (d->m_jobspeed)
- tobe += i18n( "(%1/s)" ).arg( TDEIO::convertSize( d->m_jobspeed ) );
- }
- tobe = "<qt>"+tobe;
-
- emit ReadOnlyPart::setStatusBarText(tobe);
-}
-
-
-void KHTMLPart::setJSStatusBarText( const TQString &text )
-{
- setStatusBarText(text, BarOverrideText);
-}
-
-void KHTMLPart::setJSDefaultStatusBarText( const TQString &text )
-{
- setStatusBarText(text, BarDefaultText);
-}
-
-TQString KHTMLPart::jsStatusBarText() const
-{
- return d->m_statusBarText[BarOverrideText];
-}
-
-TQString KHTMLPart::jsDefaultStatusBarText() const
-{
- return d->m_statusBarText[BarDefaultText];
-}
-
-TQString KHTMLPart::referrer() const
-{
- return d->m_referrer;
-}
-
-TQString KHTMLPart::pageReferrer() const
-{
- KURL referrerURL = KURL( d->m_pageReferrer );
- if (referrerURL.isValid())
- {
- TQString protocol = referrerURL.protocol();
-
- if ((protocol == "http") ||
- ((protocol == "https") && (m_url.protocol() == "https")))
- {
- referrerURL.setRef(TQString());
- referrerURL.setUser(TQString());
- referrerURL.setPass(TQString());
- return referrerURL.url();
- }
- }
-
- return TQString();
-}
-
-
-TQString KHTMLPart::lastModified() const
-{
- if ( d->m_lastModified.isEmpty() && m_url.isLocalFile() ) {
- // Local file: set last-modified from the file's mtime.
- // Done on demand to save time when this isn't needed - but can lead
- // to slightly wrong results if updating the file on disk w/o reloading.
- TQDateTime lastModif = TQFileInfo( m_url.path() ).lastModified();
- d->m_lastModified = lastModif.toString( Qt::LocalDate );
- }
- //kdDebug(6050) << "KHTMLPart::lastModified: " << d->m_lastModified << endl;
- return d->m_lastModified;
-}
-
-void KHTMLPart::slotLoadImages()
-{
- if (d->m_doc )
- d->m_doc->docLoader()->setAutoloadImages( !d->m_doc->docLoader()->autoloadImages() );
-
- ConstFrameIt it = d->m_frames.begin();
- const ConstFrameIt end = d->m_frames.end();
- for (; it != end; ++it )
- if ( !( *it )->m_part.isNull() && (*it)->m_part->inherits( "KHTMLPart" ) ) {
- KParts::ReadOnlyPart* const p = ( *it )->m_part;
- static_cast<KHTMLPart*>( p )->slotLoadImages();
- }
-}
-
-void KHTMLPart::reparseConfiguration()
-{
- KHTMLSettings *settings = KHTMLFactory::defaultHTMLSettings();
- settings->init();
-
- setAutoloadImages( settings->autoLoadImages() );
- if (d->m_doc)
- d->m_doc->docLoader()->setShowAnimations( settings->showAnimations() );
-
- d->m_bOpenMiddleClick = settings->isOpenMiddleClickEnabled();
- d->m_bBackRightClick = settings->isBackRightClickEnabled();
- d->m_bJScriptEnabled = settings->isJavaScriptEnabled(m_url.host());
- setDebugScript( settings->isJavaScriptDebugEnabled() );
- d->m_bJavaEnabled = settings->isJavaEnabled(m_url.host());
- d->m_bPluginsEnabled = settings->isPluginsEnabled(m_url.host());
- d->m_metaRefreshEnabled = settings->isAutoDelayedActionsEnabled ();
-
- delete d->m_settings;
- d->m_settings = new KHTMLSettings(*KHTMLFactory::defaultHTMLSettings());
-
- TQApplication::setOverrideCursor( tqwaitCursor );
- khtml::CSSStyleSelector::reparseConfiguration();
- if(d->m_doc) d->m_doc->updateStyleSelector();
- TQApplication::restoreOverrideCursor();
-
- if (KHTMLFactory::defaultHTMLSettings()->isAdFilterEnabled())
- runAdFilter();
-}
-
-TQStringList KHTMLPart::frameNames() const
-{
- TQStringList res;
-
- ConstFrameIt it = d->m_frames.begin();
- const ConstFrameIt end = d->m_frames.end();
- for (; it != end; ++it )
- if (!(*it)->m_bPreloaded)
- res += (*it)->m_name;
-
- return res;
-}
-
-TQPtrList<KParts::ReadOnlyPart> KHTMLPart::frames() const
-{
- TQPtrList<KParts::ReadOnlyPart> res;
-
- ConstFrameIt it = d->m_frames.begin();
- const ConstFrameIt end = d->m_frames.end();
- for (; it != end; ++it )
- if (!(*it)->m_bPreloaded)
- res.append( (*it)->m_part );
-
- return res;
-}
-
-bool KHTMLPart::openURLInFrame( const KURL &url, const KParts::URLArgs &urlArgs )
-{
- kdDebug( 6050 ) << this << "KHTMLPart::openURLInFrame " << url << endl;
- FrameIt it = d->m_frames.find( urlArgs.frameName );
-
- if ( it == d->m_frames.end() )
- return false;
-
- // Inform someone that we are about to show something else.
- if ( !urlArgs.lockHistory() )
- emit d->m_extension->openURLNotify();
-
- requestObject( *it, url, urlArgs );
-
- return true;
-}
-
-void KHTMLPart::setDNDEnabled( bool b )
-{
- d->m_bDnd = b;
-}
-
-bool KHTMLPart::dndEnabled() const
-{
- return d->m_bDnd;
-}
-
-void KHTMLPart::customEvent( TQCustomEvent *event )
-{
- if ( khtml::MousePressEvent::test( event ) )
- {
- khtmlMousePressEvent( static_cast<khtml::MousePressEvent *>( event ) );
- return;
- }
-
- if ( khtml::MouseDoubleClickEvent::test( event ) )
- {
- khtmlMouseDoubleClickEvent( static_cast<khtml::MouseDoubleClickEvent *>( event ) );
- return;
- }
-
- if ( khtml::MouseMoveEvent::test( event ) )
- {
- khtmlMouseMoveEvent( static_cast<khtml::MouseMoveEvent *>( event ) );
- return;
- }
-
- if ( khtml::MouseReleaseEvent::test( event ) )
- {
- khtmlMouseReleaseEvent( static_cast<khtml::MouseReleaseEvent *>( event ) );
- return;
- }
-
- if ( khtml::DrawContentsEvent::test( event ) )
- {
- khtmlDrawContentsEvent( static_cast<khtml::DrawContentsEvent *>( event ) );
- return;
- }
-
- KParts::ReadOnlyPart::customEvent( event );
-}
-
-/** returns the position of the first inline text box of the line at
- * coordinate y in renderNode
- *
- * This is a helper function for line-by-line text selection.
- */
-static bool firstRunAt(khtml::RenderObject *renderNode, int y, NodeImpl *&startNode, long &startOffset)
-{
- for (khtml::RenderObject *n = renderNode; n; n = n->nextSibling()) {
- if (n->isText()) {
- khtml::RenderText* const textRenderer = static_cast<khtml::RenderText *>(n);
- const khtml::InlineTextBoxArray &runs = textRenderer->inlineTextBoxes();
- const unsigned lim = runs.count();
- for (unsigned i = 0; i != lim; ++i) {
- if (runs[i]->m_y == y && textRenderer->element()) {
- startNode = textRenderer->element();
- startOffset = runs[i]->m_start;
- return true;
- }
- }
- }
-
- if (firstRunAt(n->firstChild(), y, startNode, startOffset)) {
- return true;
- }
- }
-
- return false;
-}
-
-/** returns the position of the last inline text box of the line at
- * coordinate y in renderNode
- *
- * This is a helper function for line-by-line text selection.
- */
-static bool lastRunAt(khtml::RenderObject *renderNode, int y, NodeImpl *&endNode, long &endOffset)
-{
- khtml::RenderObject *n = renderNode;
- if (!n) {
- return false;
- }
- khtml::RenderObject *next;
- while ((next = n->nextSibling())) {
- n = next;
- }
-
- while (1) {
- if (lastRunAt(n->firstChild(), y, endNode, endOffset)) {
- return true;
- }
-
- if (n->isText()) {
- khtml::RenderText* const textRenderer = static_cast<khtml::RenderText *>(n);
- const khtml::InlineTextBoxArray &runs = textRenderer->inlineTextBoxes();
- for (int i = (int)runs.count()-1; i >= 0; --i) {
- if (runs[i]->m_y == y && textRenderer->element()) {
- endNode = textRenderer->element();
- endOffset = runs[i]->m_start + runs[i]->m_len;
- return true;
- }
- }
- }
-
- if (n == renderNode) {
- return false;
- }
-
- n = n->previousSibling();
- }
-}
-
-void KHTMLPart::khtmlMousePressEvent( khtml::MousePressEvent *event )
-{
- DOM::DOMString url = event->url();
- TQMouseEvent *_mouse = event->qmouseEvent();
- DOM::Node innerNode = event->innerNode();
- d->m_mousePressNode = innerNode;
-
- d->m_dragStartPos = _mouse->pos();
-
- if ( !event->url().isNull() ) {
- d->m_strSelectedURL = event->url().string();
- d->m_strSelectedURLTarget = event->target().string();
- }
- else
- d->m_strSelectedURL = d->m_strSelectedURLTarget = TQString();
-
- if ( _mouse->button() == Qt::LeftButton ||
- _mouse->button() == Qt::MidButton )
- {
- d->m_bMousePressed = true;
-
-#ifndef KHTML_NO_SELECTION
- if ( _mouse->button() == Qt::LeftButton )
- {
- if ( (!d->m_strSelectedURL.isNull() && !isEditable())
- || (!d->m_mousePressNode.isNull() && d->m_mousePressNode.elementId() == ID_IMG) )
- return;
- if ( !innerNode.isNull() && innerNode.handle()->renderer()) {
- int offset = 0;
- DOM::NodeImpl* node = 0;
- khtml::RenderObject::SelPointState state;
- innerNode.handle()->renderer()->checkSelectionPoint( event->x(), event->y(),
- event->absX()-innerNode.handle()->renderer()->xPos(),
- event->absY()-innerNode.handle()->renderer()->yPos(), node, offset, state );
- d->m_extendMode = d->ExtendByChar;
-#ifdef KHTML_NO_CARET
- d->m_selectionStart = node;
- d->m_startOffset = offset;
- //if ( node )
- // kdDebug(6005) << "KHTMLPart::khtmlMousePressEvent selectionStart=" << d->m_selectionStart.handle()->renderer()
- // << " offset=" << d->m_startOffset << endl;
- //else
- // kdDebug(6005) << "KHTML::khtmlMousePressEvent selectionStart=(nil)" << endl;
- d->m_selectionEnd = d->m_selectionStart;
- d->m_endOffset = d->m_startOffset;
- d->m_doc->clearSelection();
-#else // KHTML_NO_CARET
- d->m_view->moveCaretTo(node, offset, (_mouse->state() & ShiftButton) == 0);
-#endif // KHTML_NO_CARET
- d->m_initialNode = d->m_selectionStart;
- d->m_initialOffset = d->m_startOffset;
-// kdDebug(6000) << "press: initOfs " << d->m_initialOffset << endl;
- }
- else
- {
-#ifndef KHTML_NO_CARET
- // simply leave it. Is this a good idea?
-#else
- d->m_selectionStart = DOM::Node();
- d->m_selectionEnd = DOM::Node();
-#endif
- }
- emitSelectionChanged();
- startAutoScroll();
- }
-#else
- d->m_dragLastPos = _mouse->globalPos();
-#endif
- }
-
- if ( _mouse->button() == Qt::RightButton && parentPart() != 0 && d->m_bBackRightClick )
- {
- d->m_bRightMousePressed = true;
- } else if ( _mouse->button() == Qt::RightButton )
- {
- popupMenu( d->m_strSelectedURL );
- // might be deleted, don't touch "this"
- }
-}
-
-void KHTMLPart::khtmlMouseDoubleClickEvent( khtml::MouseDoubleClickEvent *event )
-{
- TQMouseEvent *_mouse = event->qmouseEvent();
- if ( _mouse->button() == Qt::LeftButton )
- {
- d->m_bMousePressed = true;
- DOM::Node innerNode = event->innerNode();
- // Find selectionStart again, khtmlMouseReleaseEvent lost it
- if ( !innerNode.isNull() && innerNode.handle()->renderer()) {
- int offset = 0;
- DOM::NodeImpl* node = 0;
- khtml::RenderObject::SelPointState state;
- innerNode.handle()->renderer()->checkSelectionPoint( event->x(), event->y(),
- event->absX()-innerNode.handle()->renderer()->xPos(),
- event->absY()-innerNode.handle()->renderer()->yPos(), node, offset, state);
-
- //kdDebug() << k_funcinfo << "checkSelectionPoint returned node=" << node << " offset=" << offset << endl;
-
- if ( node && node->renderer() )
- {
- // Extend selection to a complete word (double-click) or line (triple-click)
- bool selectLine = (event->clickCount() == 3);
- d->m_extendMode = selectLine ? d->ExtendByLine : d->ExtendByWord;
-
- // Extend existing selection if Shift was pressed
- if (_mouse->state() & ShiftButton) {
- d->caretNode() = node;
- d->caretOffset() = offset;
- d->m_startBeforeEnd = RangeImpl::compareBoundaryPoints(
- d->m_selectionStart.handle(), d->m_startOffset,
- d->m_selectionEnd.handle(), d->m_endOffset) <= 0;
- d->m_initialNode = d->m_extendAtEnd ? d->m_selectionStart : d->m_selectionEnd;
- d->m_initialOffset = d->m_extendAtEnd ? d->m_startOffset : d->m_endOffset;
- } else {
- d->m_selectionStart = d->m_selectionEnd = node;
- d->m_startOffset = d->m_endOffset = offset;
- d->m_startBeforeEnd = true;
- d->m_initialNode = node;
- d->m_initialOffset = offset;
- }
-// kdDebug(6000) << "dblclk: initOfs " << d->m_initialOffset << endl;
-
- // Extend the start
- extendSelection( d->m_selectionStart.handle(), d->m_startOffset, d->m_selectionStart, d->m_startOffset, !d->m_startBeforeEnd, selectLine );
- // Extend the end
- extendSelection( d->m_selectionEnd.handle(), d->m_endOffset, d->m_selectionEnd, d->m_endOffset, d->m_startBeforeEnd, selectLine );
-
- //kdDebug() << d->m_selectionStart.handle() << " " << d->m_startOffset << " - " <<
- // d->m_selectionEnd.handle() << " " << d->m_endOffset << endl;
-
- emitSelectionChanged();
- d->m_doc
- ->setSelection(d->m_selectionStart.handle(),d->m_startOffset,
- d->m_selectionEnd.handle(),d->m_endOffset);
-#ifndef KHTML_NO_CARET
- bool v = d->m_view->placeCaret();
- emitCaretPositionChanged(v ? d->caretNode() : 0, d->caretOffset());
-#endif
- startAutoScroll();
- }
- }
- }
-}
-
-void KHTMLPart::extendSelection( DOM::NodeImpl* node, long offset, DOM::Node& selectionNode, long& selectionOffset, bool right, bool selectLines )
-{
- khtml::RenderObject* obj = node->renderer();
-
- if (obj->isText() && selectLines) {
- int pos;
- khtml::RenderText *renderer = static_cast<khtml::RenderText *>(obj);
- khtml::InlineTextBox *run = renderer->findInlineTextBox( offset, pos );
- DOMString t = node->nodeValue();
- DOM::NodeImpl* selNode = 0;
- long selOfs = 0;
-
- if (!run)
- return;
-
- int selectionPointY = run->m_y;
-
- // Go up to first non-inline element.
- khtml::RenderObject *renderNode = renderer;
- while (renderNode && renderNode->isInline())
- renderNode = renderNode->parent();
-
- renderNode = renderNode->firstChild();
-
- if (right) {
- // Look for all the last child in the block that is on the same line
- // as the selection point.
- if (!lastRunAt (renderNode, selectionPointY, selNode, selOfs))
- return;
- } else {
- // Look for all the first child in the block that is on the same line
- // as the selection point.
- if (!firstRunAt (renderNode, selectionPointY, selNode, selOfs))
- return;
- }
-
- selectionNode = selNode;
- selectionOffset = selOfs;
- return;
- }
-
- TQString str;
- int len = 0;
- if ( obj->isText() ) { // can be false e.g. when double-clicking on a disabled submit button
- str = static_cast<khtml::RenderText *>(obj)->data().string();
- len = str.length();
- }
- //kdDebug() << "extendSelection right=" << right << " offset=" << offset << " len=" << len << " Starting at obj=" << obj << endl;
- TQChar ch;
- do {
- // Last char was ok, point to it
- if ( node ) {
- selectionNode = node;
- selectionOffset = offset;
- }
-
- // Get another char
- while ( obj && ( (right && offset >= len-1) || (!right && offset <= 0) ) )
- {
- obj = right ? obj->objectBelow() : obj->objectAbove();
- //kdDebug() << "obj=" << obj << endl;
- if ( obj ) {
- //kdDebug() << "isText=" << obj->isText() << endl;
- str = TQString();
- if ( obj->isText() )
- str = static_cast<khtml::RenderText *>(obj)->data().string();
- else if ( obj->isBR() )
- str = '\n';
- else if ( !obj->isInline() ) {
- obj = 0L; // parag limit -> done
- break;
- }
- len = str.length();
- //kdDebug() << "str=" << str << " length=" << len << endl;
- // set offset - note that the first thing will be a ++ or -- on it.
- if ( right )
- offset = -1;
- else
- offset = len;
- }
- }
- if ( !obj ) // end of parag or document
- break;
- node = obj->element();
- if ( right )
- {
- Q_ASSERT( offset < len-1 );
- ++offset;
- }
- else
- {
- Q_ASSERT( offset > 0 );
- --offset;
- }
-
- // Test that char
- ch = str[ (int)offset ];
- //kdDebug() << " offset=" << offset << " ch=" << TQString(ch) << endl;
- } while ( !ch.isSpace() && !ch.isPunct() );
-
- // make offset point after last char
- if (right) ++selectionOffset;
-}
-
-#ifndef KHTML_NO_SELECTION
-void KHTMLPart::extendSelectionTo(int x, int y, int absX, int absY, const DOM::Node &innerNode)
-{
- int offset;
- //kdDebug(6000) << "KHTMLPart::khtmlMouseMoveEvent x=" << event->x() << " y=" << event->y() << endl;
- DOM::NodeImpl* node=0;
- khtml::RenderObject::SelPointState state;
- innerNode.handle()->renderer()->checkSelectionPoint( x, y,
- absX-innerNode.handle()->renderer()->xPos(),
- absY-innerNode.handle()->renderer()->yPos(), node, offset, state);
- if (!node || !node->renderer()) return;
-
- // Words at the beginning/end of line cannot be deselected in
- // ExtendByWord mode. Therefore, do not enforce it if the selection
- // point does not match the node under the mouse cursor.
- bool withinNode = innerNode == node;
-
- // we have to get to know if end is before start or not...
- // shouldn't be null but it can happen with dynamic updating of nodes
- if (d->m_selectionStart.isNull() || d->m_selectionEnd.isNull() ||
- d->m_initialNode.isNull() ||
- !d->m_selectionStart.handle()->renderer() ||
- !d->m_selectionEnd.handle()->renderer()) return;
-
- if (d->m_extendMode != d->ExtendByChar) {
- // check whether we should extend at the front, or at the back
- bool caretBeforeInit = RangeImpl::compareBoundaryPoints(
- d->caretNode().handle(), d->caretOffset(),
- d->m_initialNode.handle(), d->m_initialOffset) <= 0;
- bool nodeBeforeInit = RangeImpl::compareBoundaryPoints(node, offset,
- d->m_initialNode.handle(), d->m_initialOffset) <= 0;
- // have to fix up start to point to the original end
- if (caretBeforeInit != nodeBeforeInit) {
-// kdDebug(6000) << "extto cbi: " << caretBeforeInit << " startBefEnd " << d->m_startBeforeEnd << " extAtEnd " << d->m_extendAtEnd << " (" << d->m_startOffset << ") - (" << d->m_endOffset << ")" << " initOfs " << d->m_initialOffset << endl;
- extendSelection(d->m_initialNode.handle(), d->m_initialOffset,
- d->m_extendAtEnd ? d->m_selectionStart : d->m_selectionEnd,
- d->m_extendAtEnd ? d->m_startOffset : d->m_endOffset,
- nodeBeforeInit, d->m_extendMode == d->ExtendByLine);
- }
- }
-
- d->caretNode() = node;
- d->caretOffset() = offset;
- //kdDebug( 6000 ) << "setting end of selection to " << d->m_selectionEnd.handle() << "/" << d->m_endOffset << endl;
-
- d->m_startBeforeEnd = RangeImpl::compareBoundaryPoints(
- d->m_selectionStart.handle(), d->m_startOffset,
- d->m_selectionEnd.handle(), d->m_endOffset) <= 0;
-
- if ( !d->m_selectionStart.isNull() && !d->m_selectionEnd.isNull() )
- {
-// kdDebug(6000) << "extto: startBefEnd " << d->m_startBeforeEnd << " extAtEnd " << d->m_extendAtEnd << " (" << d->m_startOffset << ") - (" << d->m_endOffset << ")" << " initOfs " << d->m_initialOffset << endl;
- if (d->m_extendMode != d->ExtendByChar && withinNode)
- extendSelection( node, offset, d->caretNode(), d->caretOffset(), d->m_startBeforeEnd ^ !d->m_extendAtEnd, d->m_extendMode == d->ExtendByLine );
-
- if (d->m_selectionEnd == d->m_selectionStart && d->m_endOffset < d->m_startOffset)
- d->m_doc
- ->setSelection(d->m_selectionStart.handle(),d->m_endOffset,
- d->m_selectionEnd.handle(),d->m_startOffset);
- else if (d->m_startBeforeEnd)
- d->m_doc
- ->setSelection(d->m_selectionStart.handle(),d->m_startOffset,
- d->m_selectionEnd.handle(),d->m_endOffset);
- else
- d->m_doc
- ->setSelection(d->m_selectionEnd.handle(),d->m_endOffset,
- d->m_selectionStart.handle(),d->m_startOffset);
- }
-#ifndef KHTML_NO_CARET
- d->m_view->placeCaret();
-#endif
-}
-
-bool KHTMLPart::isExtendingSelection() const
-{
- // This is it, the whole detection. khtmlMousePressEvent only sets this
- // on LMB or MMB, but never on RMB. As text selection doesn't work for MMB,
- // it's sufficient to only rely on this flag to detect selection extension.
- return d->m_bMousePressed;
-}
-#endif // KHTML_NO_SELECTION
-
-void KHTMLPart::khtmlMouseMoveEvent( khtml::MouseMoveEvent *event )
-{
- TQMouseEvent *_mouse = event->qmouseEvent();
-
- if( d->m_bRightMousePressed && parentPart() != 0 && d->m_bBackRightClick )
- {
- popupMenu( d->m_strSelectedURL );
- d->m_strSelectedURL = d->m_strSelectedURLTarget = TQString();
- d->m_bRightMousePressed = false;
- }
-
- DOM::DOMString url = event->url();
- DOM::DOMString target = event->target();
- DOM::Node innerNode = event->innerNode();
-
-#ifndef QT_NO_DRAGANDDROP
- if( d->m_bDnd && d->m_bMousePressed &&
- ( (!d->m_strSelectedURL.isEmpty() && !isEditable())
- || (!d->m_mousePressNode.isNull() && d->m_mousePressNode.elementId() == ID_IMG) ) ) {
- if ( ( d->m_dragStartPos - _mouse->pos() ).manhattanLength() <= TDEGlobalSettings::dndEventDelay() )
- return;
-
- TQPixmap pix;
- HTMLImageElementImpl *img = 0L;
- TQDragObject *drag = 0;
- KURL u;
-
- // tqDebug("****************** Event URL: %s", url.string().latin1());
- // tqDebug("****************** Event Target: %s", target.string().latin1());
-
- // Normal image...
- if ( url.length() == 0 && innerNode.handle() && innerNode.handle()->id() == ID_IMG )
- {
- img = static_cast<HTMLImageElementImpl *>(innerNode.handle());
- u = KURL( completeURL( khtml::parseURL(img->getAttribute(ATTR_SRC)).string() ) );
- pix = KMimeType::mimeType("image/png")->pixmap(KIcon::Desktop);
- }
- else
- {
- // Text or image link...
- u = completeURL( d->m_strSelectedURL );
- pix = KMimeType::pixmapForURL(u, 0, KIcon::Desktop, KIcon::SizeMedium);
- }
-
- u.setPass(TQString());
-
- KURLDrag* urlDrag = new KURLDrag( u, img ? 0 : d->m_view->viewport() );
- if ( !d->m_referrer.isEmpty() )
- urlDrag->metaData()["referrer"] = d->m_referrer;
-
- if( img && img->complete()) {
- KMultipleDrag *mdrag = new KMultipleDrag( d->m_view->viewport() );
- mdrag->addDragObject( new TQImageDrag( img->currentImage(), 0L ) );
- mdrag->addDragObject( urlDrag );
- drag = mdrag;
- }
- else
- drag = urlDrag;
-
- if ( !pix.isNull() )
- drag->setPixmap( pix );
-
- stopAutoScroll();
- if(drag)
- drag->drag();
-
- // when we finish our drag, we need to undo our mouse press
- d->m_bMousePressed = false;
- d->m_strSelectedURL = d->m_strSelectedURLTarget = TQString();
- return;
- }
-#endif
-
- // Not clicked -> mouse over stuff
- if ( !d->m_bMousePressed )
- {
- // The mouse is over something
- if ( url.length() )
- {
- bool shiftPressed = ( _mouse->state() & ShiftButton );
-
- // Image map
- if ( !innerNode.isNull() && innerNode.elementId() == ID_IMG )
- {
- HTMLImageElementImpl *i = static_cast<HTMLImageElementImpl *>(innerNode.handle());
- if ( i && i->isServerMap() )
- {
- khtml::RenderObject *r = i->renderer();
- if(r)
- {
- int absx, absy, vx, vy;
- r->absolutePosition(absx, absy);
- view()->contentsToViewport( absx, absy, vx, vy );
-
- int x(_mouse->x() - vx), y(_mouse->y() - vy);
-
- d->m_overURL = url.string() + TQString("?%1,%2").arg(x).arg(y);
- d->m_overURLTarget = target.string();
- overURL( d->m_overURL, target.string(), shiftPressed );
- return;
- }
- }
- }
-
- // normal link
- if ( d->m_overURL.isEmpty() || d->m_overURL != url || d->m_overURLTarget != target )
- {
- d->m_overURL = url.string();
- d->m_overURLTarget = target.string();
- overURL( d->m_overURL, target.string(), shiftPressed );
- }
- }
- else // Not over a link...
- {
- // reset to "default statusbar text"
- resetHoverText();
- }
- }
- else {
-#ifndef KHTML_NO_SELECTION
- // selection stuff
- if( d->m_bMousePressed && innerNode.handle() && innerNode.handle()->renderer() &&
- ( (_mouse->state() & Qt::LeftButton) != 0 )) {
- extendSelectionTo(event->x(), event->y(),
- event->absX(), event->absY(), innerNode);
-#else
- if ( d->m_doc && d->m_view ) {
- TQPoint diff( _mouse->globalPos() - d->m_dragLastPos );
-
- if ( abs( diff.x() ) > 64 || abs( diff.y() ) > 64 ) {
- d->m_view->scrollBy( -diff.x(), -diff.y() );
- d->m_dragLastPos = _mouse->globalPos();
- }
-#endif
- }
- }
-
-}
-
-void KHTMLPart::khtmlMouseReleaseEvent( khtml::MouseReleaseEvent *event )
-{
- DOM::Node innerNode = event->innerNode();
- d->m_mousePressNode = DOM::Node();
-
- if ( d->m_bMousePressed ) {
- setStatusBarText(TQString(), BarHoverText);
- stopAutoScroll();
- }
-
- // Used to prevent mouseMoveEvent from initiating a drag before
- // the mouse is pressed again.
- d->m_bMousePressed = false;
-
- TQMouseEvent *_mouse = event->qmouseEvent();
- if ( _mouse->button() == Qt::RightButton && parentPart() != 0 && d->m_bBackRightClick )
- {
- d->m_bRightMousePressed = false;
- KParts::BrowserInterface *tmp_iface = d->m_extension->browserInterface();
- if( tmp_iface ) {
- tmp_iface->callMethod( "goHistory(int)", -1 );
- }
- }
-#ifndef QT_NO_CLIPBOARD
- if ((d->m_guiProfile == BrowserViewGUI) && (_mouse->button() == Qt::MidButton) && (event->url().isNull())) {
- kdDebug( 6050 ) << "KHTMLPart::khtmlMouseReleaseEvent() MMB shouldOpen="
- << d->m_bOpenMiddleClick << endl;
-
- if (d->m_bOpenMiddleClick) {
- KHTMLPart *p = this;
- while (p->parentPart()) p = p->parentPart();
- p->d->m_extension->pasteRequest();
- }
- }
-#endif
-
-#ifndef KHTML_NO_SELECTION
- // delete selection in case start and end position are at the same point
- if(d->m_selectionStart == d->m_selectionEnd && d->m_startOffset == d->m_endOffset) {
-#ifndef KHTML_NO_CARET
- d->m_extendAtEnd = true;
-#else
- d->m_selectionStart = 0;
- d->m_selectionEnd = 0;
- d->m_startOffset = 0;
- d->m_endOffset = 0;
-#endif
- emitSelectionChanged();
- } else {
- // we have to get to know if end is before start or not...
-// kdDebug(6000) << "rel: startBefEnd " << d->m_startBeforeEnd << " extAtEnd " << d->m_extendAtEnd << " (" << d->m_startOffset << ") - (" << d->m_endOffset << ")" << endl;
- DOM::Node n = d->m_selectionStart;
- d->m_startBeforeEnd = false;
- if( d->m_selectionStart == d->m_selectionEnd ) {
- if( d->m_startOffset < d->m_endOffset )
- d->m_startBeforeEnd = true;
- } else {
-#if 0
- while(!n.isNull()) {
- if(n == d->m_selectionEnd) {
- d->m_startBeforeEnd = true;
- break;
- }
- DOM::Node next = n.firstChild();
- if(next.isNull()) next = n.nextSibling();
- while( next.isNull() && !n.parentNode().isNull() ) {
- n = n.parentNode();
- next = n.nextSibling();
- }
- n = next;
- }
-#else
- // shouldn't be null but it can happen with dynamic updating of nodes
- if (d->m_selectionStart.isNull() || d->m_selectionEnd.isNull() ||
- !d->m_selectionStart.handle()->renderer() ||
- !d->m_selectionEnd.handle()->renderer()) return;
- d->m_startBeforeEnd = RangeImpl::compareBoundaryPoints(
- d->m_selectionStart.handle(), d->m_startOffset,
- d->m_selectionEnd.handle(), d->m_endOffset) <= 0;
-#endif
- }
- if(!d->m_startBeforeEnd)
- {
- DOM::Node tmpNode = d->m_selectionStart;
- int tmpOffset = d->m_startOffset;
- d->m_selectionStart = d->m_selectionEnd;
- d->m_startOffset = d->m_endOffset;
- d->m_selectionEnd = tmpNode;
- d->m_endOffset = tmpOffset;
- d->m_startBeforeEnd = true;
- d->m_extendAtEnd = !d->m_extendAtEnd;
- }
-#ifndef KHTML_NO_CARET
- bool v = d->m_view->placeCaret();
- emitCaretPositionChanged(v ? d->caretNode() : 0, d->caretOffset());
-#endif
- // get selected text and paste to the clipboard
-#ifndef QT_NO_CLIPBOARD
- TQString text = selectedText();
- text.replace(TQChar(0xa0), ' ');
- disconnect( kapp->clipboard(), TQT_SIGNAL( selectionChanged()), this, TQT_SLOT( slotClearSelection()));
- kapp->clipboard()->setText(text,TQClipboard::Selection);
- connect( kapp->clipboard(), TQT_SIGNAL( selectionChanged()), TQT_SLOT( slotClearSelection()));
-#endif
- //kdDebug( 6000 ) << "selectedText = " << text << endl;
- emitSelectionChanged();
-//kdDebug(6000) << "rel2: startBefEnd " << d->m_startBeforeEnd << " extAtEnd " << d->m_extendAtEnd << " (" << d->m_startOffset << ") - (" << d->m_endOffset << "), caretOfs " << d->caretOffset() << endl;
- }
-#endif
- d->m_initialNode = 0; // don't hold nodes longer than necessary
- d->m_initialOffset = 0;
-
-}
-
-void KHTMLPart::khtmlDrawContentsEvent( khtml::DrawContentsEvent * )
-{
-}
-
-void KHTMLPart::guiActivateEvent( KParts::GUIActivateEvent *event )
-{
- if ( event->activated() )
- {
- emitSelectionChanged();
- emit d->m_extension->enableAction( "print", d->m_doc != 0 );
-
- if ( !d->m_settings->autoLoadImages() && d->m_paLoadImages )
- {
- TQPtrList<KAction> lst;
- lst.append( d->m_paLoadImages );
- plugActionList( "loadImages", lst );
- }
- }
-}
-
-void KHTMLPart::slotPrintFrame()
-{
- if ( d->m_frames.count() == 0 )
- return;
-
- KParts::ReadOnlyPart *frame = currentFrame();
- if (!frame)
- return;
-
- KParts::BrowserExtension *ext = KParts::BrowserExtension::childObject( frame );
-
- if ( !ext )
- return;
-
- TQMetaObject *mo = ext->metaObject();
-
- int idx = mo->findSlot( "print()", true );
- if ( idx >= 0 ) {
- TQUObject o[ 1 ];
- ext->tqt_invoke( idx, o );
- }
-}
-
-void KHTMLPart::slotSelectAll()
-{
- KParts::ReadOnlyPart *part = currentFrame();
- if (part && part->inherits("KHTMLPart"))
- static_cast<KHTMLPart *>(part)->selectAll();
-}
-
-void KHTMLPart::startAutoScroll()
-{
- connect(&d->m_scrollTimer, TQT_SIGNAL( timeout() ), this, TQT_SLOT( slotAutoScroll() ));
- d->m_scrollTimer.start(100, false);
-}
-
-void KHTMLPart::stopAutoScroll()
-{
- disconnect(&d->m_scrollTimer, TQT_SIGNAL( timeout() ), this, TQT_SLOT( slotAutoScroll() ));
- if (d->m_scrollTimer.isActive())
- d->m_scrollTimer.stop();
-}
-
-
-void KHTMLPart::slotAutoScroll()
-{
- if (d->m_view)
- d->m_view->doAutoScroll();
- else
- stopAutoScroll(); // Safety
-}
-
-void KHTMLPart::runAdFilter()
-{
- if ( parentPart() )
- parentPart()->runAdFilter();
-
- if ( !d->m_doc )
- return;
-
- TQPtrDictIterator<khtml::CachedObject> it( d->m_doc->docLoader()->m_docObjects );
- for ( ; it.current(); ++it )
- if ( it.current()->type() == khtml::CachedObject::Image ) {
- khtml::CachedImage *image = static_cast<khtml::CachedImage *>(it.current());
- bool wasBlocked = image->m_wasBlocked;
- image->m_wasBlocked = KHTMLFactory::defaultHTMLSettings()->isAdFiltered( d->m_doc->completeURL( (*it).url().string() ) );
- if ( image->m_wasBlocked != wasBlocked )
- image->do_notify(image->pixmap(), image->valid_rect());
- }
-
- if ( KHTMLFactory::defaultHTMLSettings()->isHideAdsEnabled() ) {
- for ( NodeImpl *nextNode, *node = d->m_doc; node; node = nextNode ) {
-
- // We might be deleting 'node' shortly.
- nextNode = node->traverseNextNode();
-
- if ( node->id() == ID_IMG ||
- node->id() == ID_IFRAME ||
- (node->id() == ID_INPUT && static_cast<HTMLInputElementImpl *>(node)->inputType() == HTMLInputElementImpl::IMAGE ))
- {
- if ( KHTMLFactory::defaultHTMLSettings()->isAdFiltered( d->m_doc->completeURL( static_cast<ElementImpl *>(node)->getAttribute(ATTR_SRC).string() ) ) )
- {
- // We found an IMG, IFRAME or INPUT (of type IMAGE) matching a filter.
- node->ref();
- NodeImpl *parent = node->parent();
- if( parent )
- {
- int exception = 0;
- parent->removeChild(node, exception);
- }
- node->deref();
- }
- }
- }
- }
-}
-
-void KHTMLPart::selectAll()
-{
- if (!d->m_doc) return;
-
- NodeImpl *first;
- if (d->m_doc->isHTMLDocument())
- first = static_cast<HTMLDocumentImpl*>(d->m_doc)->body();
- else
- first = d->m_doc;
- NodeImpl *next;
-
- // Look for first text/cdata node that has a renderer,
- // or first childless replaced element
- while ( first && !(first->renderer()
- && ((first->nodeType() == Node::TEXT_NODE || first->nodeType() == Node::CDATA_SECTION_NODE)
- || (first->renderer()->isReplaced() && !first->renderer()->firstChild()))))
- {
- next = first->firstChild();
- if ( !next ) next = first->nextSibling();
- while( first && !next )
- {
- first = first->parentNode();
- if ( first )
- next = first->nextSibling();
- }
- first = next;
- }
-
- NodeImpl *last;
- if (d->m_doc->isHTMLDocument())
- last = static_cast<HTMLDocumentImpl*>(d->m_doc)->body();
- else
- last = d->m_doc;
- // Look for last text/cdata node that has a renderer,
- // or last childless replaced element
- // ### Instead of changing this loop, use findLastSelectableNode
- // in render_table.cpp (LS)
- while ( last && !(last->renderer()
- && ((last->nodeType() == Node::TEXT_NODE || last->nodeType() == Node::CDATA_SECTION_NODE)
- || (last->renderer()->isReplaced() && !last->renderer()->lastChild()))))
- {
- next = last->lastChild();
- if ( !next ) next = last->previousSibling();
- while ( last && !next )
- {
- last = last->parentNode();
- if ( last )
- next = last->previousSibling();
- }
- last = next;
- }
-
- if ( !first || !last )
- return;
- Q_ASSERT(first->renderer());
- Q_ASSERT(last->renderer());
- d->m_selectionStart = first;
- d->m_startOffset = 0;
- d->m_selectionEnd = last;
- d->m_endOffset = last->nodeValue().length();
- d->m_startBeforeEnd = true;
-
- d->m_doc->setSelection( d->m_selectionStart.handle(), d->m_startOffset,
- d->m_selectionEnd.handle(), d->m_endOffset );
-
- emitSelectionChanged();
-}
-
-bool KHTMLPart::checkLinkSecurity(const KURL &linkURL,const TQString &message, const TQString &button)
-{
- bool linkAllowed = true;
-
- if ( d->m_doc )
- linkAllowed = kapp && kapp->authorizeURLAction("redirect", url(), linkURL);
-
- if ( !linkAllowed ) {
- khtml::Tokenizer *tokenizer = d->m_doc->tokenizer();
- if (tokenizer)
- tokenizer->setOnHold(true);
-
- int response = KMessageBox::Cancel;
- if (!message.isEmpty())
- {
- response = KMessageBox::warningContinueCancel( 0,
- message.arg(linkURL.htmlURL()),
- i18n( "Security Warning" ),
- button);
- }
- else
- {
- KMessageBox::error( 0,
- i18n( "<qt>Access by untrusted page to<BR><B>%1</B><BR> denied.").arg(linkURL.htmlURL()),
- i18n( "Security Alert" ));
- }
-
- if (tokenizer)
- tokenizer->setOnHold(false);
- return (response==KMessageBox::Continue);
- }
- return true;
-}
-
-void KHTMLPart::slotPartRemoved( KParts::Part *part )
-{
-// kdDebug(6050) << "KHTMLPart::slotPartRemoved " << part << endl;
- if ( part == d->m_activeFrame )
- {
- d->m_activeFrame = 0L;
- if ( !part->inherits( "KHTMLPart" ) )
- {
- if (factory()) {
- factory()->removeClient( part );
- }
- if (childClients()->containsRef(part)) {
- removeChildClient( part );
- }
- }
- }
-}
-
-void KHTMLPart::slotActiveFrameChanged( KParts::Part *part )
-{
-// kdDebug(6050) << "KHTMLPart::slotActiveFrameChanged this=" << this << "part=" << part << endl;
- if ( part == this )
- {
- kdError(6050) << "strange error! we activated ourselves" << endl;
- assert( false );
- return;
- }
-// kdDebug(6050) << "KHTMLPart::slotActiveFrameChanged d->m_activeFrame=" << d->m_activeFrame << endl;
- if ( d->m_activeFrame && d->m_activeFrame->widget() && d->m_activeFrame->widget()->inherits( TQFRAME_OBJECT_NAME_STRING ) )
- {
- TQFrame *frame = static_cast<TQFrame *>( d->m_activeFrame->widget() );
- if (frame->frameStyle() != TQFrame::NoFrame)
- {
- frame->setFrameStyle( TQFrame::StyledPanel | TQFrame::Sunken);
- frame->repaint();
- }
- }
-
- if( d->m_activeFrame && !d->m_activeFrame->inherits( "KHTMLPart" ) )
- {
- if (factory()) {
- factory()->removeClient( d->m_activeFrame );
- }
- removeChildClient( d->m_activeFrame );
- }
- if( part && !part->inherits( "KHTMLPart" ) )
- {
- if (factory()) {
- factory()->addClient( part );
- }
- insertChildClient( part );
- }
-
-
- d->m_activeFrame = part;
-
- if ( d->m_activeFrame && d->m_activeFrame->widget()->inherits( TQFRAME_OBJECT_NAME_STRING ) )
- {
- TQFrame *frame = static_cast<TQFrame *>( d->m_activeFrame->widget() );
- if (frame->frameStyle() != TQFrame::NoFrame)
- {
- frame->setFrameStyle( TQFrame::StyledPanel | TQFrame::Plain);
- frame->repaint();
- }
- kdDebug(6050) << "new active frame " << d->m_activeFrame << endl;
- }
-
- updateActions();
-
- // (note: childObject returns 0 if the argument is 0)
- d->m_extension->setExtensionProxy( KParts::BrowserExtension::childObject( d->m_activeFrame ) );
-}
-
-void KHTMLPart::setActiveNode(const DOM::Node &node)
-{
- if (!d->m_doc || !d->m_view)
- return;
-
- // Set the document's active node
- d->m_doc->setFocusNode(node.handle());
-
- // Scroll the view if necessary to ensure that the new focus node is visible
- TQRect rect = node.handle()->getRect();
- d->m_view->ensureVisible(rect.right(), rect.bottom());
- d->m_view->ensureVisible(rect.left(), rect.top());
-}
-
-DOM::Node KHTMLPart::activeNode() const
-{
- return DOM::Node(d->m_doc?d->m_doc->focusNode():0);
-}
-
-DOM::EventListener *KHTMLPart::createHTMLEventListener( TQString code, TQString name, NodeImpl* node )
-{
- KJSProxy *proxy = jScript();
-
- if (!proxy)
- return 0;
-
- return proxy->createHTMLEventHandler( m_url.url(), name, code, node );
-}
-
-KHTMLPart *KHTMLPart::opener()
-{
- return d->m_opener;
-}
-
-void KHTMLPart::setOpener(KHTMLPart *_opener)
-{
- d->m_opener = _opener;
-}
-
-bool KHTMLPart::openedByJS()
-{
- return d->m_openedByJS;
-}
-
-void KHTMLPart::setOpenedByJS(bool _openedByJS)
-{
- d->m_openedByJS = _openedByJS;
-}
-
-void KHTMLPart::preloadStyleSheet(const TQString &url, const TQString &stylesheet)
-{
- khtml::Cache::preloadStyleSheet(url, stylesheet);
-}
-
-void KHTMLPart::preloadScript(const TQString &url, const TQString &script)
-{
- khtml::Cache::preloadScript(url, script);
-}
-
-TQCString KHTMLPart::dcopObjectId() const
-{
- TQCString id;
- id.sprintf("html-widget%d", d->m_dcop_counter);
- return id;
-}
-
-long KHTMLPart::cacheId() const
-{
- return d->m_cacheId;
-}
-
-bool KHTMLPart::restored() const
-{
- return d->m_restored;
-}
-
-bool KHTMLPart::pluginPageQuestionAsked(const TQString& mimetype) const
-{
- // parentPart() should be const!
- KHTMLPart* parent = const_cast<KHTMLPart *>(this)->parentPart();
- if ( parent )
- return parent->pluginPageQuestionAsked(mimetype);
-
- return d->m_pluginPageQuestionAsked.contains(mimetype);
-}
-
-void KHTMLPart::setPluginPageQuestionAsked(const TQString& mimetype)
-{
- if ( parentPart() )
- parentPart()->setPluginPageQuestionAsked(mimetype);
-
- d->m_pluginPageQuestionAsked.append(mimetype);
-}
-
-void KHTMLPart::slotAutomaticDetectionLanguage( int _id )
-{
- d->m_automaticDetection->setItemChecked( _id, true );
-
- switch ( _id ) {
- case 0 :
- d->m_autoDetectLanguage = khtml::Decoder::SemiautomaticDetection;
- break;
- case 1 :
- d->m_autoDetectLanguage = khtml::Decoder::Arabic;
- break;
- case 2 :
- d->m_autoDetectLanguage = khtml::Decoder::Baltic;
- break;
- case 3 :
- d->m_autoDetectLanguage = khtml::Decoder::CentralEuropean;
- break;
- case 4 :
- d->m_autoDetectLanguage = khtml::Decoder::Chinese;
- break;
- case 5 :
- d->m_autoDetectLanguage = khtml::Decoder::Greek;
- break;
- case 6 :
- d->m_autoDetectLanguage = khtml::Decoder::Hebrew;
- break;
- case 7 :
- d->m_autoDetectLanguage = khtml::Decoder::Japanese;
- break;
- case 8 :
- d->m_autoDetectLanguage = khtml::Decoder::Korean;
- break;
- case 9 :
- d->m_autoDetectLanguage = khtml::Decoder::Russian;
- break;
- case 10 :
- d->m_autoDetectLanguage = khtml::Decoder::Thai;
- break;
- case 11 :
- d->m_autoDetectLanguage = khtml::Decoder::Turkish;
- break;
- case 12 :
- d->m_autoDetectLanguage = khtml::Decoder::Ukrainian;
- break;
- case 13 :
- d->m_autoDetectLanguage = khtml::Decoder::Unicode;
- break;
- case 14 :
- d->m_autoDetectLanguage = khtml::Decoder::WesternEuropean;
- break;
- default :
- d->m_autoDetectLanguage = khtml::Decoder::SemiautomaticDetection;
- break;
- }
-
- for ( int i = 0; i <= 14; ++i ) {
- if ( i != _id )
- d->m_automaticDetection->setItemChecked( i, false );
- }
-
- d->m_paSetEncoding->popupMenu()->setItemChecked( 0, true );
-
- setEncoding( TQString(), false );
-
- if( d->m_manualDetection )
- d->m_manualDetection->setCurrentItem( -1 );
- d->m_paSetEncoding->popupMenu()->setItemChecked( d->m_paSetEncoding->popupMenu()->idAt( 2 ), false );
-}
-
-khtml::Decoder *KHTMLPart::createDecoder()
-{
- khtml::Decoder *dec = new khtml::Decoder();
- if( !d->m_encoding.isNull() )
- dec->setEncoding( d->m_encoding.latin1(),
- d->m_haveEncoding ? khtml::Decoder::UserChosenEncoding : khtml::Decoder::EncodingFromHTTPHeader);
- else {
- // Inherit the default encoding from the parent frame if there is one.
- const char *defaultEncoding = (parentPart() && parentPart()->d->m_decoder)
- ? parentPart()->d->m_decoder->encoding() : settings()->encoding().latin1();
- dec->setEncoding(defaultEncoding, khtml::Decoder::DefaultEncoding);
- }
-#ifdef APPLE_CHANGES
- if (d->m_doc)
- d->m_doc->setDecoder(d->m_decoder);
-#endif
- dec->setAutoDetectLanguage( d->m_autoDetectLanguage );
- return dec;
-}
-
-void KHTMLPart::emitCaretPositionChanged(const DOM::Node &node, long offset) {
- emit caretPositionChanged(node, offset);
-}
-
-void KHTMLPart::restoreScrollPosition()
-{
- KParts::URLArgs args = d->m_extension->urlArgs();
-
- if ( m_url.hasRef() && !d->m_restoreScrollPosition && !args.reload) {
- if ( !d->m_doc || !d->m_doc->parsing() )
- disconnect(d->m_view, TQT_SIGNAL(finishedLayout()), this, TQT_SLOT(restoreScrollPosition()));
- if ( !gotoAnchor(m_url.encodedHtmlRef()) )
- gotoAnchor(m_url.htmlRef());
- return;
- }
-
- // Check whether the viewport has become large enough to encompass the stored
- // offsets. If the document has been fully loaded, force the new coordinates,
- // even if the canvas is too short (can happen when user resizes the window
- // during loading).
- if (d->m_view->contentsHeight() - d->m_view->visibleHeight() >= args.yOffset
- || d->m_bComplete) {
- d->m_view->setContentsPos(args.xOffset, args.yOffset);
- disconnect(d->m_view, TQT_SIGNAL(finishedLayout()), this, TQT_SLOT(restoreScrollPosition()));
- }
-}
-
-
-void KHTMLPart::openWallet(DOM::HTMLFormElementImpl *form)
-{
-#ifndef KHTML_NO_WALLET
- KHTMLPart *p;
-
- for (p = parentPart(); p && p->parentPart(); p = p->parentPart()) {
- }
-
- if (p) {
- p->openWallet(form);
- return;
- }
-
- if (onlyLocalReferences()) { // avoid triggering on local apps, thumbnails
- return;
- }
-
- if (d->m_wallet) {
- if (d->m_bWalletOpened) {
- if (d->m_wallet->isOpen()) {
- form->walletOpened(d->m_wallet);
- return;
- }
- d->m_wallet->deleteLater();
- d->m_wallet = 0L;
- d->m_bWalletOpened = false;
- }
- }
-
- if (!d->m_wq) {
- KWallet::Wallet *wallet = KWallet::Wallet::openWallet(KWallet::Wallet::NetworkWallet(), widget() ? widget()->topLevelWidget()->winId() : 0, KWallet::Wallet::Asynchronous);
- d->m_wq = new KHTMLWalletQueue(this);
- d->m_wq->wallet = wallet;
- connect(wallet, TQT_SIGNAL(walletOpened(bool)), d->m_wq, TQT_SLOT(walletOpened(bool)));
- connect(d->m_wq, TQT_SIGNAL(walletOpened(KWallet::Wallet*)), this, TQT_SLOT(walletOpened(KWallet::Wallet*)));
- }
- assert(form);
- d->m_wq->callers.append(KHTMLWalletQueue::Caller(form, form->getDocument()));
-#endif // KHTML_NO_WALLET
-}
-
-
-void KHTMLPart::saveToWallet(const TQString& key, const TQMap<TQString,TQString>& data)
-{
-#ifndef KHTML_NO_WALLET
- KHTMLPart *p;
-
- for (p = parentPart(); p && p->parentPart(); p = p->parentPart()) {
- }
-
- if (p) {
- p->saveToWallet(key, data);
- return;
- }
-
- if (d->m_wallet) {
- if (d->m_bWalletOpened) {
- if (d->m_wallet->isOpen()) {
- if (!d->m_wallet->hasFolder(KWallet::Wallet::FormDataFolder())) {
- d->m_wallet->createFolder(KWallet::Wallet::FormDataFolder());
- }
- d->m_wallet->setFolder(KWallet::Wallet::FormDataFolder());
- d->m_wallet->writeMap(key, data);
- return;
- }
- d->m_wallet->deleteLater();
- d->m_wallet = 0L;
- d->m_bWalletOpened = false;
- }
- }
-
- if (!d->m_wq) {
- KWallet::Wallet *wallet = KWallet::Wallet::openWallet(KWallet::Wallet::NetworkWallet(), widget() ? widget()->topLevelWidget()->winId() : 0, KWallet::Wallet::Asynchronous);
- d->m_wq = new KHTMLWalletQueue(this);
- d->m_wq->wallet = wallet;
- connect(wallet, TQT_SIGNAL(walletOpened(bool)), d->m_wq, TQT_SLOT(walletOpened(bool)));
- connect(d->m_wq, TQT_SIGNAL(walletOpened(KWallet::Wallet*)), this, TQT_SLOT(walletOpened(KWallet::Wallet*)));
- }
- d->m_wq->savers.append(qMakePair(key, data));
-#endif // KHTML_NO_WALLET
-}
-
-
-void KHTMLPart::dequeueWallet(DOM::HTMLFormElementImpl *form) {
-#ifndef KHTML_NO_WALLET
- KHTMLPart *p;
-
- for (p = parentPart(); p && p->parentPart(); p = p->parentPart()) {
- }
-
- if (p) {
- p->dequeueWallet(form);
- return;
- }
-
- if (d->m_wq) {
- d->m_wq->callers.remove(KHTMLWalletQueue::Caller(form, form->getDocument()));
- }
-#endif // KHTML_NO_WALLET
-}
-
-
-void KHTMLPart::walletOpened(KWallet::Wallet *wallet) {
-#ifndef KHTML_NO_WALLET
- assert(!d->m_wallet);
- assert(d->m_wq);
-
- d->m_wq->deleteLater(); // safe?
- d->m_wq = 0L;
-
- if (!wallet) {
- d->m_bWalletOpened = false;
- return;
- }
-
- d->m_wallet = wallet;
- d->m_bWalletOpened = true;
- connect(d->m_wallet, TQT_SIGNAL(walletClosed()), TQT_SLOT(slotWalletClosed()));
-
- if (!d->m_statusBarWalletLabel) {
- d->m_statusBarWalletLabel = new KURLLabel(d->m_statusBarExtension->statusBar());
- d->m_statusBarWalletLabel->setFixedHeight(instance()->iconLoader()->currentSize(KIcon::Small));
- d->m_statusBarWalletLabel->setSizePolicy(TQSizePolicy(TQSizePolicy::Fixed, TQSizePolicy::Fixed));
- d->m_statusBarWalletLabel->setUseCursor(false);
- d->m_statusBarExtension->addStatusBarItem(d->m_statusBarWalletLabel, 0, false);
- d->m_statusBarWalletLabel->setPixmap(SmallIcon("wallet_open", instance()));
- connect(d->m_statusBarWalletLabel, TQT_SIGNAL(leftClickedURL()), TQT_SLOT(launchWalletManager()));
- connect(d->m_statusBarWalletLabel, TQT_SIGNAL(rightClickedURL()), TQT_SLOT(walletMenu()));
- } else {
- TQToolTip::remove(d->m_statusBarWalletLabel);
- }
- TQToolTip::add(d->m_statusBarWalletLabel, i18n("The wallet '%1' is open and being used for form data and passwords.").arg(KWallet::Wallet::NetworkWallet()));
-#endif // KHTML_NO_WALLET
-}
-
-
-KWallet::Wallet *KHTMLPart::wallet()
-{
-#ifndef KHTML_NO_WALLET
- KHTMLPart *p;
-
- for (p = parentPart(); p && p->parentPart(); p = p->parentPart())
- ;
-
- if (p)
- return p->wallet();
-
-#endif // KHTML_NO_WALLET
- return d->m_wallet;
-}
-
-
-void KHTMLPart::slotWalletClosed()
-{
-#ifndef KHTML_NO_WALLET
- if (d->m_wallet) {
- d->m_wallet->deleteLater();
- d->m_wallet = 0L;
- }
- d->m_bWalletOpened = false;
- if (d->m_statusBarWalletLabel) {
- d->m_statusBarExtension->removeStatusBarItem(d->m_statusBarWalletLabel);
- delete d->m_statusBarWalletLabel;
- d->m_statusBarWalletLabel = 0L;
- }
-#endif // KHTML_NO_WALLET
-}
-
-void KHTMLPart::launchWalletManager()
-{
-#ifndef KHTML_NO_WALLET
- if (!DCOPClient::mainClient()->isApplicationRegistered("kwalletmanager")) {
- TDEApplication::startServiceByDesktopName("kwalletmanager_show");
- } else {
- DCOPRef r("kwalletmanager", "kwalletmanager-mainwindow#1");
- r.send("show");
- r.send("raise");
- }
-#endif // KHTML_NO_WALLET
-}
-
-void KHTMLPart::walletMenu()
-{
-#ifndef KHTML_NO_WALLET
- KPopupMenu *m = new KPopupMenu(0L);
- m->insertItem(i18n("&Close Wallet"), this, TQT_SLOT(slotWalletClosed()));
- m->popup(TQCursor::pos());
-#endif // KHTML_NO_WALLET
-}
-
-void KHTMLPart::slotToggleCaretMode()
-{
- setCaretMode(d->m_paToggleCaretMode->isChecked());
-}
-
-void KHTMLPart::setFormNotification(KHTMLPart::FormNotification fn) {
- d->m_formNotification = fn;
-}
-
-KHTMLPart::FormNotification KHTMLPart::formNotification() const {
- return d->m_formNotification;
-}
-
-KURL KHTMLPart::toplevelURL()
-{
- KHTMLPart* part = this;
- while (part->parentPart())
- part = part->parentPart();
-
- if (!part)
- return KURL();
-
- return part->url();
-}
-
-bool KHTMLPart::isModified() const
-{
- if ( !d->m_doc )
- return false;
-
- return d->m_doc->unsubmittedFormChanges();
-}
-
-void KHTMLPart::setDebugScript( bool enable )
-{
- unplugActionList( "debugScriptList" );
- if ( enable ) {
- if (!d->m_paDebugScript) {
- d->m_paDebugScript = new KAction( i18n( "JavaScript &Debugger" ), 0, this, TQT_SLOT( slotDebugScript() ), actionCollection(), "debugScript" );
- }
- d->m_paDebugScript->setEnabled( d->m_frame ? d->m_frame->m_jscript : 0L );
- TQPtrList<KAction> lst;
- lst.append( d->m_paDebugScript );
- plugActionList( "debugScriptList", lst );
- }
- d->m_bJScriptDebugEnabled = enable;
-}
-
-void KHTMLPart::setSuppressedPopupIndicator( bool enable )
-{
- setSuppressedPopupIndicator( enable, 0 );
-}
-
-void KHTMLPart::setSuppressedPopupIndicator( bool enable, KHTMLPart *originPart )
-{
- if ( parentPart() ) {
- parentPart()->setSuppressedPopupIndicator( enable, originPart );
- return;
- }
-
- if ( enable && originPart ) {
- d->m_openableSuppressedPopups++;
- if ( d->m_suppressedPopupOriginParts.findIndex( originPart ) == -1 )
- d->m_suppressedPopupOriginParts.append( originPart );
- }
-
- if ( enable && !d->m_statusBarPopupLabel ) {
- d->m_statusBarPopupLabel = new KURLLabel( d->m_statusBarExtension->statusBar() );
- d->m_statusBarPopupLabel->setFixedHeight( instance()->iconLoader()->currentSize( KIcon::Small) );
- d->m_statusBarPopupLabel->setSizePolicy( TQSizePolicy( TQSizePolicy::Fixed, TQSizePolicy::Fixed ));
- d->m_statusBarPopupLabel->setUseCursor( false );
- d->m_statusBarExtension->addStatusBarItem( d->m_statusBarPopupLabel, 0, false );
- d->m_statusBarPopupLabel->setPixmap( SmallIcon( "window_suppressed", instance() ) );
- TQToolTip::add( d->m_statusBarPopupLabel, i18n("This page was prevented from opening a new window via JavaScript." ) );
-
- connect(d->m_statusBarPopupLabel, TQT_SIGNAL(leftClickedURL()), TQT_SLOT(suppressedPopupMenu()));
- if (d->m_settings->jsPopupBlockerPassivePopup()) {
- TQPixmap px;
- px = MainBarIcon( "window_suppressed" );
- KPassivePopup::message(i18n("Popup Window Blocked"),i18n("This page has attempted to open a popup window but was blocked.\nYou can click on this icon in the status bar to control this behavior\nor to open the popup."),px,d->m_statusBarPopupLabel);
- }
- } else if ( !enable && d->m_statusBarPopupLabel ) {
- TQToolTip::remove( d->m_statusBarPopupLabel );
- d->m_statusBarExtension->removeStatusBarItem( d->m_statusBarPopupLabel );
- delete d->m_statusBarPopupLabel;
- d->m_statusBarPopupLabel = 0L;
- }
-}
-
-void KHTMLPart::suppressedPopupMenu() {
- KPopupMenu *m = new KPopupMenu(0L);
- m->setCheckable(true);
- if ( d->m_openableSuppressedPopups )
- m->insertItem(i18n("&Show Blocked Popup Window","Show %n Blocked Popup Windows", d->m_openableSuppressedPopups), this, TQT_SLOT(showSuppressedPopups()));
- m->insertItem(i18n("Show Blocked Window Passive Popup &Notification"), this, TQT_SLOT(togglePopupPassivePopup()),0,57);
- m->setItemChecked(57,d->m_settings->jsPopupBlockerPassivePopup());
- m->insertItem(i18n("&Configure JavaScript New Window Policies..."), this, TQT_SLOT(launchJSConfigDialog()));
- m->popup(TQCursor::pos());
-}
-
-void KHTMLPart::togglePopupPassivePopup() {
- // Same hack as in disableJSErrorExtension()
- d->m_settings->setJSPopupBlockerPassivePopup( !d->m_settings->jsPopupBlockerPassivePopup() );
- DCOPClient::mainClient()->send("konqueror*", "KonquerorIface", "reparseConfiguration()", TQByteArray());
-}
-
-void KHTMLPart::showSuppressedPopups() {
- for ( TQValueListIterator<TQGuardedPtr<KHTMLPart> > i = d->m_suppressedPopupOriginParts.begin();
- i != d->m_suppressedPopupOriginParts.end(); ++i ) {
- if (KHTMLPart* part = *i) {
- KJS::Window *w = KJS::Window::retrieveWindow( part );
- if (w) {
- w->showSuppressedWindows();
- w->forgetSuppressedWindows();
- }
- }
- }
- setSuppressedPopupIndicator( false );
- d->m_openableSuppressedPopups = 0;
- d->m_suppressedPopupOriginParts.clear();
-}
-
-// Extension to use for "view document source", "save as" etc.
-// Using the right extension can help the viewer get into the right mode (#40496)
-TQString KHTMLPart::defaultExtension() const
-{
- if ( !d->m_doc )
- return ".html";
- if ( !d->m_doc->isHTMLDocument() )
- return ".xml";
- return d->m_doc->htmlMode() == DOM::DocumentImpl::XHtml ? ".xhtml" : ".html";
-}
-
-bool KHTMLPart::inProgress() const
-{
- if (d->m_runningScripts || (d->m_doc && d->m_doc->parsing()))
- return true;
-
- // Any frame that hasn't completed yet ?
- ConstFrameIt it = d->m_frames.begin();
- const ConstFrameIt end = d->m_frames.end();
- for (; it != end; ++it ) {
- if ((*it)->m_run || !(*it)->m_bCompleted)
- return true;
- }
-
- return d->m_submitForm || !d->m_redirectURL.isEmpty() || d->m_redirectionTimer.isActive() || d->m_job;
-}
-
-using namespace KParts;
-#include "khtml_part.moc"
-#include "khtmlpart_p.moc"