<?php

/**
 * Copyright (C) 2013  Arie Nugraha (dicarve@yahoo.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; either version 3 of the License, or
 * (at your option) any later version.
 *
 * This program is distributed in the hope that it will be useful,
 * but WITHOUT ANY WARRANTY; without even the implied warranty of
 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
 * GNU General Public License for more details.
 *
 * You should have received a copy of the GNU General Public License
 * along with this program; if not, write to the Free Software
 * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301  USA
 *
 */

use SLiMS\SearchEngine\Engine;
use SLiMS\SearchEngine\SearchBiblioEngine;
use SLiMS\SearchEngine\SphinxSearchEngine;

/* Item barcode print */

// key to authenticate
define('INDEX_AUTH', '1');

// main system configuration
require '../../../sysconfig.inc.php';
// IP based access limitation
require LIB . 'ip_based_access.inc.php';
do_checkIP('smc');
do_checkIP('smc-bibliography');
// start the session
require SB . 'admin/default/session.inc.php';
require SIMBIO . 'simbio_GUI/table/simbio_table.inc.php';
require SIMBIO . 'simbio_GUI/form_maker/simbio_form_table_AJAX.inc.php';
require SIMBIO . 'simbio_GUI/paging/simbio_paging.inc.php';
require SIMBIO . 'simbio_DB/datagrid/simbio_dbgrid.inc.php';
require SIMBIO . 'simbio_DB/simbio_dbop.inc.php';

// privileges checking
$can_read = utility::havePrivilege('bibliography', 'r');

if (!$can_read) {
  die('<div class="errorBox">' . __('You are not authorized to view this section') . '</div>');
}
# CHECK ACCESS
if ($_SESSION['uid'] != 1) {
  if (!utility::haveAccess('bibliography.item-barcodes-printing')) {
    die('<div class="errorBox">' . __('You are not authorized to view this section') . '</div>');
  }
}

$max_print = 50;

/* RECORD OPERATION */
if (isset($_POST['itemID']) and !empty($_POST['itemID']) and isset($_POST['itemAction'])) {
  if (!$can_read) {
    die();
  }
  if (!is_array($_POST['itemID'])) {
    // make an array
    $_POST['itemID'] = array((int)$_POST['itemID']);
  }
  // loop array
  if (isset($_SESSION['barcodes'])) {
    $print_count = count($_SESSION['barcodes']);
  } else {
    $print_count = 0;
  }
  // barcode size
  $size = 2;
  // create AJAX request
  echo '<script type="text/javascript" src="' . JWB . 'jquery.js"></script>';
  echo '<script type="text/javascript">';
  // loop array
  foreach ($_POST['itemID'] as $itemID) {
    if ($print_count == $max_print) {
      $limit_reach = true;
      break;
    }
    if (isset($_SESSION['barcodes'][$itemID])) {
      continue;
    }
    if (!empty($itemID)) {
      $barcode_text = trim($itemID);
      /* replace space */
      $barcode_text = str_replace(array(' ', '/', '\/'), '_', $barcode_text);
      /* replace invalid characters */
      $barcode_text = str_replace(array(':', ',', '*', '@'), '', $barcode_text);
      // send ajax request
      echo 'jQuery.ajax({ url: \'' . SWB . 'lib/phpbarcode/barcode.php?code=' . $itemID . '&encoding=' . $sysconf['barcode_encoding'] . '&scale=' . $size . '&mode=png&act=save\', type: \'GET\', error: function() { alert(\'Error creating barcode!\'); } });' . "\n";
      // add to sessions
      $_SESSION['barcodes'][$itemID] = $itemID;
      $print_count++;
    }
  }
  echo 'top.$(\'#queueCount\').html(\'' . $print_count . '\')';
  echo '</script>';
  // update print queue count object
  sleep(2);
  if (isset($limit_reach)) {
    $msg = str_replace('{max_print}', $max_print, __('Selected items NOT ADDED to print queue. Only {max_print} can be printed at once'));
    utility::jsToastr('Item Barcode', $msg, 'warning');
  } else {
    utility::jsToastr('Item Barcode', __('Selected items added to print queue'), 'success');
  }
  exit();
}

