You can not select more than 25 topics Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
tdevelop/buildtools/qmake/trollprojectwidget.cpp

2548 lines
107 KiB

/***************************************************************************
* Copyright (C) 2001 by Bernd Gehrmann *
* bernd@kdevelop.org *
* Copyright (C) 2000-2001 by Trolltech AS. *
* info@trolltech.com *
* Copyright (C) 2002 by Jakob Simon-Gaarde *
* jakob@jsg.dk *
* Copyright (C) 2002-2003 by Alexander Dymo *
* cloudtemple@mksat.net *
* Copyright (C) 2003 by Thomas Hasart *
* thasart@gmx.de *
* Copyright (C) 2006 by Andreas Pakulat *
* apaku@gmx.de *
* *
* Part of this file is taken from TQt Designer. *
* *
* 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. *
* *
***************************************************************************/
#include "trollprojectwidget.h"
#include <config.h>
#include <tqfile.h>
#include <tqfileinfo.h>
#include <tqheader.h>
#include <tqsplitter.h>
#include <tqptrstack.h>
#include <tqtextstream.h>
#include <tqcombobox.h>
#include <kprocess.h>
#include <tqtimer.h>
#include <tqdir.h>
#include <tqregexp.h>
#include <tqinputdialog.h>
#include <tqwhatsthis.h>
#include <tqvaluestack.h>
#include <kfiledialog.h>
#include <tqtooltip.h>
#include <kdebug.h>
#include <klistview.h>
#include <kmessagebox.h>
#include <kpopupmenu.h>
#include <kregexp.h>
#include <kurl.h>
#include <tqmessagebox.h>
#include <iostream>
#include <kparts/part.h>
#include <kaction.h>
#include <kprocess.h>
#include <kinputdialog.h>
#include <kdeversion.h>
#include <kdirwatch.h>
#include <kurlrequesterdlg.h>
#include <kurlrequester.h>
#include <kio/netaccess.h>
#include <kurlcompletion.h>
#include "kdevcore.h"
#include "kdevpartcontroller.h"
#include "kdevmainwindow.h"
#include "trollprojectpart.h"
#include "kdevappfrontend.h"
#include "kdevmakefrontend.h"
#include "kdevlanguagesupport.h"
#include "kdevcreatefile.h"
#include "subclassesdlg.h"
#include "addfilesdialog.h"
#include "urlutil.h"
#include "trolllistview.h"
#include "projectconfigurationdlg.h"
#include "qmakescopeitem.h"
#include "scope.h"
#include "createscopedlg.h"
#include "disablesubprojectdlg.h"
#include <kapplication.h>
TrollProjectWidget::TrollProjectWidget( TrollProjectPart *part )
: TQVBox( 0, "troll project widget" ), m_shownSubproject( 0 ), m_rootSubproject( 0 ),
m_rootScope ( 0 ), m_part ( part ), m_configDlg( 0 ), m_filesCached(false)
{
TQSplitter * splitter = new TQSplitter(Qt::Vertical, this );
//////////////////
// PROJECT VIEW //
//////////////////
overviewContainer = new TQVBox( splitter, "Projects" );
overviewContainer->setMargin ( 2 );
overviewContainer->setSpacing ( 2 );
// overviewContainer->tqsetSizePolicy(TQSizePolicy::Preferred, TQSizePolicy::Minimum);
// splitter->setResizeMode(overviewContainer, TQSplitter::FollowSizeHint);
projectTools = new TQHBox( overviewContainer, "Project buttons" );
projectTools->setMargin ( 2 );
projectTools->setSpacing ( 2 );
// Add subdir
addSubdirButton = new TQToolButton ( projectTools, "Add subproject button" );
addSubdirButton->setPixmap ( SmallIcon ( "folder_new" ) );
addSubdirButton->tqsetSizePolicy ( TQSizePolicy ( ( TQSizePolicy::SizeType ) 0, ( TQSizePolicy::SizeType ) 0, 0, 0, addSubdirButton->sizePolicy().hasHeightForWidth() ) );
addSubdirButton->setEnabled ( true );
TQToolTip::add( addSubdirButton, i18n( "Add subproject" ) );
TQWhatsThis::add( addSubdirButton, i18n( "<b>Add subproject</b><p>Creates a <i>new</i> or adds an <i>existing</i> subproject to a currently selected subproject. "
"This action is allowed only if a type of the subproject is 'subdirectories'. The type of the subproject can be "
"defined in <b>Subproject Settings</b> dialog (open it from the subproject context menu)." ) );
// Create scope
createScopeButton = new TQToolButton ( projectTools, "Create scope button" );
createScopeButton->setPixmap ( SmallIcon ( "qmake_scopenew" ) );
createScopeButton->tqsetSizePolicy ( TQSizePolicy ( ( TQSizePolicy::SizeType ) 0, ( TQSizePolicy::SizeType ) 0, 0, 0, createScopeButton->sizePolicy().hasHeightForWidth() ) );
createScopeButton->setEnabled ( true );
TQToolTip::add( createScopeButton, i18n( "Create scope" ) );
TQWhatsThis::add( createScopeButton, i18n( "<b>Create scope</b><p>Creates TQMake scope in the project file in case the subproject is selected or creates nested scope in case the scope is selected." ) );
// build
buildProjectButton = new TQToolButton ( projectTools, "Make button" );
buildProjectButton->setPixmap ( SmallIcon ( "make_kdevelop" ) );
buildProjectButton->tqsetSizePolicy ( TQSizePolicy ( ( TQSizePolicy::SizeType ) 0, ( TQSizePolicy::SizeType ) 0, 0, 0, buildProjectButton->sizePolicy().hasHeightForWidth() ) );
buildProjectButton->setEnabled ( true );
TQToolTip::add( buildProjectButton, i18n( "Build project" ) );
TQWhatsThis::add( buildProjectButton, i18n( "<b>Build project</b><p>Runs <b>make</b> from the project directory.<br>"
"Environment variables and make arguments can be specified "
"in the project settings dialog, <b>Make Options</b> tab." ) );
// rebuild
rebuildProjectButton = new TQToolButton ( projectTools, "Rebuild button" );
rebuildProjectButton->setPixmap ( SmallIcon ( "rebuild" ) );
rebuildProjectButton->tqsetSizePolicy ( TQSizePolicy ( ( TQSizePolicy::SizeType ) 0, ( TQSizePolicy::SizeType ) 0, 0, 0, rebuildProjectButton->sizePolicy().hasHeightForWidth() ) );
rebuildProjectButton->setEnabled ( true );
TQToolTip::add( rebuildProjectButton, i18n( "Rebuild project" ) );
TQWhatsThis::add( rebuildProjectButton, i18n( "<b>Rebuild project</b><p>Runs <b>make clean</b> and then <b>make</b> from the project directory.<br>"
"Environment variables and make arguments can be specified "
"in the project settings dialog, <b>Make Options</b> tab." ) );
// run
executeProjectButton = new TQToolButton ( projectTools, "Run button" );
executeProjectButton->setPixmap ( SmallIcon ( "exec" ) );
executeProjectButton->tqsetSizePolicy ( TQSizePolicy ( ( TQSizePolicy::SizeType ) 0, ( TQSizePolicy::SizeType ) 0, 0, 0, executeProjectButton->sizePolicy().hasHeightForWidth() ) );
executeProjectButton->setEnabled ( true );
TQToolTip::add( executeProjectButton, i18n( "Execute main program" ) );
TQWhatsThis::add( executeProjectButton, i18n( "<b>Execute main program</b><p>Executes the main program specified in project settings, <b>Run Options</b> tab." ) );
// spacer
TQWidget *spacer = new TQWidget( projectTools );
projectTools->setStretchFactor( spacer, 1 );
// Project configuration
projectconfButton = new TQToolButton ( projectTools, "Project configuration button" );
projectconfButton->setPixmap ( SmallIcon ( "configure" ) );
projectconfButton->tqsetSizePolicy ( TQSizePolicy ( ( TQSizePolicy::SizeType ) 0, ( TQSizePolicy::SizeType ) 0, 0, 0, projectconfButton->sizePolicy().hasHeightForWidth() ) );
projectconfButton->setEnabled ( true );
TQToolTip::add( projectconfButton, i18n( "Subproject settings" ) );
TQWhatsThis::add( projectconfButton, i18n( "<b>Subproject settings</b><p>Opens <b>TQMake Subproject Configuration</b> dialog for the currently selected subproject. "
"It provides settings for:<br>subproject type and configuration,<br>include and library paths,<br>lists of dependencies and "
"external libraries,<br>build order,<br>intermediate files locations,<br>compiler options." ) );
// Project button connections
connect ( addSubdirButton, TQT_SIGNAL ( clicked () ), this, TQT_SLOT ( slotAddSubproject () ) );
connect ( createScopeButton, TQT_SIGNAL ( clicked () ), this, TQT_SLOT ( slotCreateScope () ) );
connect ( buildProjectButton, TQT_SIGNAL ( clicked () ), this, TQT_SLOT ( slotBuildProject () ) );
connect ( rebuildProjectButton, TQT_SIGNAL ( clicked () ), this, TQT_SLOT ( slotRebuildProject () ) );
connect ( executeProjectButton, TQT_SIGNAL ( clicked () ), m_part, TQT_SLOT ( slotBuildAndExecuteProject () ) );
connect ( projectconfButton, TQT_SIGNAL ( clicked () ), this, TQT_SLOT ( slotConfigureProject () ) );
// Project tree
overview = new TrollListView( this, overviewContainer, SubprojectView, "project overview widget" );
// overview->setResizeMode( TQListView::LastColumn );
overview->setSorting( -1 );
overview->header() ->hide();
overview->addColumn( TQString() );
// Project tree connections
connect( overview, TQT_SIGNAL( selectionChanged( TQListViewItem* ) ),
this, TQT_SLOT( slotOverviewSelectionChanged( TQListViewItem* ) ) );
connect( overview, TQT_SIGNAL( contextMenu( KListView*, TQListViewItem*, const TQPoint& ) ),
this, TQT_SLOT( slotOverviewContextMenu( KListView*, TQListViewItem*, const TQPoint& ) ) );
/////////////////
// DETAIL VIEW //
/////////////////
// Details tree
detailContainer = new TQVBox( splitter, "Details" );
detailContainer->setMargin ( 2 );
detailContainer->setSpacing ( 2 );
// detailContainer->tqsetSizePolicy(TQSizePolicy::Preferred, TQSizePolicy::Expanding);
// Details Toolbar
fileTools = new TQHBox( detailContainer, "Detail buttons" );
fileTools->setMargin ( 2 );
fileTools->setSpacing ( 2 );
// Add new file button
newfileButton = new TQToolButton ( fileTools, "Create new file" );
newfileButton->setPixmap ( SmallIcon ( "filenew" ) );
newfileButton->tqsetSizePolicy ( TQSizePolicy ( ( TQSizePolicy::SizeType ) 0, ( TQSizePolicy::SizeType ) 0, 0, 0, newfileButton->sizePolicy().hasHeightForWidth() ) );
newfileButton->setEnabled ( true );
TQToolTip::add( newfileButton, i18n( "Create new file" ) );
TQWhatsThis::add( newfileButton, i18n( "<b>Create new file</b><p>Creates a new file and adds it to a currently selected group." ) );
// Add existing files button
addfilesButton = new TQToolButton ( fileTools, "Add existing files" );
addfilesButton->setPixmap ( SmallIcon ( "fileimport" ) );
addfilesButton->tqsetSizePolicy ( TQSizePolicy ( ( TQSizePolicy::SizeType ) 0, ( TQSizePolicy::SizeType ) 0, 0, 0, addfilesButton->sizePolicy().hasHeightForWidth() ) );
addfilesButton->setEnabled ( true );
TQToolTip::add( addfilesButton, i18n( "Add existing files" ) );
TQWhatsThis::add( addfilesButton, i18n( "<b>Add existing files</b><p>Adds existing files to a currently selected group. It is "
"possible to copy files to a current subproject directory, create symbolic links or "
"add them with the relative path." ) );
// remove file button
removefileButton = new TQToolButton ( fileTools, "Remove file" );
removefileButton->setPixmap ( SmallIcon ( "button_cancel" ) );
removefileButton->tqsetSizePolicy ( TQSizePolicy ( ( TQSizePolicy::SizeType ) 0, ( TQSizePolicy::SizeType ) 0, 0, 0, removefileButton->sizePolicy().hasHeightForWidth() ) );
removefileButton->setEnabled ( true );
TQToolTip::add( removefileButton, i18n( "Remove file" ) );
TQWhatsThis::add( removefileButton, i18n( "<b>Remove file</b><p>Removes file from a current group. Does not remove file from disk." ) );
// build selected file
buildFileButton = new TQToolButton ( fileTools, "Make file button" );
buildFileButton->setPixmap ( SmallIcon ( "compfile" ) );
buildFileButton->tqsetSizePolicy ( TQSizePolicy ( ( TQSizePolicy::SizeType ) 0, ( TQSizePolicy::SizeType ) 0, 0, 0, buildFileButton->sizePolicy().hasHeightForWidth() ) );
buildFileButton->setEnabled ( true );
TQToolTip::add( buildFileButton, i18n( "Compile file" ) );
TQWhatsThis::add( buildFileButton, i18n( "<b>Compile file</b><p>Runs <b>make filename.o</b> command from the directory where 'filename' is the name of currently opened file.<br>"
"Environment variables and make arguments can be specified "
"in the project settings dialog, <b>Make Options</b> tab." ) );
// build
buildTargetButton = new TQToolButton ( fileTools, "Make sp button" );
buildTargetButton->setPixmap ( SmallIcon ( "make_kdevelop" ) );
buildTargetButton->tqsetSizePolicy ( TQSizePolicy ( ( TQSizePolicy::SizeType ) 0, ( TQSizePolicy::SizeType ) 0, 0, 0, buildTargetButton->sizePolicy().hasHeightForWidth() ) );
buildTargetButton->setEnabled ( true );
TQToolTip::add( buildTargetButton, i18n( "Build subproject" ) );
TQWhatsThis::add( buildTargetButton, i18n( "<b>Build subproject</b><p>Runs <b>make</b> from the current subproject directory. "
"Current subproject is a subproject selected in <b>TQMake manager</b> 'overview' window.<br>"
"Environment variables and make arguments can be specified "
"in the project settings dialog, <b>Make Options</b> tab." ) );
// rebuild
rebuildTargetButton = new TQToolButton ( fileTools, "Rebuild sp button" );
rebuildTargetButton->setPixmap ( SmallIcon ( "rebuild" ) );
rebuildTargetButton->tqsetSizePolicy ( TQSizePolicy ( ( TQSizePolicy::SizeType ) 0, ( TQSizePolicy::SizeType ) 0, 0, 0, rebuildTargetButton->sizePolicy().hasHeightForWidth() ) );
rebuildTargetButton->setEnabled ( true );
TQToolTip::add( rebuildTargetButton, i18n( "Rebuild subproject" ) );
TQWhatsThis::add( rebuildTargetButton, i18n( "<b>Rebuild subproject</b><p>Runs <b>make clean</b> and then <b>make</b> from the current subproject directory. "
"Current subproject is a subproject selected in <b>TQMake manager</b> 'overview' window.<br>"
"Environment variables and make arguments can be specified "
"in the project settings dialog, <b>Make Options</b> tab." ) );
// run
executeTargetButton = new TQToolButton ( fileTools, "Run sp button" );
executeTargetButton->setPixmap ( SmallIcon ( "exec" ) );
executeTargetButton->tqsetSizePolicy ( TQSizePolicy ( ( TQSizePolicy::SizeType ) 0, ( TQSizePolicy::SizeType ) 0, 0, 0, executeTargetButton->sizePolicy().hasHeightForWidth() ) );
executeTargetButton->setEnabled ( true );
TQToolTip::add( executeTargetButton, i18n( "Execute subproject" ) );
TQWhatsThis::add( executeTargetButton, i18n( "<b>Execute subproject</b><p>Executes the target program for the currently selected subproject. "
"This action is allowed only if a type of the subproject is 'application'. The type of the subproject can be "
"defined in <b>Subproject Settings</b> dialog (open it from the subproject context menu)." ) );
// spacer
spacer = new TQWidget( fileTools );
projectTools->setStretchFactor( spacer, 1 );
// Configure file button
excludeFileFromScopeButton = new TQToolButton ( fileTools, "Exclude file" );
excludeFileFromScopeButton->setPixmap ( SmallIcon ( "configure_file" ) );
excludeFileFromScopeButton->tqsetSizePolicy ( TQSizePolicy ( ( TQSizePolicy::SizeType ) 0, ( TQSizePolicy::SizeType ) 0, 0, 0, excludeFileFromScopeButton->sizePolicy().hasHeightForWidth() ) );
excludeFileFromScopeButton->setEnabled ( true );
TQToolTip::add( excludeFileFromScopeButton , i18n( "Exclude file" ) );
TQWhatsThis::add( excludeFileFromScopeButton , i18n( "<b>Exclude file</b><p>Exclude the selected file from this scope." ) );
// detail tree
details = new TrollListView( this, detailContainer, DetailsView, "details widget" );
details->setRootIsDecorated( true );
details->setResizeMode( TQListView::LastColumn );
details->setSorting( -1 );
details->header() ->hide();
details->addColumn( TQString() );
// Detail button connections
connect ( addfilesButton, TQT_SIGNAL ( clicked () ), this, TQT_SLOT ( slotAddFiles () ) );
connect ( newfileButton, TQT_SIGNAL ( clicked () ), this, TQT_SLOT ( slotNewFile () ) );
connect ( removefileButton, TQT_SIGNAL ( clicked () ), this, TQT_SLOT ( slotRemoveFile () ) );
connect ( buildFileButton, TQT_SIGNAL ( clicked () ), this, TQT_SLOT ( slotBuildSelectedFile () ) );
connect ( excludeFileFromScopeButton, TQT_SIGNAL ( clicked () ), this, TQT_SLOT ( slotExcludeFileFromScopeButton() ) );
// Detail tree connections
connect( details, TQT_SIGNAL( selectionChanged( TQListViewItem* ) ),
this, TQT_SLOT( slotDetailsSelectionChanged( TQListViewItem* ) ) );
connect( details, TQT_SIGNAL( executed( TQListViewItem* ) ),
this, TQT_SLOT( slotDetailsExecuted( TQListViewItem* ) ) );
connect( details, TQT_SIGNAL( contextMenu( KListView*, TQListViewItem*, const TQPoint& ) ),
this, TQT_SLOT( slotDetailsContextMenu( KListView*, TQListViewItem*, const TQPoint& ) ) );
connect ( buildTargetButton, TQT_SIGNAL ( clicked () ), this, TQT_SLOT ( slotBuildTarget () ) );
connect ( rebuildTargetButton, TQT_SIGNAL ( clicked () ), this, TQT_SLOT ( slotRebuildTarget () ) );
connect ( executeTargetButton, TQT_SIGNAL ( clicked () ), m_part, TQT_SLOT ( slotBuildAndExecuteTarget () ) );
buildTargetButton->setEnabled( false );
rebuildTargetButton->setEnabled( false );
executeTargetButton->setEnabled( false );
m_configDlg = new ProjectConfigurationDlg( overview, this, this );
connect( m_part->dirWatch(), TQT_SIGNAL( dirty(const TQString&) ), this, TQT_SLOT( slotProjectDirty(const TQString&) ) );
}
TrollProjectWidget::~TrollProjectWidget()
{
delete m_configDlg;
}
void TrollProjectWidget::openProject( const TQString &dirName )
{
TQDomDocument & dom = *( m_part->projectDom() );
m_subclasslist = DomUtil::readPairListEntry( dom, "/kdevtrollproject/subclassing" ,
"subclass", "sourcefile", "uifile" );
TQString projectfile = DomUtil::readEntry( dom, "/kdevtrollproject/qmake/projectfile", "" );
m_showFilenamesOnly = DomUtil::readBoolEntry( *m_part->projectDom(), "/kdevtrollproject/qmake/enableFilenamesOnly", false );
m_showVariablesInTree = DomUtil::readBoolEntry( *m_part->projectDom(), "/kdevtrollproject/qmake/showVariablesInTree", true );
TQString proname;
if( projectfile.isEmpty() )
{
TQFileInfo fi( dirName );
TQDir dir( dirName );
// TQString proname = item->path + "/" + fi.baseName() + ".pro";
TQStringList l = dir.entryList( "*.pro" );
TQString profile;
if( l.count() && l.tqfindIndex( m_part->projectName() + ".pro") != -1 )
profile = m_part->projectName()+".pro";
else if( l.isEmpty() || ( l.count() && l.tqfindIndex( fi.baseName() + ".pro") != -1 ) )
profile = fi.baseName()+".pro";
else
profile = l[0];
proname = dirName + TQString( TQChar( TQDir::separator() ) ) + profile;
} else
{
proname = projectfile;
}
kdDebug( 9024 ) << "Parsing " << proname << endl;
m_rootScope = new Scope( qmakeEnvironment(), proname, m_part );
if( m_rootScope->scopeType() != Scope::InvalidScope )
{
m_rootSubproject = new TQMakeScopeItem( overview, m_rootScope->scopeName(), m_rootScope, this );
m_rootSubproject->setOpen( true );
if ( m_rootSubproject->firstChild() && m_rootSubproject->scope->variableValues( "TEMPLATE" ).tqfindIndex("subdirs") != -1 )
{
overview->setSelected( m_rootSubproject->firstChild(), true );
}
else
{
overview->setSelected( m_rootSubproject, true );
}
}else
{
delete m_rootScope;
m_rootScope = 0;
}
// kdDebug(9024) << "Adding " << allFiles().count() << " Files" << endl;
// kdDebug(9024) << allFiles() << endl;
}
void TrollProjectWidget::createTQMakeScopeItems()
{
}
void TrollProjectWidget::closeProject()
{
m_rootSubproject = 0;
overview->clear();
details->clear();
delete m_rootScope;
}
TQStringList TrollProjectWidget::allFiles()
{
if( !m_rootScope )
return TQStringList();
if( m_filesCached )
return m_allFilesCache;
m_allFilesCache = m_rootScope->allFiles( m_rootScope->projectDir() );
m_filesCached = true;
return m_allFilesCache;
}
TQString TrollProjectWidget::projectDirectory()
{
if ( !m_rootScope )
return TQString(); //confused
return m_rootScope->projectDir();
}
TQString TrollProjectWidget::subprojectDirectory()
{
if ( !m_shownSubproject )
return TQString();
return m_shownSubproject->scope->projectDir();
}
void TrollProjectWidget::setupContext()
{
if ( !m_shownSubproject )
return ;
bool buildable = true;
bool runable = true;
bool fileconfigurable = true;
bool hasSourceFiles = true;
bool hasSubdirs = false;
TQStringList tmpl = m_shownSubproject->scope->variableValues( "TEMPLATE" );
if ( tmpl.tqfindIndex( "lib" ) != -1 )
{
runable = false;
}
else if ( tmpl.tqfindIndex( "subdirs" ) != -1 )
{
hasSubdirs = true;
runable = false;
hasSourceFiles = false;
fileconfigurable = false;
}
if ( m_shownSubproject->scope->scopeType() != Scope::ProjectScope )
{
runable = false;
buildable = false;
}
// Setup toolbars according to context
addSubdirButton->setEnabled( hasSubdirs );
buildTargetButton->setEnabled( buildable );
m_part->actionCollection() ->action( "build_build_target" ) ->setEnabled( buildable );
rebuildTargetButton->setEnabled( buildable );
m_part->actionCollection() ->action( "build_rebuild_target" ) ->setEnabled( buildable );
executeTargetButton->setEnabled( runable );
m_part->actionCollection() ->action( "build_execute_target" ) ->setEnabled( runable );
excludeFileFromScopeButton->setEnabled( !hasSubdirs );
newfileButton->setEnabled( !hasSubdirs );
removefileButton->setEnabled( !hasSubdirs );
addfilesButton->setEnabled( !hasSubdirs );
buildFileButton->setEnabled( !hasSubdirs );
details->setEnabled( hasSourceFiles );
}
void TrollProjectWidget::slotOverviewSelectionChanged( TQListViewItem *item )
{
TQString olddir = m_part->activeDirectory();
if ( !item )
{
kdDebug(9024) << "Trying to select a non-existing item" << endl;
return ;
}
cleanDetailView( m_shownSubproject );
m_shownSubproject = static_cast<TQMakeScopeItem*>( item );
setupContext();
buildProjectDetailTree( m_shownSubproject, details );
TQDomDocument &dom = *( m_part->projectDom() );
DomUtil::writeEntry( dom, "/kdevtrollproject/general/activedir", m_shownSubproject->relativePath() );
if ( m_configDlg && m_configDlg->isShown() )
{
m_configDlg->updateSubproject( m_shownSubproject );
}
emit m_part->activeDirectoryChanged( olddir, m_part->activeDirectory() );
}
TQString TrollProjectWidget::getCurrentTarget()
{
if ( !m_shownSubproject )
return "";
TQString destdir = getCurrentDestDir();
if ( destdir.isEmpty() )
return getCurrentOutputFilename();
else
return destdir + TQString( TQChar( TQDir::separator() ) ) + getCurrentOutputFilename();
}
TQString TrollProjectWidget::getCurrentDestDir()
{
if ( !m_shownSubproject )
return "";
TQStringList destdir = m_shownSubproject->scope->variableValues( "DESTDIR", true, true, true );
return m_shownSubproject->scope->resolveVariables(m_shownSubproject->scope->variableValues( "DESTDIR", true, true, true ).front());
}
TQString TrollProjectWidget::getCurrentOutputFilename()
{
if ( !m_shownSubproject )
return "";
if ( m_shownSubproject->scope->variableValues( "TARGET", true, true, true ).isEmpty() )
{
TQString exe = m_shownSubproject->scope->resolveVariables(m_shownSubproject->scope->fileName());
return exe.tqreplace( TQRegExp( "\\.pro$" ), "" );
}
else
{
return m_shownSubproject->scope->resolveVariables(m_shownSubproject->scope->variableValues( "TARGET", true, true, true ).front());
}
}
void TrollProjectWidget::cleanDetailView( TQMakeScopeItem *item )
{
// If no tqchildren in detailview
// it is a subdir template
if ( item && details->childCount() )
{
TQListViewItem* i = details->firstChild();
while( i )
{
TQListViewItem* old = i;
i = i->nextSibling();
details->takeItem(old);
}
// TQMapIterator<GroupItem::GroupType, GroupItem*> it1 = item->groups.begin() ;
// for ( ; it1 != item->groups.end(); ++it1 )
// {
// // After AddTargetDialog, it can happen that an
// // item is not yet in the list view, so better check...
// if ( it1.data() ->tqparent() )
// while ( it1.data() ->firstChild() )
// it1.data() ->takeItem( it1.data() ->firstChild() );
// details->takeItem( it1.data() );
// }
}
}
void TrollProjectWidget::buildProjectDetailTree( TQMakeScopeItem *item, KListView *listviewControl )
{
// Insert all GroupItems and all of their tqchildren into the view
if ( !listviewControl || item->scope->variableValues( "TEMPLATE" ).tqfindIndex("subdirs") != -1 )
return ;
TQMapIterator<GroupItem::GroupType, GroupItem*> it2 = item->groups.begin();
TQListViewItem* lastItem = 0;
for ( ; it2 != item->groups.end(); ++it2 )
{
listviewControl->insertItem( it2.data() );
if(lastItem)
it2.data()->moveItem(lastItem);
lastItem = it2.data();
if ( it2.key() == GroupItem::InstallRoot )
{
TQListViewItem* lastinstallitem = 0;
TQPtrListIterator<GroupItem> it3( it2.data() ->installs );
for ( ; it3.current(); ++it3 )
{
it2.data() ->insertItem( *it3 );
if ( lastinstallitem )
it3.current()->moveItem(lastinstallitem);
lastinstallitem = it3.current();
TQPtrListIterator<FileItem> it4( ( *it3 ) ->files );
TQListViewItem* lastfileitem = 0;
for ( ; it4.current(); ++it4 )
{
( *it3 ) ->insertItem( *it4 );
if ( lastfileitem )
it4.current()->moveItem(lastfileitem);
lastfileitem = it4.current();
}
( *it3 ) ->setOpen( true );
( *it3 ) ->sortChildItems( 0, true );
}
it2.data() ->setOpen( true );
it2.data() ->sortChildItems( 0, true );
}
else
{
TQPtrListIterator<FileItem> it3( it2.data() ->files );
TQListViewItem* lastfileitem = 0;
for ( ; it3.current(); ++it3 )
{
it2.data() ->insertItem( *it3 );
if ( lastfileitem )
it3.current()->moveItem(lastfileitem);
lastfileitem = it3.current();
}
it2.data() ->setOpen( true );
it2.data() ->sortChildItems( 0, true );
}
}
listviewControl->setSelected( listviewControl->selectedItem(), false );
listviewControl->setCurrentItem( 0 );
}
void TrollProjectWidget::slotDetailsExecuted( TQListViewItem *item )
{
if ( !item )
return ;
// We assume here that ALL items in both list views
// are qProjectItem's
qProjectItem *pvitem = static_cast<qProjectItem*>( item );
if ( pvitem->type() != qProjectItem::File )
return ;
FileItem *fitem = static_cast<FileItem*>( pvitem );
TQString filePath;
if( m_shownSubproject->scope->scopeType() == Scope::IncludeScope )
{
filePath = m_shownSubproject->scope->tqparent()->projectDir();
}else
{
filePath = m_shownSubproject->scope->projectDir();
}
filePath += TQChar( TQDir::separator() ) + m_shownSubproject->scope->resolveVariables( fitem->localFilePath );
bool isUiFile = TQFileInfo( fitem->text( 0 ) ).extension() == "ui";
kdDebug(9024) << "Opening file: " << filePath << endl;
if ( isTMakeProject() && isUiFile )
{
// start designer in your PATH
KShellProcess proc;
proc << "designer" << filePath;
proc.start( KProcess::DontCare, KProcess::NoCommunication );
}
else
m_part->partController() ->editDocument( KURL( filePath ) );
}
void TrollProjectWidget::slotConfigureProject()
{
m_configDlg->updateSubproject( m_shownSubproject );
m_configDlg->show();
}
void TrollProjectWidget::slotExecuteTarget()
{
//m_part->slotExecute();
// no subproject selected
if ( !m_shownSubproject )
return ;
// can't build from scope
if ( m_shownSubproject->scope->scopeType() != Scope::ProjectScope )
return ;
// Only run application projects
if ( !m_shownSubproject->scope->variableValues( "TEMPLATE" ).isEmpty() && m_shownSubproject->scope->variableValues( "TEMPLATE" ).tqfindIndex( "app" ) == -1 )
return ;
//only run once
if (m_part->appFrontend()->isRunning())
{
if (KMessageBox::questionYesNo(this, i18n("Your application is currently running. Do you want to restart it?"), i18n("Application Already Running"), i18n("&Restart Application"), i18n("Do &Nothing")) == KMessageBox::No)
return;
m_part->appFrontend()->stopApplication();
while(m_part->appFrontend()->isRunning())
{
KApplication::kApplication()->processEvents();
usleep(100);
}
}
TQString program = KProcess::quote( "." + TQString( TQChar( TQDir::separator() ) ) + getCurrentOutputFilename() );
// Build environment variables to prepend to the executable path
TQString runEnvVars = TQString();
DomUtil::PairList list =
DomUtil::readPairListEntry( *( m_part->projectDom() ), "/kdevtrollproject/run/envvars", "envvar", "name", "value" );
DomUtil::PairList::ConstIterator it;
for ( it = list.begin(); it != list.end(); ++it )
{
const DomUtil::Pair &pair = ( *it );
if ( ( !pair.first.isEmpty() ) && ( !pair.second.isEmpty() ) )
runEnvVars += pair.first + "=" + pair.second + " ";
}
program.prepend( runEnvVars );
program.append( " " + m_part->runArguments() + " " );
// std::cerr<<dircmd + "./"+program<<std::endl;
// m_part->execute(dircmd + "./"+program);
// m_part->appFrontend()->startAppCommand(dircmd +"./"+program,true);
bool inTerminal = DomUtil::readBoolEntry( *m_part->projectDom(), "/kdevtrollproject/run/terminal" );
m_part->appFrontend() ->startAppCommand( subprojectDirectory() + TQString( TQChar( TQDir::separator() ) ) + getCurrentDestDir(), program, inTerminal );
}
void TrollProjectWidget::slotBuildProject()
{
if ( m_part->partController() ->saveAllFiles() == false )
return ; //user cancelled
TQString dir = projectDirectory();
if ( !m_rootSubproject )
return ;
createMakefileIfMissing( dir, m_rootSubproject );
m_part->mainWindow() ->raiseView( m_part->makeFrontend() ->widget() );
TQString dircmd = "cd " + KProcess::quote( dir ) + " && " ;
TQString buildcmd = constructMakeCommandLine( m_rootSubproject->scope );
m_part->queueCmd( dir, dircmd + buildcmd );
}
void TrollProjectWidget::slotInstallProject()
{
if ( m_part->partController() ->saveAllFiles() == false )
return ; //user cancelled
TQString dir = projectDirectory();
if ( !m_rootSubproject )
return ;
createMakefileIfMissing( dir, m_rootSubproject );
m_part->mainWindow() ->raiseView( m_part->makeFrontend() ->widget() );
TQString dircmd = "cd " + KProcess::quote( dir ) + " && " ;
TQString buildcmd = constructMakeCommandLine( m_rootSubproject->scope ) + " install";
m_part->queueCmd( dir, dircmd + buildcmd );
}
void TrollProjectWidget::slotBuildTarget()
{
// no subproject selected
m_part->partController() ->saveAllFiles();
if ( !m_shownSubproject )
return ;
// can't build from scope
if ( m_shownSubproject->scope->scopeType() != Scope::ProjectScope )
return ;
TQString dir = subprojectDirectory();
createMakefileIfMissing( dir, m_shownSubproject );
m_part->mainWindow() ->raiseView( m_part->makeFrontend() ->widget() );
TQString dircmd = "cd " + KProcess::quote( dir ) + " && " ;
TQString buildcmd = constructMakeCommandLine( m_shownSubproject->scope );
m_part->queueCmd( dir, dircmd + buildcmd );
}
void TrollProjectWidget::slotInstallTarget()
{
// no subproject selected
m_part->partController() ->saveAllFiles();
if ( !m_shownSubproject )
return ;
// can't build from scope
if ( m_shownSubproject->scope->scopeType() != Scope::ProjectScope )
return ;
TQString dir = subprojectDirectory();
createMakefileIfMissing( dir, m_shownSubproject );
m_part->mainWindow() ->raiseView( m_part->makeFrontend() ->widget() );
TQString dircmd = "cd " + KProcess::quote( dir ) + " && " ;
TQString buildcmd = constructMakeCommandLine( m_shownSubproject->scope ) + " install";
m_part->queueCmd( dir, dircmd + buildcmd );
}
void TrollProjectWidget::slotRebuildProject()
{
m_part->partController() ->saveAllFiles();
TQString dir = this-> projectDirectory();
if ( !m_rootSubproject )
return ;
createMakefileIfMissing( dir, m_rootSubproject );
m_part->mainWindow() ->raiseView( m_part->makeFrontend() ->widget() );
TQString dircmd = "cd " + KProcess::quote( dir ) + " && " ;
TQString rebuildcmd = constructMakeCommandLine( m_rootSubproject->scope ) + " clean && " + constructMakeCommandLine( m_rootSubproject->scope );
m_part->queueCmd( dir, dircmd + rebuildcmd );
}
void TrollProjectWidget::slotRebuildTarget()
{
// no subproject selected
m_part->partController() ->saveAllFiles();
if ( !m_shownSubproject )
return ;
// can't build from scope
if ( m_shownSubproject->scope->scopeType() != Scope::ProjectScope )
return ;
TQString dir = subprojectDirectory();
createMakefileIfMissing( dir, m_shownSubproject );
m_part->mainWindow() ->raiseView( m_part->makeFrontend() ->widget() );
TQString dircmd = "cd " + KProcess::quote( dir ) + " && " ;
TQString rebuildcmd = constructMakeCommandLine( m_shownSubproject->scope ) + " clean && " + constructMakeCommandLine( m_shownSubproject->scope );
m_part->queueCmd( dir, dircmd + rebuildcmd );
}
void TrollProjectWidget::slotCreateScope( TQMakeScopeItem *spitem )
{
if ( spitem == 0 && m_shownSubproject == 0 )
return ;
else
spitem = m_shownSubproject;
CreateScopeDlg dlg( spitem, this );
if ( dlg.exec() == TQDialog::Accepted )
{
spitem->scope->saveToFile( );
spitem->sortChildItems( 0, true );
}
return ;
}
void TrollProjectWidget::slotAddSubproject( TQMakeScopeItem *spitem )
{
if ( spitem == 0 && m_shownSubproject == 0 )
return ;
else
spitem = m_shownSubproject;
m_filesCached = false;
m_allFilesCache.clear();
TQString projectdir = spitem->scope->projectDir();
KURLRequesterDlg dialog( i18n( "Add Subproject" ), i18n( "Please enter a name for the subproject: " ), this, 0 );
KURLRequester* req = dialog.urlRequester();
req->setMode( KFile::Directory | KFile::File | KFile::LocalOnly );
req->setFilter( "*.pro|TQMake Project Files (*.pro)" );
req->setURL( TQString() );
req->fileDialog()->setURL( KURL::fromPathOrURL( projectdir ) );
req->completionObject() ->setDir( projectdir );
if ( dialog.exec() == TQDialog::Accepted && !dialog.urlRequester() ->url().isEmpty() )
{
TQString subdirname;
if ( !TQDir::isRelativePath( dialog.urlRequester() ->url() ) )
subdirname = URLUtil::getRelativePath( projectdir, dialog.urlRequester()->url() );
else
subdirname = dialog.urlRequester()->url();
while( subdirname.endsWith( TQString(TQChar(TQDir::separator())) ) )
subdirname = subdirname.left(subdirname.length()-1);
if( !subdirname.endsWith(".pro") )
{
kdDebug(9024) << "Cleaned subdirname: " << subdirname << endl;
TQDir dir( projectdir );
TQString realdir = spitem->scope->resolveVariables( subdirname );
if ( !dir.exists( realdir ) )
{
if ( !dir.mkdir( realdir ) )
{
KMessageBox::error( this, i18n( "Failed to create subdirectory. "
"Do you have write permission "
"in the project folder?" ) );
return ;
}else
{
TQFile f( dir.absPath()+"/"+realdir+"/"+realdir+".pro" );
f.open( IO_WriteOnly );
f.close();
}
}
}else
{
TQString realdir = spitem->scope->resolveVariables( subdirname );
TQFile f( projectdir+"/"+realdir );
f.open( IO_WriteOnly );
f.close();
}
addSubprojectToItem( spitem, subdirname );
}
}
void TrollProjectWidget::addSubprojectToItem( TQMakeScopeItem* spitem, const TQString& subdirname )
{
TQListViewItem* item = spitem->firstChild();
while( item )
{
TQMakeScopeItem* sitem = static_cast<TQMakeScopeItem*>(item);
if( sitem->scope->scopeName() == subdirname )
{
if( sitem->scope->isEnabled() )
{
return;
}else
{
spitem->scope->removeFromMinusOp( "SUBDIRS", subdirname );
delete item;
if( spitem->scope->variableValues( "SUBDIRS" ).tqfindIndex( subdirname ) != -1 )
return;
}
}
item = item->nextSibling();
}
Scope* subproject = spitem->scope->createSubProject( subdirname );
if( subproject )
{
new TQMakeScopeItem( spitem, subproject->scopeName(), subproject );
// TQListViewItem* lastitem = spitem->firstChild();
// while( lastitem->nextSibling() != 0 )
// lastitem = lastitem->nextSibling();
// newitem->moveItem( lastitem );
}else
{
KMessageBox::error(this, i18n("Could not create subproject. This means that either the project you wanted"
" to add a subproject to is not parsed correctly, or it is not a"
" subdirs-project."), i18n("Subproject creation failed") );
}
spitem->scope->saveToFile();
spitem->sortChildItems( 0, true );
}
void TrollProjectWidget::slotRemoveSubproject( TQMakeScopeItem *spitem )
{
if ( spitem == 0 && m_shownSubproject == 0 )
return ;
else if ( ( spitem = dynamic_cast<TQMakeScopeItem *>( m_shownSubproject->tqparent() ) ) != NULL )
{
m_filesCached = false;
m_allFilesCache.clear();
bool delsubdir = false;
if ( KMessageBox::warningYesNo( this, i18n( "Delete the file/directory of the subproject from disk?" ), i18n( "Delete subdir?" ) ) == KMessageBox::Yes )
delsubdir = true;
if( !spitem->scope->deleteSubProject( m_shownSubproject->scope->getNum(), delsubdir ) )
{
KMessageBox::error(this, i18n("Could not delete subproject.\nThis is an internal error, please write a"
" bug report to bugs.kde.org and include the output of kdevelop when run"
"from a shell."),i18n("Subproject Deletion failed"));
return;
}
delete m_shownSubproject;
m_shownSubproject = spitem;
spitem->scope->saveToFile( );
overview->setCurrentItem( m_shownSubproject );
overview->setSelected( m_shownSubproject, true );
}
}
void TrollProjectWidget::slotOverviewContextMenu( KListView *, TQListViewItem *item, const TQPoint &p )
{
if ( !item )
return ;
TQMakeScopeItem *spitem = static_cast<TQMakeScopeItem*>( item );
KPopupMenu popup( this );
popup.insertTitle( i18n( "Subproject %1" ).tqarg( item->text( 0 ) ) );
int idBuild = -2;
int idRebuild = -2;
int idClean = -2;
int idInstall = -2;
int idDistClean = -2;
int idQmake = -2;
int idQmakeRecursive = -2;
int idProjectConfiguration = -2;
int idAddSubproject = -2;
int idRemoveSubproject = -2;
int idDisableSubproject = -2;
int idRemoveScope = -2;
int idAddScope = -2;
if ( spitem->scope->scopeType() == Scope::ProjectScope && ( !spitem->scope->tqparent() || spitem->scope->tqparent()->scopeType() == Scope::ProjectScope ) )
{
idBuild = popup.insertItem( SmallIcon( "make_kdevelop" ), i18n( "Build" ) );
popup.tqsetWhatsThis( idBuild, i18n( "<b>Build</b><p>Runs <b>make</b> from the selected subproject directory.<br>"
"Environment variables and make arguments can be specified "
"in the project settings dialog, <b>Make Options</b> tab." ) );
idInstall = popup.insertItem( i18n( "Install" ) );
popup.tqsetWhatsThis( idBuild, i18n( "<b>Install</b><p>Runs <b>make install</b> from the selected subproject directory.<br>"
"Environment variables and make arguments can be specified "
"in the project settings dialog, <b>Make Options</b> tab." ) );
idClean = popup.insertItem( i18n( "Clean" ) );
popup.tqsetWhatsThis( idBuild, i18n( "<b>Clean project</b><p>Runs <b>make clean</b> command from the project "
"directory.<br> Environment variables and make arguments can be specified "
"in the project settings dialog, <b>Make Options</b> tab." ) );
idDistClean = popup.insertItem( i18n( "Dist-Clean" ) );
popup.tqsetWhatsThis( idBuild, i18n( "<b>Dist-Clean project</b><p>Runs <b>make distclean</b> command from the project "
"directory.<br> Environment variables and make arguments can be specified "
"in the project settings dialog, <b>Make Options</b> tab." ) );
idRebuild = popup.insertItem( SmallIcon( "rebuild" ), i18n( "Rebuild" ) );
popup.tqsetWhatsThis( idRebuild, i18n( "<b>Rebuild project</b><p>Runs <b>make clean</b> and then <b>make</b> from "
"the project directory.<br>Environment variables and make arguments can be "
"specified in the project settings dialog, <b>Make Options</b> tab." ) );
idQmake = popup.insertItem( SmallIcon( "qmakerun" ), i18n( "Run qmake" ) );
popup.tqsetWhatsThis( idQmake, i18n( "<b>Run qmake</b><p>Runs <b>qmake</b> from the selected subproject directory. This creates or regenerates Makefile." ) );
idQmakeRecursive = popup.insertItem( SmallIcon( "qmakerun" ), i18n( "Run qmake recursively" ) );
popup.tqsetWhatsThis( idQmakeRecursive, i18n( "<b>Run qmake recursively</b><p>Runs <b>qmake</b> from the selected "
"subproject directory and recurses into all subproject directories. "
"This creates or regenerates Makefile." ) );
popup.insertSeparator();
idAddSubproject = popup.insertItem( SmallIcon( "folder_new" ), i18n( "Add Subproject..." ) );
popup.tqsetWhatsThis( idAddSubproject, i18n( "<b>Add subproject</b><p>Creates a <i>new</i> or adds an <i>existing</i> subproject to a currently selected subproject. "
"This action is allowed only if a type of the subproject is 'subdirectories'. The type of the subproject can be "
"defined in <b>Subproject Settings</b> dialog (open it from the subproject context menu)." ) );
if ( spitem->scope->variableValues( "TEMPLATE" ).tqfindIndex( "subdirs" ) == -1 )
popup.setItemEnabled( idAddSubproject, false );
idRemoveSubproject = popup.insertItem( SmallIcon( "remove_subdir" ), i18n( "Remove Subproject..." ) );
popup.tqsetWhatsThis( idRemoveSubproject, i18n( "<b>Remove subproject</b><p>Removes currently selected subproject. Does not delete any file from disk. Deleted subproject can be later added by calling 'Add Subproject' action." ) );
if ( spitem->tqparent() == NULL )
popup.setItemEnabled( idRemoveSubproject, false );
idAddScope = popup.insertItem( SmallIcon( "qmake_scopenew" ), i18n( "Create Scope..." ) );
popup.tqsetWhatsThis( idAddScope, i18n( "<b>Create scope</b><p>Creates TQMake scope in the project file of the currently selected subproject." ) );
popup.insertSeparator();
idProjectConfiguration = popup.insertItem( SmallIcon( "configure" ), i18n( "Subproject Settings" ) );
popup.tqsetWhatsThis( idProjectConfiguration, i18n( "<b>Subproject settings</b><p>Opens <b>TQMake Subproject Configuration</b> dialog. "
"It provides settings for:<br>subproject type and configuration,<br>include and library paths,<br>lists of dependencies and "
"external libraries,<br>build order,<br>intermediate files locations,<br>compiler options." ) );
}
else
{
idAddScope = popup.insertItem( SmallIcon( "qmake_scopenew" ), i18n( "Create Scope..." ) );
popup.tqsetWhatsThis( idAddScope, i18n( "<b>Create Scope</b><p>Creates TQMake scope in the currently selected scope." ) );
idRemoveScope = popup.insertItem( SmallIcon( "editdelete" ), i18n( "Remove Scope" ) );
popup.tqsetWhatsThis( idRemoveScope, i18n( "<b>Remove Scope</b><p>Removes currently selected scope." ) );
popup.insertSeparator();
idAddSubproject = popup.insertItem( SmallIcon( "folder_new" ), i18n( "Add Subproject..." ) );
popup.tqsetWhatsThis( idAddSubproject, i18n( "<b>Add subproject</b><p>Creates a <i>new</i> or adds an <i>existing</i> subproject to the currently selected scope. "
"This action is allowed only if the type of the subproject is 'subdirectories'. The type of the subproject can be "
"defined in the <b>Subproject Settings</b> dialog (open it from the subproject context menu)." ) );
if ( spitem->scope->variableValues( "TEMPLATE" ).tqfindIndex( "subdirs" ) == -1 )
popup.setItemEnabled( idAddSubproject, false );
idDisableSubproject = popup.insertItem( SmallIcon( "remove_subdir" ), i18n( "Disable Subproject..." ) );
popup.tqsetWhatsThis( idRemoveSubproject, i18n( "<b>Disable subproject</b><p>Disables the currently selected subproject when this scope is active. Does not delete the directory from disk. The deleted subproject can be later added by using the 'Add Subproject' action." ) );
if( spitem->scope->variableValues( "TEMPLATE" ).tqfindIndex( "subdirs" ) == -1 && spitem->scope->tqparent()->variableValues( "TEMPLATE" ).tqfindIndex( "subdirs" ) == -1 )
popup.setItemEnabled( idDisableSubproject, false );
popup.insertSeparator();
idProjectConfiguration = popup.insertItem( SmallIcon( "configure" ), i18n( "Scope Settings" ) );
popup.tqsetWhatsThis( idProjectConfiguration, i18n( "<b>Scope settings</b><p>Opens <b>TQMake Subproject Configuration</b> dialog. "
"It provides settings for:<br>subproject type and configuration,<br>include and library paths,<br>lists of dependencies and "
"external libraries,<br>build order,<br>intermediate files locations,<br>compiler options." ) );
}
int r = popup.exec( p );
TQString relpath = spitem->relativePath();
if ( r == idAddSubproject )
{
slotAddSubproject( spitem );
}
if ( r == idRemoveSubproject )
{
slotRemoveSubproject( spitem );
}
if ( r == idDisableSubproject )
{
slotDisableSubproject( spitem );
}
if ( r == idAddScope )
{
slotCreateScope( spitem );
}
else if ( r == idRemoveScope )
{
slotRemoveScope( spitem );
}
else if ( r == idBuild )
{
slotBuildTarget();
// m_part->startMakeCommand(projectDirectory() + relpath, TQString::tqfromLatin1(""));
}
else if ( r == idInstall )
{
slotInstallTarget();
// m_part->startMakeCommand(projectDirectory() + relpath, TQString::tqfromLatin1(""));
}
else if ( r == idRebuild )
{
slotRebuildTarget();
}
else if ( r == idClean )
{
slotCleanTarget();
}
else if ( r == idDistClean )
{
slotDistCleanTarget();
}
else if ( r == idQmake )
{
m_part->startTQMakeCommand( projectDirectory() + TQString(TQChar(TQDir::separator())) + relpath );
}
else if ( r == idQmakeRecursive )
{
runTQMakeRecursive( spitem );
}
else if ( r == idProjectConfiguration )
{
m_configDlg->updateSubproject( spitem );
m_configDlg->show();
}
}
void TrollProjectWidget::addFileToCurrentSubProject( GroupItem *titem, const TQString &filename )
{
m_filesCached = false;
m_allFilesCache.clear();
titem->addFileToScope( filename );
}
void TrollProjectWidget::addFileToCurrentSubProject( GroupItem::GroupType gtype, const TQString &filename )
{
if ( !m_shownSubproject )
return ;
m_filesCached = false;
m_allFilesCache.clear();
GroupItem *gitem = 0;
if ( m_shownSubproject->groups.tqcontains( gtype ) )
gitem = m_shownSubproject->groups[ gtype ];
if ( !gitem )
return ;
gitem->addFileToScope( filename );
}
/**
* Method adds a file to the current project by grouped
* by file extension
*/
void TrollProjectWidget::addFiles( TQStringList &files, bool relativeToProjectRoot )
{
if ( !m_shownSubproject )
return ;
kdDebug(9024) << "Files to add:"<<files << " " << relativeToProjectRoot <<endl;
m_filesCached = false;
m_allFilesCache.clear();
for ( TQStringList::Iterator it = files.begin(); it != files.end(); ++it )
{
TQString fileName = *it;
kdDebug(9024) << "Adding file:" << fileName << " " << relativeToProjectRoot << endl;
if ( m_shownSubproject->scope->variableValues( "TEMPLATE" ).tqfindIndex( "subdirs" ) != -1 && !fileName.endsWith(".pro") )
{
ChooseSubprojectDlg dlg( this, false );
if ( dlg.exec() == TQDialog::Accepted )
{
if ( dlg.selectedSubproject() && dlg.selectedSubproject()->scope->variableValues("TEMPLATE").tqfindIndex( "subdirs" ) != -1 )
{
fileName = URLUtil::getRelativePath( dlg.selectedSubproject()->scope->projectDir() ,
TQDir::cleanDirPath(
m_shownSubproject->scope->projectDir()+
TQString(TQChar(TQDir::separator()))+
fileName ) );
overview->setCurrentItem( dlg.selectedSubproject() );
}
}
else
{
KMessageBox::error( this, i18n("You did not select a subproject to add the file to, or select a subproject that has subdirs."), i18n( "File adding aborted" ) );
}
}
TQFileInfo info( fileName );
TQString ext = info.extension( false ).simplifyWhiteSpace();
TQString noPathFileName;
if( relativeToProjectRoot )
noPathFileName = URLUtil::getRelativePath( m_shownSubproject->scope->projectDir(), TQDir::cleanDirPath(projectDirectory()+TQString(TQChar(TQDir::separator()))+fileName ) );
else
noPathFileName = URLUtil::getRelativePath( m_shownSubproject->scope->projectDir(), TQDir::cleanDirPath(m_shownSubproject->scope->projectDir()+TQString(TQChar(TQDir::separator()))+fileName ) );
if( DomUtil::readBoolEntry( *m_part->projectDom(), "/kdevtrollproject/qmake/replacePaths", false ) )
{
TQString var = m_shownSubproject->scope->findCustomVarForPath( TQFileInfo( noPathFileName ).dirPath() );
if( !var.isEmpty() )
{
noPathFileName = "$${"+var+"}"+TQString( TQChar( TQDir::separator() ) )+TQFileInfo( noPathFileName ).fileName();
}
}
kdDebug(9024) << "calc filename:" << noPathFileName << endl;
// GroupItem *gitem = 0;
// GroupItem::GroupType gtype = GroupItem::groupTypeForExtension( ext );
// if ( m_shownSubproject->groups.tqcontains( gtype ) )
// gitem = m_shownSubproject->groups[ gtype ];
if( ext == "pro" )
{
addSubprojectToItem( findSubprojectForPath( TQFileInfo( fileName ).dirPath() ), TQFileInfo( fileName ).fileName() );
}else
{
addFileToCurrentSubProject( GroupItem::groupTypeForExtension( ext ), noPathFileName );
slotOverviewSelectionChanged( m_shownSubproject );
kdDebug(9024) << "emitting" << relativeToProjectRoot << " " << fileName << endl;
if( relativeToProjectRoot )
emitAddedFile ( projectDirectory()+TQString( TQChar( TQDir::separator() ) ) + fileName );
else
emitAddedFile ( m_shownSubproject->scope->projectDir()+TQString( TQChar( TQDir::separator() ) ) + fileName );
}
}
}
void TrollProjectWidget::slotAddFiles()
{
static KURL lastVisited;
TQString cleanSubprojectDir = TQDir::cleanDirPath( m_shownSubproject->scope->projectDir() );
TQString title, filter;
TQString otherTitle, otherFilter;
GroupItem* item = dynamic_cast<GroupItem*>( details->selectedItem() );
GroupItem::GroupType type = item ? item->groupType : GroupItem::NoType;
GroupItem::groupTypeMeanings( type, title, filter );
filter += "|" + title;
m_filesCached = false;
m_allFilesCache.clear();
for ( int i = GroupItem::NoType + 1; i < GroupItem::MaxTypeEnum; ++i )
{
if ( type != i )
{
GroupItem::groupTypeMeanings( static_cast<GroupItem::GroupType>( i ), otherTitle, otherFilter );
filter += "\n" + otherFilter + "|" + otherTitle;
}
}
filter += "\n*|" + i18n( "All Files" );
AddFilesDialog *dialog = new AddFilesDialog( cleanSubprojectDir,
filter,
this,
"Insert existing files",
true, new TQComboBox( false ) );
dialog->setMode( KFile::Files | KFile::ExistingOnly | KFile::LocalOnly );
if ( !lastVisited.isEmpty() )
{
dialog->setURL( lastVisited );
}
dialog->exec();
TQStringList files = dialog->selectedFiles();
lastVisited = dialog->baseURL();
for ( unsigned int i = 0; i < files.count(); i++ )
{
switch ( dialog->mode() )
{
case AddFilesDialog::Copy:
{
// Copy selected files to current subproject folder
// and add them to the filelist
TQString filename = KURL( files[ i ] ).fileName();
KIO::NetAccess::file_copy( files[ i ], cleanSubprojectDir + TQString( TQChar( TQDir::separator() ) ) + filename, -1, false, false, this );
TQFile testExist( cleanSubprojectDir + TQString( TQChar( TQDir::separator() ) ) + filename );
if ( testExist.exists() )
{
TQStringList files( filename );
addFiles( files, false );
}
}
break;
case AddFilesDialog::Link:
{
// Link selected files to current subproject folder
KProcess *proc = new KProcess( TQT_TQOBJECT(this) );
*proc << "ln";
*proc << "-s";
*proc << files[ i ];
*proc << cleanSubprojectDir;
proc->start(KProcess::Block);
TQString filename = files[ i ].right( files[ i ].length() - files[ i ].tqfindRev( '/' ) - 1 );
// and add them to the filelist
TQFile testExist( cleanSubprojectDir + TQString( TQChar( TQDir::separator() ) ) + filename );
if ( testExist.exists() )
{
TQStringList files( filename );
addFiles( files, false );
}
}
break;
case AddFilesDialog::Relative:
{
// Form relative path to current subproject folder
TQString theFile = files[ i ];
TQStringList files( URLUtil::relativePathToFile( cleanSubprojectDir , theFile )
);
addFiles( files, false );
}
break;
}
}
}
GroupItem* TrollProjectWidget::getInstallRoot( TQMakeScopeItem* item )
{
if ( item->groups.tqcontains( GroupItem::InstallRoot ) )
return item->groups[ GroupItem::InstallRoot ];
return 0;
}
GroupItem* TrollProjectWidget::getInstallObject( TQMakeScopeItem* item, const TQString& objectname )
{
GroupItem * instroot = getInstallRoot( item );
if ( !instroot )
return 0;
TQPtrListIterator<GroupItem> it( instroot->installs );
for ( ;it.current();++it )
{
if ( ( *it ) ->groupType == GroupItem::InstallObject &&
( *it ) ->text( 0 ) == objectname )
return * it;
}
return 0;
}
void TrollProjectWidget::slotNewFile()
{
GroupItem * gitem = dynamic_cast<GroupItem*>( details->currentItem() );
m_filesCached = false;
m_allFilesCache.clear();
if( !gitem )
{
gitem = dynamic_cast<GroupItem*>( details->currentItem()->tqparent() );
}
if ( gitem )
{
if ( gitem->groupType == GroupItem::InstallObject )
{
// TQString relpath = m_shownSubproject->path.mid(projectDirectory().length());
bool ok = FALSE;
TQString filepattern = KInputDialog::getText(
i18n( "Insert New Filepattern" ),
i18n( "Please enter a filepattern relative the current "
"subproject (example docs/*.html):" ),
TQString(), &ok, this );
if ( ok && !filepattern.isEmpty() )
{
addFileToCurrentSubProject( gitem, filepattern );
slotOverviewSelectionChanged( m_shownSubproject );
}
return ;
}
if ( gitem->groupType == GroupItem::InstallRoot )
{
// TQString relpath = m_shownSubproject->path.mid(projectDirectory().length());
bool ok = FALSE;
TQString install_obj = KInputDialog::getText(
i18n( "Insert New Install Object" ),
i18n( "Please enter a name for the new object:" ),
TQString(), &ok, this );
if ( ok && !install_obj.isEmpty() )
{
gitem->addInstallObject( install_obj );
//GroupItem * institem = createGroupItem( GroupItem::InstallObject, install_obj , m_shownSubproject );
//gitem->owner->scope->addToPlusOp("INSTALLS", install_obj);
gitem->owner->scope->saveToFile();
slotOverviewSelectionChanged( m_shownSubproject );
}
return ;
}
}
KDevCreateFile * createFileSupport = m_part->extension<KDevCreateFile>( "KDevelop/CreateFile" );
TQString fcext;
if( gitem )
{
switch ( gitem->groupType )
{
case GroupItem::Sources:
fcext = "cpp";
break;
case GroupItem::Headers:
fcext = "h";
break;
case GroupItem::Forms:
if ( !m_part->isTQt4Project() )
fcext = "ui-widget";
else
fcext = "ui-widget-qt4";
break;
case GroupItem::Translations:
fcext = "ts";
break;
case GroupItem::Lexsources:
fcext = "l";
break;
case GroupItem::Yaccsources:
fcext = "y";
break;
case GroupItem::Resources:
fcext = "qrc";
break;
default:
fcext = TQString();
}
}
KDevCreateFile::CreatedFile crFile =
createFileSupport->createNewFile( fcext, projectDirectory() + TQString(TQChar(TQDir::separator()))+ m_shownSubproject->relativePath() );
}
void TrollProjectWidget::slotRemoveFile()
{
TQListViewItem * selectedItem = details->currentItem();
if ( !selectedItem )
return ;
m_filesCached = false;
m_allFilesCache.clear();
qProjectItem *pvitem = static_cast<qProjectItem*>( selectedItem );
// Check that it is a file (just in case)
if ( pvitem->type() != qProjectItem::File )
return ;
FileItem *fitem = static_cast<FileItem*>( pvitem );
removeFile( m_shownSubproject, fitem );
}
void TrollProjectWidget::slotExcludeFileFromScopeButton()
{
TQListViewItem * selectedItem = details->currentItem();
if ( !selectedItem )
return ;
qProjectItem *pvitem = static_cast<qProjectItem*>( selectedItem );
// Check that it is a file (just in case)
if ( pvitem->type() != qProjectItem::File )
return ;
FileItem *fitem = static_cast<FileItem*>( pvitem );
GroupItem *gitem = static_cast<GroupItem*>( fitem->tqparent() );
gitem->removeFileFromScope( fitem->text( 0 ) );
}
void TrollProjectWidget::slotDetailsSelectionChanged( TQListViewItem *item )
{
if ( !item )
{
removefileButton->setEnabled( false );
excludeFileFromScopeButton->setEnabled( false );
return ;
}
removefileButton->setEnabled( false );
excludeFileFromScopeButton->setEnabled( false );
qProjectItem *pvitem = static_cast<qProjectItem*>( item );
if ( pvitem->type() == qProjectItem::Group )
{
GroupItem * gitem = static_cast<GroupItem*>( item );
if ( gitem->groupType == GroupItem::InstallObject )
{
excludeFileFromScopeButton->setEnabled( true );
newfileButton->setEnabled( true );
}
else if ( gitem->groupType == GroupItem::InstallRoot )
{
newfileButton->setEnabled( true );
}
else
{
addfilesButton->setEnabled( true );
newfileButton->setEnabled( true );
}
}
else if ( pvitem->type() == qProjectItem::File )
{
removefileButton->setEnabled( true );
excludeFileFromScopeButton->setEnabled( true );
/* buildTargetButton->setEnabled(true);
rebuildTargetButton->setEnabled(true);
executeTargetButton->setEnabled(true);*/
}
}
void TrollProjectWidget::slotDetailsContextMenu( KListView *, TQListViewItem *item, const TQPoint &p )
{
if ( !item )
return ;
qProjectItem *pvitem = static_cast<qProjectItem*>( item );
if ( pvitem->type() == qProjectItem::Group )
{
GroupItem * titem = static_cast<GroupItem*>( pvitem );
TQString title, ext;
GroupItem::groupTypeMeanings( titem->groupType, title, ext );
KPopupMenu popup( this );
popup.insertTitle( title );
int idInsExistingFile = -2;
int idInsNewFile = -2;
int idInsInstallObject = -2;
int idInsNewFilepatternItem = -2;
int idSetInstObjPath = -2;
int idLUpdate = -2;
int idLRelease = -2;
int idRemoveFile = -2;
// int idFileProperties = popup.insertItem(SmallIconSet("filenew"),i18n("Properties..."));
if ( titem->groupType == GroupItem::InstallRoot )
{
idInsInstallObject = popup.insertItem( SmallIconSet( "fileopen" ), i18n( "Add Install Object..." ) );
popup.tqsetWhatsThis( idInsInstallObject, i18n( "<b>Add install object</b><p>Creates TQMake install object. "
"It is possible to define a list of files to install and installation locations for each object. Warning! "
"Install objects without path specified will not be saved to a project file." ) );
}
else if ( titem->groupType == GroupItem::InstallObject )
{
idSetInstObjPath = popup.insertItem( SmallIconSet( "fileopen" ), i18n( "Install Path..." ) );
popup.tqsetWhatsThis( idSetInstObjPath, i18n( "<b>Install path</b><p>Allows to choose the installation path for the current install object." ) );
idInsNewFilepatternItem = popup.insertItem( SmallIconSet( "fileopen" ), i18n( "Add Pattern of Files to Install..." ) );
popup.tqsetWhatsThis( idInsNewFilepatternItem, i18n( "<b>Add pattern of files to install</b><p>Defines the pattern to match files which will be installed. "
"It is possible to use wildcards and relative paths like <i>docs/*</i>." ) );
idRemoveFile = popup.insertItem( SmallIconSet( "editdelete" ), i18n( "Remove Install Object" ) );
popup.tqsetWhatsThis( idRemoveFile, i18n( "<b>Remove install object</b><p>Removes the install object the current group." ) );
}
else if ( titem->groupType == GroupItem::Translations )
{
idInsNewFile = popup.insertItem( SmallIconSet( "filenew" ), i18n( "Create New File..." ) );
popup.tqsetWhatsThis( idInsNewFile, i18n( "<b>Create new file</b><p>Creates a new translation file and adds it to a currently selected TRANSLATIONS group." ) );
idInsExistingFile = popup.insertItem( SmallIconSet( "fileopen" ), i18n( "Add Existing Files..." ) );
popup.tqsetWhatsThis( idInsExistingFile, i18n( "<b>Add existing files</b><p>Adds existing translation (*.ts) files to a currently selected TRANSLATIONS group. It is "
"possible to copy files to a current subproject directory, create symbolic links or "
"add them with the relative path." ) );
idLUpdate = popup.insertItem( SmallIconSet( "konsole" ), i18n( "Update Translation Files" ) );
popup.tqsetWhatsThis( idLUpdate, i18n( "<b>Update Translation Files</b><p>Runs <b>lupdate</b> command from the current subproject directory. It collects translatable "
"messages and saves them into translation files." ) );
idLRelease = popup.insertItem( SmallIconSet( "konsole" ), i18n( "Release Binary Translations" ) );
popup.tqsetWhatsThis( idLRelease, i18n( "<b>Release Binary Translations</b><p>Runs <b>lrelease</b> command from the current subproject directory. It creates binary "
"translation files that are ready to be loaded at program execution." ) );
}
else // File group containing files
{
idInsNewFile = popup.insertItem( SmallIconSet( "filenew" ), i18n( "Create New File..." ) );
popup.tqsetWhatsThis( idInsNewFile, i18n( "<b>Create new file</b><p>Creates a new file and adds it to a currently selected group." ) );
idInsExistingFile = popup.insertItem( SmallIconSet( "fileopen" ), i18n( "Add Existing Files..." ) );
popup.tqsetWhatsThis( idInsExistingFile, i18n( "<b>Add existing files</b><p>Adds existing files to a currently selected group. It is "
"possible to copy files to a current subproject directory, create symbolic links or "
"add them with the relative path." ) );
}
int r = popup.exec( p );
TQString cleanSubprojectPath = TQDir::cleanDirPath( m_shownSubproject->scope->projectDir() );
if ( r == idSetInstObjPath )
{
KURLRequesterDlg dialog( i18n( "Choose Install Path" ), i18n( "Enter a path "
"(example /usr/local/share/... ):" ), this, 0 );
dialog.urlRequester() ->setMode( KFile::Directory );
dialog.urlRequester() ->setURL( titem->owner->scope->variableValues( titem->text( 0 ) + ".path" ).front() );
if ( dialog.exec() == TQDialog::Accepted )
{
titem->owner->scope->setEqualOp( titem->text( 0 ) + ".path", dialog.urlRequester() ->url() );
titem->owner->scope->saveToFile( );
}
}
else if ( r == idInsNewFilepatternItem )
{
bool ok = FALSE;
TQString filepattern = KInputDialog::getText(
i18n( "Add Pattern of Files to Install" ),
i18n( "Enter a pattern relative to the current "
"subproject (example docs/*.html):" ),
TQString(), &ok, this );
if ( ok && !filepattern.isEmpty() )
{
addFileToCurrentSubProject( titem, filepattern );
slotOverviewSelectionChanged( m_shownSubproject );
}
}
else if ( r == idInsExistingFile )
{
AddFilesDialog * dialog = new AddFilesDialog( cleanSubprojectPath,
ext + "|" + title + " (" + ext + ")",
this,
"Add existing files",
true, new TQComboBox( false ) );
dialog->setMode( KFile::Files | KFile::ExistingOnly | KFile::LocalOnly );
if ( dialog->exec() == TQDialog::Rejected )
return ;
TQStringList files = dialog->selectedFiles();
for ( unsigned int i = 0;i < files.count();++i )
{
switch ( dialog->mode() )
{
case AddFilesDialog::Copy:
{
// Copy selected files to current subproject folder
// and add them to the filelist
TQString filename = KURL( files[ i ] ).fileName();
KIO::NetAccess::file_copy( files[ i ], cleanSubprojectPath + TQString( TQChar( TQDir::separator() ) ) + filename, -1, false, false, this );
TQFile testExist( cleanSubprojectPath + TQString( TQChar( TQDir::separator() ) ) + filename );
if ( testExist.exists() )
{
TQStringList files( filename );
addFiles( files, false );
}
}
break;
case AddFilesDialog::Link:
{
// Link selected files to current subproject folder
KProcess *proc = new KProcess( TQT_TQOBJECT(this) );
*proc << "ln";
*proc << "-s";
*proc << files[ i ];
*proc << cleanSubprojectPath;
proc->start(KProcess::Block);
TQString filename = files[ i ].right( files[ i ].length() - files[ i ].tqfindRev( '/' ) - 1 );
// and add them to the filelist
TQFile testExist( cleanSubprojectPath + TQString( TQChar( TQDir::separator() ) ) + filename );
if ( testExist.exists() )
{
TQStringList files( filename );
addFiles( files, false );
}
}
break;
case AddFilesDialog::Relative:
{
// Form relative path to current subproject folder
TQString theFile = files[ i ];
TQStringList files( URLUtil::relativePathToFile( cleanSubprojectPath, theFile )
);
addFiles( files, false );
}
break;
}
}
// Update project file
if ( titem && titem->owner )
{
titem->owner->scope->saveToFile( );
}
// Update subprojectview
slotOverviewSelectionChanged( m_shownSubproject );
}
else if ( r == idInsNewFile )
{
KDevCreateFile * createFileSupport = m_part->extension<KDevCreateFile>( "KDevelop/CreateFile" );
TQString fcext;
switch ( titem->groupType )
{
case GroupItem::Sources:
fcext = "cpp";
break;
case GroupItem::Headers:
fcext = "h";
break;
case GroupItem::Forms:
if ( !m_part->isTQt4Project() )
fcext = "ui-widget";
else
fcext = "ui-widget-qt4";
break;
case GroupItem::Translations:
fcext = "ts";
break;
case GroupItem::Lexsources:
fcext = "l";
break;
case GroupItem::Yaccsources:
fcext = "y";
break;
case GroupItem::Resources:
fcext = "qrc";
break;
default:
fcext = TQString();
}
KDevCreateFile::CreatedFile crFile =
createFileSupport->createNewFile( fcext, cleanSubprojectPath );
}
else if ( r == idInsInstallObject )
{
bool ok = FALSE;
TQString install_obj = KInputDialog::getText(
i18n( "Add Install Object" ),
i18n( "Enter a name for the new object:" ),
TQString(), &ok, this );
if ( ok && !install_obj.isEmpty() )
{
titem->addInstallObject( install_obj );
slotOverviewSelectionChanged( m_shownSubproject );
}
}
else if ( r == idLUpdate )
{
TQString cmd = "lupdate ";
cmd += m_shownSubproject->scope->fileName();
m_part->appFrontend() ->startAppCommand( m_shownSubproject->scope->projectDir(), cmd, false );
}
else if ( r == idLRelease )
{
TQString cmd = "lrelease ";
cmd += m_shownSubproject->scope->fileName();
m_part->appFrontend() ->startAppCommand( m_shownSubproject->scope->projectDir(), cmd, false );
}else if( r == idRemoveFile )
{
static_cast<GroupItem*>(titem->tqparent())->removeInstallObject( titem );
slotOverviewSelectionChanged( m_shownSubproject );
}
}
else if ( pvitem->type() == qProjectItem::File )
{
removefileButton->setEnabled( true );
FileItem *fitem = static_cast<FileItem*>( pvitem );
GroupItem* gitem = static_cast<GroupItem*>( item->tqparent() );
KPopupMenu popup( this );
if ( !( gitem->groupType == GroupItem::InstallObject ) )
popup.insertTitle( i18n( "File: %1" ).tqarg( fitem->text( 0 ) ) );
else
popup.insertTitle( i18n( "Pattern: %1" ).tqarg( fitem->text( 0 ) ) );
int idRemoveFile = -2;
int idSubclassWidget = -2;
int idUpdateWidgetclass = -2;
int idBuildFile = -2;
int idUISubclasses = -2;
int idViewUIH = -2;
int idFileProperties = -2;
int idEditInstallPattern = -2;
if ( !fitem->uiFileLink.isEmpty() )
{
idUpdateWidgetclass = popup.insertItem( SmallIconSet( "qmake_subclass" ), i18n( "Edit ui-Subclass..." ) );
popup.tqsetWhatsThis( idUpdateWidgetclass, i18n( "<b>Edit ui-subclass</b><p>Launches <b>Subclassing</b> wizard "
"and prompts to implement missing in childclass slots and functions." ) );
}
if ( fitem->text( 0 ).tqcontains( ".ui" ) )
{
idSubclassWidget = popup.insertItem( SmallIconSet( "qmake_subclass" ), i18n( "Subclassing Wizard..." ) );
popup.tqsetWhatsThis( idSubclassWidget, i18n( "<b>Subclass widget</b><p>Launches <b>Subclassing</b> wizard. "
"It allows to create a subclass from the class defined in .ui file. "
"There is also possibility to implement slots and functions defined in the base class." ) );
if ( !m_part->isTQt4Project() )
{
idViewUIH = popup.insertItem( SmallIconSet( "qmake_ui_h" ), i18n( "Open ui.h File" ) );
popup.tqsetWhatsThis( idViewUIH, i18n( "<b>Open ui.h file</b><p>Opens .ui.h file associated with the selected .ui." ) );
}
idUISubclasses = popup.insertItem( SmallIconSet( "qmake_subclass" ), i18n( "List of Subclasses..." ) );
popup.tqsetWhatsThis( idUISubclasses, i18n( "<b>List of subclasses</b><p>Shows subclasses list editor. "
"There is possibility to add or remove subclasses from the list." ) );
}
if ( !( gitem->groupType == GroupItem::InstallObject ) )
{
idRemoveFile = popup.insertItem( SmallIconSet( "editdelete" ), i18n( "Remove File" ) );
popup.tqsetWhatsThis( idRemoveFile, i18n( "<b>Remove file</b><p>Removes file from a current group. For sources, this also removes the subclassing information." ) );
idFileProperties = popup.insertItem( SmallIconSet( "configure_file" ), i18n( "Exclude File" ) );
popup.tqsetWhatsThis( idFileProperties, i18n( "<b>Exclude File</b><p>Excludes the file from this Scope. Does not touch subclassing information" ) );
}
else
{
idEditInstallPattern = popup.insertItem( SmallIconSet( "configure_file" ), i18n( "Edit Pattern" ) );
popup.tqsetWhatsThis( idEditInstallPattern, i18n( "<b>Edit pattern</b><p>Allows to edit install files pattern." ) );
idRemoveFile = popup.insertItem( SmallIconSet( "editdelete" ), i18n( "Remove Pattern" ) );
popup.tqsetWhatsThis( idRemoveFile, i18n( "<b>Remove pattern</b><p>Removes install files pattern from the current install object." ) );
}
if ( !( gitem->groupType == GroupItem::InstallObject ) )
{
KURL::List urls;
urls.append( m_shownSubproject->scope->projectDir() + TQChar( TQDir::separator() ) + m_shownSubproject->scope->resolveVariables( fitem->localFilePath ) );
FileContext context( urls );
m_part->core() ->fillContextMenu( &popup, &context );
}
if ( gitem->groupType == GroupItem::Sources )
{
idBuildFile = popup.insertItem( SmallIconSet( "make_kdevelop" ), i18n( "Build File" ) );
popup.tqsetWhatsThis( idBuildFile, i18n( "<b>Build File</b><p>Builds the object file for this source file." ) );
}
int r = popup.exec( p );
if ( r == idRemoveFile )
removeFile( m_shownSubproject, fitem );
else if ( r == idFileProperties )
{
slotExcludeFileFromScopeButton();
}
else if ( r == idViewUIH )
{
kdDebug(9024) << "Opening:" << fitem->text(0) << ";" << fitem->text(0).tqreplace(".ui","") << endl;
m_part->partController() ->editDocument( KURL( m_shownSubproject->scope->projectDir() + TQChar( TQDir::separator() ) +
fitem->localFilePath.tqreplace(".ui","") + ".h" ) );
}
else if ( r == idSubclassWidget )
{
TQStringList newFileNames;
newFileNames = m_part->languageSupport() ->subclassWidget( m_shownSubproject->scope->projectDir() + TQChar( TQDir::separator() ) + fitem->localFilePath );
kdDebug(9024) << "got new filenames: " << newFileNames << endl;
if ( !newFileNames.empty() )
{
TQDomDocument & dom = *( m_part->projectDom() );
for ( uint i = 0; i < newFileNames.count(); ++i )
{
TQString srcfile_relpath = URLUtil::getRelativePath( m_shownSubproject->scope->projectDir(), newFileNames[ i ] ) ;
newFileNames[i] = URLUtil::getRelativePath( projectDirectory(), newFileNames[ i ] ) ;
TQString uifile_relpath = m_shownSubproject->relativePath() + TQChar( TQDir::separator() ) + fitem->localFilePath;
DomUtil::PairList list = DomUtil::readPairListEntry( dom, "/kdevtrollproject/subclassing" ,
"subclass", "sourcefile", "uifile" );
list << DomUtil::Pair( srcfile_relpath, uifile_relpath );
DomUtil::writePairListEntry( dom, "/kdevtrollproject/subclassing", "subclass", "sourcefile", "uifile", list );
// newFileNames[i] = newFileNames[i].tqreplace(TQRegExp(projectDirectory()+"/"),"");
qWarning( "new file: %s", newFileNames[ i ].latin1() );
}
m_subclasslist = DomUtil::readPairListEntry( dom, "/kdevtrollproject/subclassing" ,
"subclass", "sourcefile", "uifile" );
m_part->addFiles( newFileNames );
}
}
else if ( r == idUpdateWidgetclass )
{
TQString noext = fitem->text( 0 );
if ( noext.tqfindRev( '.' ) > -1 )
noext = noext.left( noext.tqfindRev( '.' ) );
TQStringList dummy;
TQString uifile = fitem->uiFileLink;
if ( uifile.tqfindRev( TQString( TQChar( TQDir::separator() ) ) ) > -1 )
{
TQStringList uisplit = TQStringList::split( TQString( TQChar( TQDir::separator() ) ), uifile );
uifile = uisplit[ uisplit.count() - 1 ];
}
m_part->languageSupport() ->updateWidget( m_shownSubproject->scope->projectDir() + TQString( TQChar( TQDir::separator() ) ) + uifile, noext );
}
else if ( r == idUISubclasses )
{
TQDomDocument & dom = *( m_part->projectDom() );
DomUtil::PairList list = DomUtil::readPairListEntry( dom, "/kdevtrollproject/subclassing" ,
"subclass", "sourcefile", "uifile" );
SubclassesDlg *sbdlg = new SubclassesDlg( m_shownSubproject->relativePath() + TQChar( TQDir::separator() ) + fitem->localFilePath,
list, projectDirectory() );
if ( sbdlg->exec() )
{
TQDomElement el = DomUtil::elementByPath( dom, "/kdevtrollproject" );
TQDomElement el2 = DomUtil::elementByPath( dom, "/kdevtrollproject/subclassing" );
if ( ( !el.isNull() ) && ( !el2.isNull() ) )
{
el.removeChild( el2 );
}
DomUtil::writePairListEntry( dom, "/kdevtrollproject/subclassing", "subclass", "sourcefile", "uifile", list );
m_subclasslist = DomUtil::readPairListEntry( dom, "/kdevtrollproject/subclassing" ,
"subclass", "sourcefile", "uifile" );
}
}
else if ( r == idEditInstallPattern )
{
GroupItem * titem = static_cast<GroupItem*>( item->tqparent() );
bool ok = FALSE;
TQString filepattern = KInputDialog::getText(
i18n( "Edit Pattern" ),
i18n( "Enter a pattern relative to the current "
"subproject (example docs/*.html):" ),
fitem->text( 0 ) , &ok, this );
if ( ok && !filepattern.isEmpty() )
{
removeFile( m_shownSubproject, fitem );
addFileToCurrentSubProject( titem, filepattern );
slotOverviewSelectionChanged( m_shownSubproject );
}
}
else if ( r == idBuildFile )
{
buildFile( m_shownSubproject, fitem );
}
}
}
void TrollProjectWidget::removeFile( TQMakeScopeItem *spitem, FileItem *fitem )
{
GroupItem * gitem = static_cast<GroupItem*>( fitem->tqparent() );
m_filesCached = false;
m_allFilesCache.clear();
TQString realfilename = spitem->scope->resolveVariables( fitem->localFilePath );
if ( KMessageBox::warningYesNo( this,
"<qt>" +
i18n( "Do you want to delete the file <strong>%1</strong> from the project and your disk?" )
.tqarg( fitem->text( 0 ) ) +
"</qt>",
i18n( "Remove File" ),
KStdGuiItem::remove(),
KStdGuiItem::no(),
"deleteFileFromTQMakeProject" ) == KMessageBox::No )
{
return;
}else
{
kdDebug(9024) << "Deleting file as the user wished: " << spitem->scope->projectDir() + TQString( TQChar( TQDir::separator() ) ) + realfilename << endl;
KIO::NetAccess::del( KURL::fromPathOrURL( spitem->scope->projectDir() + TQString( TQChar( TQDir::separator() ) ) + realfilename ), 0 );
}
if ( gitem->groupType != GroupItem::InstallObject )
{
TQString removedFileName = spitem->relativePath() + TQString( TQChar( TQDir::separator() ) ) + realfilename;
if ( removedFileName.startsWith( TQDir::rootDirPath() ) )
removedFileName = removedFileName.mid( 1 );
emitRemovedFile( removedFileName );
}
//remove subclassing info
TQDomDocument &dom = *( m_part->projectDom() );
DomUtil::PairList list = DomUtil::readPairListEntry( dom, "/kdevtrollproject/subclassing" ,
"subclass", "sourcefile", "uifile" );
TQPtrList<DomUtil::Pair> pairsToRemove;
DomUtil::PairList::iterator it;
for ( it = list.begin(); it != list.end(); ++it )
{
if ( ( ( *it ).first == realfilename ) || ( ( *it ).second == realfilename ) )
{
pairsToRemove.append( &( *it ) );
}
}
DomUtil::Pair *pair;
for ( pair = pairsToRemove.first(); pair; pair = pairsToRemove.next() )
{
list.remove( *pair );
}
TQDomElement el = DomUtil::elementByPath( dom, "/kdevtrollproject" );
TQDomElement el2 = DomUtil::elementByPath( dom, "/kdevtrollproject/subclassing" );
if ( ( !el.isNull() ) && ( !el2.isNull() ) )
{
el.removeChild( el2 );
}
DomUtil::writePairListEntry( dom, "/kdevtrollproject/subclassing", "subclass", "sourcefile", "uifile", list );
gitem->removeFileFromScope( fitem->text( 0 ) );
}
void TrollProjectWidget::emitAddedFile( const TQString &fileName )
{
emit m_part->addedFilesToProject( TQStringList( fileName ) );
}
void TrollProjectWidget::emitRemovedFile( const TQString &fileName )
{
emit m_part->removedFilesFromProject( TQStringList( fileName ) );
}
TQString TrollProjectWidget::getUiFileLink( const TQString &relpath, const TQString& filename )
{
DomUtil::PairList::iterator it;
for ( it = m_subclasslist.begin();it != m_subclasslist.end(); ++it )
{
if ( ( *it ).first == relpath + filename )
return ( *it ).second;
}
return "";
}
void TrollProjectWidget::slotBuildOpenFile()
{
KParts::ReadWritePart * part = dynamic_cast<KParts::ReadWritePart*>( m_part->partController() ->activePart() );
if ( !part || !part->url().isLocalFile() )
return ;
TQString fileName = part->url().path();
TQFileInfo fi( fileName );
TQString sourceDir = fi.dirPath();
TQString baseName = fi.baseName( true );
kdDebug( 9024 ) << "Compiling " << fileName
<< "in dir " << sourceDir
<< " with baseName " << baseName << endl;
TQString buildDir = sourceDir;
TQString target = baseName + ".o";
m_part->mainWindow() ->raiseView( m_part->makeFrontend() ->widget() );
// m_part->startMakeCommand(buildDir, target);
TQPtrList<TQMakeScopeItem> list = findSubprojectForFile( fi );
TQMakeScopeItem *spitem;
for ( spitem = list.first(); spitem; spitem = list.next() )
{
TQString buildcmd = constructMakeCommandLine( spitem->scope );
TQString dircmd = "cd " + KProcess::quote( spitem->scope->projectDir() ) + " && " ;
kdDebug( 9024 ) << "builddir " << spitem->scope->projectDir() << ", cmd " << dircmd + buildcmd + " " + target << endl;
m_part->queueCmd( spitem->scope->projectDir(), dircmd + buildcmd + " " + target );
}
// startMakeCommand(buildDir, target);
}
void TrollProjectWidget::slotExecuteProject()
{
TQString program = m_part->mainProgram();
if ( program.isEmpty() )
{
KMessageBox::sorry( this, i18n( "Please specify the executable name in the "
"project options dialog or select an application subproject in the TQMake Manager." ), i18n( "No Executable Found" ) );
return ;
}
//only run once
if (m_part->appFrontend()->isRunning())
{
if (KMessageBox::questionYesNo(this, i18n("Your application is currently running. Do you want to restart it?"), i18n("Application Already Running"), i18n("&Restart Application"), i18n("Do &Nothing")) == KMessageBox::No)
return;
m_part->appFrontend()->stopApplication();
while(m_part->appFrontend()->isRunning())
{
KApplication::kApplication()->processEvents();
usleep(100);
}
}
if ( !program.startsWith( TQDir::rootDirPath() ) )
program.prepend( "." + TQString( TQChar( TQDir::separator() ) ) );
// Build environment variables to prepend to the executable path
TQString runEnvVars = TQString();
DomUtil::PairList list =
DomUtil::readPairListEntry( *( m_part->projectDom() ), "/kdevtrollproject/run/envvars", "envvar", "name", "value" );
DomUtil::PairList::ConstIterator it;
for ( it = list.begin(); it != list.end(); ++it )
{
const DomUtil::Pair &pair = ( *it );
if ( ( !pair.first.isEmpty() ) && ( !pair.second.isEmpty() ) )
runEnvVars += pair.first + "=" + pair.second + " ";
}
program.prepend( runEnvVars );
program.append( " " + m_part->runArguments() + " " );
bool inTerminal = DomUtil::readBoolEntry( *( m_part->projectDom() ), "/kdevtrollproject/run/terminal" );
m_part->appFrontend() ->startAppCommand( m_part->runDirectory(), program, inTerminal );
}
void TrollProjectWidget::slotCleanProject()
{
runClean(m_rootSubproject, "clean");
}
void TrollProjectWidget::slotCleanTarget()
{
runClean(m_shownSubproject, "clean");
}
void TrollProjectWidget::slotDistCleanProject()
{
runClean(m_rootSubproject, "distclean");
}
void TrollProjectWidget::slotDistCleanTarget()
{
runClean(m_shownSubproject, "distclean");
}
void TrollProjectWidget::runClean( TQMakeScopeItem* item, const TQString& cleantargetname )
{
// no subproject selected
m_part->partController() ->saveAllFiles();
if ( !item )
return ;
// can't build from scope
if ( item->scope->scopeType() != Scope::ProjectScope )
return ;
TQString dir = item->scope->projectDir();
createMakefileIfMissing( dir, item );
m_part->mainWindow() ->raiseView( m_part->makeFrontend() ->widget() );
TQString dircmd = "cd " + KProcess::quote( dir ) + " && " ;
TQString rebuildcmd = constructMakeCommandLine( item->scope ) + " "+cleantargetname;
m_part->queueCmd( dir, dircmd + rebuildcmd );
}
TQString TrollProjectWidget::constructMakeCommandLine( Scope* s )
{
TQString makeFileName;
if ( s )
makeFileName = s->resolveVariables( s->variableValues( "MAKEFILE", true, true, true ).front() );
TQDomDocument & dom = *( m_part->projectDom() );
TQString cmdline = DomUtil::readEntry( dom, "/kdevtrollproject/make/makebin" );
if ( cmdline.isEmpty() )
cmdline = MAKE_COMMAND;
if ( !makeFileName.isEmpty() )
{
cmdline += " -f " + makeFileName;
}
if ( !DomUtil::readBoolEntry( dom, "/kdevtrollproject/make/abortonerror" ) )
cmdline += " -k";
bool runmultiple = DomUtil::readBoolEntry(dom, "/kdevtrollproject/make/runmultiplejobs");
int jobs = DomUtil::readIntEntry( dom, "/kdevtrollproject/make/numberofjobs" );
if ( jobs != 0 && runmultiple )
{
cmdline += " -j";
cmdline += TQString::number( jobs );
}
if ( DomUtil::readBoolEntry( dom, "/kdevtrollproject/make/dontact" ) )
cmdline += " -n";
cmdline += " ";
cmdline.prepend( m_part->makeEnvironment() );
return cmdline;
}
void TrollProjectWidget::createMakefileIfMissing( const TQString &dir, TQMakeScopeItem *item )
{
TQFileInfo fi;
TQFileInfo fi2;
kdDebug(9024) << "Makefile:" << item->scope->variableValues( "MAKEFILE", true, true, true ) << endl;
if ( item->scope->variableValues( "MAKEFILE", true, true, true ).isEmpty() )
{
fi.setFile( dir + TQString( TQChar( TQDir::separator() ) ) + "Makefile" );
fi2.setFile( dir + TQString( TQChar( TQDir::separator() ) ) + "makefile" );
}
else
{
TQString realmf = item->scope->resolveVariables( item->scope->variableValues( "MAKEFILE", true, true, true ).front() );
fi.setFile( realmf );
fi2.setFile( dir + TQString( TQChar( TQDir::separator() ) ) + realmf );
}
if ( !fi.exists() && !fi2.exists() )
{
int r = KMessageBox::questionYesNo( this, i18n( "There is no Makefile in this directory. Run qmake first?" ), TQString(), i18n( "Run qmake" ), i18n( "Do Not Run" ) );
if ( r == KMessageBox::No )
return ;
m_part->startTQMakeCommand( dir );
}
}
TQMakeScopeItem* TrollProjectWidget::findSubprojectForPath( const TQString& relPath )
{
if( !m_rootSubproject )
return 0;
TQStringList dirs = TQStringList::split("/", relPath);
TQMakeScopeItem* pitem = static_cast<TQMakeScopeItem*>(m_rootSubproject);
for( TQStringList::iterator it = dirs.begin(); it != dirs.end(); ++it)
{
TQListViewItem* item = pitem->firstChild();
while( item )
{
TQMakeScopeItem* sitem = static_cast<TQMakeScopeItem*>(item);
if( TQFileInfo( sitem->scope->projectDir() ).fileName() == *it )
{
pitem = sitem;
break;
}
}
}
return pitem;
}
TQPtrList<TQMakeScopeItem> TrollProjectWidget::findSubprojectForFile( TQFileInfo fi )
{
TQPtrList<TQMakeScopeItem> list;
findSubprojectForFile( list, m_rootSubproject, fi.absFilePath() );
return list;
}
void TrollProjectWidget::findSubprojectForFile( TQPtrList<TQMakeScopeItem> &list, TQMakeScopeItem * item, TQString absFilePath )
{
if( !item )
return;
TQDir d( item->scope->projectDir() );
TQStringList vars = item->scope->variableValues( "SOURCES" );
for ( TQStringList::Iterator it = vars.begin(); it != vars.end(); ++it )
{
TQFileInfo fi2( d, item->scope->resolveVariables( *it ) );
if ( absFilePath == fi2.absFilePath() )
list.append( item );
}
vars = item->scope->variableValues( "HEADERS" );
for ( TQStringList::Iterator it = vars.begin(); it != vars.end(); ++it )
{
TQFileInfo fi2( d, item->scope->resolveVariables( *it ) );
if ( absFilePath == fi2.absFilePath() )
list.append( item );
}
TQListViewItem * child = item->firstChild();
while ( child )
{
TQMakeScopeItem * spitem = dynamic_cast<TQMakeScopeItem*>( child );
if ( spitem )
{
findSubprojectForFile( list, spitem, absFilePath );
}
child = child->nextSibling();
}
}
void TrollProjectWidget::slotRemoveScope( TQMakeScopeItem * spitem )
{
if ( spitem == 0 && m_shownSubproject == 0 )
return ;
else
{
m_filesCached = false;
m_allFilesCache.clear();
TQMakeScopeItem* pitem = dynamic_cast<TQMakeScopeItem *>( spitem->tqparent() );
if ( pitem != 0 )
{
switch ( spitem->scope->scopeType() )
{
case Scope::FunctionScope:
if( !pitem->scope->deleteFunctionScope( spitem->scope->getNum() ) )
{
KMessageBox::error(this, i18n("Could not delete Function Scope.\nThis is an internal error, please write a bug report to bugs.kde.org and include the output of kdevelop when run from a shell."),i18n("Function Scope Deletion failed"));
return;
}
// pitem->scopes.remove( spitem );
break;
case Scope::IncludeScope:
if( !pitem->scope->deleteIncludeScope( spitem->scope->getNum() ) )
{
KMessageBox::error(this, i18n("Could not delete Include Scope.\nThis is an internal error, please write a bug report to bugs.kde.org and include the output of kdevelop when run from a shell."),i18n("Include Scope Deletion failed"));
return;
}
// pitem->scopes.remove( spitem );
delete spitem;
spitem = pitem;
pitem = dynamic_cast<TQMakeScopeItem *>( pitem->tqparent() );
// pitem->scopes.remove(spitem);
break;
case Scope::SimpleScope:
if( !pitem->scope->deleteSimpleScope( spitem->scope->getNum() ) )
{
KMessageBox::error(this, i18n("Could not delete Scope.\nThis is an internal error, please write a bug report to bugs.kde.org and include the output of kdevelop when run from a shell."),i18n("Scope Deletion failed"));
return;
}
// pitem->scopes.remove( spitem );
break;
default:
break;
}
pitem->scope->saveToFile();
delete spitem;
m_shownSubproject = pitem;
overview->setCurrentItem ( m_shownSubproject );
overview->setSelected( m_shownSubproject, true );
slotOverviewSelectionChanged( m_shownSubproject );
}
}
}
TQMakeScopeItem * TrollProjectWidget::findSubprojectForScope( TQMakeScopeItem * scope )
{
if ( ( scope == 0 ) || ( scope->tqparent() == 0 ) )
return 0;
if ( scope->scope->scopeType() == Scope::ProjectScope )
return scope;
return findSubprojectForScope( dynamic_cast<TQMakeScopeItem *>( scope->tqparent() ) );
}
void TrollProjectWidget::focusInEvent( TQFocusEvent * /*e*/ )
{
switch ( m_lastFocusedView )
{
case DetailsView:
details->setFocus();
break;
case SubprojectView:
default:
overview->setFocus();
}
}
void TrollProjectWidget::setLastFocusedView( TrollProjectView view )
{
m_lastFocusedView = view;
}
void TrollProjectWidget::runTQMakeRecursive( TQMakeScopeItem* proj )
{
if( m_part->isTQt4Project() )
{
m_part->startTQMakeCommand( proj->scope->projectDir(), true );
}else
{
if ( proj->scope->scopeType() == Scope::ProjectScope )
{
m_part->startTQMakeCommand( proj->scope->projectDir() );
}
TQMakeScopeItem* item = static_cast<TQMakeScopeItem*>( proj->firstChild() );
while ( item )
{
runTQMakeRecursive( item );
item = static_cast<TQMakeScopeItem*>( item->nextSibling() );
}
}
}
void TrollProjectWidget::slotBuildSelectedFile()
{
TQListViewItem * selectedItem = details->currentItem();
if ( !selectedItem )
return ;
qProjectItem *pvitem = static_cast<qProjectItem*>( selectedItem );
// Check that it is a file (just in case)
if ( pvitem->type() != qProjectItem::File )
return ;
FileItem *fitem = static_cast<FileItem*>( pvitem );
buildFile( m_shownSubproject, fitem );
}
void TrollProjectWidget::buildFile( TQMakeScopeItem* spitem, FileItem* fitem )
{
TQFileInfo fi( spitem->scope->projectDir() + TQChar( TQDir::separator() ) + spitem->scope->resolveVariables( fitem->localFilePath ) );
TQString sourceDir = fi.dirPath();
TQString baseName = fi.baseName( true );
kdDebug( 9024 ) << "Compiling " << spitem->scope->resolveVariables( fitem->text( 0 ) )
<< "in dir " << sourceDir
<< " with baseName " << baseName << endl;
TQString buildDir = sourceDir;
TQString target = baseName + ".o";
if( !spitem->scope->variableValues("OBJECTS_DIR").isEmpty() )
target = spitem->scope->resolveVariables( spitem->scope->variableValues("OBJECTS_DIR").first() )+ TQString( TQChar( TQDir::separator() ) )+target;
kdDebug( 9024 ) << "builddir " << buildDir << ", target " << target << endl;
m_part->mainWindow() ->raiseView( m_part->makeFrontend() ->widget() );
// m_part->startMakeCommand(buildDir, target);
TQString buildcmd = constructMakeCommandLine( spitem->scope );
TQString dircmd = "cd " + KProcess::quote( spitem->scope->projectDir() ) + " && " ;
kdDebug( 9024 ) << "builddir " << spitem->scope->projectDir() << ", cmd " << dircmd + buildcmd + " " + target << endl;
m_part->queueCmd( spitem->scope->projectDir(), dircmd + buildcmd + " " + target );
// startMakeCommand(buildDir, target);
}
TrollProjectWidget::SaveType TrollProjectWidget::dialogSaveBehaviour() const
{
switch ( DomUtil::readIntEntry( *m_part->projectDom(), "/kdevtrollproject/qmake/savebehaviour", 2 ) )
{
case 0:
return AlwaysSave;
break;
case 1:
return NeverSave;
break;
case 2:
default:
return Ask;
break;
}
}
bool TrollProjectWidget::isTMakeProject()
{
return m_part->isTMakeProject();
}
void TrollProjectWidget::slotDisableSubproject( TQMakeScopeItem* spitem )
{
m_filesCached = false;
m_allFilesCache.clear();
if( spitem->scope->variableValues("TEMPLATE").tqfindIndex("subdirs") != -1 )
{
TQStringList subdirs = spitem->scope->variableValues( "SUBDIRS" );
DisableSubprojectDlg dlg( subdirs );
if( dlg.exec() )
{
TQStringList values = dlg.selectedProjects();
TQListViewItem* item = spitem->firstChild();
while( item )
{
if( values.tqfindIndex( item->text(0) ) != -1 )
delete item;
item = item->nextSibling();
}
spitem->disableSubprojects( values );
spitem->scope->saveToFile();
m_shownSubproject = spitem;
slotOverviewSelectionChanged( m_shownSubproject );
}
}else
{
TQMakeScopeItem* tqparent = static_cast<TQMakeScopeItem*>(spitem->tqparent());
tqparent->disableSubprojects( TQStringList( spitem->scope->scopeName() ) );
delete spitem;
tqparent->scope->saveToFile();
m_shownSubproject = tqparent;
slotOverviewSelectionChanged( m_shownSubproject );
}
}
void TrollProjectWidget::slotProjectDirty(const TQString& path)
{
kdDebug(9024) << "File is dirty:" << path << " using method " << endl;
if( KMessageBox::warningYesNo(this, i18n("The project file \"%1\" has changed on disk\n(Or you have \"%2\" opened in the editor, which also triggers a reload when you change something in the TQMake Manager).\n\nDo you want to reload it?").tqarg(path).tqarg(path), i18n("Project File Changed"), i18n("Reload"), i18n("Do Not Reload"), "trollproject_reload_project_file" ) != KMessageBox::No )
{
m_part->dirWatch()->stopScan();
TQListViewItemIterator it(m_rootSubproject);
TQValueList<TQMakeScopeItem*> itemstoreload;
while( it.current() )
{
TQMakeScopeItem* projectitem = static_cast<TQMakeScopeItem*>( it.current() );
if( projectitem->scope->scopeType() == Scope::ProjectScope
|| projectitem->scope->scopeType() == Scope::IncludeScope )
{
TQString projectfile = projectitem->scope->projectDir() + TQString(TQChar(TQDir::separator())) + projectitem->scope->fileName();
if( projectfile == path )
{
itemstoreload.append(projectitem);
}
}
it++;
}
TQValueList<TQMakeScopeItem*>::const_iterator reloadit = itemstoreload.begin();
for( ; reloadit != itemstoreload.end() ; ++reloadit )
{
(*reloadit)->reloadProject();
if( m_shownSubproject == (*reloadit) )
{
cleanDetailView(*reloadit);
setupContext();
buildProjectDetailTree( *reloadit, details );
}
if( m_configDlg->isShown() && m_configDlg->currentProjectItem() == (*reloadit) )
{
m_configDlg->reject();
m_configDlg->updateSubproject(m_shownSubproject);
m_configDlg->show();
}
}
m_part->dirWatch()->startScan();
}
}
TQMakeScopeItem* TrollProjectWidget::currentSubproject()
{
return m_shownSubproject;
}
bool TrollProjectWidget::showFilenamesOnly() const
{
return m_showFilenamesOnly;
}
bool TrollProjectWidget::showVariablesInTree() const
{
return m_showVariablesInTree;
}
TQMap<TQString,TQString> TrollProjectWidget::qmakeEnvironment() const
{
TQMap<TQString,TQString> map;
DomUtil::PairList envvars =
DomUtil::readPairListEntry(*m_part->projectDom(), "/kdevtrollproject/make/envvars", "envvar", "name", "value");
TQString environstr;
DomUtil::PairList::ConstIterator it;
bool hasTQtDir = false;
for (it = envvars.begin(); it != envvars.end(); ++it) {
if( (*it).first == "TQTDIR" )
hasTQtDir = true;
map[(*it).first] = (*it).second;
}
if( !hasTQtDir && !m_part->isTQt4Project() && !DomUtil::readEntry(*m_part->projectDom(), "/kdevcppsupport/qt/root", "").isEmpty() )
{
map["TQTDIR="] = DomUtil::readEntry(*m_part->projectDom(), "/kdevcppsupport/qt/root", "");
map["PATH"] = map["PATH"].prepend( DomUtil::readEntry(*m_part->projectDom(), "/kdevcppsupport/qt/root", "") +"/bin" );
}
return map;
}
#include "trollprojectwidget.moc"
//kate: space-indent on; indent-width 4; tab-width 4; tqreplace-tabs on