/*
 *  qlo10k1 - GUI frontend for ld10k1
 *
 *  Copyright (c) 2004 by Peter Zubaj
 *
 *   This program is free software; you can redistribute it and/or modify
 *   it under the terms of the GNU General Public License as published by
 *   the Free Software Foundation; either version 2 of the License, or
 *   (at your option) any later version.
 *
 *   This program is distributed in the hope that it will be useful,
 *   but WITHOUT ANY WARRANTY; without even the implied warranty of
 *   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
 *   GNU General Public License for more details.
 *
 *   You should have received a copy of the GNU General Public License
 *   along with this program; if not, write to the Free Software
 *   Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301  USA
 *
 */
 
#include <qpopupmenu.h>
#include <qmessagebox.h>
#include <qfiledialog.h>

#include "app_global.h"
#include "routingwidget.h"
#include "structure.h"
#include "structure_io.h"
#include "structure_link.h"
#include "structure_patch.h"
#include "strglobal.h"
#include "ld10k1file.h"

extern QString gLastFileDir;

void RoutingWidget::openObjectMenuAt(RSItemBaseWithType *item, MenuMode mm, int xp, int yp, int mxp, int myp)
{
	QPopupMenu *contextMenu = new QPopupMenu();
	
	enum Action {Refresh, ClearDSP, Delete, Rename, Disconnect, DelPoint, AddPoint, Connect, Save};
	
	int rn = -1;
	
	if (mm == MenuNone)
	{
		contextMenu->insertItem(tr("&Refresh"), Refresh);
		//contextMenu->insertItem(tr("&AutoArange")/*, this, SLOT(menuQuitActivated(int))*/);
		contextMenu->insertItem(tr("&Clear DSP"), ClearDSP);
	}
	else if (mm == MenuObjects)
	{
		contextMenu->insertItem(tr("&Delete (Unload)"), Delete);
	}
	else if (mm == MenuIO)
	{
		//contextMenu->insertItem(tr("&Rename"), Rename);
		
		bool isConnected = false;
		
		if (item->type() == RSItemBaseWithType::Out)
			isConnected = item->getIO(false, 0)->getConnectedTo() != NULL;
		else
			isConnected = item->getIO(true, 0)->getConnectedTo() != NULL;
		
		if (isConnected)
			contextMenu->insertItem(tr("D&isconnect"), Disconnect);
			
		contextMenu->insertSeparator();
		contextMenu->insertItem(tr("&Delete"), Delete);
	}
	else if (mm == MenuLink)
	{
		int pn = item->getHandlePointNum(xp, yp);
		if (pn > 0)
			contextMenu->insertItem(tr("D&elete point"), DelPoint);
		else if (pn < 0)
			contextMenu->insertItem(tr("A&dd point"), AddPoint);
		
		if (item->type() == RSItemBaseWithType::Link)
		{
			StrLink *lnk = (StrLink *)item;
			
			rn = lnk->getRouteNumFromPoint(xp, yp);
			if(rn >= 0)
			{
				RSItemIO *io = NULL;
				RSItemBaseWithType *own = NULL;
				io = lnk->getRoutePoint(rn); 
				if(io)
				{
					own = (RSItemBaseWithType*)io->getOwner();
					if(own && (own->type() == RSItemBaseWithType::Patch))
					  contextMenu->insertItem(tr("D&isconnect"), Disconnect);
				}
			}
		}
			
		contextMenu->insertSeparator();
		contextMenu->insertItem(tr("&Delete"), Delete);
	}
	else if (mm == MenuPatch)
	{
		//contextMenu->insertItem(tr("&Rename"), Rename);
		
		RSItemIO *io = item->getIOAtPoint(xp, yp);
		
		if (io)
		{
			//contextMenu->insertItem(tr("&IO Rename"), Rename);
			
			if (io->getConnectedTo())
				contextMenu->insertItem(tr("D&isconnect"), Disconnect);
			else
				contextMenu->insertItem(tr("&Connect"), Connect);
		}
		else
			contextMenu->insertItem(tr("&Save"), Save);
		
		contextMenu->insertSeparator();
		contextMenu->insertItem(tr("&Unload"), Delete);
	}
	
	
	
	int id = contextMenu->exec(QPoint(mxp, myp));
	
	delete contextMenu;
	
	if (id < 0)
		return;
		
	if (id == AddPoint)
	{
		StrLink *l = (StrLink *)item;
		if (l->addSegmentPoint(xp, yp))
		{
			l->updateContents(drawing, getZoomLevel());
		}
	}
	else if (id == DelPoint)
	{
		StrLink *l = (StrLink *)item;
		// FIXME - update before del
		l->updateContents(drawing, getZoomLevel());
		l->delSegmentPoint(l->getHandlePointNum(xp, yp));
		l->calcSize();
	}
	else if (id == Delete)
	{
		drawing->deleteAllSelected();
		structure->loadFromLD();
	}
	else if (id == Connect)
	{
		StrPatch *p = (StrPatch *)item;
		RSItemIO *pio = p->getIOAtPoint(xp, yp);
		if (pio)
			drawing->startLinkDrag(pio, xp, yp);
	}
	else if (id == Disconnect)
	{
		RSItemIO *io = NULL;
		if (item->type() == RSItemBaseWithType::Patch)
		{
			int err;
			StrPatch *p = (StrPatch *)item;
			io = p->getIOAtPoint(xp, yp);
			
			StrLink *l = io->getConnectedTo();
			// FIXME - update before disconnect
			l->updateContents(drawing, getZoomLevel());
			
			if ((err = structure->disconnectFromLink(io)) < 0)
			  QMessageBox::critical(0, APP_NAME, QString("Couldn't disconnect !\n(ld10k1 error:%1)").arg(structure->errorStr(err)));
		}
		else
		{
			if (item->type() == RSItemBaseWithType::In)
			{
				StrInput *in = (StrInput *)item;
				io = in->getIO(true, 0);
			}
			else if (item->type() == RSItemBaseWithType::Out)
			{
				StrOutput *out = (StrOutput *)item;
				io = out->getIO(false, 0);
			}
			else if (item->type() == RSItemBaseWithType::FX)
			{
				StrFX *fx = (StrFX *)item;
				io = fx->getIO(true, 0);
			}
			
			if(io)
			{  
				StrLink *l = io->getConnectedTo();
				structure->deleteOneLink(l);
				structure->loadFromLD();
				drawing->updateContents();
			}  
			else if (item->type() == RSItemBaseWithType::Link)
			{
				StrLink *lnk = (StrLink *)item;
				
				if(rn >= 0)
				{  
					io = lnk->getRoutePoint(rn);
					if(io)
					{
						RSItemBaseWithType *own = NULL;
						own = (RSItemBaseWithType*)io->getOwner();
						if(own && (own->type() == RSItemBaseWithType::Patch))
						{
							int err;
							if ((err = structure->disconnectFromLink(io)) < 0)
								QMessageBox::critical(0, APP_NAME, QString("Couldn't disconnect !\n(ld10k1 error:%1)").arg(structure->errorStr(err)));
			
							drawing->updateContents();
						}
					}
				}
			}
		}
	}
	else if (id == ClearDSP)
	{
		structure->clearDSP();
		drawing->updateContents();
	}
	else if (id == Refresh)
	{
		structure->loadFromLD();
		drawing->updateContents();
	}
	else if (id == Save)
	{
		StrPatch *p = (StrPatch *)item;
		int err;
		
		QFileDialog *fd = new QFileDialog(this, "file dialog", TRUE);
		fd->setMode(QFileDialog::AnyFile);
		fd->setFilter("ld10k1 Native effect files (*.ld10k1)");
		fd->setCaption("Save patch");
		fd->setDir(gLastFileDir);
		
		QString fileName;
		if (fd->exec() == QDialog::Accepted)
		{
			fileName = fd->selectedFile();
			gLastFileDir = fd->dirPath();
			delete fd;
			
			if (!fileName.endsWith(".ld10k1"))
				fileName += ".ld10k1";
			if (QFile::exists(fileName))
			{
				if (QMessageBox::question(0, APP_NAME, QString("File with name %1 exists. Overwrite ?").arg(fileName), QMessageBox::Yes, QMessageBox::Cancel) != QMessageBox::Yes)
					return;
			}
		
			LD10k1File *pf = NULL;
			if ((err = structure->get(p->num(), &pf)) < 0)
			{
				QMessageBox::critical(0, APP_NAME, QString("Couldn't get patch !\n(ld10k1 error:%1)").arg(structure->errorStr(err)));
				return;
			}
			
			if ((err = pf->SaveToFile(fileName)) < 0)
				QMessageBox::critical(0, APP_NAME, QString("Couldn't save patch\n(ld10k1 error:%1)").arg(structure->errorStr(err)));
			delete pf;
		}
		else
			delete fd;
	}
}