zebra_printer 0.1.1

data/lib/languages/epl2/barcode.rb

@@ -0,0 +1,50 @@
+module Languages
+  class Epl2
+    class BarcodeFactory
+      def self.create_barcode(code_type, opts = {})
+        if Barcode1D::BarcodeClasses.keys.include? code_type
+          Barcode1D.new code_type, opts
+        elsif Barcode2D::BarcodeClasses.keys.include? code_type
+          Barcode2D.new code_type, opts
+        else
+          raise ArgumentException.new("Unknown barcode: #{code_type}")
+        end
+      end
+    end
+    class Barcode1D
+      BarcodeClasses = {
+                        code_128: ["1",2,2,50,"B"],
+                        ean13: ["E30",2,2,50,"B"]
+                       }
+      def initialize(code_type, opts = {})
+        @font = opts[:font] || Font.new
+        #defaults
+        @type,@nb_width,@wb_width,@height,@human_readable = BarcodeClasses[code_type]
+        opts[:at] = [0,0] unless opts.has_key? :at
+        @x, @y = opts[:at].pop(2)
+        @text = opts[:text] || ""
+      end
+
+      def render
+        "B#{@x},#{@y},#{@font.rotation},#{@type},#{@nb_width},#{@wb_width},#{@height},#{@human_readable},\"#{@text}\""
+      end
+    end
+    
+    class Barcode2D
+      BarcodeClasses = {
+                        data_matrix: ["D",16,16]
+                       }
+      def initialize(code_type, opts = {})
+        @font = opts[:font] || Font.new
+        @type,@columns_encode,@rows_encode = BarcodeClasses[code_type]
+        @x = (opts[:at] || [0,0])[0]
+        @y = (opts[:at] || [0,0])[1]
+        @text = opts[:text] || ""        
+      end
+
+      def render
+        "b#{@x},#{@y},#{@type},c#{@columns_encode},r#{@rows_encode},\"#{@text}\""
+      end
+    end
+  end
+end

data/lib/languages/epl2/document.rb

@@ -0,0 +1,27 @@
+module Languages
+  class Epl2
+    class Document
+      def initialize
+        @document = document_start.concat "\n"
+      end
+      
+      def <<(obj)
+        string = obj.is_a?(String) ? obj : obj.render
+        string.concat "\n" unless string.end_with? "\n"
+        @document.concat string
+      end
+
+      def render
+        @document.concat(document_end).concat("\n")
+      end
+
+      def document_start
+        "N\n"
+      end
+
+      def document_end
+        "P1\n"
+      end
+    end
+  end
+end

data/lib/languages/epl2/font.rb

@@ -0,0 +1,48 @@
+module Languages
+  class Epl2
+    class Font
+      attr_reader :name, :rotation, :height, :width
+      
+      def initialize(opts = {})
+        # defaults
+        @name     = opts[:name] || "2"
+        @rotation = opts.include?(:rotation) ? font_rotation(opts[:rotation]) : font_rotation(:by_0)
+        @height   = opts[:height] || 1
+        @width    = opts[:width] || 1
+        @name, @height, @width = font_size(opts[:size]) if opts.include?(:size)
+      end
+      
+      def font_size(val)
+        case val
+        when :normal
+          [2,1,1]
+        when :small
+          [1,1,1]
+        when :large
+          [3,1,1]
+        when :x_large
+          [4,1,1]
+        else
+          [2,1,1]
+        end
+      end
+
+      def font_rotation(amount)
+      @rotation = case(amount)
+                          when :by_90
+                            1
+                          when :by_180
+                            2
+                          when :by_270
+                            3
+                          else
+                            0
+                          end        
+      end
+      def render
+        ""
+      end
+
+    end
+  end
+end

data/lib/languages/epl2/position.rb

@@ -0,0 +1,11 @@
+module Languages
+  class Epl2
+    class Position
+      include Languages::Generic::Position
+      
+      def render
+        ""
+      end
+    end
+  end
+end

data/lib/languages/epl2/text.rb

@@ -0,0 +1,27 @@
+module Languages
+  class Epl2
+    class Text
+      attr_accessor :font, :text, :position
+      
+      def initialize(opts = {})
+        # FIXME
+        @position = Languages::Epl2::Position[0,0]
+        @font = opts[:font] || Epl2::Font.new
+        @position = Languages::Epl2::Position.from_array(opts[:at]) if opts.has_key?(:at)
+        @text = ""
+      end
+      
+      def render
+        "A#{@position},#{@font.rotation},#{@font.name},#{@font.height},#{@font.width},N,\"#{@text}\""
+      end
+
+      def x=(x)
+        @position.x = x
+      end
+
+      def y=(y)
+        @position.y = y
+      end
+    end
+  end
+end

