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);
        }
}

?>