Specialize environmentaspect for qml projects

... and attach that to qml project runconfigurations

Change-Id: I841b72cc279495ee8f3ff31af59bf006f13a1056
Reviewed-by: Daniel Teske <daniel.teske@digia.com>

src/plugins/qmlprojectmanager/qmlprojectenvironmentaspect.cpp

+/****************************************************************************
+**
+** Copyright (C) 2013 Digia Plc and/or its subsidiary(-ies).
+** Contact: http://www.qt-project.org/legal
+**
+** This file is part of Qt Creator.
+**
+** Commercial License Usage
+** Licensees holding valid commercial Qt licenses may use this file in
+** accordance with the commercial license agreement provided with the
+** Software or, alternatively, in accordance with the terms contained in
+** a written agreement between you and Digia.  For licensing terms and
+** conditions see http://qt.digia.com/licensing.  For further information
+** use the contact form at http://qt.digia.com/contact-us.
+**
+** GNU Lesser General Public License Usage
+** Alternatively, this file may be used under the terms of the GNU Lesser
+** General Public License version 2.1 as published by the Free Software
+** Foundation and appearing in the file LICENSE.LGPL included in the
+** packaging of this file.  Please review the following information to
+** ensure the GNU Lesser General Public License version 2.1 requirements
+** will be met: http://www.gnu.org/licenses/old-licenses/lgpl-2.1.html.
+**
+** In addition, as a special exception, Digia gives you certain additional
+** rights.  These rights are described in the Digia Qt LGPL Exception
+** version 1.1, included in the file LGPL_EXCEPTION.txt in this package.
+**
+****************************************************************************/
+
+#include "qmlprojectenvironmentaspect.h"
+
+#include <utils/qtcassert.h>
+
+namespace QmlProjectManager {
+
+// --------------------------------------------------------------------
+// QmlProjectEnvironmentAspect:
+// --------------------------------------------------------------------
+
+QList<int> QmlProjectEnvironmentAspect::possibleBaseEnvironments() const
+{
+    return QList<int>() << static_cast<int>(SystemEnvironmentBase);
+}
+
+QString QmlProjectEnvironmentAspect::baseEnvironmentDisplayName(int base) const
+{
+    if (base == static_cast<int>(SystemEnvironmentBase))
+        return tr("System Environment");
+    return QString();
+}
+
+Utils::Environment QmlProjectManager::QmlProjectEnvironmentAspect::baseEnvironment() const
+{
+    return Utils::Environment::systemEnvironment();
+}
+
+QmlProjectEnvironmentAspect::QmlProjectEnvironmentAspect(ProjectExplorer::RunConfiguration *rc) :
+    ProjectExplorer::EnvironmentAspect(rc)
+{ }
+
+QmlProjectEnvironmentAspect *QmlProjectEnvironmentAspect::clone(ProjectExplorer::RunConfiguration *parent) const
+{
+    return new QmlProjectEnvironmentAspect(this, parent);
+}
+
+QmlProjectEnvironmentAspect::QmlProjectEnvironmentAspect(const QmlProjectManager::QmlProjectEnvironmentAspect *other,
+                                                         ProjectExplorer::RunConfiguration *parent) :
+    ProjectExplorer::EnvironmentAspect(other, parent)
+{ }
+
+} // namespace QmlProjectManager

src/plugins/qmlprojectmanager/qmlprojectenvironmentaspect.h