// clean print queue
if (isset($_GET['action']) and $_GET['action'] == 'clear') {
  // update print queue count object
  echo '<script type="text/javascript">top.$(\'#queueCount\').html(\'0\');</script>';
  utility::jsToastr('Item Barcode', __('Print queue cleared!'), 'success');
  unset($_SESSION['barcodes']);
  exit();
}

// barcode pdf download
if (isset($_GET['action']) and $_GET['action'] == 'print') {
  // check if label session array is available
  if (!isset($_SESSION['barcodes'])) {
    utility::jsToastr('Item Barcode', __('There is no data to print!'), 'error');
    die();
  }
  if (count($_SESSION['barcodes']) < 1) {
    utility::jsToastr('Item Barcode', __('There is no data to print!'), 'error');
    die();
  }

  // concat all ID together
  $item_ids = '';
  foreach ($_SESSION['barcodes'] as $id) {
    $item_ids .= '\'' . $id . '\',';
  }
  // strip the last comma
  $item_ids = substr_replace($item_ids, '', -1);
  // send query to database
  $item_q = $dbs->query('SELECT b.title, i.item_code FROM item AS i
    LEFT JOIN biblio AS b ON i.biblio_id=b.biblio_id
    WHERE i.item_code IN(' . $item_ids . ')');
  $item_data_array = array();
  while ($item_d = $item_q->fetch_row()) {
    if ($item_d[0]) {
      $item_data_array[] = $item_d;
    }
  }

  // include printed settings configuration file
  require SB . 'admin' . DS . 'admin_template' . DS . 'printed_settings.inc.php';
  // check for custom template settings
  $custom_settings = SB . 'admin' . DS . $sysconf['admin_template']['dir'] . DS . $sysconf['template']['theme'] . DS . 'printed_settings.inc.php';
  if (file_exists($custom_settings)) {
    include $custom_settings;
  }

  // load print settings from database to override value from printed_settings file
  loadPrintSettings($dbs, 'barcode');

  // chunk barcode array
  $chunked_barcode_arrays = array_chunk($item_data_array, $sysconf['print']['barcode']['barcode_items_per_row']);
  // create html ouput
  $html_str = '<!DOCTYPE html>' . "\n";
  $html_str .= '<html><head><title>Item Barcode Label Print Result</title>' . "\n";
  $html_str .= '<meta http-equiv="Content-Type" content="text/html; charset=utf-8" />';
  $html_str .= '<meta http-equiv="Pragma" content="no-cache" /><meta http-equiv="Cache-Control" content="no-store, no-cache, must-revalidate, post-check=0, pre-check=0" /><meta http-equiv="Expires" content="Sat, 26 Jul 1997 05:00:00 GMT" />';
  $html_str .= '<style type="text/css">' . "\n";
  $html_str .= 'body { padding: 0; margin: 1cm; font-family: ' . $sysconf['print']['barcode']['barcode_fonts'] . '; font-size: ' . $sysconf['print']['barcode']['barcode_font_size'] . 'pt; background: #fff; }' . "\n";
  $html_str .= '.labelStyle { width: ' . $sysconf['print']['barcode']['barcode_box_width'] . 'cm; height: ' . $sysconf['print']['barcode']['barcode_box_height'] . 'cm; text-align: center; margin: ' . $sysconf['print']['barcode']['barcode_items_margin'] . 'cm; border: ' . $sysconf['print']['barcode']['barcode_border_size'] . 'px solid #000000;}' . "\n";
  $html_str .= '.labelHeaderStyle { background-color: #CCCCCC; font-weight: bold; padding: 5px; margin-bottom: 5px; }' . "\n";
  $html_str .= '</style>' . "\n";
  $html_str .= '</head>' . "\n";
  $html_str .= '<body>' . "\n";
  $html_str .= '<a href="#" onclick="window.print()">' . __('Print Again') . '</a>' . "\n";
  $html_str .= '<table style="margin: 0; padding: 0;" cellspacing="0" cellpadding="0">' . "\n";
  // loop the chunked arrays to row
  foreach ($chunked_barcode_arrays as $barcode_rows) {
    $html_str .= '<tr>' . "\n";
    foreach ($barcode_rows as $barcode) {
      $html_str .= '<td valign="top">';
      $html_str .= '<div class="labelStyle">';
      if ($sysconf['print']['barcode']['barcode_include_header_text']) {
        $html_str .= '<div class="labelHeaderStyle">' . ($sysconf['print']['barcode']['barcode_header_text'] ? $sysconf['print']['barcode']['barcode_header_text'] : $sysconf['library_name']) . '</div>';
      }
      // document title
      $html_str .= '<div style="font-size: 7pt;">';
      if ($sysconf['print']['barcode']['barcode_cut_title']) {
        if (strlen($barcode[0]) > $sysconf['print']['barcode']['barcode_cut_title']) {
          $html_str .= substr($barcode[0], 0, $sysconf['print']['barcode']['barcode_cut_title']) . '...';
        } else {
          $html_str .= $barcode[0];
        }
      }
      $html_str .= '</div>';
      //~ $html_str .= '<img src="'.SWB.IMG.'/barcodes/'.str_replace(array(' '), '_', $barcode[1]).'.png" style="width: '.$sysconf['print']['barcode']['barcode_scale'].'%;" border="0" />';
      $html_str .= '<img src="' . SWB . IMG . '/barcodes/' . urlencode(urlencode($barcode[1])) . '.png?' . date('YmdHis') . '" style="width: ' . $sysconf['print']['barcode']['barcode_scale'] . '%;" border="0" />';
      $html_str .= '</div>';
      $html_str .= '</td>';
    }
    $html_str .= '<tr>' . "\n";
  }
  $html_str .= '</table>' . "\n";
  $html_str .= '<script type="text/javascript">self.print();</script>' . "\n";
  $html_str .= '</body></html>' . "\n";
  // unset the session
  unset($_SESSION['barcodes']);
  // write to file
  $print_file_name = 'item_barcode_gen_print_result_' . strtolower(str_replace(' ', '_', $_SESSION['uname'])) . '.html';
  $file_write = @file_put_contents(UPLOAD . $print_file_name, $html_str);
  if ($file_write) {
    // update print queue count object
    echo '<script type="text/javascript">parent.$(\'#queueCount\').html(\'0\');</script>';
    // open result in window
    echo '<script type="text/javascript">top.$.colorbox({href: "' . SWB . FLS . '/' . $print_file_name . '?v=' . date('YmdHis') . '", iframe: true, width: 800, height: 500, title: "' . __('Item Barcodes Printing') . '"})</script>';
  } else {
    utility::jsToastr('Item Barcode', str_replace('{directory}', SB . FLS, __('ERROR! Item barcodes failed to generate, possibly because {directory} directory is not writable')), 'error');
  }
  exit();
}

?>
<div class="menuBox">
  <div class="menuBoxInner printIcon">
    <div class="per_title">
      <h2><?php echo __('Item Barcodes Printing'); ?></h2>
    </div>
    <div class="sub_section">
      <div class="btn-group">
        <a target="blindSubmit" href="<?php echo MWB; ?>bibliography/item_barcode_generator.php?action=clear" class="notAJAX btn btn-default"> <?php echo __('Clear Print Queue'); ?></a>
        <a target="blindSubmit" href="<?php echo MWB; ?>bibliography/item_barcode_generator.php?action=print" class="notAJAX btn btn-default"><?php echo __('Print Barcodes for Selected Data'); ?></a>
        <a href="<?php echo MWB; ?>bibliography/pop_print_settings.php?type=barcode" class="notAJAX btn btn-default openPopUp" width="780" height="500" title="<?php echo __('Change print barcode settings'); ?>"><?php echo __('Change print barcode settings'); ?></a>
      </div>
      <form name="search" action="<?php echo MWB; ?>bibliography/item_barcode_generator.php" id="search" method="get" class="form-inline"><?php echo __('Search'); ?>
        <input type="text" name="keywords" class="form-control col-md-3" />
        <input type="submit" id="doSearch" value="<?php echo __('Search'); ?>" class="btn btn-default" />
      </form>
    </div>
    <div class="infoBox">
      <?php
      echo __('Maximum') . ' <strong class="text-danger">' . $max_print . '</strong> ' . __('records can be printed at once. Currently there is') . ' ';
      if (isset($_SESSION['barcodes'])) {
        echo '<strong id="queueCount" class="text-danger">' . count($_SESSION['barcodes']) . '</strong>';
      } else {
        echo '<strong id="queueCount" class="text-danger">0</strong>';
      }
      echo ' ' . __('in queue waiting to be printed.');
      ?>
    </div>
  </div>
</div>
<?php
/* search form end */

// create datagrid
$datagrid = new simbio_datagrid();
/* ITEM LIST */
require SIMBIO . 'simbio_UTILS/simbio_tokenizecql.inc.php';
require LIB . 'biblio_list_model.inc.php';

$search_engine = Engine::active();
$is_sphinx = ($search_engine == SphinxSearchEngine::class && file_exists(LIB . 'sphinx/sphinxapi.php'));
// index choice
if ($search_engine ===  SearchBiblioEngine::class || $is_sphinx) {
  if ($is_sphinx) {
    require LIB . 'sphinx/sphinxapi.php';
    require LIB . 'biblio_list_sphinx.inc.php';
  } else {
    require LIB . 'biblio_list_index.inc.php';
  }
  // table spec
  $table_spec = 'item LEFT JOIN search_biblio AS `index` ON item.biblio_id=`index`.biblio_id';
  $datagrid->setSQLColumn(
    'item.item_code',
    'item.item_code AS \'' . __('Item Code') . '\'',
    'index.title AS \'' . __('Title') . '\''
  );
} else {
  require LIB . 'biblio_list.inc.php';
  // table spec
  $table_spec = 'item LEFT JOIN biblio ON item.biblio_id=biblio.biblio_id';
  $datagrid->setSQLColumn(
    'item.item_code',
    'item.item_code AS \'' . __('Item Code') . '\'',
    'biblio.title AS \'' . __('Title') . '\''
  );
}
$datagrid->setSQLorder('item.last_update DESC');
// is there any search
if (isset($_GET['keywords']) and $_GET['keywords']) {
  $keywords = utility::filterData('keywords', 'get', true, true, true);
  $searchable_fields = array('title', 'author', 'subject', 'itemcode');
  $search_str = '';
  // if no qualifier in fields
  if (!preg_match('@[a-z]+\s*=\s*@i', $keywords)) {
    foreach ($searchable_fields as $search_field) {
      $search_str .= $search_field . '=' . $keywords . ' OR ';
    }
  } else {
    $search_str = $keywords;
  }
  $biblio_list = new biblio_list($dbs, 20);
  $criteria = $biblio_list->setSQLcriteria($search_str);
}
if (isset($criteria)) {
  $datagrid->setSQLcriteria('(' . $criteria['sql_criteria'] . ')');
}
// set table and table header attributes
$datagrid->table_attr = 'id="dataList" class="s-table table"';
$datagrid->table_header_attr = 'class="dataListHeader" style="font-weight: bold;"';
// edit and checkbox property
$datagrid->edit_property = false;
$datagrid->chbox_property = array('itemID', __('Add'));
$datagrid->chbox_action_button = __('Add To Print Queue');
$datagrid->chbox_confirm_msg = __('Add to print queue?');
$datagrid->column_width = array('10%', '85%');
// set checkbox action URL
$datagrid->chbox_form_URL = $_SERVER['PHP_SELF'];
// put the result into variables
$datagrid_result = $datagrid->createDataGrid($dbs, $table_spec, 20, $can_read);
if (isset($_GET['keywords']) and $_GET['keywords']) {
  $msg = str_replace('{result->num_rows}', $datagrid->num_rows, __('Found <strong>{result->num_rows}</strong> from your keywords'));
  echo '<div class="infoBox">' . $msg . ' : "' . htmlspecialchars($_GET['keywords']) . '"<div>' . __('Query took') . ' <b>' . $datagrid->query_time . '</b> ' . __('second(s) to complete') . '</div></div>';
}
echo $datagrid_result;
/* main content end */
