/***************************************************************************
 *   Copyright (C) 2008 by Jürgen Böhm   *
 *   juergen.boehm@aviduratas.de   *
 *                                                                         *
 *   This program is free software; you can redistribute it and/or modify  *
 *   it under the terms of the GNU General Public License as published by  *
 *   the Free Software Foundation; either version 2 of the License, or     *
 *   (at your option) any later version.                                   *
 *                                                                         *
 *   This program is distributed in the hope that it will be useful,       *
 *   but WITHOUT ANY WARRANTY; without even the implied warranty of        *
 *   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the         *
 *   GNU General Public License for more details.                          *
 *                                                                         *
 *   You should have received a copy of the GNU General Public License     *
 *   along with this program; if not, write to the                         *
 *   Free Software Foundation, Inc.,                                       *
 *   59 Temple Place - Suite 330, Boston, MA  02111-1307, USA.             *
 ***************************************************************************/

#include <qimage.h>
#include <qpixmap.h>
#include <qtoolbar.h>
#include <qtoolbutton.h>
#include <qpopupmenu.h>
#include <qmenubar.h>
//#include <qtextedit.h>
#include <qfile.h>
#include <qfiledialog.h>
#include <qstatusbar.h>
#include <qmessagebox.h>
#include <qprinter.h>
#include <qapplication.h>
#include <qaccel.h>
#include <qtextstream.h>
#include <qpainter.h>
#include <qpaintdevicemetrics.h>
#include <qwhatsthis.h>
#include <qiconset.h>

#include "simemu.h"


#include "filesave.xpm"
#include "fileopen.xpm"
#include "fileprint.xpm"


#include "break.xpm"
#include "halt.xpm"
#include "haltA.xpm"

#include "run.xpm"
#include "runD.xpm"

using namespace std;

deqint keyPressedQueue;
// deque<int> keyReleasedQueue;


