rqrcode 0.9.0 → 1.1.1

data/lib/rqrcode/qrcode/qr_bit_buffer.rb

@@ -1,99 +0,0 @@
-#!/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
-
-  class QRBitBuffer
-    attr_reader :buffer
-
-    PAD0 = 0xEC
-    PAD1 = 0x11
-
-    def initialize(version)
-      @version = version
-      @buffer = []
-      @length = 0
-    end
-
-
-    def get( index )
-      buf_index = (index / 8).floor
-      (( (@buffer[buf_index]).rszf(7 - index % 8)) & 1) == 1
-    end
-
-
-    def put( num, length )
-      ( 0...length ).each do |i|
-        put_bit((((num).rszf(length - i - 1)) & 1) == 1)
-      end
-    end
-
-
-    def get_length_in_bits
-      @length
-    end
-
-
-    def put_bit( bit )
-      buf_index = ( @length / 8 ).floor
-      if @buffer.size <= buf_index
-        @buffer << 0
-      end
-
-      if bit
-        @buffer[buf_index] |= ((0x80).rszf(@length % 8))
-      end
-
-      @length += 1
-    end 
-    
-    def byte_encoding_start(length)
-      
-      put( QRMODE[:mode_8bit_byte], 4 )
-      put(length, QRUtil.get_length_in_bits(QRMODE[:mode_8bit_byte], @version))
-      
-    end
-    
-    def alphanumeric_encoding_start(length)
-      
-      put( QRMODE[:mode_alpha_numk], 4 )
-      put(length, QRUtil.get_length_in_bits(QRMODE[:mode_alpha_numk], @version))
-      
-    end
-
-    def numeric_encoding_start(length)
-      
-      put( QRMODE[:mode_number], 4 )
-      put(length, QRUtil.get_length_in_bits(QRMODE[:mode_number], @version))
-      
-    end
-    
-    def pad_until(prefered_size)
-      # Align on byte
-      while get_length_in_bits % 8 != 0
-        put_bit( false )
-      end
-      
-      # Pad with padding code words
-      while get_length_in_bits < prefered_size
-        put( QRBitBuffer::PAD0, 8 )
-        put( QRBitBuffer::PAD1, 8 ) if get_length_in_bits < prefered_size
-      end
-    end
-    
-    def end_of_message(max_data_bits)
-      put( 0, 4 ) unless get_length_in_bits+4 > max_data_bits
-    end
-      
-
-  end
-
-end

data/lib/rqrcode/qrcode/qr_code.rb

