module Kernel
  def qualified_const_get(str)
    path = str.to_s.split('::')
    from_root = path[0].empty?
    if from_root
      from_root = []
      path = path[1..-1]
    else
      start_ns = ((Class === self)||(Module === self)) ? self : self.class
      from_root = start_ns.to_s.split('::')
    end
    until from_root.empty?
      begin
        return (from_root+path).inject(Object) { |ns,name| ns.const_get(name) }
      rescue NameError
        from_root.delete_at(-1)
      end
    end
    path.inject(Object) { |ns,name| ns.const_get(name) }
  end
end

class Time
  def self.parse(string)
    return nil if string.nil?

    unless time = NSDate.dateWithString(string)
      # XXX Try iso8601 date
      time = NSDate.dateWithString(string.gsub('T',' ').gsub('Z', ' +0000').gsub(/([-+]\d{2}:\d{2})/,' \1'))
    end
    time
  end

  def to_iso8601
    dateFormatter = NSDateFormatter.alloc.init
    locale = NSLocale.alloc.initWithLocaleIdentifier("en_US_POSIX")
    dateFormatter.setLocale(locale)
    dateFormatter.setDateFormat("yyyy-MM-dd'T'HH:mm:ssZZZZZ")

    dateFormatter.stringFromDate(self)
  end
end

class Object
  def as_json
    self
  end
end

class Hash
  def as_json
    hash = self.class.new
    self.each { |k,v| hash[k] = v.as_json }
    hash
  end
end

class NSDictionary
  def as_json
    to_hash.as_json
  end
end

class Array
  def as_json
    self.map { |v| v.as_json }
  end
end

class NSArray
  def as_json
    self.map { |v| v.as_json }
  end
end

class Time
  def as_json
    self.to_iso8601
  end
end