<?php
// +-------------------------------------------------+
// © 2002-2004 PMB Services / www.sigb.net pmb@sigb.net et contributeurs (voir www.sigb.net)
// +-------------------------------------------------+

// $Id: carte-lecteur.inc.php,v 1.9 2007/03/10 09:03:17 touraine37 Exp $
if (stristr($_SERVER['REQUEST_URI'], ".inc.php")) die("no access");

// la largeur de la zone pour le nom
$var = "pdfcartelecteur_largeur_nom";
$largeur_nom = $$var;

// la position en X
$var = "pdfcartelecteur_pos_h";
$pos_x = $$var;

// la position en Y
$var = "pdfcartelecteur_pos_v";
$pos_y = $$var;

// Valable du
$var = "pdfcartelecteur_valabledu";
$valabledu = $$var;
// au
$var = "pdfcartelecteur_valableau";
$valableau = $$var;
// Carte N°
$var = "pdfcartelecteur_carteno";
$carteno = $$var;

// le texte qui apparait juste au dessus du code-barre
$var = "pdfcartelecteur_biblio_name";
eval ("\$bibli_name=\"".$$var."\";");

// PARAMETRES
// ----------
//   cb_first : code barre de début
//   nbr_cb : nombre de codes-barres à produire

$cb_first="100000";
$nbr_cb=1;

define("CBG_NBR_X_CELLS",        4);     // Nombre d'étiquettes en largeur sur la page
define("CBG_NBR_Y_CELLS",        19);     // Nombre d'étiquettes en hauteur


// marges, mesures en mm

define("CBG_LEFT_MARGIN",        6);
define("CBG_RIGHT_MARGIN",       6);

define("CBG_TOP_MARGIN",         13);
define("CBG_BOTTOM_MARGIN",      13);


// marges intérieures du bord de l'étiquette au code barre, mesures en mm

define("CBG_INNER_LEFT_MARGIN",   4);
define("CBG_INNER_RIGHT_MARGIN",  4);

define("CBG_INNER_TOP_MARGIN",    1);
define("CBG_INNER_BOTTOM_MARGIN", 1);


// place allouée au nom de la bibliothèque, mesure en mm
define("CBG_TEXT_HEIGHT",         2);
// Taille de la police, en points

define("CBG_TEXT_FONT_SIZE",      6);
// Taille du texte du code-barre, 1 : le plus petit ; 5 : le plus grand
define("CBG_CB_TEXT_SIZE",        3);

// Résolution du code barre. Si vous augmentez ce paramètre, il faudra peut-être
// augmenter la taille de la police. Une valeur faible produit un fichier moins volumineux
define("CBG_CB_RES",              5);

// l'apparence du code barre dépend étroitement de la résolution et de la taille du texte

// Démarrage et configuration du pdf

// FUNCIONES 
//------------------------LLIUREX 19/12/2018---------------------------------
//-----Fixed function. Changed ereg_replace by preg_replace
function str_squeeze($test) {
    return trim(preg_replace( '~ + ~', '', $test));
}
//-----------------------FIN LLIUREX 19/12/2018------------

function f_rellena_ceros($as_dato) {
	if(strlen($as_dato)>0 && strlen($as_dato)<9){
		for($i=strlen($as_dato); $i<9; $i++)
			$as_dato="0".$as_dato;
	}
		
	return $as_dato; 	
}

function getCodesRango($min, $max, $dbh) {
	$matriz=argetUsersCodesray();
	$query = "SELECT empr_cb FROM `empr`  WHERE convert(`empr_cb`, unsigned) BETWEEN " . $min . " AND " . $max;
	//$query = "SELECT empr_cb FROM empr WHERE empr_cb >= '" . $min . "' AND empr_cb<='" . $max . "'";

//------------------LLIUREX 19/12/2018---------------
//----Changed calls to database. Used pmb_mysql instead mysql_ -----------------------
	$resultData = pmb_mysql_query($query, $dbh);

	if (pmb_mysql_num_rows($resultData) != 0) {
		while ($rowData = pmb_mysql_fetch_array($resultData)) 	
			$matriz[]= $rowData['empr_cb'];		
	}
	pmb_mysql_free_result($resultData);
	return $matriz;
}

// Funcion que recoge lo introducido en la caja de texto del formulario y retorna una matriz de los codigos.
function getUsersCodes ($codigos, $dbh) {
	$matriz=array();
	$codigos=str_squeeze($codigos);

	if((strpos($codigos, ",")!== false)) 
		$aux=explode(",",$codigos);
	else 
		$aux=$codigos;
	
	if (is_array($aux)) {
		foreach ($aux as $codi) {
			if(strpos($codi, "-") === false)
				$matriz[]= $codi;
			else if (strpos($codi, "-") !== false) { 
				$aux2=explode("-",$codi);
				if ($aux2[0]<$aux2[1])  
					$m2=getCodesRango($aux2[0], $aux2[1], $dbh);
				else
					$m2=getCodesRango($aux2[1], $aux2[0], $dbh);	
				$matriz= array_merge($matriz, $m2); // Añadimos los codigos del rango				  
				
			}
		}
	}
	elseif ($aux === "*"){
			$q ='SELECT empr_cb FROM empr';

			$resultData = pmb_mysql_query($q, $dbh);
			if (pmb_mysql_num_rows($resultData) != 0) {
				while ($rowData = pmb_mysql_fetch_array($resultData)) 	
					$matriz[]= $rowData['empr_cb'];				
			}
			pmb_mysql_free_result($resultData);
	}
	else {
		if(strpos($aux, "-") === false)
			$matriz[]= $aux;		
		else if (strpos($aux, "-") !== false) { 
			$aux2=explode("-",$aux);
			if ($aux2[0]<$aux2[1])  
				$matriz=getCodesRango($aux2[0], $aux2[1], $link2);
			else
				$matriz=getCodesRango($aux2[1], $aux2[0], $link2);	
		}
	}
	return $matriz;
}


