require 'model_helper'

describe IB::Models::Option,
         :human => "<Option: AAPL 201301 put 600.5 SMART >",

         :errors => {:right => ["should be put or call"],
                     :strike => ["must be greater than 0"],
         },

         :props => {:symbol => 'AAPL',
                    :expiry => '201301',
                    :strike => 600.5,
                    :right => :put,
         },

         :assigns => {
             :local_symbol =>
                 {['AAPL  130119C00500000',
                   :'AAPL  130119C00500000'] => 'AAPL  130119C00500000',
                  'BAR'=> /invalid OSI code/},

             :expiry =>
                 {[200609, '200609'] => '200609',
                  [20060913, '20060913'] => '20060913',
                  [:foo, 2006, 42, 'bar'] => /should be YYYYMM or YYYYMMDD/},

             :sec_type =>
                 {['OPT', :option] => :option,
                  IB::CODES[:sec_type].reject { |k, _| k == :option }.to_a =>
                      /should be an option/},

             :right =>
                 {["PUT", "put", "P", "p", :put] => :put,
                  ["CALL", "call", "C", "c", :call] => :call,
                  ['', '0', '?', :none, :foo, 'BAR', 42] => /should be put or call/},

             :exchange => string_upcase_assigns.merge(
                 [:smart, 'SMART', 'smArt'] => 'SMART'),

             :primary_exchange =>string_upcase_assigns.merge(
                 [:SMART, 'SMART'] => /should not be SMART/),

             :multiplier => to_i_assigns,

             :symbol => string_assigns,

             :strike => {[0, -30.0] => /must be greater than 0/},
         } do # AKA IB::Option

  it_behaves_like 'Self-equal Model'
  it_behaves_like 'Model with invalid defaults'

  it 'has class name shortcut' do
    IB::Option.should == IB::Models::Option
    IB::Option.new.should == IB::Models::Option.new
  end

  context 'properly initiated' do
    subject { IB::Option.new props }
    it_behaves_like 'Contract'

    it 'has extra osi accessor, aliasing :local_symbol' do
      subject.osi = 'FOO'
      subject.local_symbol.should == 'FOO'
      subject.local_symbol = 'bar'
      subject.osi.should == 'bar'
    end
  end

  it 'correctly defines Contract type (sec_type) for Option contract' do
    [IB::Contract.new(:sec_type => :option),
     IB::Contract.new(:sec_type => 'OPT'),
     IB::Option.new
    ].each do |contract|
      contract.should_not be_bag
      contract.should_not be_bond
      contract.should_not be_stock
      contract.should be_option
    end
  end

  it 'correctly validates OSI symbol' do
    o = IB::Option.new props
    o.should be_valid
    o.local_symbol = "AAPL  130119C00500000"
    o.should be_valid
  end

  context '.from_osi class builder' do
    subject { IB::Option.from_osi 'AAPL130119C00500000' }

    it 'builds a valid Option contract from OSI code' do
      subject.should be_an IB::Option
      subject.should be_valid
      subject.symbol.should == 'AAPL'
      subject.expiry.should == '130118' # <- NB: Change in date!
      subject.right.should == :call
      subject.strike.should == 500
      #subject.osi.should == 'AAPL  130119C00500000'
    end

    it_behaves_like 'Contract'
  end

end # describe IB::Contract