Proyectos de Subversion Moodle

<?php

/*

pBarcode128 - class to create barcodes (128B)

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 pBarcode128

{

	var $Codes = [];

	var $Reverse = [];

	var $Result;

	var $pChartObject;

	/* Class creator */

	function __construct($BasePath = "")

	{

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

		if (!$FileHandle) {

			die("Cannot find barcode database (" . $BasePath . "128B.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[1]]["ID"] = $Values[0];

			$this->Codes[$Values[1]]["Code"] = $Values[2];

			$this->Reverse[$Values[0]]["Code"] = $Values[2];

			$this->Reverse[$Values[0]]["Asc"] = $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->encode128($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);

		return ["Width" => max(abs($X1), abs($X2)),"Height" => max(abs($Y1), abs($Y2))];

	}

	function encode128($Value, $Format = "")

	{

		$this->Result = "11010010000";

		$CRC = 104;

		$TextString = "";

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

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

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

				$this->Result = $this->Result . $this->Codes[$CharCode]["Code"];

				$CRC = $CRC + $i * $this->Codes[$CharCode]["ID"];

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

			}

		}

		$CRC = $CRC - floor($CRC / 103) * 103;

		$this->Result = $this->Result . $this->Reverse[$CRC]["Code"]. "1100011101011";

		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->encode128($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 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);

	}

}

?>