Proyectos de Subversion Moodle

<?php

/*

pBarcode39 - class to create barcodes (39B)

Version     : 2.1.4

Made by     : Jean-Damien POGOLOTTI

Last Update : 19/01/2014

This file can be distributed under the license you can find at :

http://www.pchart.net/license

You can find the whole class documentation on the pChart web site.

*/

/* pData class definition */

class pBarcode39

{

	var $Codes = [];

	var $Result;

	var $pChartObject;

	var $MOD43;

	/* Class creator */

	function __construct($BasePath = "", $EnableMOD43 = FALSE)

	{

		$this->MOD43 = $EnableMOD43;

		$FileHandle = fopen($BasePath . "data/39.db", "r");

		if (!$FileHandle) {

			die("Cannot find barcode database (" . $BasePath . "data/39.db).");

		}

		while (!feof($FileHandle)) {

			$Buffer = fgets($FileHandle, 4096);

			$Buffer = str_replace(chr(10), "", $Buffer);

			$Buffer = str_replace(chr(13), "", $Buffer);

			$Values = explode(";", $Buffer);

			$this->Codes[$Values[0]] = $Values[1];

		}

		fclose($FileHandle);

	}

	/* Return the projected size of a barcode */

	function getSize($TextString, array $Format = [])

	{

		$Angle = 0;

		$ShowLegend = FALSE;

		$LegendOffset = 5;

		$DrawArea = FALSE;

		$FontSize = 12;

		$Height = 30;

		/* Override defaults */

		extract($Format);

		$TextString = $this->encode39($TextString);

		$BarcodeLength = strlen($this->Result);

		$WOffset = ($DrawArea) ? 20 : 0;

		$HOffset = ($ShowLegend) ? $FontSize + $LegendOffset + $WOffset : 0;

		$X1 = cos($Angle * PI / 180) * ($WOffset + $BarcodeLength);

		$Y1 = sin($Angle * PI / 180) * ($WOffset + $BarcodeLength);

		$X2 = $X1 + cos(($Angle + 90) * PI / 180) * ($HOffset + $Height);

		$Y2 = $Y1 + sin(($Angle + 90) * PI / 180) * ($HOffset + $Height);

		$AreaWidth = max(abs($X1), abs($X2));

		$AreaHeight = max(abs($Y1), abs($Y2));

		return ["Width" => $AreaWidth,	"Height" => $AreaHeight];

	}

	/* Create the encoded string */

	function encode39($Value)

	{

		$this->Result = "100101101101" . "0";

		$TextString = "";

		for ($i = 1; $i <= strlen($Value); $i++) {

			$CharCode = ord($this->mid($Value, $i, 1));

			if ($CharCode >= 97 && $CharCode <= 122) {

				$CharCode = $CharCode - 32;

			}

			if (isset($this->Codes[chr($CharCode) ])) {

				$this->Result = $this->Result . $this->Codes[chr($CharCode) ] . "0";

				$TextString = $TextString . chr($CharCode);

			}

		}

		if ($this->MOD43) {

			$Checksum = $this->checksum($TextString);

			$this->Result = $this->Result . $this->Codes[$Checksum] . "0";

		}

		$this->Result = $this->Result . "100101101101";

		$TextString = "*" . $TextString . "*";

		return $TextString;

	}

	/* Create the encoded string */

	function draw($Object, $Value, $X, $Y, array $Format = [])