data/lib/languages/epl2.rb

@@ -0,0 +1,78 @@
+require_relative 'epl2/font'
+require_relative 'epl2/document'
+require_relative 'epl2/text'
+require_relative 'epl2/position'
+require_relative 'epl2/barcode'
+require_relative 'epl2/position'
+require_relative '../utils/array'
+
+module Languages
+  class Epl2
+    def initialize
+      @document = Epl2::Document.new
+      #defaults
+      @font = Epl2::Font.new
+      @position = Epl2::Position[0,0]
+    end
+
+    def document
+      @document.render
+    end
+
+    def text(value,opts={})
+      if opts.include? :at
+        opts[:at] = (@position + Epl2::Position.from_array(opts[:at])).to_a
+      else
+        opts[:at] = @position.to_a
+      end
+      @document << Epl2::Text.new(:font => @font, :at => opts[:at], :text => value)
+    end
+
+    def rotate(amount,&block)
+      if block_given?
+        save = @font
+        @font.font_rotation amount
+        self.instance_eval(&block)
+        @font = save
+      else
+        @font.font_rotation amount
+      end
+    end
+
+    def font(opts={},&block)
+      if opts.include? :size
+        @font = Epl2::Font.new(opts)
+      end
+      if block_given?
+        save = @font
+        @font = Epl2::Font.new(opts)
+        self.instance_eval(&block)
+        @font = save
+      end
+    end
+
+    def barcode(*args)
+      opts = args.extract_options!
+      code,text = args.pop 2
+      
+      opts = opts.merge({:font => font,:text =>text})
+      if opts.include? :at
+        opts[:at] = (@position + Epl2::Position.from_array(opts[:at])).to_a
+      end
+      
+      b = Epl2::BarcodeFactory.create_barcode code,opts
+      @document << b.render
+    end
+
+    def position(x,y,&block)
+      if block_given?
+        save = @position
+        @position = Epl2::Position[x,y]
+        self.instance_eval(&block)
+        @position = save
+      else
+        @position = Epl2::Position[x,y]
+      end
+    end
+  end
+end

data/lib/languages/generic/dots.rb

@@ -0,0 +1,37 @@
+module Languages
+  module Generic
+    class Dots
+      def initialize(int)
+        @int = int
+      end
+
+      def to_i
+        @int
+      end
+
+      def +(other)
+        self.class.new(@int + value_of(other))
+      end
+
+      def -(other)
+        self.class.new(@int - value_of(other))
+      end
+
+      def ==(other)
+        @int == value_of(other)
+      end
+
+      def to_dots
+        self
+      end
+
+      def to_s
+        @int.to_s
+      end
+      private
+      def value_of(other)
+        v = other.respond_to?(:to_dots) ? other.to_dots.to_i : other.to_i
+      end
+    end
+  end
+end

data/lib/languages/generic/integer.rb

@@ -0,0 +1,5 @@
+class Integer
+  def mm
+    Languages::Generic::Millimetres.new self
+  end
+end

data/lib/languages/generic/millimetres.rb

@@ -0,0 +1,60 @@
+module Languages
+  module Generic
+    class Millimetres
+      def initialize(int)
+        @int = int
+      end
+
+      def to_i
+        @int
+      end
+
+      def +(other)
+        if other.is_a? Millimetres
+          self.class.new(@int + other.to_i)
+        elsif other.is_a? Integer
+          self.class.new(@int + other)
+        else
+          if other.respond_to? :coerce
+            a,b = other.coerce(self)
+            a + b
+          else
+            raise TypeError, "#{other.class} can't be coerced into #{self.class.name}"
+          end
+        end
+      end
+
+      def -(other)
+        if other.is_a? Millimetres
+          self.class.new(@int - other.to_i)
+        elsif other.is_a? Integer
+          self.class.new(@int - other)
+        else
+          if other.respond_to? :coerce
+            a,b = other.coerce(self)
+            a - b
+          else
+            raise TypeError, "#{other.class} can't be coerced into #{self.class.name}"
+          end
+        end        
+      end
+
+      def ==(other)
+        @int == other.to_i
+      end
+
+      def coerce(other)
+        [Millimetres.new(other),self]
+      end
+
+      def to_dots(ratio = :dpi203)
+        dpm = if ratio == :dpi203
+                (203/25.4)
+              else
+                (300/25.4)
+              end
+        Languages::Generic::Dots.new((@int * dpm).round)
+      end
+    end
+  end
+end

