//************************************************************
//=======-VUMeter
/////     copyright            : (C) 1999 by Martin Lorenz
//////    email                : lorenz@ch.tum.de
// also copyright 2005 lpotter@trolltech.com

#include "vumeter.h"
#include "qtrec.h"

#include <qpe/config.h>
#include <qtimer.h>
#include <qdrawutl.h>

#include <math.h>

VUMeter::VUMeter(QWidget *parent, const char *name, const int tr)
   : QWidget( parent, name )
{
   tracks = tr;
   int i;

   qWarning("initialize peakvalues");
   for(i = 0; i < tracks + 2; i++) {
      peak[i] = hold[i] = 32768;
      holdTime[i] = 20;
   }

   colorScheme = 0;
   
   readConf();
   
   //rainbow effect
   if( colorScheme == 0 ) {
      for( i = 0; i < para.leds; i++) color[i] = green;
      color[0] = color[1] = red;
      color[2] = color[3] = color[4] = color[5] = yellow;
   } else {
      int j = para.leds - 4;
      for( i = 0; i < para.leds; i++) {
         int i16 = (j);
         color[i] = QColor(( 15 - i16) * 16, 255, 255, QColor::Hsv);
         j--;
      }
   }
      
   buffer = new QPixmap();
   setBackgroundMode(NoBackground);
   vuTimer = new QTimer(this,"vu timer");

   connect(vuTimer, SIGNAL(timeout()), this , SLOT(timeSlot()));
}

VUMeter::~VUMeter(){
//   writeConf();
}

void VUMeter::update(){
   vuTimer->start(para.update, FALSE);
   if (para.onOff) {
      disconnect(vuTimer, SIGNAL(timeout()), this , SLOT(timeSlot()));
      connect(vuTimer, SIGNAL(timeout()), this , SLOT(timeSlot()));
   } else {
      disconnect(vuTimer, SIGNAL(timeout()), this , SLOT(timeSlot()));
   }
   resize();
}

void VUMeter::slotOn() {
   connect(vuTimer, SIGNAL(timeout()), this , SLOT(timeSlot()));
   para.onOff = true;
}

void VUMeter::slotOff() {
   disconnect(vuTimer, SIGNAL(timeout()), this , SLOT(timeSlot()));
   para.onOff = false;
}

void VUMeter::slotProps() {
}

void VUMeter::paintEvent(QPaintEvent* e) {
   Q_UNUSED(e);
   bitBlt(this, 0, 0, buffer);
}


void VUMeter::mousePressEvent(QMouseEvent* e) {
   Q_UNUSED(e);
}


void VUMeter::resizeEvent(QResizeEvent* event) {
   buffer->resize(event->size());
   resize();
}

void VUMeter::resize() {
//   qWarning("resize VUMeter painting");
   if(buffer == 0)
      qWarning("Dude NULL pixmap buffer!");

   buffer->fill(black);

   x = width() - 7; y = height() - 12;
   dx = x / (tracks + 2); dy = y / (para.leds + 2); // size of one LED + black frame
   ox = dx / 6 + 4 + (x - (tracks + 2) * dx) / 2;
   oy = dy / 5 + 5 + (y - (para.leds + 2) * dy) / 2; //offsets
   sx = (4 *dx) / 6; sy = (4 * dy) / 5;         //size of one LED

   QPainter painter; QString str; QFont font;
   int i, textOffset=0;

   if( painter.begin(buffer) ==FALSE)
      qWarning("Painting pixmap did not work!");
   else {
      painter.setPen(green);
      qDrawShadePanel ( &painter, 0,0, width(),height(), colorGroup(), TRUE, 2, 0);
      if (2 * dy - 2 == 10) textOffset = 1;
      font = painter.font(); font.setPointSize( 2 * dy - 2);
      painter.setFont(font);

      for(i = 0; i < tracks + 2; i++) {
         painter.setPen(green); painter.setBrush(green);
         str.sprintf("%d",i+1);
         if (i == tracks) str.sprintf("L");
         if (i == tracks + 1) str.sprintf("R");

         painter.drawRect(ox + dx * i, oy + dy * (para.leds) - 2, sx, 2 * dy - 1);
         painter.setPen(black);
         painter.drawText(textOffset + ox + dx * i, oy + dy * (para.leds) - 2, sx, 2 * dy, AlignCenter, str);
      }
      
      painter.end();
      paint();
   }
}

void VUMeter::timeSlot() {
   int i;
   paint();
   for(i = 0; i < tracks + 2; i++) {
      peak[i] /= para.resoFactor;
   }
}

void VUMeter::paint() {
   int i, k;
   float p, h ;
   QPainter painter;
   painter.begin(buffer);
   int c;

   for(i = 0; i < tracks + 2; i++)	{
      p = peak[i]; h = hold[i];
      if (p >= 32767) p = 32768;
      if (h >= 32767) h = 32768;
			for(k = para.leds + 1; k >= 2; k--)	{
         c = para.leds + 1 - k;
         if (p >= 32768) {  //LED on
            painter.setBrush(color[c]);
         } else { //LED off
            painter.setBrush(color[c].dark(300));
         }
         if (h >= 32768) {  //LED-Frame on
            painter.setPen(color[c]);
         }	else	{ //LED off
            painter.setPen(color[c].dark(300));
         }
         painter.drawRect(ox + dx * i, oy + dy * c, sx, sy);
         p *= para.resoFactor; h *= para.resoFactor;
      }
      if ( --holdTime[i] <= 0) hold[i] = peak[i];
   }
   painter.end();
   bitBlt(this, 0, 0, buffer);
}

void VUMeter::setPeak(int a[]) {
   int i;
   for(i = 0; i < tracks + 2; i++) {
      if (a[i] > i_peak[i]) i_peak[i] = a[i];
      if (a[i] > i_hold[i]) { i_hold[i] = a[i]; holdTime[i] = para.hold; }
   }
   paint();
}

void VUMeter::setPeak(float a[]) {
   int i;
   for(i = 0; i < tracks + 2; i++) {
      if (a[i] > peak[i]) peak[i] = a[i];
      if (a[i] > hold[i]) { hold[i] = a[i]; holdTime[i] = para.hold; }
   }
   paint();
}

void VUMeter::startTimer() {
   vuTimer->start(para.update, FALSE);
}

void VUMeter::stopTimer() {
   vuTimer->stop();
}

void VUMeter::readConf() {
   Config config("OpieRec");
   config.setGroup("VU-Meter");

   para.onOff = config.readBoolEntry("OnOff", true);
   para.update = config.readNumEntry("Update", 25);
   para.hold = config.readNumEntry("Hold", 20);
   para.reso = config.readNumEntry("Resolution", 3);
   para.leds = config.readNumEntry("LEDs", 20);
   para.resoFactor = pow(2, para.reso / 6.0);

   colorScheme = config.readNumEntry("colorScheme", 1);
}


void VUMeter::writeConf() {
   Config config("OpieRec");
   config.setGroup("VU-Meter");

   config.writeEntry("OnOff", para.onOff);
   config.writeEntry("Update", para.update);
   config.writeEntry("Hold", para.hold);
   config.writeEntry("Resolution", para.reso);
   config.writeEntry("LEDs", para.leds);
}