@@ -1,585 +0,0 @@
-#!/usr/bin/env ruby
-
-#--
-# Copyright 2008 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:
-
-  QRMODE = {
-    :mode_number        => 1 << 0,
-    :mode_alpha_numk    => 1 << 1,
-    :mode_8bit_byte     => 1 << 2,
-  }
-
-  QRMODE_NAME = {
-    :number        => :mode_number,
-    :alphanumeric  => :mode_alpha_numk,
-    :byte_8bit     => :mode_8bit_byte
-  }
-
-  QRERRORCORRECTLEVEL = {
-    :l => 1,
-    :m => 0,
-    :q => 3,
-    :h => 2
-  }
-
-  QRMASKPATTERN = {
-    :pattern000 => 0,
-    :pattern001 => 1,
-    :pattern010 => 2,
-    :pattern011 => 3,
-    :pattern100 => 4,
-    :pattern101 => 5,
-    :pattern110 => 6,
-    :pattern111 => 7
-  }
-
-  QRMASKCOMPUTATIONS = [
-        Proc.new { |i,j| (i + j) % 2 == 0 },
-        Proc.new { |i,j| i % 2 == 0 },
-        Proc.new { |i,j| j % 3 == 0 },
-        Proc.new { |i,j| (i + j) % 3 == 0 },
-        Proc.new { |i,j| ((i / 2).floor + (j / 3).floor) % 2 == 0 },
-        Proc.new { |i,j| (i * j) % 2 + (i * j) % 3 == 0 },
-        Proc.new { |i,j| ((i * j) % 2 + (i * j) % 3) % 2 == 0 },
-        Proc.new { |i,j| ((i * j) % 3 + (i + j) % 2) % 2 == 0 },
-  ]
-
-
-
-  QRPOSITIONPATTERNLENGTH = (7 + 1) * 2 + 1
-  QRFORMATINFOLENGTH = 15
-
-  #http://web.archive.org/web/20110710094955/http://www.denso-wave.com/qrcode/vertable1-e.html
-  #http://web.archive.org/web/20110710094955/http://www.denso-wave.com/qrcode/vertable2-e.html
-  #http://web.archive.org/web/20110710094955/http://www.denso-wave.com/qrcode/vertable3-e.html
-  #http://web.archive.org/web/20110710094955/http://www.denso-wave.com/qrcode/vertable4-e.html
-  # Each array contains levels max chars from level 1 to level 40
-  QRMAXDIGITS = {
-      l: {
-          mode_number: [
-              41, 77, 127, 187, 255, 322, 370, 461, 552, 652, 772,
-              883, 1022, 1101, 1250, 1408, 1548, 1725, 1903, 2061,
-              2232, 2409, 2620, 2812, 3057, 3283, 3514, 3669, 3909, 4158,
-              4417, 4686, 4965, 5253, 5529, 5836, 6153, 6479, 6743, 7089
-          ],
-          mode_alpha_numk: [
-              25, 47, 77, 114, 154, 195, 224, 279, 335, 395,
-              468, 535, 619, 667, 758, 854, 938, 1046, 1153, 1249,
-              1352, 1460, 1588, 1704, 1853, 1990, 2132, 2223, 2369, 2520,
-              2677, 2840, 3009, 3183, 3351, 3537, 3729, 3927, 4087, 4296
-          ],
-          mode_8bit_byte: [
-              17, 32, 53, 78, 106, 134, 154, 192, 230, 271,
-              321, 367, 425, 458, 520, 586, 644, 718, 792, 858,
-              929, 1003, 1091, 1171, 1273, 1367, 1465, 1528, 1628, 1732,
-              1840, 1952, 2068, 2188, 2303, 2431, 2563, 2699, 2809, 2953
-          ],
-      },
-      m: {
-          mode_number: [
-              34, 63, 101, 149, 202, 255, 293, 365, 432, 513,
-              604, 691, 796, 871, 991, 1082, 1212, 1346, 1500, 1600,
-              1708, 1872, 2059, 2188, 2395, 2544, 2701, 2857, 3035, 3289,
-              3486, 3693, 3909, 4134, 4343, 4588, 4775, 5039, 5313, 5596,
-          ],
-          mode_alpha_numk: [
-              20, 38, 61, 90, 122, 154, 178, 221, 262, 311,
-              366, 419, 483, 528, 600, 656, 734, 816, 909, 970,
-              1035, 1134, 1248, 1326, 1451, 1542, 1637, 1732, 1839, 1994,
-              2113, 2238, 2369, 2506, 2632, 2780, 2894, 3054, 3220, 3391
-          ],
-          mode_8bit_byte: [
-              14, 26, 42, 62, 84, 106, 122, 152, 180, 213,
-              251, 287, 331, 362, 412, 450, 504, 560, 624, 666,
-              711, 779, 857, 911, 997, 1059, 1125, 1190, 1264, 1370,
-              1452, 1538, 1628, 1722, 1809, 1911, 1989, 2099, 2213, 2331
-          ],
-      },
-      q: {
-          mode_number: [
-              27, 48, 77, 111, 144, 178, 207, 259, 312, 364,
-              427, 489, 580, 621, 703, 775, 876, 948, 1063, 1159,
-              1224, 1358, 1468, 1588, 1718, 1804, 1933, 2085, 2181, 2358,
-              2473, 2670, 2805, 2949, 3081, 3244, 3417, 3599, 3791, 3993
-          ],
-          mode_alpha_numk: [
-              16, 29, 47, 67, 87, 108, 125, 157, 189, 221,
-              259, 296, 352, 376, 426, 470, 531, 574, 644, 702,
-              742, 823, 890, 963, 1041, 1094, 1172, 1263, 1322, 1429,
-              1499, 1618, 1700, 1787, 1867, 1966, 2071, 2181, 2298, 2420
-          ],
-          mode_8bit_byte: [
-              11, 20, 32, 46, 60, 74, 86, 108, 130, 151,
-              177, 203, 241, 258, 292, 22, 364, 394, 442, 482,
-              509, 565, 611, 661, 715, 751, 805, 868, 908, 982,
-              1030, 1112, 1168, 1228, 1283, 1351, 1423, 1499, 1579, 1663
-          ],
-      },
-      h: {
-          mode_number: [
-              17, 34, 58, 82, 106, 139, 154, 202, 235, 288, 331, 374, 427, 468, 530, 602, 674,
-              331, 374, 427, 468, 530, 602, 674, 746, 813, 919,
-              969, 1056, 1108, 1228, 1286, 1425, 1501, 1581, 1677, 1782,
-              1897, 2022, 2157, 2301, 2361, 2524, 2625, 2735, 2927, 3057
-
-          ],
-          mode_alpha_numk: [
-              10, 20, 35, 50, 64, 84, 93, 122, 143, 174, 200,
-              200, 227, 259, 283, 321, 365, 408, 452, 493, 557,
-              587, 640, 672, 744, 779, 864, 910, 958, 1016, 1080,
-              1150, 1226, 1307, 1394, 1431, 1530, 1591, 1658, 1774, 1852
-          ],
-          mode_8bit_byte: [
-              7, 14, 24, 34, 44, 58, 64, 84, 98, 119,
-              137, 155, 177, 194, 220, 250, 280, 310, 338, 382,
-              403, 439, 461, 511, 535, 593, 625, 658, 698, 742,
-              790, 842, 898, 958, 983, 1051, 1093, 1139, 1219, 1273
-          ],
-      },
-  }
-
-
-  # StandardErrors
-
-  class QRCodeArgumentError < ArgumentError; end
-  class QRCodeRunTimeError < RuntimeError; end
-
-  # == Creation
-  #
-  # QRCode objects expect only one required constructor parameter
-  # and an optional hash of any other. Here's a few examples:
-  #
-  #  qr = RQRCode::QRCode.new('hello world')
-  #  qr = RQRCode::QRCode.new('hello world', :size => 1, :level => :m, :mode => :alphanumeric )
-  #
-
-  class QRCode
-    attr_reader :modules, :module_count, :version
-
-    # Expects a string to be parsed in, other args are optional
-    #
-    #   # string - the string you wish to encode
-    #   # size   - the size of the qrcode (default 4)
-    #   # level  - the error correction level, can be:
-    #      * Level :l 7%  of code can be restored
-    #      * Level :m 15% of code can be restored
-    #      * Level :q 25% of code can be restored
-    #      * Level :h 30% of code can be restored (default :h)
-    #   # mode   - the mode of the qrcode (defaults to alphanumeric or byte_8bit, depending on the input data):
-    #      * :number
-    #      * :alphanumeric
-    #      * :byte_8bit
-    #      * :kanji
-    #
-    #   qr = RQRCode::QRCode.new('hello world', :size => 1, :level => :m, :mode => :alphanumeric )
-    #
-
-    def initialize( string, *args )
-      if !string.is_a? String
-        raise QRCodeArgumentError, "The passed data is #{string.class}, not String"
-      end
-
-      options               = args.extract_options!
-      level                 = (options[:level] || :h).to_sym
-
-      if !QRERRORCORRECTLEVEL.has_key?(level)
-        raise QRCodeArgumentError, "Unknown error correction level `#{level.inspect}`"
-      end
-
-      @data                 = string
-
-      mode                  = QRMODE_NAME[(options[:mode] || '').to_sym]
-      # If mode is not explicitely given choose mode according to data type
-      mode ||= case
-        when RQRCode::QRNumeric.valid_data?(@data)
-          QRMODE_NAME[:number]
-        when QRAlphanumeric.valid_data?(@data)
-          QRMODE_NAME[:alphanumeric]
-        else
-          QRMODE_NAME[:byte_8bit]
-      end
-
-      max_size_array        = QRMAXDIGITS[level][mode]
-      size                  = options[:size] || smallest_size_for(string, max_size_array)
-
-      if size > QRUtil.max_size
-        raise QRCodeArgumentError, "Given size greater than maximum possible size of #{QRUtil.max_size}"
-      end
-
-      @error_correct_level  = QRERRORCORRECTLEVEL[level]
-      @version              = size
-      @module_count         = @version * 4 + QRPOSITIONPATTERNLENGTH
-      @modules              = Array.new( @module_count )
-      @data_list            =
-        case mode
-        when :mode_number
-          QRNumeric.new( @data )
-        when :mode_alpha_numk
-          QRAlphanumeric.new( @data )
-        else
-          QR8bitByte.new( @data )
-        end
-
-      @data_cache           = nil
-      self.make
-    end
-
-    # <tt>is_dark</tt> is called with a +col+ and +row+ parameter. This will
-    # return true or false based on whether that coordinate exists in the
-    # matrix returned. It would normally be called while iterating through
-    # <tt>modules</tt>. A simple example would be:
-    #
-    #  instance.is_dark( 10, 10 ) => true
-    #
-
-    def is_dark( row, col )
-      if !row.between?(0, @module_count - 1) || !col.between?(0, @module_count - 1)
-        raise QRCodeRunTimeError, "Invalid row/column pair: #{row}, #{col}"
-      end
-      @modules[row][col]
-    end
-
-    alias dark? is_dark
-
-    # This is a public method that returns the QR Code you have
-    # generated as a string. It will not be able to be read
-    # in this format by a QR Code reader, but will give you an
-    # idea if the final outout. It takes two optional args
-    # +:true+ and +:false+ which are there for you to choose
-    # how the output looks. Here's an example of it's use:
-    #
-    #  instance.to_s =>
-    #  xxxxxxx x  x x   x x  xx  xxxxxxx
-    #  x     x  xxx  xxxxxx xxx  x     x
-    #  x xxx x  xxxxx x       xx x xxx x
-    #
-    #  instance._to_s( :dark => 'E', :light => 'Q') =>
-    #  EEEEEEEQEQQEQEQQQEQEQQEEQQEEEEEEE
-    #  EQQQQQEQQEEEQQEEEEEEQEEEQQEQQQQQE
-    #  EQEEEQEQQEEEEEQEQQQQQQQEEQEQEEEQE
-    #
-    def to_s( *args )
-      options                = args.extract_options!
-      dark                   = options[:dark] || options[:true] || 'x'
-      light                  = options[:light] || options[:false] || ' '
-      quiet_zone_size        = options[:quiet_zone_size] || 0
-
-      rows = []
-
-      @modules.each do |row|
-        cols = light * quiet_zone_size
-        row.each do |col|
-          cols += (col ? dark : light)
-        end
-        rows << cols
-      end
-
-      quiet_zone_size.times do
-        rows.unshift(light * (rows.first.length / light.size))
-        rows << light * (rows.first.length / light.size)
-      end
-      rows.join("\n")
-    end
-
-    # Return a symbol for current error connection level
-    def error_correction_level
-      QRERRORCORRECTLEVEL.invert[@error_correct_level]
-    end
-
-    # Return a symbol in QRMODE.keys for current mode used
-    def mode
-      case @data_list
-      when QRNumeric
-        :mode_number
-      when QRAlphanumeric
-        :mode_alpha_numk
-      else
-        :mode_8bit_byte
-      end
-    end
-
-    protected
-
-    def make #:nodoc:
-      prepare_common_patterns
-      make_impl( false, get_best_mask_pattern )
-    end
-
-    private
-
-    def prepare_common_patterns
-        @modules.map! { |row| Array.new(@module_count) }
-
-        place_position_probe_pattern(0, 0)
-        place_position_probe_pattern(@module_count - 7, 0)
-        place_position_probe_pattern(0, @module_count - 7)
-        place_position_adjust_pattern
-        place_timing_pattern
-
-        @common_patterns = @modules.map(&:clone)
-    end
-
-    def make_impl( test, mask_pattern ) #:nodoc:
-      @modules = @common_patterns.map(&:clone)
-
-      place_format_info(test, mask_pattern)
-      place_version_info(test) if @version >= 7
-
-      if @data_cache.nil?
-        @data_cache = QRCode.create_data(
-          @version, @error_correct_level, @data_list
-        )
-      end
-
-      map_data( @data_cache, mask_pattern )
-    end
-
-
-    def place_position_probe_pattern( row, col ) #:nodoc:
-      (-1..7).each do |r|
-        next if !(row + r).between?(0, @module_count - 1)
-
-        (-1..7).each do |c|
-          next if !(col + c).between?(0, @module_count - 1)
-
-          is_vert_line = (r.between?(0, 6) && (c == 0 || c == 6))
-          is_horiz_line = (c.between?(0, 6) && (r == 0 || r == 6))
-          is_square = r.between?(2,4) && c.between?(2, 4)
-
-          is_part_of_probe = is_vert_line || is_horiz_line || is_square
-          @modules[row + r][col + c] = is_part_of_probe
-        end
-      end
-    end
-
-
-    def get_best_mask_pattern #:nodoc:
-      min_lost_point = 0
-      pattern = 0
-
-      ( 0...8 ).each do |i|
-        make_impl( true, i )
-        lost_point = QRUtil.get_lost_points(self.modules)
-
-        if i == 0 || min_lost_point > lost_point
-          min_lost_point = lost_point
-          pattern = i
-        end
-      end
-      pattern
-    end
-
-
-    def place_timing_pattern #:nodoc:
-      ( 8...@module_count - 8 ).each do |i|
-        @modules[i][6] = @modules[6][i] = i % 2 == 0
-      end
-    end
-
-
-    def place_position_adjust_pattern #:nodoc:
-      positions = QRUtil.get_pattern_positions(@version)
-
-      positions.each do |row|
-        positions.each do |col|
-          next unless @modules[row][col].nil?
-
-          ( -2..2 ).each do |r|
-            ( -2..2 ).each do |c|
-              is_part_of_pattern = (r.abs == 2 || c.abs == 2 || ( r == 0 && c == 0 ))
-              @modules[row + r][col + c] = is_part_of_pattern
-            end
-          end
-        end
-      end
-    end
-
-
-    def place_version_info(test) #:nodoc:
-      bits = QRUtil.get_bch_version(@version)
-
-      ( 0...18 ).each do |i|
-        mod = ( !test && ( (bits >> i) & 1) == 1 )
-        @modules[ (i / 3).floor ][ i % 3 + @module_count - 8 - 3 ] = mod
-        @modules[ i % 3 + @module_count - 8 - 3 ][ (i / 3).floor ] = mod
-      end
-    end
-
-
-    def place_format_info(test, mask_pattern) #:nodoc:
-      data = (@error_correct_level << 3 | mask_pattern)
-      bits = QRUtil.get_bch_format_info(data)
-
-      QRFORMATINFOLENGTH.times do |i|
-        mod = (!test && ( (bits >> i) & 1) == 1)
-
-        # vertical
-        if i < 6
-          row = i
-        elsif i < 8
-          row = i + 1
-        else
-          row = @module_count - 15 + i
-        end
-        @modules[row][8] = mod
-
-        # horizontal
-        if i < 8
-          col = @module_count - i - 1
-        elsif i < 9
-          col = 15 - i - 1 + 1
-        else
-          col = 15 - i - 1
-        end
-        @modules[8][col] = mod
-      end
-
-      # fixed module
-      @modules[ @module_count - 8 ][8] = !test
-    end
-
-
-    def map_data( data, mask_pattern ) #:nodoc:
-      inc = -1
-      row = @module_count - 1
-      bit_index = 7
-      byte_index = 0
-
-      ( @module_count - 1 ).step( 1, -2 ) do |col|
-        col = col - 1 if col <= 6
-
-        while true do
-          ( 0...2 ).each do |c|
-
-            if @modules[row][ col - c ].nil?
-              dark = false
-              if byte_index < data.size && !data[byte_index].nil?
-                dark = (( (data[byte_index]).rszf( bit_index ) & 1) == 1 )
-              end
-              mask = QRUtil.get_mask( mask_pattern, row, col - c )
-              dark = !dark if mask
-              @modules[row][ col - c ] = dark
-              bit_index -= 1
-
-              if bit_index == -1
-                byte_index += 1
-                bit_index = 7
-              end
-            end
-          end
-
-          row += inc
-
-          if row < 0 || @module_count <= row
-            row -= inc
-            inc = -inc
-            break
-          end
-        end
-      end
-    end
-
-    def smallest_size_for(string, max_size_array) #:nodoc:
-      l = string.bytesize
-      ver = max_size_array.index{|i| i >= l}
-      raise QRCodeRunTimeError,"code length overflow. (#{l} digits > any version capacity)" unless ver
-      ver + 1
-    end
-
-    def QRCode.count_max_data_bits(rs_blocks)
-      max_data_bytes = rs_blocks.reduce(0) do |sum, rs_block|
-        sum + rs_block.data_count
-      end
-
-      return max_data_bytes * 8
-    end
-
-    def QRCode.create_data(version, error_correct_level, data_list) #:nodoc:
-      rs_blocks = QRRSBlock.get_rs_blocks(version, error_correct_level)
-      max_data_bits = QRCode.count_max_data_bits(rs_blocks)
-      buffer = QRBitBuffer.new(version)
-
-      data_list.write(buffer)
-      buffer.end_of_message(max_data_bits)
-
-      if buffer.get_length_in_bits > max_data_bits
-        raise QRCodeRunTimeError, "code length overflow. (#{buffer.get_length_in_bits}>#{max_data_bits}). (Try a larger size!)"
-      end
-
-      buffer.pad_until(max_data_bits)
-
-      QRCode.create_bytes( buffer, rs_blocks )
-    end
-
-
-    def QRCode.create_bytes( buffer, rs_blocks ) #:nodoc:
-      offset = 0
-      max_dc_count = 0
-      max_ec_count = 0
-      dcdata = Array.new( rs_blocks.size )
-      ecdata = Array.new( rs_blocks.size )
-
-      rs_blocks.each_with_index do |rs_block, r|
-        dc_count = rs_block.data_count
-        ec_count = rs_block.total_count - dc_count
-        max_dc_count = [ max_dc_count, dc_count ].max
-        max_ec_count = [ max_ec_count, ec_count ].max
-
-        dcdata_block = Array.new(dc_count)
-        dcdata_block.size.times do |i|
-          dcdata_block[i] = 0xff & buffer.buffer[ i + offset ]
-        end
-        dcdata[r] = dcdata_block
-
-        offset = offset + dc_count
-        rs_poly = QRUtil.get_error_correct_polynomial( ec_count )
-        raw_poly = QRPolynomial.new( dcdata[r], rs_poly.get_length - 1 )
-        mod_poly = raw_poly.mod( rs_poly )
-
-        ecdata_block = Array.new(rs_poly.get_length - 1)
-        ecdata_block.size.times do |i|
-          mod_index = i + mod_poly.get_length - ecdata_block.size
-          ecdata_block[i] = mod_index >= 0 ? mod_poly.get( mod_index ) : 0
-        end
-        ecdata[r] = ecdata_block
-      end
-
-      total_code_count = rs_blocks.reduce(0) do |sum, rs_block|
-        sum + rs_block.total_count
-      end
-
-      data = Array.new( total_code_count )
-      index = 0
-
-      max_dc_count.times do |i|
-        rs_blocks.size.times do |r|
-          if i < dcdata[r].size
-            data[index] = dcdata[r][i]
-            index += 1
-          end
-        end
-      end
-
-      max_ec_count.times do |i|
-        rs_blocks.size.times do |r|
-          if i < ecdata[r].size
-            data[index] = ecdata[r][i]
-            index += 1
-          end
-        end
-      end
-
-      data
-    end
-
-  end
-
-end