simemu::simemu()
    : QMainWindow( 0, "simemu", WDestructiveClose ), codeLoaded(false)
{
    printer = new QPrinter;

    QPixmap openIcon, saveIcon, printIcon, runIcon, haltIcon, breakIcon;

    QToolBar * fileTools = new QToolBar( this, "file operations" );
    fileTools->setLabel( tr("File Operations") );

    openIcon = QPixmap( fileopen );
    QToolButton * fileOpen
	= new QToolButton( openIcon, tr("Open File"), QString::null,
			   this, SLOT(choose()), fileTools, "open file" );


    runIcon = QPixmap ( run_xpm );
		QIconSet runIconSet (runIcon);
		runIconSet.setPixmap ( QPixmap ( runD_xpm ), QIconSet::Automatic, QIconSet::Disabled, QIconSet::On );		

    QToolButton * runProgram
	= new QToolButton( runIconSet, tr("Run Program"), QString::null,
			   this, SLOT(execute()), fileTools, "run program" );

		runButton = runProgram;


    haltIcon = QPixmap( halt_xpm );
		QIconSet haltIconSet(haltIcon);
		haltIconSet.setPixmap ( QPixmap ( haltA_xpm ), QIconSet::Automatic, QIconSet::Normal, QIconSet::On );

    QToolButton * haltProgram
	= new QToolButton( haltIconSet, tr("Halt Program"), QString::null,
			   this, SLOT(haltProgram()), fileTools, "halt program" );

		haltProgram->setToggleButton(true);

    breakIcon = QPixmap( break_xpm );
    QToolButton * breakProgram
	= new QToolButton( breakIcon, tr("Break Program"), QString::null,
			   this, SLOT(breakProgram()), fileTools, "break program" );


    saveIcon = QPixmap( filesave );
    QToolButton * fileSave
	= new QToolButton( saveIcon, tr("Save File"), QString::null,
			   this, SLOT(save()), fileTools, "save file" );

    printIcon = QPixmap( fileprint );
    QToolButton * filePrint
	= new QToolButton( printIcon, tr("Print File"), QString::null,
			   this, SLOT(print()), fileTools, "print file" );


    (void)QWhatsThis::whatsThisButton( fileTools );

    QString fileOpenText = tr("<p><img source=\"fileopen\"> "
	         "Click this button to open a <em>new file</em>. <br>"
                 "You can also select the <b>Open</b> command "
                 "from the <b>File</b> menu.</p>");

    QWhatsThis::add( fileOpen, fileOpenText );

    QMimeSourceFactory::defaultFactory()->setPixmap( "fileopen", openIcon );

    QString fileSaveText = tr("<p>Click this button to save the file you "
                 "are editing. You will be prompted for a file name.\n"
                 "You can also select the <b>Save</b> command "
                 "from the <b>File</b> menu.</p>");

    QWhatsThis::add( fileSave, fileSaveText );

    QString filePrintText = tr("Click this button to print the file you "
                 "are editing.\n You can also select the Print "
                 "command from the File menu.");

    QWhatsThis::add( filePrint, filePrintText );


    QPopupMenu * file = new QPopupMenu( this );
    menuBar()->insertItem( tr("&File"), file );


    file->insertItem( tr("&New"), this, SLOT(newDoc()), CTRL+Key_N );

    int id;
    id = file->insertItem( openIcon, tr("&Open..."),
			   this, SLOT(choose()), CTRL+Key_O );
    file->setWhatsThis( id, fileOpenText );

    id = file->insertItem( saveIcon, tr("&Save"),
			   this, SLOT(save()), CTRL+Key_S );
    file->setWhatsThis( id, fileSaveText );

    id = file->insertItem( tr("Save &As..."), this, SLOT(saveAs()) );
    file->setWhatsThis( id, fileSaveText );

    file->insertSeparator();

    id = file->insertItem( printIcon, tr("&Print..."),
			   this, SLOT(print()), CTRL+Key_P );
    file->setWhatsThis( id, filePrintText );

    file->insertSeparator();

    file->insertItem( tr("&Execute"), this, SLOT(execute())  );

    file->insertSeparator();

    file->insertItem( tr("&Close"), this, SLOT(close()), CTRL+Key_W );

    file->insertItem( tr("&Quit"), qApp, SLOT( closeAllWindows() ), CTRL+Key_Q );

    menuBar()->insertSeparator();

    QPopupMenu * help = new QPopupMenu( this );
    menuBar()->insertItem( tr("&Help"), help );

    help->insertItem( tr("&About"), this, SLOT(about()), Key_F1 );
    help->insertItem( tr("About &Qt"), this, SLOT(aboutQt()) );
    help->insertSeparator();
    help->insertItem( tr("What's &This"), this, SLOT(whatsThis()), SHIFT+Key_F1 );

		emuproc = new EmuProcessor (this);
	
    e = new QjbDisplay( this, "editor", maxlines, maxcols );
    e->setFocus();
    setCentralWidget( e );

		// QFont courFont ( "Courier", 10 );

		// e->setFont ( courFont );

    statusBar()->message( tr("Ready"), 2000 );

    resize( 450, 600 );

		runButton->setEnabled (false);


}


simemu::~simemu()
{

		delete emuproc;
    delete printer;
}



void simemu::newDoc()
{
    simemu *ed = new simemu;
    ed->setCaption(tr("Qt Example - Application"));
    ed->show();
}

void simemu::choose()
{
    QString fn = akt_test_file;

		//QFileDialog::getOpenFileName( QString::null, QString::null,
		//			       this);

    if ( !fn.isEmpty() )
	load( fn );
    else
	statusBar()->message( tr("Loading aborted"), 2000 );
}


void simemu::load( const QString &fileName )
{
    QFile f( fileName );
    if ( !f.open( IO_ReadOnly ) )
	return;

    QTextStream ts( &f );

		int memaddr = 0;
		QString line;

		while (! ts.atEnd()) {
	
			ts >> line;

//			cerr << "line = " << line << endl;

			if (line[0] != '/') {

				line = "0x"  + line;

//				cerr << "line = " << line << endl;
				
				bool ok;

				R32 memval = (R32)((unsigned int)line.toLong ( &ok, 16));

				if (!ok) {
					cerr << "not ok." << endl;
					throw;
				}
				else {
					emuproc->setmemwordAdirect(memaddr, memval );
					memaddr += 4;
				}		
			}
//			cerr << memaddr << " ";

		}

		codeLoaded = true;
		runButton->setEnabled (true);

//    e->setText( ts.read() );
//    e->setModified( FALSE );
    setCaption( fileName );
    statusBar()->message( tr("Loaded document %1").arg(fileName), 2000 );
}


