openfoodnetwork/spec/controllers/spree/admin/reports_controller_spec.rb

require 'spec_helper'

describe Spree::Admin::ReportsController, type: :controller do

  # Given two distributors and two suppliers
  let(:bill_address) { create(:address) }
  let(:ship_address) { create(:address) }
  let(:instructions) { "pick up on thursday please" }
  let(:coordinator1) { create(:distributor_enterprise) }
  let(:coordinator2) { create(:distributor_enterprise) }
  let(:supplier1) { create(:supplier_enterprise) }
  let(:supplier2) { create(:supplier_enterprise) }
  let(:supplier3) { create(:supplier_enterprise) }
  let(:distributor1) { create(:distributor_enterprise) }
  let(:distributor2) { create(:distributor_enterprise) }
  let(:distributor3) { create(:distributor_enterprise) }
  let(:product1) { create(:product, price: 12.34, distributors: [distributor1], supplier: supplier1) }
  let(:product2) { create(:product, price: 23.45, distributors: [distributor2], supplier: supplier2) }
  let(:product3) { create(:product, price: 34.56, distributors: [distributor3], supplier: supplier3) }

  # Given two order cycles with both distributors
  let(:ocA) { create(:simple_order_cycle, coordinator: coordinator1, distributors: [distributor1, distributor2], suppliers: [supplier1, supplier2, supplier3], variants: [product1.master, product3.master]) }
  let(:ocB) { create(:simple_order_cycle, coordinator: coordinator2, distributors: [distributor1, distributor2], suppliers: [supplier1, supplier2, supplier3], variants: [product2.master]) }

  # orderA1 can only be accessed by supplier1, supplier3 and distributor1
  let(:orderA1) do
    order = create(:order, distributor: distributor1, bill_address: bill_address, ship_address: ship_address, special_instructions: instructions, order_cycle: ocA)
    order.line_items << create(:line_item, variant: product1.master)
    order.line_items << create(:line_item, variant: product3.master)
    order.finalize!
    order.save
    order
  end
  # orderA2 can only be accessed by supplier2 and distributor2
  let(:orderA2) do
    order = create(:order, distributor: distributor2, bill_address: bill_address, ship_address: ship_address, special_instructions: instructions, order_cycle: ocA)
    order.line_items << create(:line_item, variant: product2.master)
    order.finalize!
    order.save
    order
  end
  # orderB1 can only be accessed by supplier1, supplier3 and distributor1
  let(:orderB1) do
    order = create(:order, distributor: distributor1, bill_address: bill_address, ship_address: ship_address, special_instructions: instructions, order_cycle: ocB)
    order.line_items << create(:line_item, variant: product1.master)
    order.line_items << create(:line_item, variant: product3.master)
    order.finalize!
    order.save
    order
  end
  # orderB2 can only be accessed by supplier2 and distributor2
  let(:orderB2) do
    order = create(:order, distributor: distributor2, bill_address: bill_address, ship_address: ship_address, special_instructions: instructions, order_cycle: ocB)
    order.line_items << create(:line_item, variant: product2.master)
    order.finalize!
    order.save
    order
  end

  # Results
  let(:resulting_orders_prelim) { assigns(:report).search.result }
  let(:resulting_orders) { assigns(:report).table_items.map(&:order) }
  let(:resulting_products) { assigns(:report).table_items.map(&:product) }

  # As manager of a coordinator (coordinator1)
  context "Coordinator Enterprise User" do
    before { login_as_enterprise_user [coordinator1] }

    describe 'Orders & Fulfillment' do
      it "shows all orders in order cycles I coordinate" do
        # create test objects
        [orderA1, orderA2, orderB1, orderB2]

        spree_post :orders_and_fulfillment

        expect(resulting_orders).to     include orderA1, orderA2
        expect(resulting_orders).not_to include orderB1, orderB2
      end
    end
  end

  # As a Distributor Enterprise user for distributor1
  context "Distributor Enterprise User" do
    before { login_as_enterprise_user [distributor1] }

    describe 'Orders and Distributors' do
      it "only shows orders that I have access to" do
        [orderA1, orderA2, orderB1, orderB2]
        spree_post :orders_and_distributors

        expect(assigns(:search).result).to include(orderA1, orderB1)
        expect(assigns(:search).result).not_to include(orderA2)
        expect(assigns(:search).result).not_to include(orderB2)
      end
    end

    describe 'Bulk Coop' do
      it "only shows orders that I have access to" do
        [orderA1, orderA2, orderB1, orderB2]
        spree_post :bulk_coop

        expect(resulting_orders).to     include(orderA1, orderB1)
        expect(resulting_orders).not_to include(orderA2)
        expect(resulting_orders).not_to include(orderB2)
      end
    end

    describe 'Payments' do
      it "only shows orders that I have access to" do
        [orderA1, orderA2, orderB1, orderB2]
        spree_post :payments

        expect(resulting_orders_prelim).to     include(orderA1, orderB1)
        expect(resulting_orders_prelim).not_to include(orderA2)
        expect(resulting_orders_prelim).not_to include(orderB2)
      end
    end

    describe 'Orders & Fulfillment' do
      it "only shows orders that I distribute" do
        [orderA1, orderA2, orderB1, orderB2]
        spree_post :orders_and_fulfillment

        expect(resulting_orders).to     include orderA1, orderB1
        expect(resulting_orders).not_to include orderA2, orderB2
      end

      it "only shows the selected order cycle" do
        [orderA1, orderB1]
        spree_post :orders_and_fulfillment, q: {order_cycle_id_in: [ocA.id.to_s]}

        expect(resulting_orders).to     include(orderA1)
        expect(resulting_orders).not_to include(orderB1)
      end
    end
  end

  # As a Supplier Enterprise user for supplier1
  context "Supplier" do
    before { login_as_enterprise_user [supplier1] }

    describe 'index' do
      it "loads reports relevant to producers" do
        spree_get :index

        report_types = assigns(:reports).keys
        expect(report_types).to include "orders_and_fulfillment", "products_and_inventory", "packing" # and others
        expect(report_types).to_not include "sales_tax"
      end
    end

    describe 'Bulk Coop' do
      context "where I have granted P-OC to the distributor" do
        before do
          [orderA1, orderA2]
          create(:enterprise_relationship, parent: supplier1, child: distributor1, permissions_list: [:add_to_order_cycle])
        end

        it "only shows product line items that I am supplying" do
          spree_post :bulk_coop

          expect(resulting_products).to     include product1
          expect(resulting_products).not_to include product2, product3
        end
      end

      context "where I have not granted P-OC to the distributor" do
        it "shows product line items that I am supplying" do
          spree_post :bulk_coop

          expect(resulting_products).not_to include product1, product2, product3
        end
      end
    end

    describe 'Orders & Fulfillment' do
      context "where I have granted P-OC to the distributor" do
        before do
          create(:enterprise_relationship, parent: supplier1, child: distributor1, permissions_list: [:add_to_order_cycle])
        end

        it "only shows product line items that I am supplying" do
          [orderA1, orderA2]
          spree_post :orders_and_fulfillment

          expect(resulting_products).to     include product1
          expect(resulting_products).not_to include product2, product3
        end

        it "only shows the selected order cycle" do
          [orderA1, orderB1]
          spree_post :orders_and_fulfillment, q: {order_cycle_id_eq: ocA.id}

          expect(resulting_orders_prelim).to     include(orderA1)
          expect(resulting_orders_prelim).not_to include(orderB1)
        end
      end

      context "where I have not granted P-OC to the distributor" do
        it "does not show me line_items I supply" do
          [orderA1, orderA2]
          spree_post :orders_and_fulfillment

          expect(resulting_products).not_to include product1, product2, product3
        end
      end
    end
  end

  context "Products & Inventory" do
    before { login_as_admin }

    it "should build distributors for the current user" do
      [coordinator1, coordinator2, supplier1, distributor1, distributor2, distributor3]
      spree_get :products_and_inventory
      expect(assigns(:distributors)).to match_array [coordinator1, coordinator2, distributor1, distributor2, distributor3]
    end

    it "builds suppliers for the current user" do
      [supplier1, supplier2, supplier3, distributor1]
      spree_get :products_and_inventory
      expect(assigns(:suppliers)).to match_array [supplier1, supplier2, supplier3]
    end

    it "builds order cycles for the current user" do
      [ocA, ocB]
      spree_get :products_and_inventory
      expect(assigns(:order_cycles)).to match_array [ocB, ocA]
    end

    it "assigns report types" do
      spree_get :products_and_inventory
      expect(assigns(:report_types)).to eq(subject.report_types[:products_and_inventory])
    end

    it "creates a ProductAndInventoryReport" do
      expect(OpenFoodNetwork::ProductsAndInventoryReport).to receive(:new)
        .with(@admin_user, {"test" => "foo", "controller" => "spree/admin/reports", "action" => "products_and_inventory"}, false)
        .and_return(report = double(:report))
      allow(report).to receive(:header).and_return []
      allow(report).to receive(:table).and_return []
      spree_get :products_and_inventory, test: "foo"
      expect(assigns(:report)).to eq(report)
    end
  end

  context "My Customers" do
    before { login_as_admin }

    it "should have report types for customers" do
      expect(subject.report_types[:customers]).to eq([
        ["Mailing List", :mailing_list],
        ["Addresses", :addresses]
      ])
    end

    it "should build distributors for the current user" do
      [coordinator1, coordinator2, supplier1, distributor1, distributor2, distributor3]
      spree_get :customers
      expect(assigns(:distributors)).to match_array [coordinator1, coordinator2, distributor1, distributor2, distributor3]
    end

    it "builds suppliers for the current user" do
      [supplier1, supplier2, supplier3, distributor1]
      spree_get :customers
      expect(assigns(:suppliers)).to match_array [supplier1, supplier2, supplier3]
    end

    it "builds order cycles for the current user" do
      [ocA, ocB]
      spree_get :customers
      expect(assigns(:order_cycles)).to match_array [ocB, ocA]
    end

    it "assigns report types" do
      spree_get :customers
      expect(assigns(:report_types)).to eq(subject.report_types[:customers])
    end

    it "creates a CustomersReport" do
      expect(OpenFoodNetwork::CustomersReport).to receive(:new)
        .with(@admin_user, {"test" => "foo", "controller" => "spree/admin/reports", "action" => "customers"}, false)
        .and_return(report = double(:report))
      allow(report).to receive(:header).and_return []
      allow(report).to receive(:table).and_return []
      spree_get :customers, test: "foo"
      expect(assigns(:report)).to eq(report)
    end
  end

  context "Admin" do
    before { login_as_admin }

    describe "users_and_enterprises" do
      it "shows report search forms" do
        spree_get :users_and_enterprises
        expect(assigns(:report).table).to eq []
      end

      it "shows report data" do
      	[coordinator1]
        spree_post :users_and_enterprises
        expect(assigns(:report).table.empty?).to be false
      end
    end

    describe "sales_tax" do
      it "shows report search forms" do
        spree_get :sales_tax
        expect(assigns(:report).table).to eq []
      end
    end
  end
end