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

?>