require "test_helper"

class PipedreamTest < Minitest::Spec
  Song = Struct.new(:title)

  class Create < Trailblazer::Operation
    class MyContract < Reform::Form
      property :title
    end

    class Auth
      def initialize(user, model); @user, @model = user, model end
      def user_and_model?; @user == Module && @model.class == Song end
    end

    # design principles:
    # * include as less code as possible into the op class.
    # * make the flow super explicit without making it cryptic (only 3 new operators)
    # * avoid including DSL modules in favor of passing those configurations directly to the "step".



    self.|         Model[ Song, :new ]      # model!)
    self.| Policy::Guard[ ->(options){ options["current_user"] == ::Module } ]
    self.|      Contract[ MyContract]
    self.|        Policy[ Auth, :user_and_model?]
    self.<      Contract[ MyContract]

    # self.| :model
    # self.| :guard
    # self.| :contract


    # ok Model[Song, :new]      # model!)
    # ok Policy::Guard[ ->(options){ options["current_user"] == ::Module } ]
    # ok Contract[MyContract]
    # fail Contract[MyContract]
    # self.|> "contract"

    # | :bla
    # | ->

  end

  # TODO: test with contract constant (done).
  #       test with inline contract.
  #       test with override contract!.

  it do
    puts Create["pipetree"].inspect(style: :rows)
    result = Create.({}, { "current_user" => Module })

    result["model"].inspect.must_equal %{#<struct PipedreamTest::Song title=nil>}
    result["result.policy"].success?.must_equal true
    result["contract"].class.superclass.must_equal Reform::Form


  end
end