From dfe289850f068f19ba4a83ab4e7e22a7e09c13c9 Mon Sep 17 00:00:00 2001 From: Timothy Pearson Date: Sat, 26 Jan 2013 13:17:21 -0600 Subject: Rename a number of libraries and executables to avoid conflicts with KDE4 --- tdehtml/tdehtml_part.cpp | 7471 ++++++++++++++++++++++++++++++++++++++++++++++ 1 file changed, 7471 insertions(+) create mode 100644 tdehtml/tdehtml_part.cpp (limited to 'tdehtml/tdehtml_part.cpp') diff --git a/tdehtml/tdehtml_part.cpp b/tdehtml/tdehtml_part.cpp new file mode 100644 index 000000000..185ded02d --- /dev/null +++ b/tdehtml/tdehtml_part.cpp @@ -0,0 +1,7471 @@ +// -*- c-basic-offset: 2 -*- +/* This file is part of the KDE project + * + * Copyright (C) 1998, 1999 Torben Weis + * 1999 Lars Knoll + * 1999 Antti Koivisto + * 2000 Simon Hausmann + * 2000 Stefan Schimanski <1Stein@gmx.de> + * 2001-2003 George Staikos + * 2001-2003 Dirk Mueller + * 2000-2005 David Faure + * 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 "tdehtml_part.h" + +#include "tdehtml_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 "tdehtmlview.h" +#include +#include "ecma/kjs_proxy.h" +#include "ecma/kjs_window.h" +#include "tdehtml_settings.h" +#include "kjserrordlg.h" + +#include +#include + +#include "htmlpageinfo.h" + +#include +#include +#include + +#include + +#include +#include +#include +#include +#include +#include +#include +#include +#include +#include +#include +#include +#include +#include +#include +#include +#include +#include +#include +#include +#include +#include +#if !defined(QT_NO_DRAGANDDROP) +#include +#endif +#include "../tdeutils/kfinddialog.h" +#include "../tdeutils/kfind.h" + +#include +#include + +#include +#include +#include +#include + +#include +#include +#include +#include +#include + +#include "tdehtmlpart_p.h" +#include "kpassivepopup.h" +#include "kpopupmenu.h" +#include "rendering/render_form.h" +#include + +#define HINT_UTF8 106 + +namespace tdehtml { + 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 m_part; + tdehtml::CachedCSSStyleSheet *m_cachedSheet; + }; +} + +void tdehtml::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) << "tdehtml::ChildFrame::liveConnectEvent " << script << endl; + + KHTMLPart * part = ::tqqt_cast(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( "tdehtml.rc" ); + else if ( prof == BrowserViewGUI ) + setXMLFile( "tdehtml_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

" + "Shows the certificate of the displayed page. Only " + "pages that have been transmitted using a secure, encrypted connection have a " + "certificate.

" + "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" ); + tdehtml::Decoder::AutoDetectLanguage language; + TQCString name = TQTextCodec::codecForLocale()->name(); + name = name.lower(); + + if ( name == "cp1256" || name == "iso-8859-6" ) { + language = tdehtml::Decoder::Arabic; + } + else if ( name == "cp1257" || name == "iso-8859-13" || name == "iso-8859-4" ) { + language = tdehtml::Decoder::Baltic; + } + else if ( name == "cp1250" || name == "ibm852" || name == "iso-8859-2" || name == "iso-8859-3" ) { + language = tdehtml::Decoder::CentralEuropean; + } + else if ( name == "cp1251" || name == "koi8-r" || name == "iso-8859-5" ) { + language = tdehtml::Decoder::Russian; + } + else if ( name == "koi8-u" ) { + language = tdehtml::Decoder::Ukrainian; + } + else if ( name == "cp1253" || name == "iso-8859-7" ) { + language = tdehtml::Decoder::Greek; + } + else if ( name == "cp1255" || name == "iso-8859-8" || name == "iso-8859-8-i" ) { + language = tdehtml::Decoder::Hebrew; + } + else if ( name == "jis7" || name == "eucjp" || name == "sjis" ) { + language = tdehtml::Decoder::Japanese; + } + else if ( name == "cp1254" || name == "iso-8859-9" ) { + language = tdehtml::Decoder::Turkish; + } + else if ( name == "cp1252" || name == "iso-8859-1" || name == "iso-8859-15" ) { + language = tdehtml::Decoder::WesternEuropean; + } + else + language = tdehtml::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< tdehtml::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

