card 0.0.1 → 1.15.pre

data/mod/05_standard/spec/chunk/link_spec.rb

@@ -0,0 +1,61 @@
+# -*- encoding : utf-8 -*-
+
+describe Card::Chunk::Link do
+
+  it "should handle unknown cards" do
+    expect(render_content('[[Nixon]]')).to eq('<a class="wanted-card" href="/Nixon">Nixon</a>')
+  end
+
+  it 'should handle known cards' do
+    expect(render_content("[[A]]")).to eq('<a class="known-card" href="/A">A</a>')
+  end
+  
+  it 'should handle custom text' do
+    expect(render_content('[[Baines|Lyndon]]')).to eq('<a class="wanted-card" href="/Baines">Lyndon</a>')
+  end
+
+  it "should handle relative names" do
+    @card = Card.new :name=>'Kennedy'
+    expect(render_content('[[+Monroe]]'     )).to eq('<a class="wanted-card" href="/Kennedy+Monroe">Kennedy+Monroe</a>')
+    expect(render_content('[[_self+Exner]]' )).to eq('<a class="wanted-card" href="/Kennedy+Exner">Kennedy+Exner</a>')
+    expect(render_content('[[Onassis+]]'    )).to eq('<a class="wanted-card" href="/Onassis+Kennedy">Onassis+Kennedy</a>')
+  end
+
+  it "should handle relative names in context" do
+    @card = Card.new :name=>'Kennedy'
+    format_args = { :context_names => [ 'Kennedy'.to_name ] }
+    expect(render_content('[[+Monroe]]'    , format_args )).to eq('<a class="wanted-card" href="/Kennedy+Monroe">+Monroe</a>')
+    expect(render_content('[[_self+Exner]]', format_args )).to eq('<a class="wanted-card" href="/Kennedy+Exner">+Exner</a>')
+    expect(render_content('[[Onassis+]]'   , format_args )).to eq('<a class="wanted-card" href="/Onassis+Kennedy">Onassis</a>')
+  end
+
+  it "should handle relative urls" do
+    expect(render_content('[[/recent]]')).to eq('<a class="internal-link" href="/recent">/recent</a>')
+  end
+
+  it "should handle absolute urls" do
+    expect(render_content('[[http://google.com]]')).to eq('<a class="external-link" href="http://google.com">http://google.com</a>')
+  end
+
+  it "should escape spaces in cardnames with %20 (not +)" do
+    expect(render_content('[[Marie "Mad Dog" Deatherage|Marie]]')).to eq(
+      '<a class="wanted-card" href="/Marie_Mad_Dog_Deatherage?card%5Bname%5D=Marie+%22Mad+Dog%22+Deatherage">Marie</a>'
+    )
+  end
+
+  it "should not escape content outside of link" do
+    expect(render_content('wgw&nbsp; [[http://www.google.com|google]] &nbsp;  <br>')).to eq( 
+      "wgw&nbsp; <a class=\"external-link\" href=\"http://www.google.com\">google</a> &nbsp;  <br>"
+    )
+  end
+  
+  it "should handle inclusions in link text" do
+    expect(render_content('[[linkies|{{namies|name}}]]')).to eq('<a class="wanted-card" href="/linkies">namies</a>')
+  end
+  
+  it "should handle dot (.) in missing cardlink" do
+    expect(render_content("[[Wagn 1.10.12]]")).to eq('<a class="wanted-card" href="/Wagn_1_10_12?card%5Bname%5D=Wagn+1.10.12">Wagn 1.10.12</a>')
+  end
+
+end
+

data/mod/05_standard/spec/format/css_format_spec.rb

@@ -0,0 +1,5 @@
+# -*- encoding : utf-8 -*-
+
+describe Card::CssFormat do
+  # SPECSTUB
+end

data/mod/05_standard/spec/format/csv_format_spec.rb

@@ -0,0 +1,5 @@
+# -*- encoding : utf-8 -*-
+
+describe Card::CsvFormat do
+  # format has no methods
+end

data/mod/05_standard/spec/format/email_html_format_spec.rb

@@ -0,0 +1,5 @@
+# -*- encoding : utf-8 -*-
+
+describe Card::EmailHtmlFormat do
+  # SPECSTUB
+end

data/mod/05_standard/spec/format/file_format_spec.rb

@@ -0,0 +1,5 @@
+# -*- encoding : utf-8 -*-
+
+describe Card::FileFormat do
+  # format has no methods
+end

data/mod/05_standard/spec/format/js_format_spec.rb

@@ -0,0 +1,5 @@
+# -*- encoding : utf-8 -*-
+
+describe Card::JsFormat do
+  # format has no methods
+end

