################################################################################
#
# Copyright (C) 2008 James Healy (jimmy@deefa.com)
#
# Permission is hereby granted, free of charge, to any person obtaining
# a copy of this software and associated documentation files (the
# "Software"), to deal in the Software without restriction, including
# without limitation the rights to use, copy, modify, merge, publish,
# distribute, sublicense, and/or sell copies of the Software, and to
# permit persons to whom the Software is furnished to do so, subject to
# the following conditions:
# 
# The above copyright notice and this permission notice shall be
# included in all copies or substantial portions of the Software.
# 
# THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND,
# EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
# MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND
# NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS BE
# LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION
# OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION
# WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.
#
################################################################################

class PDF::Reader
  class CMap

    def initialize(data)
      @map = {}
      in_char_mode = false
      in_range_mode = false

      data.each_line do |l|
        if l.include?("beginbfchar")
          in_char_mode = true 
        elsif l.include?("endbfchar")
          in_char_mode = false 
        elsif l.include?("beginbfrange")
          in_range_mode = true 
        elsif l.include?("endbfrange")
          in_range_mode = false 
        end

        if in_char_mode
          process_bfchar_line(l)
        elsif in_range_mode
          process_bfrange_line(l)
        end
      end
    end

    def decode(c)
      # TODO: implement the conversion
      return c unless c.class == Fixnum
      @map[c]
    end

    private

    def process_bfchar_line(l)
      m, find, replace = *l.match(/<([0-9a-fA-F]+)>\s*<([0-9a-fA-F]+)>/)
      @map["0x#{find}".hex] = "0x#{replace}".hex if find && replace
    end

    def process_bfrange_line(l)
      m, start_code, end_code, dst = *l.match(/<([0-9a-fA-F]+)>\s*<([0-9a-fA-F]+)>\s*<([0-9a-fA-F]+)>/)
      if start_code && end_code && dst
        start_code = "0x#{start_code}".hex
        end_code   = "0x#{end_code}".hex
        dst        = "0x#{dst}".hex
        incr       = 0

        # add all values in the range to our mapping
        (start_code..end_code).each do |val|
          @map[val] = dst + incr
          incr += 1
          # ensure a single range does not exceed 255 chars
          raise PDF::Reader::MalformedPDFError, "a CMap bfrange cann't exceed 255 chars" if incr > 255
        end
      end
    end
  end
end