// $Id$
//-----------------------------------------------------------------------
//       The GSI Online Offline Object Oriented (Go4) Project
//         Experiment Data Processing at EE department, GSI
//-----------------------------------------------------------------------
// Copyright (C) 2000- GSI Helmholtzzentrum fuer Schwerionenforschung GmbH
//                     Planckstr. 1, 64291 Darmstadt, Germany
// Contact:            http://go4.gsi.de
//-----------------------------------------------------------------------
// This software can be used under the license agreements as stated
// in Go4License.txt file which is part of the distribution.
//-----------------------------------------------------------------------

//Author : Denis Bertini 01.11.2000

/**************************************************************************
* Copyright (C) 2000- Gesellschaft f. Schwerionenforschung, GSI           *
*                     Planckstr. 1, 64291 Darmstadt, Germany              *
*                     All rights reserved.                                *
* Contact:            http://go4.gsi.de                                   *
*                                                                         *
* This software can be used under the license agreements as stated in     *
* Go4License.txt file which is part of the distribution.                  *
***************************************************************************/

#include "QRootApplication.h"

#include <iostream>

#include "TSystem.h"

#include <QtCore/QTimer>

#ifndef _MSC_VER
#ifdef __GO4X11__

#include <X11/Xlib.h>

static int qt_x11_errhandler( Display *dpy, XErrorEvent *err )
{

  // special for modality usage: XGetWindowProperty + XQueryTree()
  if ( err->error_code == BadWindow ) {
    //if ( err->request_code == 25 && qt_xdnd_handle_badwindow() )
      return 0;
  }
  //  special case for  X_SetInputFocus
  else if ( err->error_code == BadMatch
       && err->request_code == 42  ) {
    return 0;
  }
  else if ( err->error_code == BadDrawable
         && err->request_code == 14  ) {
      return 0;
    }

  // here XError are forwarded
  char errstr[256];
  XGetErrorText( dpy, err->error_code, errstr, 256 );
  qWarning( "X11 Error: %s %d\n  Major opcode:  %d",
             errstr, err->error_code, err->request_code );
  return 0;
}

#endif
#endif

bool QRootApplication::fDebug = false; //false;
bool QRootApplication::fWarning = false; //false;
bool QRootApplication::fRootCanvasMenusEnabled = true;

void q5MessageOutput(QtMsgType type, const QMessageLogContext &context, const QString &msg)
{
    QByteArray localMsg = msg.toLocal8Bit();
    switch (type) {
    case QtDebugMsg:
        if(QRootApplication::fDebug)
          fprintf(stderr, "QtRoot-Debug: %s (%s:%u, %s)\n", localMsg.constData(), context.file, context.line, context.function);
        break;
    case QtWarningMsg:
        if(QRootApplication::fWarning)
          fprintf(stderr, "QtRoot-Warning: %s (%s:%u, %s)\n", localMsg.constData(), context.file, context.line, context.function);
        break;
    case QtCriticalMsg:
        fprintf(stderr, "QtRoot-Critical: %s (%s:%u, %s)\n", localMsg.constData(), context.file, context.line, context.function);
        break;
    case QtFatalMsg:
        fprintf(stderr, "QtRoot-Fatal: %s (%s:%u, %s)\n", localMsg.constData(), context.file, context.line, context.function);
        abort();
     default:
        fprintf(stderr, "QtRoot-other: %s (%s:%u, %s)\n", localMsg.constData(), context.file, context.line, context.function);
        break;
    }
}

QRootApplication::QRootApplication(int& argc, char **argv, int poll) :
   QApplication(argc,argv, true)
{

  // connect ROOT via Timer call back
  if (poll == 0){
    timer = new QTimer( this );
    QObject::connect( timer, &QTimer::timeout, this, &QRootApplication::execute);
    timer->setSingleShot(false);
    timer->start(20);
  }
  // install a msg-handler
  qInstallMessageHandler( q5MessageOutput );

  // install a filter on the parent
  // use Qt-specific XError Handler (moved this call here from tqapplication JA)
  // QApplication::installEventFilter( this );

  const char *env = gSystem->Getenv("ROOT_CANVAS");
  int flag = 0;
  if (env) {
    if ((strcmp(env, "yes") == 0) || (strcmp(env, "YES") == 0))
       flag = 1;
    else if ((strcmp(env, "no") == 0) || (strcmp(env, "NO") == 0))
       flag = -1;
  }

#ifdef _MSC_VER
  // under Windows one should explicit enable these methods
  fRootCanvasMenusEnabled = (flag == 1);
#else
#ifdef __GO4X11__
   XSetErrorHandler( qt_x11_errhandler );
#endif
   // under Unix one should explicit disable these methods
   fRootCanvasMenusEnabled = (flag != -1);
#endif
}

QRootApplication::~QRootApplication()
{
}

void QRootApplication::execute()
{
   //call the inner loop of ROOT

   // gSystem->InnerLoop();

   // SL 28.5.2015: use ProcessEvents instead of InnerLoop to avoid total block of the qt event loop
   gSystem->ProcessEvents();
}

void QRootApplication::quit()
{
   // gSystem->Exit( 0 );
}

bool QRootApplication::IsRootCanvasMenuEnabled()
{
   return fRootCanvasMenusEnabled;
}