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   QIcon icon;
  69   icon.addFile(":icons/sc-cube-128");
  70   icon.addFile(":icons/sc-cube-48");
  71   icon.addFile(":icons/sc-cube-32");
  72   icon.addFile(":icons/sc-cube-16");
  73   setWindowIcon(icon);
  74 }
  75
  76 QcApplication::~QcApplication()
  77 {
  78   _mutex.lock();
  79   _instance = 0;
  80   _mutex.unlock();
  81 }
  82
  83 bool QcApplication::compareThread()
  84 {
  85   bool same;
  86
  87   _mutex.lock();
  88
  89   if( _instance )
  90     same = QThread::currentThread() == _instance->thread();
  91   else
  92     same = false;
  93
  94   _mutex.unlock();
  95
  96   return same;
  97 }
  98
  99 void QcApplication::interpret( const QString &str, bool print )
 100 {
 101   QtCollider::lockLang();
 102   if( compiledOK ) {
 103       VMGlobals *g = gMainVMGlobals;
 104
 105       PyrString *strObj = newPyrString( g->gc, str.toStdString().c_str(), 0, true );
 106
 107       SetObject(&slotRawInterpreter(&g->process->interpreter)->cmdLine, strObj);
 108       g->gc->GCWrite(slotRawObject(&g->process->interpreter), strObj);
 109
 110       runLibrary( print ? QtCollider::s_interpretPrintCmdLine : QtCollider::s_interpretCmdLine );
 111   }
 112   QtCollider::unlockLang();
 113 }
 114
 115 bool QcApplication::event( QEvent *e )
 116 {
 117   if( e->type() == QEvent::FileOpen ) {
 118     // open the file dragged onto the application icon on Mac
 119     QFileOpenEvent *fe = static_cast<QFileOpenEvent*>(e);
 120     interpret( QString("Document.open(\"%1\")").arg(fe->file()), false );
 121
 122     return true;
 123   }
 124
 125   return QApplication::event( e );
 126 }