wikirate/wikirate

# -*- encoding : utf-8 -*-

# available researched metric values in test db
#  Joe User+researched number 1
#   Samsung          2014 => 10, 2015 => 5
#   Sony_Corporation 2014 => 1
#   Death_Star       1977 => 5
#
#  Joe User+researched number 2
#   Samsung          2014 => 5, 2015 => 2
#   Sony_Corporation 2014 => 2
#
#  Joe User+researched number 3
#   Samsung          2014 => 1, 2015 => 1
#
#  Joe User+RM
#    Apple_Inc       2010 => 10, '2013' => 13, '2011' => 11,
#                    2012 => 12, '2014' => 14
#    Death_Star      1977 => 77
RSpec.describe Card::Set::MetricType::WikiRating do
  let(:metric_type) { :wiki_rating }

  describe "formula card" do
    let(:wikirating_card) { Card[:wiki_rating] }

    it { is_expected.to be_truthy }
    it "has codename" do
      expect(wikirating_card.codename).to eq :wiki_rating
    end
    it 'has type "metric type"' do
      expect(wikirating_card.type_id).to eq Card["metric type"].id
    end
  end

  def rating_value company="Samsung", year="2014"
    rating_answer(company, year).value
  end

  def rating_answer company="Samsung", year="2014"
    Answer.where(metric_id: "Joe User+#{@metric_title}".card_id,
                 company_id: company.card_id,
                 year: year.to_i).take
  end

  context "when created with formula" do
    before do
      @metric_title = "rating1"
      @metric = create_metric(
        name: @metric_title, type: :wiki_rating,
        variables: [{ metric: "Joe User+researched number 1", weight: "60" },
                    { metric: "Joe User+researched number 2", weight: "40" }].to_json
      )
    end

    it "creates rating values" do
      expect(rating_value).to eq("8.0")
      expect(rating_value("Samsung", "2015")).to eq("3.8")
      expect(rating_value("Sony_Corporation")).to eq("1.4")
      expect(rating_answer("Death_Star", "1977")).to be_falsey
    end

    context "when variables/formula change" do
      def update_weights weights
        formula = weights.to_a.map { |m, w| { metric: m, weight: w } }
        @metric.variables_card.update! content: formula.to_json
      end
      it "updates existing rating value" do
        update_weights "Joe User+researched number 1" => 40,
                       "Joe User+researched number 2" => 60
        expect(rating_value).to eq "7.0"
      end
      it "removes incomplete rating value" do
        update_weights "Joe User+researched number 1" => 40,
                       "Joe User+researched number 2" => 40,
                       "Joe User+researched number 3" => 20
        expect(rating_answer("Sony_Corporation", "2014")).to be_falsey
      end
      it "adds complete rating value" do
        # Death Star has only a value for +researched number 1
        # so if we restrict the formula to +researched number 1 values
        # Death Star has to get a rating value
        update_weights "Joe User+researched number 1" => 100
        expect(rating_value("Death Star", "1977")).to eq("5.0")
      end
    end

    context "when input metric value changes" do
      it "updates rating value" do
        Card["Joe User+researched number 1+Samsung+2014+value"]
          .update! content: "1"
        expect(rating_value).to eq "2.6"
      end
      it "removes incomplete rating values" do
        Card::Auth.as_bot do
          Card["Joe User+researched number 1+Samsung+2014"].delete
        end
        expect(rating_answer).to be_falsey
      end
    end

    context "when input metric value is missing" do
      it "doesn't create rating value" do
        expect(rating_answer("Death Star", "1977")).to be_falsey
      end
      it "creates rating value if missing value is added" do
        Card::Auth.as_bot do
          Card["Joe User+researched number 2"].create_answer(
            company: "Death Star",
            year: "1977",
            value: "2",
            source: sample_source
          )
        end
        expect(rating_value("Death Star", "1977")).to eq("3.8")
      end
    end

    context "when input metric is renamed" do
      it "changes name in formula", as_bot: true do
        update_card "Joe User+researched number 1", name: "Joe User+invented number"
        expect(@metric.variables_card.item_names).to include("Joe User+invented number")
      end
    end
  end

  context "when created without formula" do
    before do
      @metric_title = "rating2"
      @metric = create_metric name: @metric_title, type: :wiki_rating
    end

    it "creates rating values if formula updated" do
      Card::Auth.as_bot do
        @metric.variables_card.update!(
          content: [{ metric: "Joe User+researched number 1", weight: "60" },
                    { metric: "Joe User+researched number 2", weight: "40" }].to_json
        )
      end
      expect(rating_value).to eq("8.0")
      expect(rating_value("Samsung", "2015")).to eq("3.8")
      expect(rating_value("Sony_Corporation")).to eq("1.4")
      expect(rating_answer("Death_Star", "1977")).to be_falsey
    end
  end

  # context "you are not allowed to add metrics that are no scores" do
  # end
end