data/lib/languages/generic/position.rb

@@ -0,0 +1,64 @@
+module Languages
+  module Generic
+    module Position
+      def self.included(base)
+        base.extend ClassMethods
+      end
+      
+      module ClassMethods
+        def [](x,y)
+          o = new
+          o.x,o.y = x,y
+          o
+        end
+
+        def from_array(ary)
+          x, y = ary.pop(2)
+          x = Languages::Generic::Dots.new(x) if x.is_a? Integer
+          y = Languages::Generic::Dots.new(y) if y.is_a? Integer          
+          o = new
+          o.x,o.y = x,y
+          o
+        end
+      end
+
+      attr_accessor :x, :y
+
+
+      def +(v)
+        case v
+        when Position
+          self.class[x+v.x,y+v.y]
+        end
+      end
+
+      def ==(v)
+        (x==v.x) && (y==v.y)
+      end
+
+      def x=(x)
+        if x.is_a? Integer
+          @x = Languages::Generic::Dots.new(x) if x.is_a? Integer
+        else
+          @x = x
+        end
+      end
+
+      def y=(y)
+        if y.is_a? Integer
+          @y = Languages::Generic::Dots.new(y) if y.is_a? Integer
+        else
+          @y = y
+        end
+      end
+      
+      def to_a
+        [x,y]
+      end
+
+      def to_s
+        "#{x.to_dots},#{y.to_dots}"
+      end
+    end
+  end
+end

data/lib/languages/generic.rb

@@ -0,0 +1,7 @@
+module Languages::Generic
+end
+
+require_relative 'generic/position'
+require_relative 'generic/dots'
+require_relative 'generic/millimetres'
+require_relative 'generic/integer'

data/lib/languages/zpl2/barcode.rb

@@ -0,0 +1,48 @@
+module Languages
+  class Zpl2
+    class BarcodeFactory
+      def self.create_barcode(code_type, opts = {})
+        if Barcode1D::BarcodeClasses.keys.include? code_type
+          Barcode1D.new code_type,opts
+        elsif Barcode2D::BarcodeClasses.keys.include? code_type
+          Barcode2D.new code_type,opts
+        else
+          raise ArgumentException.new("Unknown barcode: #{code_type}")
+        end
+      end
+    end
+
+    class Barcode1D
+      BarcodeClasses = {
+                        code_128: "BC",
+                        ean13: "BE"
+                       }
+      def initialize(code_type, opts = {})
+        @code = BarcodeClasses[code_type]
+        @font = opts[:font] || Font.new
+        @human_readable = opts[:human_readable] || "Y"
+        @text = opts[:text] || ""
+      end
+
+      def render
+        "^#{@code}#{@font.rotation},#{@font.height*2},#{@human_readable},N,N^FD#{@text}^FS"
+      end
+    end
+
+    class Barcode2D
+      BarcodeClasses = {
+                        data_matrix: ["X",4,16,16]
+                       }
+
+      def initialize(code_type, opts = {})
+        @font = opts[:font] || Font.new
+        @code, @symbol_height, @columns_encode, @rows_encode = BarcodeClasses[code_type]
+        @text = opts[:text] || ""
+      end
+      
+      def render
+        "^B#{@code}#{@font.rotation},#{@symbol_height},200,#{@columns_encode},#{@rows_encode}^FD#{@text}^FS"
+      end
+    end
+  end
+end

data/lib/languages/zpl2/document.rb

@@ -0,0 +1,27 @@
+module Languages
+  class Zpl2
+    class Document
+      def initialize
+        @document = document_start.concat "\n"
+      end
+      
+      def <<(obj)
+        string = obj.is_a?(String) ? obj : obj.render
+        string.concat "\n" unless string.end_with? "\n"
+        @document.concat string
+      end
+
+      def render
+        @document.concat(document_end).concat("\n")
+      end
+      
+      def document_start
+        "^XA"
+      end
+
+      def document_end
+        "^XZ"
+      end
+    end
+  end
+end

data/lib/languages/zpl2/font.rb