data/mod/05_standard/spec/format/json_format_spec.rb

@@ -0,0 +1,5 @@
+# -*- encoding : utf-8 -*-
+
+describe Card::JsonFormat do
+  # format has no methods
+end

data/mod/05_standard/spec/format/rss_format_spec.rb

@@ -0,0 +1,5 @@
+# -*- encoding : utf-8 -*-
+
+describe Card::RssFormat do
+  # SPECSTUB
+end

data/mod/05_standard/spec/format/xml_format_spec.rb

@@ -0,0 +1,5 @@
+# -*- encoding : utf-8 -*-
+
+describe Card::XmlFormat do
+  # format has no methods
+end

data/mod/05_standard/spec/set/all/account_spec.rb

@@ -0,0 +1,137 @@
+# -*- encoding : utf-8 -*-
+
+describe Card::Set::All::Account do
+  describe 'accountable?' do
+    
+    it 'should be false for cards with *accountable rule off' do
+      expect(Card['A'].accountable?).to eq(false)
+    end
+
+    it 'should be true for cards with *accountable rule on' do
+      Card::Auth.as_bot do
+        Card.create :name=>'A+*self+*accountable', :content=>'1'
+        Card.create :name=>'*account+*right+*create', :content=>'[[Anyone Signed In]]'
+      end
+      expect(Card['A'].accountable?).to eq(true)
+    end
+    
+  end
+  
+  describe "parties" do
+  
+    it "for Wagn Bot" do
+      Card::Auth.current_id = Card::WagnBotID
+      expect(Card::Auth.current.parties.sort).to eq([Card::WagnBotID, Card::AnyoneSignedInID, Card::AdministratorID])
+    end
+    
+    it "for Anonymous" do
+      Card::Auth.current_id = Card::AnonymousID
+      expect(Card::Auth.current.parties.sort).to eq([Card::AnonymousID])
+    end
+
+    context 'for Joe User' do
+      before do
+        @joe_user_card = Card::Auth.current
+        @parties = @joe_user_card.parties # note: must be called to test resets
+      end
+
+      it "should initially have only auth and self " do
+        expect(@parties).to eq([Card::AnyoneSignedInID, @joe_user_card.id])
+      end
+      
+      it 'should update when new roles are set' do
+        roles_card = @joe_user_card.fetch :trait=>:roles, :new=>{}
+        r1 = Card['r1']
+
+        Card::Auth.as_bot { roles_card.items = [ r1.id ] }        
+        expect(Card['Joe User'].parties).to eq(@parties)            # local cache still has old parties (permission does not change mid-request)        
+                                                               
+        Card::Cache.restore                                    # simulate new request -- clears local cache, where, eg, @parties would still be cached on card
+        Card::Auth.current_id = Card::Auth.current_id                # simulate new request -- current_id assignment clears several class variables
+        
+        new_parties = [ Card::AnyoneSignedInID, r1.id, @joe_user_card.id ]
+        expect(Card['Joe User'].parties).to eq(new_parties)         # @parties regenerated, now with correct values
+        expect(Card::Auth.current. parties).to eq(new_parties)
+        
+        # @joe_user_card.refresh(force=true).parties.should == new_parties   # should work, but now superfluous?
+      end
+    end
+    
+  end
+  
+  describe 'among?' do
+    it 'should be true for self' do
+      expect(Card::Auth.current.among?([Card::Auth.current_id])).to be_truthy
+    end
+  end
+  
+
+  describe "'+*email'" do
+    it 'should create a card and account card' do
+      jadmin = Card['joe admin']
+      Card::Auth.current_id = jadmin.id #simulate login to get correct from address
+      ja_email = jadmin.account.email
+
+      Card::Env[:params] = { :email => {:subject=>'Hey Joe!', :message=>'Come on in.'} }
+      Card.create :name=>'Joe New', :type_id=>Card::UserID, '+*account'=>{ '+*email'=> 'joe@new.com' }
+
+      c = Card['Joe New']
+      u = Card::Auth[ 'joe@new.com' ]
+      
+      expect(c).to eq(u)
+      expect(c.type_id).to eq(Card::UserID)
+=begin      
+      email = ActionMailer::Base.deliveries.last
+      email.to.should == ['joe@new.com']
+      email.subject.should == 'Hey Joe!'
+      email.from.should == [ ja_email ]
+=end
+    end
+  end
+  
+  context 'updates' do
+    before do
+      @card = Card['Joe User']
+    end
+    it "should handle email updates" do
+      @card.update_attributes! '+*account'=>{ '+*email'=>'joe@user.co.uk' }
+      expect(@card.account.email).to eq('joe@user.co.uk')
+    end
+  
+    it "should let Wagn Bot block accounts" do
+      Card::Auth.as_bot do
+        @card.account.status_card.update_attributes! :content => 'blocked'
+        expect(@card.account.blocked?).to be_truthy
+      end
+    end
+    
+    
+    it "should not allow a user to block or unblock himself" do
+      expect do
+        @card.account.status_card.update_attributes! :content => 'blocked'
+      end.to raise_error
+      expect(@card.account.blocked?).to be_falsey
+    end
+  end
+  
+  describe "#read_rules" do
+    before(:all) do
+      @read_rules = Card['joe_user'].read_rules
+    end
+
+
+    it "*all+*read should apply to Joe User" do
+      expect(@read_rules.member?(Card.fetch('*all+*read').id)).to be_truthy
+    end
+
+    it "9 more should apply to Joe Admin" do
+      # includes lots of account rules...
+      Card::Auth.as(:joe_admin) do
+        ids = Card::Auth.as_card.read_rules
+        expect(ids.length).to eq(@read_rules.size + 9)
+      end
+    end
+
+  end
+
+end

