/***************************************************************************
                            FLCodBar.cpp
                         -------------------
begin                : Mar Jun 17 2003
copyright            : (C) 2003-2005 by InfoSiAL S.L.
email                : mail@infosial.com
***************************************************************************/
/***************************************************************************
                                barcode.cpp
                             -------------------
    begin                : Die Apr 23 2002
    copyright            : (C) 2002,2003 by Dominik Seichter
    email                : domseichter@web.de
 ***************************************************************************/
/***************************************************************************
 *   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 "FLCodBar.h"
#include "barcode.h"

FLCodBar::FLCodBar( barcodeData * data ) {
  copyBarcode( data, &barcode );
}

FLCodBar::FLCodBar( const QString & value, int type, int margin, double scale, double cut, int rotation, bool text_flag, QColor fg, QColor bg, int res ) : proc( 0 ), readingStdout( false ), writingStdout( false ) {
  barcode.value = value;
  barcode.type = type;
  barcode.margin = margin;
  barcode.scale = scale;
  barcode.cut = cut;
  barcode.rotation = rotation;
  barcode.text = text_flag;
  barcode.fg = fg;
  barcode.bg = bg;
  barcode.valid = false;
  barcode.res = res;
}

FLCodBar::FLCodBar() : proc( 0 ), readingStdout( false ), writingStdout( false ) {
  fillDefault( &barcode );
}

FLCodBar::~FLCodBar() {
  if ( proc )
    delete proc;
}

QPixmap FLCodBar::pixmap() {
  if ( p.isNull() ) {
    QString key = barcode.value + QString::number( barcode.type ) + QString::number( barcode.res );
    if ( !QPixmapCache::find( key, p ) ) {
      createBarcode();
      if ( barcode.valid ) {
        key = barcode.value + QString::number( barcode.type ) + QString::number( barcode.res );
        QPixmapCache::insert( key, p );
      }
    } else
      barcode.valid = true;
  }
  return p;
}

QPixmap FLCodBar::pixmapError() {
  return pError;
}

void FLCodBar::createBarcode() {
  if ( barcode.value.isEmpty() ) {
    barcode.valid = true;
    return ;
  }

  QString psBarcode;

  barcode.valid = false;
  cleanUp();

  struct Barcode_Item *bc;

  bc = Barcode_Create(( char * ) barcode.value.ascii() );
  if ( !bc )
    return ;

  bc->scalef = barcode.scale;

  if ( Barcode_Encode( bc, barcode.type ) == -1 ) {
    pError.resize( 350, 50 );
    pError.fill( barcode.bg );
    QPainter pter( &pError );
    pter.setFont( QFont( "Helvetica", 11 ) );
    pter.setBrush( barcode.fg );
    pter.drawText( 15, 30, tr( "El valor no se puede codificar para %1" ).arg( typeToName( barcode.type ) ) );
    return ;
  }

  if ( Barcode_Print( bc, &psBarcode, BARCODE_OUT_PS ) ) {
    pError.resize( 300, 50 );
    pError.fill( barcode.bg );
    QPainter pter( &pError );
    pter.setFont( QFont( "Helvetica", 11 ) );
    pter.setBrush( barcode.fg );
    pter.drawText( 15, 30, tr( "Error en la generación del código de barras" ) );
    return ;
  }

  proc = new QProcess();
#if defined(Q_OS_WIN32)

  proc->addArgument( "gswin32c" );
#else

  proc->addArgument( "gs" );
#endif

  proc->addArgument( "-q" );
  proc->addArgument( "-dBATCH" );
  proc->addArgument( "-dNOPAUSE" );
  proc->addArgument( "-sDEVICE=pnggray" );
  proc->addArgument( QString( "-g%1x%2" ).arg( bc->xoff + ( bc->width * barcode.res / 72 ) + ( 2 * barcode.margin * barcode.res / 72 ) ).arg( bc->yoff + ( bc->height * barcode.res / 72 ) + ( 2 * barcode.margin * barcode.res / 72 ) ) );
  QString res = QString::number( barcode.res );
  proc->addArgument( "-r" + res + "x" + res );
  proc->addArgument( "-sOutputFile=-" );
  proc->addArgument( "-" );

  Barcode_Delete( bc );

  writingStdout = true;
  if ( !proc->launch( psBarcode ) ) {
    pError.resize( 300, 50 );
    pError.fill( barcode.bg );
    QPainter pter( &pError );
    pter.setFont( QFont( "Helvetica", 11 ) );
    pter.setBrush( barcode.fg );
    pter.drawText( 27, 20, tr( "Necesita tener instalado GhostScript" ) );
    pter.drawText( 27, 39, tr( "para poder generar códigos de barras" ) );
    writingStdout = false;
    return ;
  } else {
    readingStdout = true;
    while ( readingStdout ) {
      qApp->processEvents();
      if ( !proc->isRunning() )
        writingStdoutFinished();
    }
  }
}

void FLCodBar::readPixmapStdout() {
  if ( writingStdout ) {
    qApp->processEvents();
    return ;
  }

  p.loadFromData( proc->readStdout(), "PNG" );

  if ( !p.isNull() ) {
    QWMatrix m;
    m.rotate(( double ) barcode.rotation );
    p.xForm( m );
    barcode.valid = true;
  }

  readingStdout = false;
}

void FLCodBar::writingStdoutFinished() {
  writingStdout = false;
  readPixmapStdout();
}

void FLCodBar::fillDefault( barcodeData * data ) {
  data->bg = Qt::white;
  data->fg = Qt::black;
  data->margin = 10;
  data->text = true;
  data->value = "1234567890";
  data->type = BARCODE_39;
  data->scale = 1.0;
  data->cut = 1.0;
  data->rotation = 0;
  data->caption = "Static";
  data->valid = false;
  data->res = 72;
}

void FLCodBar::copyBarcode( barcodeData * src, barcodeData * dest ) {
  dest->value = src->value;
  dest->type = src->type;
  dest->margin = src->margin;
  dest->scale = src->scale;
  dest->cut = src->cut;
  dest->rotation = src->rotation;
  dest->text = src->text;
  dest->caption = src->caption;
  dest->valid = src->valid;
  dest->fg = src->fg;
  dest->bg = src->bg;
  dest->x = src->x;
  dest->y = src->y;
  dest->res = src->res;
}

void FLCodBar::cleanUp() {
  p.resize( 0, 0 );
  pError.resize( 0, 0 );
}

int FLCodBar::nameToType( const QString & name ) {
  QString n = name.lower();
  if ( n == "any" )
    return BARCODE_ANY;
  else if ( n == "ean" )
    return BARCODE_EAN;
  else if ( n == "upc" )
    return BARCODE_UPC;
  else if ( n == "isbn" )
    return BARCODE_ISBN;
  else if ( n == "code39" )
    return BARCODE_39;
  else if ( n == "code128" )
    return BARCODE_128;
  else if ( n == "code128c" )
    return BARCODE_128C;
  else if ( n == "code128b" )
    return BARCODE_128B;
  else if ( n == "codei25" )
    return BARCODE_I25;
  else if ( n == "code128r" )
    return BARCODE_128RAW;
  else if ( n == "cbr" )
    return BARCODE_CBR;
  else if ( n == "msi" )
    return BARCODE_MSI;
  else if ( n == "pls" )
    return BARCODE_PLS;
  else if ( n == "code93" )
    return BARCODE_93;
  else
    return BARCODE_ANY;
}

QString FLCodBar::typeToName( const int type ) {
  switch ( type ) {
    case BARCODE_ANY:
      return "ANY";
    case BARCODE_EAN:
      return "EAN";
    case BARCODE_UPC:
      return "UPC";
    case BARCODE_ISBN:
      return "ISBN";
    case BARCODE_39:
      return "Code39";
    case BARCODE_128:
      return "Code128";
    case BARCODE_128C:
      return "Code128C";
    case BARCODE_128B:
      return "Code128B";
    case BARCODE_I25:
      return "CodeI25";
    case BARCODE_128RAW:
      return "Code128RAW";
    case BARCODE_CBR:
      return "CBR";
    case BARCODE_MSI:
      return "MSI";
    case BARCODE_PLS:
      return "PLS";
    case BARCODE_93:
      return "Code93";
    default:
      return "ANY";
  }
}