/***************************************************************************
                            posprinter.cpp
                         -------------------
begin                : Vie Mar 10 2006
copyright            : (C) 2006 by InfoSiAL S.L.
email                : mail@infosial.com
***************************************************************************/
/***************************************************************************
 *   This program is free software; you can redistribute it and/or modify  *
 *   it under the terms of the GNU General Public License as published by  *
 *   the Free Software Foundation; version 2 of the License.               *
 ***************************************************************************/
/***************************************************************************
   Este  programa es software libre. Puede redistribuirlo y/o modificarlo
   bajo  los  términos  de  la  Licencia  Pública General de GNU   en  su
   versión 2, publicada  por  la  Free  Software Foundation.
 ***************************************************************************/

#include "posprinter.h"
#include "FLDiskCache.h"

static const int paperWidths[FLPosPrinter::NPaperWidth+1] = { 57, 69, 76 };

FLPosPrinter::FLPosPrinter() :
    QPaintDevice(QInternal::Printer | QInternal::ExternalDevice),
    file(0), strBuffer(0), escBuffer(0), idxBuffer(0),
    printerName_(QString::null)
{
  paperWidth_ = P76MM;
}

FLPosPrinter::~FLPosPrinter()
{
  cleanup();
}

void FLPosPrinter::setPaperWidth(PaperWidth newPaperWidth)
{
  paperWidth_ = newPaperWidth;
}

void FLPosPrinter::setPrinterName(const QString &pName)
{
  printerName_ = pName;
}

void FLPosPrinter::cleanup()
{
  if (file) {
    file->close();
    file->remove();
    delete file;
    file = 0;
  }

  if (strBuffer) {
    strBuffer->clear();
    delete strBuffer;
    strBuffer = 0;
  }

  if (escBuffer) {
    escBuffer->clear();
    delete escBuffer;
    escBuffer = 0;
  }

  idxBuffer = 0;
}

void FLPosPrinter::sendStr(const char c, const int col, const int row)
{
  if (!strBuffer)
    initStrBuffer();

  int idx = row * paperWidthToCols() + col;

  if (col < 0) {
    (*strBuffer)[idxBuffer] = c;
    idxBuffer++;
  } else {
    (*strBuffer)[idx] = c;
    idxBuffer = idx + 1;
  }
}

void FLPosPrinter::sendEsc(const QString &e, const int col, const int row)
{
  if (!escBuffer)
    initEscBuffer();

  int idx = row * paperWidthToCols() + col;

  int i = 4;
  QString hex, resHex;
  while (i < e.length()) {
    hex = e[i++];
    hex += e[i++];
    i++;
    resHex += QChar(hex.toInt(0, 16));
  }
  if (col < 0) {
    (*escBuffer)[idxBuffer] = resHex;
    idxBuffer++;
  } else {
    (*escBuffer)[idx] = resHex;
    idxBuffer = idx + 1;
  }
}

void FLPosPrinter::send(const QString &str, const int col, const int row)
{
  if (str.left(4) == "ESC:") {
    sendEsc(str, col, row);
  } else {
    for (int i = 0; i < str.length(); i++)
      sendStr(str.ascii()[i], col + i, row);
  }
}

bool FLPosPrinter::cmd(int c, QPainter *paint, QPDevCmdParam *p)
{
  if (c == PdcBegin) {
    cleanup();
    initFile();
    initStrBuffer();
    initEscBuffer();
    sendEsc("ESC:1B,40,1B,52,07,1B,74,10");
  }

  if (c == PdcEnd) {
    sendEsc("ESC:1B,64,07");
    flush();
  }

  switch (c) {

    case PdcDrawTextItem: {
      const QTextItem *ti = p[1].textItem;
      const QPoint point = *p[0].point;
      const QString str = ti->engine->string;
      int col = point.x() / 3;
      int row = point.y() / 10;

      send(str, col, row);

      return false;
    }

    case PdcDrawText2Formatted:
      return true;

    case PdcDrawText2:
      return true;

    default:
      break;
  }

  return true;
}

int FLPosPrinter::metric(int m) const
{
  int val;
  PaperWidth w = paperWidth();

  switch (m) {
    case QPaintDeviceMetrics::PdmWidth:
    case QPaintDeviceMetrics::PdmWidthMM:
      val = paperWidths[w];
      break;

    case QPaintDeviceMetrics::PdmHeight:
    case QPaintDeviceMetrics::PdmHeightMM:
      val = 9999;
      break;

    case QPaintDeviceMetrics::PdmDpiX:
      val = 72;
      break;

    case QPaintDeviceMetrics::PdmDpiY:
      val = 72;
      break;

    case QPaintDeviceMetrics::PdmPhysicalDpiX:
    case QPaintDeviceMetrics::PdmPhysicalDpiY:
      val = 72;
      break;

    case QPaintDeviceMetrics::PdmNumColors:
      val = 4;
      break;

    case QPaintDeviceMetrics::PdmDepth:
      val = 2;
      break;

    default:
      val = 0;
  }

  return val;
}

int FLPosPrinter::paperWidthToCols()
{
  switch (paperWidth_) {
    case P76MM:
      return 80;

    case P69_5MM:
      return 65;

    case P57_5MM:
      return 55;
  }
}

void FLPosPrinter::initFile()
{
  QString fileName(AQ_DISKCACHE_DIRPATH + "/outposprinter.tmp");
  QFile::remove(fileName);
  if (!file) {
    file = new QFile(fileName);
    file->open(IO_Raw | IO_WriteOnly);
  }
  file->reset();
}

void FLPosPrinter::initStrBuffer()
{
  if (!strBuffer)
    strBuffer = new QMap< int, char >();
  else
    strBuffer->clear();
}

void FLPosPrinter::initEscBuffer()
{
  if (!escBuffer)
    escBuffer = new QMap< int, QString >();
  else
    escBuffer->clear();
}