	{

		$this->pChartObject = $Object;

		$R = 0;

		$G = 0;

		$B = 0;

		$Alpha = 100;

		$Height = 30;

		$Angle = 0;

		$ShowLegend = FALSE;

		$LegendOffset = 5;

		$DrawArea = FALSE;

		$AreaR = isset($Format["AreaR"]) ? $Format["AreaR"] : 255;

		$AreaG = isset($Format["AreaG"]) ? $Format["AreaG"] : 255;

		$AreaB = isset($Format["AreaB"]) ? $Format["AreaB"] : 255;

		$AreaBorderR = $AreaR;

		$AreaBorderG = $AreaG;

		$AreaBorderB = $AreaB;

		/* Override defaults */

		extract($Format);

		$TextString = $this->encode39($Value);

		if ($DrawArea) {

			$X1 = $X + cos(($Angle - 135) * PI / 180) * 10;

			$Y1 = $Y + sin(($Angle - 135) * PI / 180) * 10;

			$X2 = $X1 + cos($Angle * PI / 180) * (strlen($this->Result) + 20);

			$Y2 = $Y1 + sin($Angle * PI / 180) * (strlen($this->Result) + 20);

			if ($ShowLegend) {

				$X3 = $X2 + cos(($Angle + 90) * PI / 180) * ($Height + $LegendOffset + $this->pChartObject->FontSize + 10);

				$Y3 = $Y2 + sin(($Angle + 90) * PI / 180) * ($Height + $LegendOffset + $this->pChartObject->FontSize + 10);

			} else {

				$X3 = $X2 + cos(($Angle + 90) * PI / 180) * ($Height + 20);

				$Y3 = $Y2 + sin(($Angle + 90) * PI / 180) * ($Height + 20);

			}

			$X4 = $X3 + cos(($Angle + 180) * PI / 180) * (strlen($this->Result) + 20);

			$Y4 = $Y3 + sin(($Angle + 180) * PI / 180) * (strlen($this->Result) + 20);

			$this->pChartObject->drawPolygon([$X1,$Y1,$X2,$Y2,$X3,$Y3,$X4,$Y4], ["R" => $AreaR,"G" => $AreaG,"B" => $AreaB,"BorderR" => $AreaBorderR,"BorderG" => $AreaBorderG,"BorderB" => $AreaBorderB]);

		}

		for ($i = 1; $i <= strlen($this->Result); $i++) {

			if ($this->mid($this->Result, $i, 1) == 1) {

				$X1 = $X + cos($Angle * PI / 180) * $i;

				$Y1 = $Y + sin($Angle * PI / 180) * $i;

				$X2 = $X1 + cos(($Angle + 90) * PI / 180) * $Height;

				$Y2 = $Y1 + sin(($Angle + 90) * PI / 180) * $Height;

				$this->pChartObject->drawLine($X1, $Y1, $X2, $Y2, ["R" => $R,"G" => $G,"B" => $B,"Alpha" => $Alpha]);

			}

		}

		if ($ShowLegend) {

			$X1 = $X + cos($Angle * PI / 180) * (strlen($this->Result) / 2);

			$Y1 = $Y + sin($Angle * PI / 180) * (strlen($this->Result) / 2);

			$LegendX = $X1 + cos(($Angle + 90) * PI / 180) * ($Height + $LegendOffset);

			$LegendY = $Y1 + sin(($Angle + 90) * PI / 180) * ($Height + $LegendOffset);

			$this->pChartObject->drawText($LegendX, $LegendY, $TextString, ["R" => $R,"G" => $G,"B" => $B,"Alpha" => $Alpha,"Angle" => - $Angle,"Align" => TEXT_ALIGN_TOPMIDDLE]);

		}

	}

	function checksum($string)

	{

		$checksum = 0;

		$length = strlen($string);

		$charset = '0123456789ABCDEFGHIJKLMNOPQRSTUVWXYZ-. $/+%';

		for ($i = 0; $i < $length; ++$i) {

			$checksum+= strpos($charset, $string[$i]);

		}

		return substr($charset, ($checksum % 43), 1);

	}

	function left($value, $NbChar)

	{

		return substr($value, 0, $NbChar);

	}

	function right($value, $NbChar)

	{

		return substr($value, strlen($value) - $NbChar, $NbChar);

	}

	function mid($value, $Depart, $NbChar)

	{

		return substr($value, $Depart - 1, $NbChar);

	}

}

?>