/* * Copyright (C) 2001-2003, Richard J. Moore * * 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. */ #include #include #include #include #include #include #include #include #include #include #include #include #include #include #include #include #include #include #include "jsbinding.h" #include "kjsembedpart.h" #include "jsconsolewidget.h" #include "jsconsolewidget.moc" namespace KJSEmbed { class JSConsoleWidgetPrivate { }; JSConsoleWidget::JSConsoleWidget( KJSEmbedPart *jspart, TQWidget *parent, const char *name ) : TQFrame( parent, name ? name : "jsconsole_widget" ), js(jspart), proc(0), d(0) { setFocusPolicy( TQWidget::StrongFocus ); createView(); } JSConsoleWidget::~JSConsoleWidget() { } void JSConsoleWidget::createView() { TQPixmap px( KGlobal::iconLoader()->loadIcon("konsole", KIcon::NoGroup, KIcon::SizeSmall) ); TQPixmap pxl( KGlobal::iconLoader()->loadIcon("konsole", KIcon::NoGroup, KIcon::SizeLarge) ); setIcon( px ); KWin::setIcons( winId(), pxl, px ); ttl = new KPopupTitle( this, "title" ); ttl->setText( i18n("JavaScript Console") ); ttl->setIcon( px ); log = new KTextEdit( this, "log_widget" ); log->setReadOnly( true ); log->setUndoRedoEnabled( false ); log->setTextFormat( TQt::RichText ); log->setWrapPolicy( TQTextEdit::Anywhere ); log->setText( "
" );
    log->setFocusPolicy( TQWidget::NoFocus );

    // Command entry section
    cmdBox = new TQHBox( this, "cmd_box" );
    cmdBox->setSpacing( KDialog::spacingHint() );

    TQLabel *prompt = new TQLabel( i18n("&KJS>"), cmdBox, "prompt" );
    cmd = new KLineEdit( cmdBox, "cmd_edit" );
    cmd->setFocusPolicy( TQWidget::StrongFocus );
    cmd->setFocus();
    prompt->setBuddy( cmd );

    go = new TQPushButton( i18n("&Run"), cmdBox, "run_button" );
    go->setFixedSize( go->sizeHint() );

    connect( cmd, TQT_SIGNAL(returnPressed(const TQString&)), go, TQT_SLOT( animateClick() ) );
    connect( go, TQT_SIGNAL( clicked() ), TQT_SLOT( invoke() ) );

    // Setup completion
    KCompletion *comp = cmd->completionObject();
    connect( cmd, TQT_SIGNAL(returnPressed(const TQString&)), comp, TQT_SLOT(addItem(const TQString&)) );

    // Layout
    TQVBoxLayout *vert = new TQVBoxLayout( this, KDialog::marginHint(), KDialog::spacingHint() );
    vert->addWidget( ttl );
    vert->addWidget( log );
    vert->addWidget( cmdBox );
}

void JSConsoleWidget::invoke()
{
    TQString code( cmd->text() );
    println( TQString( "KJS> %1" ).arg( code ) );
    execute( code );
}

bool JSConsoleWidget::execute( const TQString &cmd )
{
    return execute( cmd, KJS::Null() );
}

bool JSConsoleWidget::execute( const TQString &cmd, const KJS::Value &self )
{
    KJS::Completion jsres;
    bool ok = js->execute( jsres, cmd, self );

    // Executed ok
    if ( ok ) {

	// No return value
	if ( !jsres.isValueCompletion() )
	    return ok;

	// Return value
	KJS::Value ret = jsres.value();
	KJS::UString s = ret.toString( js->globalExec() );

	if ( s.isNull() ) {
	    warn( i18n("Success, but return value cannot be displayed") );
	    return ok;
	}

	TQString txt = s.qstring();
	txt = txt.replace( TQChar('\n'), "
" ); println( txt ); return ok; } // Handle errors KJS::ComplType ct = jsres.complType(); if ( (ct == KJS::Throw) || (ct == KJS::Break) || ct == KJS::Continue ) { KJS::UString s = jsres.value().toString( js->globalExec() ); if ( !s.isNull() ) warn( s.qstring() ); else warn( i18n("Unspecified error") ); } else { kdDebug(80001) << "jsconsolewidget: Unknown completion error, " << ct << endl; warn( i18n("Unknown error returned, completion type %1").arg(ct) ); } return ok; } void JSConsoleWidget::println( const TQString &msg ) { log->append( msg ); log->scrollToBottom(); } void JSConsoleWidget::warn( const TQString &msg ) { TQString err( "%1" ); println( err.arg(msg) ); } // // Process Handling // bool JSConsoleWidget::run( const TQString &cmd ) { kdDebug(80001) << "JSConsoleWidget::run(" << cmd << ")" << endl; if ( proc ) return false; proc = new KShellProcess("/bin/sh"); *proc << cmd; connect( proc, TQT_SIGNAL( processExited(KProcess *) ), TQT_SLOT( childExited() ) ); connect( proc, TQT_SIGNAL( receivedStdout(KProcess *, char *, int) ), this, TQT_SLOT( receivedStdOutput(KProcess *, char *, int) ) ); connect( proc, TQT_SIGNAL( receivedStderr(KProcess *, char *, int) ), this, TQT_SLOT( receivedStdError(KProcess *, char *, int) ) ); return proc->start( KProcess::NotifyOnExit, KProcess::Communication( KProcess::Stdout|KProcess::Stderr )); } void JSConsoleWidget::childExited() { TQString s; if ( proc->normalExit() ) { if ( proc->exitStatus() ) s = i18n( "[Exited with status %1]\n" ).arg( proc->exitStatus() ); else s = i18n( "[Finished]\n" ); println( s ); } else { s = i18n("[Aborted]\n"); warn( s ); } delete proc; proc = 0; } void JSConsoleWidget::receivedStdOutput( KProcess *, char *buffer, int buflen ) { TQCString buf = TQCString( buffer, buflen+1 ); println( TQString(buf) ); } void JSConsoleWidget::receivedStdError( KProcess *, char *buffer, int buflen ) { TQCString buf = TQCString( buffer, buflen+1 ); warn( TQString(buf) ); } } // namespace KJSEmbed // Local Variables: // c-basic-offset: 4 // End: