rqrcode 0.1.0 → 0.2.0

data/lib/rqrcode/qrcode/qr_math.rb

@@ -0,0 +1,63 @@
+#!/usr/bin/env ruby
+
+#--
+# Copyright 2004 by Duncan Robertson (duncan@whomwah.com).
+# All rights reserved.
+
+# Permission is granted for use, copying, modification, distribution,
+# and distribution of modified versions of this work as long as the
+# above copyright notice is included.
+#++
+
+module RQRCode #:nodoc:
+
+  class QRMath
+
+    module_eval { 
+      exp_table = Array.new(256)
+      log_table = Array.new(256)
+
+      ( 0...8 ).each do |i|
+        exp_table[i] = 1 << i
+      end
+
+      ( 8...256 ).each do |i|
+        exp_table[i] = exp_table[i - 4] \
+          ^ exp_table[i - 5] \
+          ^ exp_table[i - 6] \
+          ^ exp_table[i - 8]
+      end
+
+      ( 0...255 ).each do |i|
+        log_table[exp_table[i] ] = i
+      end
+
+      EXP_TABLE = exp_table 
+      LOG_TABLE = log_table 
+    }
+
+    class << self
+
+      def glog(n)
+        raise QRCodeRunTimeError, "glog(#{n})" if ( n < 1 )
+        LOG_TABLE[n]
+      end
+
+
+      def gexp(n)
+        while n < 0
+          n = n + 255
+        end
+
+        while n >= 256
+          n = n - 255
+        end
+
+        EXP_TABLE[n]
+      end
+
+    end
+
+  end
+
+end

data/lib/rqrcode/qrcode/qr_polynomial.rb

@@ -0,0 +1,78 @@
+#!/usr/bin/env ruby
+
+#--
+# Copyright 2004 by Duncan Robertson (duncan@whomwah.com).
+# All rights reserved.
+
+# Permission is granted for use, copying, modification, distribution,
+# and distribution of modified versions of this work as long as the
+# above copyright notice is included.
+#++
+
+module RQRCode #:nodoc:
+
+  class QRPolynomial
+
+    def initialize( num, shift )
+      raise QRCodeRunTimeError, "#{num.size}/#{shift}" if num.empty?
+      offset = 0
+
+      while offset < num.size && num[offset] == 0
+        offset = offset + 1
+      end
+
+      @num = Array.new( num.size - offset + shift )
+
+      ( 0...num.size - offset ).each do |i|
+        @num[i] = num[i + offset]
+      end 
+    end
+
+
+    def get( index )
+      @num[index]
+    end
+
+
+    def get_length
+      @num.size
+    end
+
+
+    def multiply( e )
+      num = Array.new( get_length + e.get_length - 1 )
+
+      ( 0...get_length ).each do |i|
+        ( 0...e.get_length ).each do |j|
+          tmp = num[i + j].nil? ? 0 : num[i + j]
+          num[i + j] = tmp ^ QRMath.gexp(QRMath.glog( get(i) ) + QRMath.glog(e.get(j)))
+        end
+      end
+
+      return QRPolynomial.new( num, 0 )
+    end
+
+
+    def mod( e )
+      if get_length - e.get_length < 0
+        return self
+      end
+
+      ratio = QRMath.glog(get(0)) - QRMath.glog(e.get(0))
+      num = Array.new(get_length)
+
+      ( 0...get_length ).each do |i|
+        num[i] = get(i)
+      end	
+
+      ( 0...e.get_length ).each do |i|
+        tmp = num[i].nil? ? 0 : num[i]
+        num[i] = tmp ^ QRMath.gexp(QRMath.glog(e.get(i)) + ratio)
+      end
+
+      return QRPolynomial.new( num, 0 ).mod(e)
+    end 
+
+  end
+
+end

data/lib/rqrcode/qrcode/qr_rs_block.rb

@@ -0,0 +1,134 @@
+#!/usr/bin/env ruby
+
+#--
+# Copyright 2004 by Duncan Robertson (duncan@whomwah.com).
+# All rights reserved.
+
+# Permission is granted for use, copying, modification, distribution,
+# and distribution of modified versions of this work as long as the
+# above copyright notice is included.
+#++
+
+module RQRCode #:nodoc:
+
+  class QRRSBlock
+    attr_reader :data_count, :total_count
+
+    def initialize( total_count, data_count )
+      @total_count = total_count
+      @data_count = data_count
+    end
+
+    RS_BLOCK_TABLE = [
+
+      # L
+      # M
+      # Q
+      # H
+
+      # 1
+      [1, 26, 19],
+      [1, 26, 16],
+      [1, 26, 13],
+      [1, 26, 9],
+
+      # 2
+      [1, 44, 34],
+      [1, 44, 28],
+      [1, 44, 22],
+      [1, 44, 16],
+
+      # 3
+      [1, 70, 55],
+      [1, 70, 44],
+      [2, 35, 17],
+      [2, 35, 13],
+
+      # 4		
+      [1, 100, 80],
+      [2, 50, 32],
+      [2, 50, 24],
+      [4, 25, 9],
+
+      # 5
+      [1, 134, 108],
+      [2, 67, 43],
+      [2, 33, 15, 2, 34, 16],
+      [2, 33, 11, 2, 34, 12],
+
+      # 6
+      [2, 86, 68],
+      [4, 43, 27],
+      [4, 43, 19],
+      [4, 43, 15],
+
+      # 7		
+      [2, 98, 78],
+      [4, 49, 31],
+      [2, 32, 14, 4, 33, 15],
+      [4, 39, 13, 1, 40, 14],
+
+      # 8
+      [2, 121, 97],
+      [2, 60, 38, 2, 61, 39],
+      [4, 40, 18, 2, 41, 19],
+      [4, 40, 14, 2, 41, 15],
+
+      # 9
+      [2, 146, 116],
+      [3, 58, 36, 2, 59, 37],
+      [4, 36, 16, 4, 37, 17],
+      [4, 36, 12, 4, 37, 13],
+
+      # 10		
+      [2, 86, 68, 2, 87, 69],
+      [4, 69, 43, 1, 70, 44],
+      [6, 43, 19, 2, 44, 20],
+      [6, 43, 15, 2, 44, 16]
+
+    ]
+
+
+    def QRRSBlock.get_rs_blocks( type_no, error_correct_level )
+      rs_block = QRRSBlock.get_rs_block_table( type_no, error_correct_level )
+
+      if rs_block.nil?
+        raise QRCodeRunTimeError,
+					"bad rsblock @ typeno: #{type_no}/error_correct_level:#{error_correct_level}"
+      end
+
+      length = rs_block.size / 3
+      list = [] 
+
+      ( 0...length ).each do |i|
+        count = rs_block[i * 3 + 0]
+        total_count = rs_block[i * 3 + 1]
+        data_count = rs_block[i * 3 + 2]
+
+        ( 0...count ).each do |j|
+          list << QRRSBlock.new( total_count, data_count )
+        end
+      end
+
+      list
+    end
+
+
+    def QRRSBlock.get_rs_block_table( type_number, error_correct_level )
+      case error_correct_level
+      when QRERRORCORRECTLEVEL[:l]
+        QRRSBlock::RS_BLOCK_TABLE[(type_number - 1) * 4 + 0]
+      when QRERRORCORRECTLEVEL[:m]
+        QRRSBlock::RS_BLOCK_TABLE[(type_number - 1) * 4 + 1]
+      when QRERRORCORRECTLEVEL[:q]
+        QRRSBlock::RS_BLOCK_TABLE[(type_number - 1) * 4 + 2]
+      when QRERRORCORRECTLEVEL[:h]
+        QRRSBlock::RS_BLOCK_TABLE[(type_number - 1) * 4 + 3]
+      else
+        nil
+      end
+    end 
+
+  end
+
+end

data/lib/rqrcode/qrcode/qr_util.rb

