annotate vendor/plugins/rfpdf/lib/barcode/image.rb @ 669:202986dd17e4 live bibliography_plugin_alpha

Merge from branch "cannam_integration"
author Chris Cannam
date Fri, 09 Sep 2011 16:56:21 +0100
parents cbce1fd3b1b7
children
rev   line source
Chris@441 1
Chris@441 2 #============================================================+
Chris@441 3 # File name : image.rb
Chris@441 4 # Begin : 2002-07-31
Chris@441 5 # Last Update : 2005-01-08
Chris@441 6 # Author : Karim Mribti [barcode@mribti.com]
Chris@441 7 # : Nicola Asuni [info@tecnick.com]
Chris@441 8 # Version : 0.0.8a 2001-04-01 (original code)
Chris@441 9 # License : GNU LGPL (Lesser General Public License) 2.1
Chris@441 10 # http://www.gnu.org/copyleft/lesser.txt
Chris@441 11 # Source Code : http://www.mribti.com/barcode/
Chris@441 12 #
Chris@441 13 # Description : Barcode Image Rendering.
Chris@441 14 #
Chris@441 15 # NOTE:
Chris@441 16 # This version contains changes by Nicola Asuni:
Chris@441 17 # - porting to Ruby
Chris@441 18 # - code style and formatting
Chris@441 19 # - automatic php documentation in PhpDocumentor Style
Chris@441 20 # (www.phpdoc.org)
Chris@441 21 # - minor bug fixing
Chris@441 22 #============================================================+
Chris@441 23
Chris@441 24 #
Chris@441 25 # Barcode Image Rendering.
Chris@441 26 # @author Karim Mribti, Nicola Asuni
Chris@441 27 # @name BarcodeObject
Chris@441 28 # @package com.tecnick.tcpdf
Chris@441 29 # @@version 0.0.8a 2001-04-01 (original code)
Chris@441 30 # @since 2001-03-25
Chris@441 31 # @license http://www.gnu.org/copyleft/lesser.html LGPL
Chris@441 32 #
Chris@441 33
Chris@441 34 #
Chris@441 35 #
Chris@441 36 #
Chris@441 37
Chris@441 38 require("../../shared/barcode/barcode.rb");
Chris@441 39 require("../../shared/barcode/i25object.rb");
Chris@441 40 require("../../shared/barcode/c39object.rb");
Chris@441 41 require("../../shared/barcode/c128aobject.rb");
Chris@441 42 require("../../shared/barcode/c128bobject.rb");
Chris@441 43 require("../../shared/barcode/c128cobject.rb");
Chris@441 44
Chris@441 45 if (!$_REQUEST['style'].nil?) $_REQUEST['style'] = BCD_DEFAULT_STYLE;
Chris@441 46 if (!$_REQUEST['width'].nil?) $_REQUEST['width'] = BCD_DEFAULT_WIDTH;
Chris@441 47 if (!$_REQUEST['height'].nil?) $_REQUEST['height'] = BCD_DEFAULT_HEIGHT;
Chris@441 48 if (!$_REQUEST['xres'].nil?) $_REQUEST['xres'] = BCD_DEFAULT_XRES;
Chris@441 49 if (!$_REQUEST['font'].nil?) $_REQUEST['font'] = BCD_DEFAULT_FONT;
Chris@441 50 if (!$_REQUEST['type'].nil?) $_REQUEST['type'] = "C39";
Chris@441 51 if (!$_REQUEST['code'].nil?) $_REQUEST['code'] = "";
Chris@441 52
Chris@441 53 switch ($_REQUEST['type'].upcase)
Chris@441 54 case "I25"
Chris@441 55 $obj = new I25Object($_REQUEST['width'], $_REQUEST['height'], $_REQUEST['style'], $_REQUEST['code']);
Chris@441 56 break;
Chris@441 57 end
Chris@441 58 case "C128A"
Chris@441 59 $obj = new C128AObject($_REQUEST['width'], $_REQUEST['height'], $_REQUEST['style'], $_REQUEST['code']);
Chris@441 60 break;
Chris@441 61 end
Chris@441 62 case "C128B"
Chris@441 63 $obj = new C128BObject($_REQUEST['width'], $_REQUEST['height'], $_REQUEST['style'], $_REQUEST['code']);
Chris@441 64 break;
Chris@441 65 end
Chris@441 66 case "C128C"
Chris@441 67 $obj = new C128CObject($_REQUEST['width'], $_REQUEST['height'], $_REQUEST['style'], $_REQUEST['code']);
Chris@441 68 break;
Chris@441 69 end
Chris@441 70 case "C39":
Chris@441 71 default
Chris@441 72 $obj = new C39Object($_REQUEST['width'], $_REQUEST['height'], $_REQUEST['style'], $_REQUEST['code']);
Chris@441 73 break;
Chris@441 74 end
Chris@441 75 }
Chris@441 76
Chris@441 77 if ($obj)
Chris@441 78 $obj->SetFont($_REQUEST['font']);
Chris@441 79 $obj->DrawObject($_REQUEST['xres']);
Chris@441 80 $obj->FlushObject();
Chris@441 81 $obj->DestroyObject();
Chris@441 82 unset($obj); # clean#
Chris@441 83 }
Chris@441 84
Chris@441 85 #============================================================+
Chris@441 86 # END OF FILE
Chris@441 87 #============================================================+