module MongoHQClient

  class Client
    include HTTP

    attr_accessor :apikey

    def initialize(apikey)
      @apikey = apikey
    end

    def databases
      json = get("databases")

      db_list = []

      json.each do |db|
        db_list << Database.new(json: db, apikey: apikey)
      end

      db_list
    end

    def create_database(db_name, plan)
      hash =  { name: db_name, slug: plan }

      post("databases", hash)
    end

    def invoices
      json = get("invoices")

      invoices = []

      json.each do |invoice|
        invoices << Invoice.new(json: invoice)
      end

      invoices
    end

    def invoice(id)
      json = get("invoices/#{id}")

      Invoice.new json: json
    end

    def plans
      json = get("plans")

      plans = []

      json.each do |plan|
        plans << Plan.new(json: plan)
      end

      plans
    end
  end

end