data/mod/05_standard/spec/set/all/attach_spec.rb

@@ -0,0 +1,9 @@
+# -*- encoding : utf-8 -*-
+
+describe Card::Set::All::Attach do
+  it 'should be triggered by image card creation' do
+    file = File.new("#{ Cardio.gem_root }/test/fixtures/mao2.jpg")
+    card = Card.create :name => "Bananamaster", :type=>'Image', :attach=>file
+    expect(card.attach.url).to match(/^\/files\/Bananamaster-original-\d+/)
+  end
+end

data/mod/05_standard/spec/set/all/comment_spec.rb

@@ -0,0 +1,5 @@
+# -*- encoding : utf-8 -*-
+
+describe Card::Set::All::Comment do
+  # SPECSTUB
+end

data/mod/05_standard/spec/set/all/email_html_spec.rb

@@ -0,0 +1,15 @@
+# -*- encoding : utf-8 -*-
+
+describe Card::EmailHtmlFormat do
+  it "renders full urls" do
+    Card::Env[:protocol] = 'http://'
+    Card::Env[:host] = 'www.fake.com'
+    expect(render_content('[[B]]', :format=>'email_html')).to eq('<a class="known-card" href="http://www.fake.com/B">B</a>')
+  end
+  
+  describe "raw view" do
+    it "renders missing included cards as blank" do
+      expect(render_content('{{strombooby}}', :format=>'email_html')).to eq('')
+    end
+  end
+end

data/mod/05_standard/spec/set/all/error_spec.rb

@@ -0,0 +1,9 @@
+# -*- encoding : utf-8 -*-
+
+describe Card::Set::All::Error do
+  describe 'missing view' do
+    it "should prompt to add" do
+      expect(render_content('{{+cardipoo|open}}').match(/Add \<span/ )).not_to be_nil
+    end
+  end
+end

data/mod/05_standard/spec/set/all/event_viz_spec.rb

@@ -0,0 +1,9 @@
+# -*- encoding : utf-8 -*-
+
+describe Card::Set::All::EventViz do
+  describe '#events' do
+    it "should have at least twenty events" do
+      expect(Card['A'].events( :update ).split("\n").length).to be > 20
+    end
+  end
+end

data/mod/05_standard/spec/set/all/history_spec.rb