@@ -0,0 +1,254 @@
+#!/usr/bin/env ruby
+
+#--
+# Copyright 2004 by Duncan Robertson (duncan@whomwah.com).
+# All rights reserved.
+
+# Permission is granted for use, copying, modification, distribution,
+# and distribution of modified versions of this work as long as the
+# above copyright notice is included.
+#++
+
+module RQRCode #:nodoc:
+
+  class QRUtil
+
+    PATTERN_POSITION_TABLE = [
+      
+      [],
+      [6, 18],
+      [6, 22],
+      [6, 26],
+      [6, 30],
+      [6, 34],
+      [6, 22, 38],
+      [6, 24, 42],
+      [6, 26, 46],
+      [6, 28, 50],
+      [6, 30, 54],		
+      [6, 32, 58],
+      [6, 34, 62],
+      [6, 26, 46, 66],
+      [6, 26, 48, 70],
+      [6, 26, 50, 74],
+      [6, 30, 54, 78],
+      [6, 30, 56, 82],
+      [6, 30, 58, 86],
+      [6, 34, 62, 90],
+      [6, 28, 50, 72, 94],
+      [6, 26, 50, 74, 98],
+      [6, 30, 54, 78, 102],
+      [6, 28, 54, 80, 106],
+      [6, 32, 58, 84, 110],
+      [6, 30, 58, 86, 114],
+      [6, 34, 62, 90, 118],
+      [6, 26, 50, 74, 98, 122],
+      [6, 30, 54, 78, 102, 126],
+      [6, 26, 52, 78, 104, 130],
+      [6, 30, 56, 82, 108, 134],
+      [6, 34, 60, 86, 112, 138],
+      [6, 30, 58, 86, 114, 142],
+      [6, 34, 62, 90, 118, 146],
+      [6, 30, 54, 78, 102, 126, 150],
+      [6, 24, 50, 76, 102, 128, 154],
+      [6, 28, 54, 80, 106, 132, 158],
+      [6, 32, 58, 84, 110, 136, 162],
+      [6, 26, 54, 82, 110, 138, 166],
+      [6, 30, 58, 86, 114, 142, 170]
+    ]
+
+    G15 = 1 << 10 | 1 << 8 | 1 << 5 | 1 << 4 | 1 << 2 | 1 << 1 | 1 << 0	
+    G18 = 1 << 12 | 1 << 11 | 1 << 10 | 1 << 9 | 1 << 8 | 1 << 5 | 1 << 2 | 1 << 0
+    G15_MASK = 1 << 14 | 1 << 12 | 1 << 10 | 1 << 4 | 1 << 1
+
+
+    def QRUtil.get_bch_type_info( data )
+      d = data << 10
+      while QRUtil.get_bch_digit(d) - QRUtil.get_bch_digit(G15) >= 0
+        d ^= (G15 << (QRUtil.get_bch_digit(d) - QRUtil.get_bch_digit(G15)))
+      end
+      (( data << 10 ) | d) ^ G15_MASK
+    end
+
+
+    def QRUtil.get_bch_type_number( data )
+      d = data << 12
+      while QRUtil.get_bch_digit(d) - QRUtil.get_bch_digit(G18) >= 0
+        d ^= (G18 << (QRUtil.get_bch_digit(d) - QRUtil.get_bch_digit(G18)))
+      end
+      ( data << 12 ) | d
+    end
+
+
+    def QRUtil.get_bch_digit( data )
+      digit = 0
+
+      while data != 0
+        digit = digit + 1
+        data = (data).rszf(1)
+      end
+
+      digit
+    end
+
+
+    def QRUtil.get_pattern_position( type_number )
+      PATTERN_POSITION_TABLE[ type_number - 1 ]
+    end
+
+
+    def QRUtil.get_mask( mask_pattern, i, j )
+      case mask_pattern
+      when QRMASKPATTERN[:pattern000]
+        (i + j) % 2 == 0
+      when QRMASKPATTERN[:pattern001]
+        i % 2 == 0
+      when QRMASKPATTERN[:pattern010]
+        j % 3 == 0
+      when QRMASKPATTERN[:pattern011]
+        (i + j) % 3 == 0
+      when QRMASKPATTERN[:pattern100]
+        ((i / 2).floor + (j / 3).floor ) % 2 == 0
+      when QRMASKPATTERN[:pattern101]
+        (i * j) % 2 + (i * j) % 3 == 0
+      when QRMASKPATTERN[:pattern110]
+        ( (i * j) % 2 + (i * j) % 3) % 2 == 0
+      when QRMASKPATTERN[:pattern111]
+        ( (i * j) % 3 + (i + j) % 2) % 2 == 0
+      else
+        raise QRCodeRunTimeError, "bad mask_pattern: #{mask_pattern}"	
+      end
+    end
+
+
+    def QRUtil.get_error_correct_polynomial( error_correct_length )
+      a = QRPolynomial.new( [1], 0 )
+
+      ( 0...error_correct_length ).each do |i|
+        a = a.multiply( QRPolynomial.new( [1, QRMath.gexp(i)], 0 ) )
+      end
+
+      a
+    end
+
+
+    def QRUtil.get_length_in_bits( mode, type )
+      if 1 <= type && type < 10
+
+        # 1 - 9
+        case mode
+        when QRMODE[:mode_number] :	10
+        when QRMODE[:mode_alpha_num] : 9
+        when QRMODE[:mode_8bit_byte] : 8
+        when QRMODE[:mode_kanji] : 8
+        else
+          raise QRCodeRunTimeError, "mode: #{mode}"
+        end
+
+      elsif type < 27
+
+        # 10 -26
+        case mode
+        when QRMODE[:mode_number] :	12
+        when QRMODE[:mode_alpha_num] : 11
+        when QRMODE[:mode_8bit_byte] : 16
+        when QRMODE[:mode_kanji] : 10
+        else
+          raise QRCodeRunTimeError, "mode: #{mode}"
+        end
+
+      elsif type < 41
+
+        # 27 - 40
+        case mode
+        when QRMODE[:mode_number] :	14
+        when QRMODE[:mode_alpha_num] : 13
+        when QRMODE[:mode_8bit_byte] : 16
+        when QRMODE[:mode_kanji] : 12
+        else
+          raise QRCodeRunTimeError, "mode: #{mode}"
+        end
+
+      else
+        raise QRCodeRunTimeError, "type: #{type}"
+      end
+    end
+
+
+    def QRUtil.get_lost_point( qr_code )
+      module_count = qr_code.module_count
+      lost_point = 0
+
+      # level1
+      ( 0...module_count ).each do |row|
+        ( 0...module_count ).each do |col|
+          same_count = 0
+          dark = qr_code.is_dark( row, col )
+
+          ( -1..1 ).each do |r|
+            next if row + r < 0 || module_count <= row + r
+
+            ( -1..1 ).each do |c|
+              next if col + c < 0 || module_count <= col + c
+              next if r == 0 && c == 0
+              if dark == qr_code.is_dark( row + r, col + c )
+                same_count += 1
+              end
+            end
+          end
+
+          if same_count > 5
+            lost_point += (3 + same_count - 5)
+          end	
+        end
+      end
+
+      # level 2
+      ( 0...( module_count - 1 ) ).each do |row|
+        ( 0...( module_count - 1 ) ).each do |col|
+          count = 0
+          count = count + 1 if qr_code.is_dark( row, col )
+          count = count + 1 if qr_code.is_dark( row + 1, col )
+          count = count + 1 if qr_code.is_dark( row, col + 1 )
+          count = count + 1 if qr_code.is_dark( row + 1, col + 1 )
+          lost_point = lost_point + 3 if (count == 0 || count == 4)	
+        end	
+      end
+
+      # level 3
+      ( 0...module_count ).each do |row|
+        ( 0...( module_count - 6 ) ).each do |col|
+          if qr_code.is_dark( row, col ) && !qr_code.is_dark( row, col + 1 ) && qr_code.is_dark( row, col + 2 ) && qr_code.is_dark( row, col + 3 ) && qr_code.is_dark( row, col + 4 ) && !qr_code.is_dark( row, col + 5 ) && qr_code.is_dark( row, col + 6 )
+            lost_point = lost_point + 40
+          end
+        end
+      end
+
+      ( 0...module_count ).each do |col|
+        ( 0...( module_count - 6 ) ).each do |row|
+          if qr_code.is_dark(row, col) && !qr_code.is_dark(row + 1, col) &&  qr_code.is_dark(row + 2, col) &&  qr_code.is_dark(row + 3, col) &&  qr_code.is_dark(row + 4, col) && !qr_code.is_dark(row + 5, col) &&  qr_code.is_dark(row + 6, col)
+            lost_point = lost_point + 40
+          end
+        end
+      end
+
+      # level 4
+      dark_count = 0
+
+      ( 0...module_count ).each do |col|
+        ( 0...module_count ).each do |row|
+          if qr_code.is_dark(row, col)
+            dark_count = dark_count + 1
+          end	
+        end
+      end
+
+      ratio = (100 * dark_count / module_count / module_count - 50).abs / 5
+      lost_point = lost_point * 10
+
+      lost_point			
+    end	
+
+  end
+
+end