//Inicialmente cargamos el formulario de entrada de codigos
$codigos=$_GET['empr_cb'];

// Mostramos los carnets de usuario
$base_noheader = 1;
require_once ("$base_path/includes/init.inc.php");
require("$base_path/includes/db_param.inc.php");

//$link2 = @mysql_connect(SQL_SERVER, USER_NAME, USER_PASS) OR die("Error MySQL");

// Desglosamos los códigos introducidos
$matriz=getUsersCodes($codigos,$dbh);		


// Démarrage et configuration du pdf
$nom_classe=$fpdf."_Etiquette";
$ourPDF=new $nom_classe(CBG_NBR_X_CELLS, CBG_NBR_Y_CELLS);
$ourPDF->Open();
$ourPDF->addPage();
$ourPDF->SetPageMargins(CBG_TOP_MARGIN, CBG_BOTTOM_MARGIN, CBG_LEFT_MARGIN, CBG_RIGHT_MARGIN);

$col=0;
$row=0;
$pos_x_save= $pos_x;
$pos_y_save= $pos_y;

foreach ($matriz as $codigo) {

	
	$query = "SELECT id_empr, empr_cb, empr_nom, empr_prenom, empr_date_adhesion, empr_date_expiration, date_format(empr_date_adhesion, '".$msg["format_date"]."') as aff_empr_date_adhesion, date_format(empr_date_expiration, '".$msg["format_date"]."') as aff_empr_date_expiration FROM empr WHERE empr_cb='$codigo' LIMIT 1 ";

	$res = pmb_mysql_query($query, $dbh);
	$nrow  = pmb_mysql_num_rows($res);

	//echo "SQL: $query <br>";
	//echo "Numero de registros:" . $nrow;

	// Comprobar si no retorna nada la consulta SQL no tenemos que generar el codigo de barras
	if ($nrow != 0) {	
		$empr = pmb_mysql_fetch_object($res);		
		
		$xpos_top = 12;
		$ypos_left = 0;

		$ourPDF->SetFont($pmb_pdf_font, '', 14);
		$ourPDF->SetXY(($pos_x+40 - $largeur_nom/2), $pos_y);
		$ourPDF->MultiCell($largeur_nom, 7, trim($empr->empr_prenom)." ".trim($empr->empr_nom), 0, "C", 0);

		$largeur_carteno = 70;
		$ourPDF->SetFont($pmb_pdf_font, '', 10);
		$ourPDF->SetXY(($pos_x+40 - $largeur_carteno/2), $pos_y+30);
		$ourPDF->MultiCell($largeur_carteno, 8, $carteno." ".trim($empr->empr_cb), 0, "C", 0);

		$largeur_valable = 70;
		$ourPDF->SetFont($pmb_pdf_font, '', 10);
		$ourPDF->SetXY(($pos_x+40 - $largeur_valable/2), $pos_y+35);
		$ourPDF->MultiCell($largeur_valable, 8, $valabledu." ".trim($empr->aff_empr_date_adhesion)." ".$valableau." ".trim($empr->aff_empr_date_expiration), 0, "C", 0);

		$xpos = $pos_x + 16 ;
		$ypos = $pos_y+16 ;
	
		// Código de barras
		$ourPDF->SetFont($pmb_pdf_font, '', CBG_TEXT_FONT_SIZE);
		$ourPDF->SetCBFontSize(CBG_CB_TEXT_SIZE);
		$ourPDF->SetCBXRes(CBG_CB_RES);
		$ourPDF->SetCBStyle(BCS_ALIGN_CENTER | BCS_BORDER | BCS_DRAW_TEXT);
		$cbwidth = $ourPDF->GetStickWidth() - CBG_INNER_LEFT_MARGIN - CBG_INNER_RIGHT_MARGIN;
		$cbheight = $ourPDF->GetStickHeight() - CBG_INNER_TOP_MARGIN - CBG_INNER_BOTTOM_MARGIN;
		if ($bibli_name != '') $cbheight -= CBG_TEXT_HEIGHT;
		if ($bibli_name != "") {
			$ourPDF->SetXY($xpos, $ypos + CBG_INNER_BOTTOM_MARGIN);
			$ourPDF->Cell($ourPDF->GetStickWidth(), CBG_TEXT_HEIGHT, $bibli_name, 0, 0, 'C');
			}
		$x = $xpos + CBG_INNER_LEFT_MARGIN;
		$y = $ypos + CBG_INNER_TOP_MARGIN;
		if ($bibli_name != "") $y += CBG_TEXT_HEIGHT;
		$ourPDF->DrawBarcode(trim($empr->empr_cb), $x, $y, $cbwidth, $cbheight, 'c39');
		// Fin codigo de barras

		$ourPDF->SetLineWidth(1);
		$ourPDF->Rect($pos_x+10, $pos_y+14, 60, 17, "D");

		// Siguiente carnet
	
		if ($row<=3) {
			if ($col==0) {
				// Segunda Columna 
				$pos_x=$posx+110; 		
				$col=1;			
			}
			else {
				// Inicializamos la columna
				$pos_x=$pos_x_save;
				$col=0;	
				// Control de la fila
				$pos_y = $pos_y + 70; // Siguiente fila 		
				$row = $row + 1; // Controlamos la fila	
				if ($row==4) {	 //Cambio de página
					$pos_y=$pos_y_save; 
					$pos_x=$pos_x_save;
					$row=$col=0;
					$ourPDF->addPage();
				}
			}
		} 
	}
}
// Generamos PDF
$ourPDF->Output();		

?>