@@ -0,0 +1,52 @@
+module Languages
+  class Zpl2
+    class Font
+      attr_reader :name, :rotation, :height, :width
+      
+      def initialize(opts = {})
+        # defaults
+        @name     = opts[:name] || "B"
+        @rotation = opts.include?(:rotation) ? font_rotation(opts[:rotation]) : font_rotation(:by_0)
+        @height   = opts[:height] || 15
+        @width    = opts[:width] || 12
+        @name, @height, @width = font_size(opts[:size]) if opts.include?(:size)
+        @code = "^CF"
+      end
+
+      def font_args(opts={})
+        @name = font_size(opts[:size]) if opts.include? :size
+      end
+
+      def font_size(val)
+        case val
+        when :normal
+          ["0",25,25]
+        when :small
+          ["0",20,20]
+        when :large
+          ["0",40,40]
+        when :x_large
+          ["0",60,60]
+        else
+          ["0",25,25]
+        end
+      end
+
+      def font_rotation(amount)
+      @rotation = case(amount)
+                          when :by_90
+                            "R"
+                          when :by_180
+                            "I"
+                          when :by_270
+                            "B"
+                          else
+                            "N"
+                          end        
+      end
+      def render
+        "^CF#{@name}#{@rotation},#{@height},#{@width}\n"
+      end
+    end
+  end
+end

data/lib/languages/zpl2/position.rb

@@ -0,0 +1,11 @@
+module Languages
+  class Zpl2
+    class Position
+      include Languages::Generic::Position
+      
+      def render
+        "^FO#{x.to_dots},#{y.to_dots}"
+      end
+    end
+  end
+end

data/lib/languages/zpl2/text.rb

@@ -0,0 +1,15 @@
+module Languages
+  class Zpl2
+    class Text
+      # TODO Escape seqs
+
+      def initialize(string)
+        @string = string
+      end
+      
+      def render
+        "^FD#{@string}^FS"
+      end
+    end
+  end
+end

data/lib/languages/zpl2.rb

@@ -0,0 +1,76 @@
+require_relative 'zpl2/font'
+require_relative 'zpl2/document'
+require_relative 'zpl2/text'
+require_relative 'zpl2/position'
+require_relative 'zpl2/barcode'
+
+module Languages
+  class Zpl2
+    def initialize
+      @document = Zpl2::Document.new
+      @font = Zpl2::Font.new
+      @position = Zpl2::Position[0,0]
+      @document << @position
+    end
+    
+    def text(text,opts={})
+      if opts.include? :at
+        @document << (@position + Zpl2::Position.from_array(opts[:at]))
+      end
+      @document << Zpl2::Text.new(text)
+      @document << @position if opts.include?(:at)
+    end
+
+    def rotate(amount, &block)
+      if block_given?
+        @document << Zpl2::Font.new(:rotation => amount)
+        self.instance_eval &block
+        @document << @font
+      else
+        @font.font_rotation amount
+        @document << @font
+      end
+    end
+
+    def font(opts={},&block)
+      if block_given?
+        @document << Zpl2::Font.new(opts)
+        self.instance_eval &block
+        @document << @font
+      else
+        @font = Zpl2::Font.new(opts)
+        @document << @font
+      end
+    end
+
+    def barcode(*args)
+      opts = args.extract_options!
+      code,text = args.pop 2
+
+      opts = opts.merge({:font => @font,:text => text})
+
+      if opts.include? :at
+        @document << (@position + Zpl2::Position.from_array(opts[:at]))
+      end
+
+      @document << Zpl2::BarcodeFactory.create_barcode(code, opts)
+    end
+
+    def position(x,y,&block)
+      if block_given?
+        save = @position
+        @position = Zpl2::Position[x,y]
+        @document << @position
+        self.instance_eval(&block)
+        @position = save
+      else
+        @position = Zpl2::Position[x,y]
+      end
+      @document << @position
+    end
+    
+    def document
+      @document.render
+    end
+  end
+end

data/lib/languages.rb

@@ -0,0 +1,8 @@
+module Languages
+  
+end
+
+require_relative 'languages/generic'
+require_relative 'languages/epl2'
+require_relative 'languages/zpl2'
+

data/lib/utils/array.rb

@@ -0,0 +1,5 @@
+class Array
+  def extract_options!
+    last.is_a?(::Hash) ? pop : {}
+  end unless defined? Array.new.extract_options!
+end

data/lib/zebra_printer.rb

@@ -0,0 +1,4 @@
+require_relative 'languages'
+require_relative 'zebra_printer_document'
+require_relative 'document_value'
+