QtCollider/QcApplication.cpp

   1 /************************************************************************
   2 *
   3 * Copyright 2010 Jakob Leben (jakob.leben@gmail.com)
   4 *
   5 * This file is part of SuperCollider Qt GUI.
   6 *
   7 * This program is free software: you can redistribute it and/or modify
   8 * it under the terms of the GNU General Public License as published by
   9 * the Free Software Foundation, either version 3 of the License, or
  10 * (at your option) any later version.
  11 *
  12 * This program is distributed in the hope that it will be useful,
  13 * but WITHOUT ANY WARRANTY; without even the implied warranty of
  14 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  15 * GNU General Public License for more details.
  16 *
  17 * You should have received a copy of the GNU General Public License
  18 * along with this program.  If not, see <http://www.gnu.org/licenses/>.
  19 *
  20 ************************************************************************/
  21
  22 #include "QcApplication.h"
  23 #include "widgets/QcTreeWidget.h"
  24
  25 #include <PyrLexer.h>
  26 #include <VMGlobals.h>
  27 #include <PyrKernel.h>
  28 #include <PyrSlot.h>
  29 #include <GC.h>
  30
  31 #include <QThread>
  32 #include <QFileOpenEvent>
  33 #include <QIcon>
  34
  35 extern bool compiledOK;
  36
  37 QcApplication * QcApplication::_instance = 0;
  38 QMutex QcApplication::_mutex;
  39
  40 #ifdef Q_WS_X11
  41 #include <X11/Xlib.h>
  42 #endif
  43
  44
  45 /* on x11, we need to check, if we can actually connect to the X server */
  46 static bool QtColliderUseGui(void)
  47 {
  48 #ifdef Q_WS_X11
  49   Display *dpy = XOpenDisplay(NULL);
  50   if (!dpy)
  51     return false;
  52   XCloseDisplay(dpy);
  53   return true;
  54 #else
  55   return true;
  56 #endif
  57 }
  58
  59 QcApplication::QcApplication( int & argc, char ** argv )
  60 : QApplication( argc, argv, QtColliderUseGui() )
  61 {
  62   _mutex.lock();
  63   _instance = this;
  64   _mutex.unlock();
  65   qRegisterMetaType<VariantList>();
  66   qRegisterMetaType<QcTreeWidget::ItemPtr>();
  67
  68   if (QtColliderUseGui()) { // avoid a crash on linux, if x is not available
  69     QIcon icon;
  70     icon.addFile(":/icons/sc-cube-128");
  71     icon.addFile(":/icons/sc-cube-48");
  72     icon.addFile(":/icons/sc-cube-32");
  73     icon.addFile(":/icons/sc-cube-16");
  74     setWindowIcon(icon);
  75   }
  76 }
  77
  78 QcApplication::~QcApplication()
  79 {
  80   _mutex.lock();
  81   _instance = 0;
  82   _mutex.unlock();
  83 }
  84
  85 bool QcApplication::compareThread()
  86 {
  87   bool same;
  88
  89   _mutex.lock();
  90
  91   if( _instance )
  92     same = QThread::currentThread() == _instance->thread();
  93   else
  94     same = false;
  95
  96   _mutex.unlock();
  97
  98   return same;
  99 }
 100
 101 void QcApplication::interpret( const QString &str, bool print )
 102 {
 103   QtCollider::lockLang();
 104   if( compiledOK ) {
 105       VMGlobals *g = gMainVMGlobals;
 106
 107       PyrString *strObj = newPyrString( g->gc, str.toStdString().c_str(), 0, true );
 108
 109       SetObject(&slotRawInterpreter(&g->process->interpreter)->cmdLine, strObj);
 110       g->gc->GCWrite(slotRawObject(&g->process->interpreter), strObj);
 111
 112       runLibrary( print ? QtCollider::s_interpretPrintCmdLine : QtCollider::s_interpretCmdLine );
 113   }
 114   QtCollider::unlockLang();
 115 }
 116
 117 bool QcApplication::event( QEvent *e )
 118 {
 119   if( e->type() == QEvent::FileOpen ) {
 120     // open the file dragged onto the application icon on Mac
 121     QFileOpenEvent *fe = static_cast<QFileOpenEvent*>(e);
 122     interpret( QString("Document.open(\"%1\")").arg(fe->file()), false );
 123
 124     return true;
 125   }
 126
 127   return QApplication::event( e );
 128 }