" + "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

" + "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

" + "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

" + "Find the next occurrence of the text that you " + "have found using the Find Text function" ) ); + + d->m_paFindPrev = KStdAction::findPrev( this, TQT_SLOT( slotFindPrev() ), actionCollection(), "findPrevious" ); + d->m_paFindPrev->setWhatsThis( i18n( "Find previous

" + "Find the previous occurrence of the text that you " + "have found using the Find Text 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

" + "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", "tdehtml/tdehtml_popupmenu.rc", KHTMLFactory::instance() ) ); + + connect( tdehtml::Cache::loader(), TQT_SIGNAL( requestStarted( tdehtml::DocLoader*, tdehtml::CachedObject* ) ), + this, TQT_SLOT( slotLoaderRequestStarted( tdehtml::DocLoader*, tdehtml::CachedObject* ) ) ); + connect( tdehtml::Cache::loader(), TQT_SIGNAL( requestDone( tdehtml::DocLoader*, tdehtml::CachedObject *) ), + this, TQT_SLOT( slotLoaderRequestDone( tdehtml::DocLoader*, tdehtml::CachedObject *) ) ); + connect( tdehtml::Cache::loader(), TQT_SIGNAL( requestFailed( tdehtml::DocLoader*, tdehtml::CachedObject *) ), + this, TQT_SLOT( slotLoaderRequestDone( tdehtml::DocLoader*, tdehtml::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() ); + + // "tdehtml" 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("tdehtml"); +} + +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 tdehtml_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( tdehtml::Cache::loader(), TQT_SIGNAL( requestStarted( tdehtml::DocLoader*, tdehtml::CachedObject* ) ), + this, TQT_SLOT( slotLoaderRequestStarted( tdehtml::DocLoader*, tdehtml::CachedObject* ) ) ); + disconnect( tdehtml::Cache::loader(), TQT_SIGNAL( requestDone( tdehtml::DocLoader*, tdehtml::CachedObject *) ), + this, TQT_SLOT( slotLoaderRequestDone( tdehtml::DocLoader*, tdehtml::CachedObject *) ) ); + disconnect( tdehtml::Cache::loader(), TQT_SIGNAL( requestFailed( tdehtml::DocLoader*, tdehtml::CachedObject *) ), + this, TQT_SLOT( slotLoaderRequestDone( tdehtml::DocLoader*, tdehtml::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 tdehtmlpart_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 tdehtml_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 + // tdehtmlpart 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(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( 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() ) + tdehtml::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(d->m_doc); + else + return static_cast(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 tdehtml/Makefile.am to add ./ecma/libkjs_html.la to LIBADD +// and to edit tdehtml/ecma/Makefile.am to s/kjs_html/libkjs_html/, remove libtdehtml from LIBADD, +// remove LDFLAGS line, and replace kde_module with either lib (shared) or noinst (static) +// Also, change the order of "ecma" and "." in tdehtml'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(tdehtml::ChildFrame * childframe); } +#endif + +static bool createJScript(tdehtml::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)(tdehtml::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 tdehtml::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 << "tdehtml_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("Error: %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. + tdehtml::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("Error: 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( 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 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(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: <>" << 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( "" ) + .arg(TQApplication::reverseLayout() ? "rtl" : "ltr"); + errText += i18n( "Error while loading %1" ).arg( reqUrl.htmlURL() ); + errText += TQString::fromLatin1( "

" ); + errText += i18n( "An error occurred while loading %1:" ).arg( reqUrl.htmlURL() ); + errText += TQString::fromLatin1( "

" ); + errText += TQStyleSheet::convertFromPlainText( TDEIO::buildErrorString( errorCode, text ) ); + errText += TQString::fromLatin1( "" ); + 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( "" ); + doc += i18n( "Error: " ); + doc += errorName; + doc += TQString::fromLatin1( " - %1

" ).arg( url ); + doc += i18n( "The requested operation could not be completed" ); + doc += TQString::fromLatin1( "

" ); + doc += errorName; + doc += TQString::fromLatin1( "

" ); + if ( !techName.isNull() ) { + doc += TQString::fromLatin1( "

" ); + doc += i18n( "Technical Reason: " ); + doc += techName; + doc += TQString::fromLatin1( "

" ); + } + doc += TQString::fromLatin1( "

" ); + doc += i18n( "Details of the Request:" ); + doc += TQString::fromLatin1( "

  • " ); + doc += i18n( "URL: %1" ).arg( url ); + doc += TQString::fromLatin1( "
  • " ); + if ( !protocol.isNull() ) { + // uncomment for 3.1... i18n change + // doc += i18n( "Protocol: %1" ).arg( protocol ).arg( protocol ); + doc += TQString::fromLatin1( "
  • " ); + } + doc += i18n( "Date and Time: %1" ).arg( datetime ); + doc += TQString::fromLatin1( "
  • " ); + doc += i18n( "Additional Information: %1" ).arg( text ); + doc += TQString::fromLatin1( "

" ); + doc += i18n( "Description:" ); + doc += TQString::fromLatin1( "

" ); + doc += description; + doc += TQString::fromLatin1( "

" ); + if ( causes.count() ) { + doc += TQString::fromLatin1( "

" ); + doc += i18n( "Possible Causes:" ); + doc += TQString::fromLatin1( "

  • " ); + doc += causes.join( "
  • " ); + doc += TQString::fromLatin1( "
" ); + } + if ( solutions.count() ) { + doc += TQString::fromLatin1( "

" ); + doc += i18n( "Possible Solutions:" ); + doc += TQString::fromLatin1( "

  • " ); + doc += solutions.join( "
  • " ); + doc += TQString::fromLatin1( "
" ); + } + doc += TQString::fromLatin1( "" ); + + 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(job); + if (tjob && tjob->isErrorPage()) { + tdehtml::RenderPart *renderPart = d->m_frame ? static_cast(d->m_frame->m_frame) : 0; + if (renderPart) { + HTMLObjectElementImpl* elt = static_cast(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 > 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(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 ); + } + + tdehtml::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; + } + tdehtml::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( 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( tdehtml::DocLoader* dl, tdehtml::CachedObject *obj ) +{ + if ( obj && obj->type() == tdehtml::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( tdehtml::DocLoader* dl, tdehtml::CachedObject *obj ) +{ + if ( obj && obj->type() == tdehtml::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( _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( ( *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 = tdehtml::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: " <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 = tdehtml::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 '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 tdehtml::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(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::Iterator it = m_frames.begin(); + const TQValueList::Iterator itEnd = m_frames.end(); + for (; it != itEnd; ++it) { + KHTMLPart* const part = static_cast((KParts::ReadOnlyPart *)(*it)->m_part); + if (part->inherits("KHTMLPart")) + part->d->setFlagRecursively(flag, value); + }/*next it*/ + } + // do the same again for objects + { + TQValueList::Iterator it = m_objects.begin(); + const TQValueList::Iterator itEnd = m_objects.end(); + for (; it != itEnd; ++it) { + KHTMLPart* const part = static_cast((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(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 + tdehtml::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(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( 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( 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( 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( 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( 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 tdehtml 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(), "tdehtmlfind" ); + 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 + tdehtml::RenderObject* obj = d->m_findNode ? d->m_findNode->renderer() : 0; + tdehtml::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; + tdehtml::RenderObject* obj = d->m_findNode ? d->m_findNode->renderer() : 0; + tdehtml::RenderObject* end = d->m_findNodeEnd ? d->m_findNodeEnd->renderer() : 0; + tdehtml::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 ) + { + tdehtml::RenderTextArea *parent= static_cast(obj->parent()); + s = parent->text(); + s = s.replace(0xa0, ' '); + tmpTextArea = parent; + } + else if ( renderLineText ) + { + tdehtml::RenderLineEdit *parentLine= static_cast(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 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(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::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 : "<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::Iterator it = d->m_stringPortions.begin(); + const TQValueList::Iterator itEnd = d->m_stringPortions.end(); + TQValueList::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; + + tdehtml::RenderObject* obj = node->renderer(); + tdehtml::RenderTextArea *parent = 0L; + tdehtml::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(obj->parent()); + if ( renderLineText ) + parentLine= static_cast(obj); + if ( !renderLineText ) + //if (static_cast(node->renderer()) + // ->posOfChar(d->m_startOffset, x, y)) + { + int dummy; + static_cast(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 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(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(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(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(n.handle())->value().string(); + break; + case ID_INPUT: + if (static_cast(n.handle())->inputType() != HTMLInputElementImpl::PASSWORD) + text += static_cast(n.handle())->value().string(); + break; + case ID_SELECT: + text += static_cast(n.handle())->value().string(); + break; + case ID_BR: + text += "\n"; + hasNewLine = true; + break; + case ID_IMG: + text += static_cast(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 + 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("").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(""+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("").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 (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( "This untrusted page links to
%1.
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. + tdehtml::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(" [Properties]").arg(d->m_pageServices); + + TQString squeezedURL = KStringHandler::csqueeze( url().prettyURL(), 80 ); + dlg->_url->setText("" + squeezedURL + "" + 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(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(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 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::ConstIterator it = d->m_frames.begin(); + const TQValueList::ConstIterator end = d->m_frames.end(); + for (; it != end; ++it ) + if ( (*it)->m_type == tdehtml::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(d->m_doc)->body() && !d->m_bClearing ) + bgURL = static_cast(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 tdehtml::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( tdehtml::RenderPart *frame, const TQString &url, const TQString &frameName, + const TQStringList ¶ms, bool isIFrame ) +{ + //kdDebug( 6050 ) << this << " requestFrame( ..., " << url << ", " << frameName << " )" << endl; + FrameIt it = d->m_frames.find( frameName ); + if ( it == d->m_frames.end() ) + { + tdehtml::ChildFrame * child = new tdehtml::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 ? tdehtml::ChildFrame::IFrame : tdehtml::ChildFrame::Frame; + (*it)->m_frame = frame; + (*it)->m_params = params; + + // Support for + if ( url.find( TQString::fromLatin1( "javascript:" ), 0, false ) == 0 ) + { + if ( processObjectRequest(*it, KURL("about:blank"), TQString("text/html") ) ) { + KHTMLPart* p = static_cast(static_cast((*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("").arg(d->m_frameNameId++); +} + +bool KHTMLPart::requestObject( tdehtml::RenderPart *frame, const TQString &url, const TQString &serviceType, + const TQStringList ¶ms ) +{ + //kdDebug( 6005 ) << "KHTMLPart::requestObject " << this << " frame=" << frame << endl; + tdehtml::ChildFrame *child = new tdehtml::ChildFrame; + FrameIt it = d->m_objects.append( child ); + (*it)->m_frame = frame; + (*it)->m_type = tdehtml::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( tdehtml::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 or + 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( tdehtml::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 ); + + // tdehtmlrun 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 != tdehtml::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(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 != tdehtml::ChildFrame::Object ) + partManager()->addPart( part, false ); +// else +// kdDebug(6005) << "AH! NO FRAME!!!!!" << endl; + + child->m_part = part; + + if (::tqqt_cast(part)) { + static_cast(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 == tdehtml::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(static_cast(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: + p->write(""); + } + 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 ¶ms ) +{ + 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(static_cast( factory )->createPart( parentWidget, widgetName, parent, name, className, params )); + else + res = static_cast(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, "tdehtml 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( "The form will be submitted to
%1
on your local filesystem.
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* tdehtmlPart = this; + while ( tdehtmlPart->parentPart() ) + { + tdehtmlPart=tdehtmlPart->parentPart(); + } + popupURL = tdehtmlPart->url(); + referrer = tdehtmlPart->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 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 ) +{ + tdehtml::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 ) +{ + tdehtml::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(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(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(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 ) +{ + tdehtml::ChildFrame *child = frame( TQT_TQOBJECT_CONST(sender())->parent() ); + KHTMLPart *callingHtmlPart = const_cast(dynamic_cast(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" ) ) + { + tdehtml::ChildFrame *_frame = recursiveFrameRequest( callingHtmlPart, url, args ); + + if ( !_frame ) + { + emit d->m_extension->openURLRequest( url, args ); + return; + } + + child = _frame; + } + } + + if ( child && child->m_type != tdehtml::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 ) 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); +} + +tdehtml::ChildFrame *KHTMLPart::frame( const TQObject *obj ) +{ + assert( obj->inherits( "KParts::ReadOnlyPart" ) ); + const KParts::ReadOnlyPart* const part = static_cast( 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, tdehtml::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(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(p)->findFrameParent(callingPart, f, childFrame); + if (frameParent) + return frameParent; + } + } + return 0; +} + + +KHTMLPart *KHTMLPart::findFrame( const TQString &f ) +{ + tdehtml::ChildFrame *childFrame; + KHTMLPart *parentFrame = findFrameParent(this, f, &childFrame); + if (parentFrame) + { + KParts::ReadOnlyPart *p = childFrame->m_part; + if ( p && p->inherits( "KHTMLPart" )) + return static_cast(p); + } + return 0; +} + +KParts::ReadOnlyPart *KHTMLPart::findFramePart(const TQString &f) +{ + tdehtml::ChildFrame *childFrame; + return findFrameParent(this, f, &childFrame) ? static_cast(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(part)->d->m_frames.count() > 0 ) { + KHTMLPart* frameset = static_cast(part); + part = static_cast(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(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( parent() ); +} + +tdehtml::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 + tdehtml::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 ) + { + tdehtml::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 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 frameStateBuffers; + TQValueList 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::ConstIterator fBufferIt = frameStateBuffers.begin(); + + for (; fIt != fEnd; ++fIt, ++fNameIt, ++fServiceTypeIt, ++fServiceNameIt, ++fURLIt, ++fBufferIt ) + { + tdehtml::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::ConstIterator fBufferIt = frameStateBuffers.begin(); + + for (; fNameIt != fNameEnd; ++fNameIt, ++fServiceTypeIt, ++fServiceNameIt, ++fURLIt, ++fBufferIt ) + { + tdehtml::ChildFrame* const newChild = new tdehtml::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( 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 = ""+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( 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 ); + tdehtml::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 KHTMLPart::frames() const +{ + TQPtrList 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 ( tdehtml::MousePressEvent::test( event ) ) + { + tdehtmlMousePressEvent( static_cast( event ) ); + return; + } + + if ( tdehtml::MouseDoubleClickEvent::test( event ) ) + { + tdehtmlMouseDoubleClickEvent( static_cast( event ) ); + return; + } + + if ( tdehtml::MouseMoveEvent::test( event ) ) + { + tdehtmlMouseMoveEvent( static_cast( event ) ); + return; + } + + if ( tdehtml::MouseReleaseEvent::test( event ) ) + { + tdehtmlMouseReleaseEvent( static_cast( event ) ); + return; + } + + if ( tdehtml::DrawContentsEvent::test( event ) ) + { + tdehtmlDrawContentsEvent( static_cast( 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(tdehtml::RenderObject *renderNode, int y, NodeImpl *&startNode, long &startOffset) +{ + for (tdehtml::RenderObject *n = renderNode; n; n = n->nextSibling()) { + if (n->isText()) { + tdehtml::RenderText* const textRenderer = static_cast(n); + const tdehtml::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(tdehtml::RenderObject *renderNode, int y, NodeImpl *&endNode, long &endOffset) +{ + tdehtml::RenderObject *n = renderNode; + if (!n) { + return false; + } + tdehtml::RenderObject *next; + while ((next = n->nextSibling())) { + n = next; + } + + while (1) { + if (lastRunAt(n->firstChild(), y, endNode, endOffset)) { + return true; + } + + if (n->isText()) { + tdehtml::RenderText* const textRenderer = static_cast(n); + const tdehtml::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::tdehtmlMousePressEvent( tdehtml::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; + tdehtml::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::tdehtmlMousePressEvent selectionStart=" << d->m_selectionStart.handle()->renderer() + // << " offset=" << d->m_startOffset << endl; + //else + // kdDebug(6005) << "KHTML::tdehtmlMousePressEvent 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::tdehtmlMouseDoubleClickEvent( tdehtml::MouseDoubleClickEvent *event ) +{ + TQMouseEvent *_mouse = event->qmouseEvent(); + if ( _mouse->button() == Qt::LeftButton ) + { + d->m_bMousePressed = true; + DOM::Node innerNode = event->innerNode(); + // Find selectionStart again, tdehtmlMouseReleaseEvent lost it + if ( !innerNode.isNull() && innerNode.handle()->renderer()) { + int offset = 0; + DOM::NodeImpl* node = 0; + tdehtml::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 ) +{ + tdehtml::RenderObject* obj = node->renderer(); + + if (obj->isText() && selectLines) { + int pos; + tdehtml::RenderText *renderer = static_cast(obj); + tdehtml::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. + tdehtml::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(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(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::tdehtmlMouseMoveEvent x=" << event->x() << " y=" << event->y() << endl; + DOM::NodeImpl* node=0; + tdehtml::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. tdehtmlMousePressEvent 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::tdehtmlMouseMoveEvent( tdehtml::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(innerNode.handle()); + u = KURL( completeURL( tdehtml::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(innerNode.handle()); + if ( i && i->isServerMap() ) + { + tdehtml::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::tdehtmlMouseReleaseEvent( tdehtml::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::tdehtmlMouseReleaseEvent() 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::tdehtmlDrawContentsEvent( tdehtml::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 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(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 it( d->m_doc->docLoader()->m_docObjects ); + for ( ; it.current(); ++it ) + if ( it.current()->type() == tdehtml::CachedObject::Image ) { + tdehtml::CachedImage *image = static_cast(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(node)->inputType() == HTMLInputElementImpl::IMAGE )) + { + if ( KHTMLFactory::defaultHTMLSettings()->isAdFiltered( d->m_doc->completeURL( static_cast(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(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(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 ) { + tdehtml::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( "Access by untrusted page to
%1
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( 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( 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) +{ + tdehtml::Cache::preloadStyleSheet(url, stylesheet); +} + +void KHTMLPart::preloadScript(const TQString &url, const TQString &script) +{ + tdehtml::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(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 = tdehtml::Decoder::SemiautomaticDetection; + break; + case 1 : + d->m_autoDetectLanguage = tdehtml::Decoder::Arabic; + break; + case 2 : + d->m_autoDetectLanguage = tdehtml::Decoder::Baltic; + break; + case 3 : + d->m_autoDetectLanguage = tdehtml::Decoder::CentralEuropean; + break; + case 4 : + d->m_autoDetectLanguage = tdehtml::Decoder::Chinese; + break; + case 5 : + d->m_autoDetectLanguage = tdehtml::Decoder::Greek; + break; + case 6 : + d->m_autoDetectLanguage = tdehtml::Decoder::Hebrew; + break; + case 7 : + d->m_autoDetectLanguage = tdehtml::Decoder::Japanese; + break; + case 8 : + d->m_autoDetectLanguage = tdehtml::Decoder::Korean; + break; + case 9 : + d->m_autoDetectLanguage = tdehtml::Decoder::Russian; + break; + case 10 : + d->m_autoDetectLanguage = tdehtml::Decoder::Thai; + break; + case 11 : + d->m_autoDetectLanguage = tdehtml::Decoder::Turkish; + break; + case 12 : + d->m_autoDetectLanguage = tdehtml::Decoder::Ukrainian; + break; + case 13 : + d->m_autoDetectLanguage = tdehtml::Decoder::Unicode; + break; + case 14 : + d->m_autoDetectLanguage = tdehtml::Decoder::WesternEuropean; + break; + default : + d->m_autoDetectLanguage = tdehtml::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 ); +} + +tdehtml::Decoder *KHTMLPart::createDecoder() +{ + tdehtml::Decoder *dec = new tdehtml::Decoder(); + if( !d->m_encoding.isNull() ) + dec->setEncoding( d->m_encoding.latin1(), + d->m_haveEncoding ? tdehtml::Decoder::UserChosenEncoding : tdehtml::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, tdehtml::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& 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("tdewalletmanager")) { + TDEApplication::startServiceByDesktopName("tdewalletmanager_show"); + } else { + DCOPRef r("tdewalletmanager", "tdewalletmanager-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 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 > 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 "tdehtml_part.moc" +#include "tdehtmlpart_p.moc" -- cgit v1.2.1