@@ -0,0 +1,173 @@
+# -*- encoding : utf-8 -*-
+describe Card::Set::All::History do
+  context "history view" do
+    # before do
+    #   Card.create! :name=>"my histoer card"
+    # end
+    it 'should have a frame' do
+      history = render_card :history, :name=>"A"
+      assert_view_select history, 'div[class~="card-frame"]'
+    end
+    
+    
+    describe '#action_summary' do
+      subject do 
+        first = Card.fetch('First')
+        first.format.render_action_summary
+      end
+      it 'should have a summary' do
+        assert_view_select subject, 'del[class="diffdel diff-red"]', :text=>'chicken' 
+        assert_view_select subject, 'ins[class="diffins diff-green"]', :text=>'chick'         
+      end
+    end
+  end
+  
+  
+  describe '#create_act_and_action' do
+    let!(:act_start_cnt) {Card::Act.count}
+    let(:content)        {"Nobody expects the Spanish inquisition"}
+    let(:act)            {@card.acts.last}
+    let(:action)         {act.actions.last}
+    
+    context 'for single card' do
+      before do
+        @card = Card::Auth.as_bot do
+          Card.create :name=>"single card", :content=>content
+        end
+      end
+        
+      context 'when created' do
+        it 'adds new act' do
+          expect(Card::Act.count).to eq(act_start_cnt+1)
+          expect(act.card_id).to eq(@card.id)
+        end
+        it 'adds create action' do
+          expect(action.action_type).to eq(:create)
+        end
+      end
+      
+      context 'when updated' do
+        it 'adds no act if nothing changed' do
+          @card.update_attributes  :name=>"single card", :content=>content
+          expect(Card::Act.count).to eq(act_start_cnt+1)
+        end
+        it 'adds new act' do
+          @card.update_attributes :content=>"new content"
+          expect(Card::Act.count).to eq(act_start_cnt+2)
+        end
+      end
+      
+      context 'when deleted' do
+        before do
+          Card::Auth.as_bot do
+            @card.delete
+          end
+        end
+        it 'adds act' do
+          expect(Card::Act.count).to eq(act_start_cnt+2)
+        end
+        it 'adds delete action' do
+          expect(action.action_type).to eq(:delete)
+        end  
+        it 'adds trash change' do  
+          expect(action.changes.last.field).to eq('trash')
+          expect(action.changes.last.value).to be_truthy
+        end
+      end
+    end
+
+    context 'for subcard' do
+      before do
+        Card::Auth.as_bot do
+          @card = Card.create :name=>"left", :subcards=>{"+right" =>{ :content=>content}}
+          @left_action = act.actions[0]
+          @right_action = act.actions[2]
+          @plus_action = act.actions[1]
+        end
+      end
+    
+      context 'when created' do
+        it 'adds only a act for left card' do
+          expect(Card::Act.count).to eq(act_start_cnt+1)
+          expect(act.card).to eq(@card)
+        end
+    
+        it 'adds three actions' do
+          expect(act.actions.size).to eq(3)
+        end
+        it 'adds action for left part of type create' do
+          expect(@left_action.card.name).to eq("left")
+          expect(@left_action.action_type).to eq(:create)
+        end
+        it 'adds action for right part of type create' do
+          expect(@right_action.card.name).to eq("right")
+          expect(@right_action.action_type).to eq(:create)
+        end
+        it 'adds action for plus card of type create' do
+          expect(@plus_action.card.name).to eq("left+right")
+          expect(@plus_action.action_type).to eq(:create)
+        end
+        it 'adds content change' do
+          expect(@plus_action.changes.find_by_field(:db_content).value).to eq(content)
+        end
+        it 'adds superaction for plus card' do
+          expect(@plus_action.super_action_id).to eq(@left_action.id)
+        end
+      end
+      
+      context 'when updated' do
+        it 'adds act for left card' do
+          @card.update_attributes :subcards=>{"+right"=>{:content=>"New content", :db_content=>"New Content"}}
+          expect(Card::Act.count).to eq(act_start_cnt+2)
+          expect(act.card).to eq(@card)
+        end
+        it 'adds action for subcard' do
+          @card.update_attributes :subcards=>{"+right"=>{:content=>"New content", :content=>"New Content"}}
+          act = @card.acts.last
+          expect(act.actions.count).to eq(1)
+          expect(act.actions.last.action_type).to eq(:update)
+          expect(act.actions.last.card.name).to eq("left+right")
+        end
+      end
+    end
+    
+    context 'for plus card' do
+      before do
+        Card::Auth.as_bot do
+          @card = Card.create :name=>'left+right', :content=>content
+          @left_action = act.actions[1]
+          @plus_action = act.actions[0]
+          @right_action = act.actions[2]
+        end
+      end
+      
+      context 'adds' do
+        it 'only a act for plus card' do
+          expect(Card::Act.count).to eq(act_start_cnt+1)
+          expect(act.card_id).to eq(@card.id)
+        end
+        it 'three actions' do
+          expect(act.actions.size).to eq(3)
+        end            
+        it 'action for left part of type create' do
+          expect(@left_action.card.name).to eq("left")
+          expect(@left_action.action_type).to eq(:create)
+        end
+        it 'superaction for left part' do
+          expect(@left_action.super_action_id).to eq(@plus_action.id)
+        end
+        it 'action for right part of type create' do
+          expect(@right_action.card.name).to eq("right")
+          expect(@right_action.action_type).to eq(:create)
+        end
+        it 'action for plus card of type create' do
+          expect(@plus_action.card.name).to eq("left+right")
+          expect(@plus_action.action_type).to eq(:create)
+        end   
+        it 'content change' do
+          expect(@plus_action.changes.find_by_field(:db_content).value).to eq(content)
+        end
+      end
+    end
+  end
+end