void simemu::save()
{
    if ( filename.isEmpty() ) {
	saveAs();
	return;
    }

//    QString text = e->text();
    QFile f( filename );
    if ( !f.open( IO_WriteOnly ) ) {
	statusBar()->message( tr("Could not write to %1").arg(filename),
			      2000 );
	return;
    }

    QTextStream t( &f );
//    t << text;
    f.close();

//    e->setModified( FALSE );

    setCaption( filename );

    statusBar()->message( tr( "File %1 saved" ).arg( filename ), 2000 );
}


void simemu::saveAs()
{
    QString fn = QFileDialog::getSaveFileName( QString::null, QString::null,
					       this );
    if ( !fn.isEmpty() ) {
	filename = fn;
	save();
    } else {
	statusBar()->message( tr("Saving aborted"), 2000 );
    }
}


void simemu::print()
{
    // ###### Rewrite to use QSimpleRichText to print here as well
    const int Margin = 10;
    int pageNo = 1;

    if ( printer->setup(this) ) {		// printer dialog
	statusBar()->message( tr("Printing...") );
	QPainter p;
	if( !p.begin( printer ) )               // paint on printer
	    return;

	//p.setFont( e->font() );
	int yPos	= 0;			// y-position for each line
	//QFontMetrics fm = p.fontMetrics();
	//QPaintDeviceMetrics metrics( printer ); // need width/height
						// of printer surface
/*
	for( int i = 0 ; i < e->lines() ; i++ ) {
	    if ( Margin + yPos > metrics.height() - Margin ) {
		QString msg( "Printing (page " );
		msg += QString::number( ++pageNo );
		msg += ")...";
		statusBar()->message( msg );
		printer->newPage();		// no more room on this page
		yPos = 0;			// back to top of page
	    }
	    p.drawText( Margin, Margin + yPos,
			metrics.width(), fm.lineSpacing(),
			ExpandTabs | DontClip,
			e->text( i ) );
	    yPos = yPos + fm.lineSpacing();
	}
*/
	p.end();				// send job to printer
	statusBar()->message( tr("Printing completed"), 2000 );
    } else {
	statusBar()->message( tr("Printing aborted"), 2000 );
    }
}


void simemu::haltProgram () {

	emuproc->toggleHalt();	
}


void simemu::breakProgram () {

emuproc->setBreak();	

}

void simemu::execute () {

	emuproc->execute ( 8192, 4096, -1 );	

}

void simemu::closeEvent( QCloseEvent* ce )
{

		/*
    if ( !e->isModified() ) {
	ce->accept();
	return;
    }
		*/

		emuproc->setBreak ();
		if (emuproc->breakFlag) {

			ce->accept();
			return;
		};

/*


    switch( QMessageBox::information( this, tr("Qt Application Example"),
				      tr("Do you want to save the changes"
				      " to the document?"),
				      tr("Yes"), tr("No"), tr("Cancel"),
				      0, 1 ) ) {
    case 0:
	save();
	ce->accept();
	break;
    case 1:
	ce->accept();
	break;
    case 2:
    default: // just for sanity
	ce->ignore();
	break;
    }

*/
}


void simemu::about()
{
    QMessageBox::about( this, tr("Qt Application Example"),
			tr("This example demonstrates simple use of "
			"QMainWindow,\nQMenuBar and QToolBar."));
}


void simemu::aboutQt()
{
    QMessageBox::aboutQt( this, tr("Qt Application Example") );
}



	

void simemu::customEvent (QCustomEvent * ev) {

	// vpi_printf ( "in custom Event " );

	if (ev->type() == 65432) {

	// put character event
	// puts ev->c at (ev->x, ev->y)
		
		QxycEvent * ev1 = (QxycEvent* )ev;

		//e->placeCursor( QPoint(ev1->x, ev1->y), 0 );
		//e->setSelection(ev1->x,ev1->y,ev1->x,(ev1->y)+1);
		//e->del();
		//e->insert( QChar(ev1->c + 32) );

		this->repaint();

	} 

}