+/****************************************************************************
+**
+** Copyright (C) 2013 Digia Plc and/or its subsidiary(-ies).
+** Contact: http://www.qt-project.org/legal
+**
+** This file is part of Qt Creator.
+**
+** Commercial License Usage
+** Licensees holding valid commercial Qt licenses may use this file in
+** accordance with the commercial license agreement provided with the
+** Software or, alternatively, in accordance with the terms contained in
+** a written agreement between you and Digia.  For licensing terms and
+** conditions see http://qt.digia.com/licensing.  For further information
+** use the contact form at http://qt.digia.com/contact-us.
+**
+** GNU Lesser General Public License Usage
+** Alternatively, this file may be used under the terms of the GNU Lesser
+** General Public License version 2.1 as published by the Free Software
+** Foundation and appearing in the file LICENSE.LGPL included in the
+** packaging of this file.  Please review the following information to
+** ensure the GNU Lesser General Public License version 2.1 requirements
+** will be met: http://www.gnu.org/licenses/old-licenses/lgpl-2.1.html.
+**
+** In addition, as a special exception, Digia gives you certain additional
+** rights.  These rights are described in the Digia Qt LGPL Exception
+** version 1.1, included in the file LGPL_EXCEPTION.txt in this package.
+**
+****************************************************************************/
+
+#ifndef QMLPROJECTENVIRONMENTASPECT_H
+#define QMLPROJECTENVIRONMENTASPECT_H
+
+#include <projectexplorer/environmentaspect.h>
+
+namespace QmlProjectManager {
+
+namespace Internal { class QmlProjectRunControlFactory; }
+
+class QmlProjectEnvironmentAspect : public ProjectExplorer::EnvironmentAspect
+{
+    Q_OBJECT
+
+public:
+    QmlProjectEnvironmentAspect(ProjectExplorer::RunConfiguration *rc);
+    QmlProjectEnvironmentAspect *clone(ProjectExplorer::RunConfiguration *parent) const;
+
+    QList<int> possibleBaseEnvironments() const;
+    QString baseEnvironmentDisplayName(int base) const;
+    Utils::Environment baseEnvironment() const;
+
+private:
+    enum BaseEnvironmentBase {
+        SystemEnvironmentBase = 0
+    };
+
+    QmlProjectEnvironmentAspect(const QmlProjectEnvironmentAspect *other, ProjectExplorer::RunConfiguration *parent);
+};
+
+} // namespace QmlProjectManager
+
+#endif // QMLPROJECTENVIRONMENTASPECT_H

src/plugins/qmlprojectmanager/qmlprojectmanager.pro

@@ -5,6 +5,7 @@ include(fileformat/fileformat.pri)
 
 DEFINES += QMLPROJECTMANAGER_LIBRARY
 HEADERS += qmlproject.h \
+    qmlprojectenvironmentaspect.h \
     qmlprojectplugin.h \
     qmlprojectmanager.h \
     qmlprojectconstants.h \
@@ -20,6 +21,7 @@ HEADERS += qmlproject.h \
     qmlapplicationwizard.h
 
 SOURCES += qmlproject.cpp \
+    qmlprojectenvironmentaspect.cpp \
     qmlprojectplugin.cpp \
     qmlprojectmanager.cpp \
     qmlprojectnodes.cpp \

src/plugins/qmlprojectmanager/qmlprojectmanager.qbs

@@ -28,6 +28,8 @@ QtcPlugin {
         "qmlproject.h",
         "qmlproject.qrc",
         "qmlprojectconstants.h",
+        "qmlprojectenvironmentaspect.cpp",
+        "qmlprojectenvironmentaspect.h",
         "qmlprojectfile.cpp",
         "qmlprojectfile.h",
         "qmlprojectmanager.cpp",

src/plugins/qmlprojectmanager/qmlprojectrunconfiguration.cpp

@@ -31,6 +31,7 @@
 #include "qmlproject.h"
 #include "qmlprojectmanagerconstants.h"
 #include "qmlprojectrunconfigurationwidget.h"
+#include "qmlprojectenvironmentaspect.h"
 #include <coreplugin/mimedatabase.h>
 #include <coreplugin/editormanager/editormanager.h>
 #include <coreplugin/editormanager/ieditor.h>
@@ -101,10 +102,8 @@ void QmlProjectRunConfiguration::ctor()
         setDisplayName(tr("QML Scene", "QMLRunConfiguration display name."));
     else
         setDisplayName(tr("QML Viewer", "QMLRunConfiguration display name."));
-}
 
-QmlProjectRunConfiguration::~QmlProjectRunConfiguration()
-{
+    addExtraAspect(new QmlProjectEnvironmentAspect(this));
 }
 
 QString QmlProjectRunConfiguration::viewerPath() const

src/plugins/qmlprojectmanager/qmlprojectrunconfiguration.h

@@ -33,6 +33,7 @@
 #include "qmlprojectmanager_global.h"
 
 #include <projectexplorer/runconfiguration.h>
+#include <utils/environment.h>
 
 #include <QPointer>
 
@@ -66,7 +67,6 @@ class QMLPROJECTMANAGER_EXPORT QmlProjectRunConfiguration : public ProjectExplor
 
 public:
     QmlProjectRunConfiguration(ProjectExplorer::Target *parent, Core::Id id);
-    virtual ~QmlProjectRunConfiguration();
 
     QString viewerPath() const;
     QString observerPath() const;