oughtve 110.e2f5bb28

data/spec/bootstrap_creates_db_spec.rb

@@ -0,0 +1,38 @@
+
+require "fileutils"
+require "tmpdir"
+
+# We do not want spec_helper since we must check the bootstrap here.
+$LOAD_PATH << "#{File.dirname __FILE__}/../lib"
+require "oughtve"
+
+
+describe Oughtve, "initial bootstrap using --bootstrap" do
+
+  before :all do
+    # Delete the dir created by the spec runner to simplify
+    FileUtils.rm_r ENV["HOME"], :secure => true
+  end
+
+  before :each do
+    $VERBOSE, @verbose = nil, $VERBOSE
+    FileUtils.mkdir_p ENV["HOME"]
+  end
+
+  after :each do
+    FileUtils.rm_r ENV["HOME"], :secure => true
+    $VERBOSE = @verbose
+  end
+
+
+# Behaviour
+
+  it "creates a Sqlite database ~/.oughtve/db" do
+    File.exist?(Oughtve::Database::Path).should == false
+
+    Oughtve.run %w[ --bootstrap ]
+
+    File.exist?(Oughtve::Database::Path).should == true
+  end
+
+end

data/spec/bootstrap_creates_default_tangent_spec.rb

@@ -0,0 +1,40 @@
+require "fileutils"
+require "tmpdir"
+
+# We do not want spec_helper since we must check the bootstrap here.
+$LOAD_PATH << "#{File.dirname __FILE__}/../lib"
+require "oughtve"
+
+
+describe Oughtve, "initial bootstrap using --bootstrap" do
+
+  before :all do
+    # Delete the dir created by the spec runner to simplify
+    FileUtils.rm_r ENV["HOME"], :secure => true
+  end
+
+  before :each do
+    $VERBOSE, @verbose = nil, $VERBOSE
+    FileUtils.mkdir_p ENV["HOME"]
+  end
+
+  after :each do
+    FileUtils.rm_r ENV["HOME"], :secure => true
+    $VERBOSE = @verbose
+  end
+
+
+# Behaviour
+
+  it "creates the 'default' tangent at /" do
+    lambda { Oughtve::Tangent.all.size.should == 0 }.should raise_error
+
+    Oughtve.run %w[ --bootstrap ]
+
+    Oughtve::Tangent.all.size.should == 1
+    default = Oughtve::Tangent.first
+    default.dir.should == "/"
+    default.name.should == "default"
+  end
+
+end

data/spec/bootstrap_raises_if_db_exists_spec.rb

@@ -0,0 +1,37 @@
+
+require "fileutils"
+require "tmpdir"
+
+# We do not want spec_helper since we must check the bootstrap here.
+$LOAD_PATH << "#{File.dirname __FILE__}/../lib"
+require "oughtve"
+
+
+describe Oughtve, "initial bootstrap using --bootstrap" do
+
+  before :all do
+    # Delete the dir created by the spec runner to simplify
+    FileUtils.rm_r ENV["HOME"], :secure => true
+  end
+
+  before :each do
+    $VERBOSE, @verbose = nil, $VERBOSE
+    FileUtils.mkdir_p ENV["HOME"]
+  end
+
+  after :each do
+    FileUtils.rm_r ENV["HOME"], :secure => true
+    $VERBOSE = @verbose
+  end
+
+
+# Behaviour
+
+  it "raises an error if a database file already exists" do
+    FileUtils.mkdir_p File.dirname(Oughtve::Database::Path)
+    FileUtils.touch Oughtve::Database::Path
+
+    lambda { Oughtve.run %w[ --bootstrap ] }.should raise_error(OughtveError)
+  end
+
+end

data/spec/chapter_spec.rb

@@ -0,0 +1,36 @@
+require File.join File.dirname(__FILE__), "spec_helper"
+
+describe Oughtve, "starting a new chapter" do
+
+  before :each do
+    Oughtve.run %w[ --new --tangent tangy --directory /tmp ]
+    Oughtve.run %w[ --scribe --tangent tangy Hi bob! ]
+    Oughtve.run %w[ --scribe --tangent tangy Hi Mike! ]
+    Oughtve.run %w[ --scribe --tangent tangy Hi james! ]
+  end
+
+  after :each do
+    Oughtve::Tangent.all(:name.not => "default").each {|t| t.destroy }
+  end
+
+  it "moves previous chapter to chapters and replaces it as current_chapter" do
+    tangent = Oughtve::Tangent.first :name => "tangy"
+
+    previous = tangent.current_chapter
+
+    previous.should_not == nil
+    tangent.chapters.should == [previous]
+
+    Oughtve.run %w[ --chapter End of part 1 --tangent tangy ]
+
+    tangent.reload
+    current = tangent.current_chapter
+
+    current.should_not == nil
+    current.should_not == previous
+
+    tangent.chapters.include?(previous).should == true
+    tangent.chapters.include?(current).should == true
+  end
+
+end

data/spec/delete_spec.rb

@@ -0,0 +1,59 @@
+require File.join File.dirname(__FILE__), "spec_helper"
+
+require "fileutils"
+require "ostruct"
+
+
+describe Oughtve, "deleting tangents" do
+  before :each do
+    Oughtve.run %w[ --new --tangent doomed ]
+  end
+
+  after :each do
+    Oughtve::Tangent.all(:name.not => "default").each {|t| t.destroy }
+  end
+
+  it "requires tangent name" do
+    lambda { Oughtve.run %w[ --delete ] }.should raise_error
+    lambda { Oughtve.run %W[ --delete --directory #{Dir.pwd} ] }.should raise_error
+  end
+
+  it "does not allow deleting the default tangent" do
+    lambda { Oughtve.run %w[ --delete --tangent default ] }.should raise_error
+  end
+
+  it "raises if tangent name not found" do
+    lambda { Oughtve.run %w[ --delete --tangent Doomed ] }.should raise_error
+    lambda { Oughtve.run %w[ --delete --tangent uggabugga ] }.should raise_error
+  end
+
+  it "deletes the Tangent object" do
+    Oughtve::Tangent.all(:dir.not => "/").size.should == 1
+    Oughtve.run %w[ --delete --tangent doomed ]
+    Oughtve::Tangent.all(:dir.not => "/").size.should == 0
+  end
+
+end
+
+describe Oughtve, "deleting tangents with direct parameter to --delete" do
+  before :each do
+    Oughtve.run %w[ --new --tangent doomed ]
+  end
+
+  after :each do
+    Oughtve::Tangent.all(:name.not => "default").each {|t| t.destroy }
+  end
+
+  it "deletes the tangent named as the parameter" do
+    Oughtve::Tangent.all(:dir.not => "/").size.should == 1
+    Oughtve.run %w[ --delete doomed ]
+    Oughtve::Tangent.all(:dir.not => "/").size.should == 0
+  end
+
+  it "gives some kind of a confirmation" do
+    output = Oughtve.run %w[ --delete doomed ]
+
+    output.should =~ /doomed/
+    output.should =~ /deleted/i
+  end
+end

data/spec/list_spec.rb

@@ -0,0 +1,25 @@
+require File.join File.dirname(__FILE__), "spec_helper"
+
+describe Oughtve, "listing defined tangents" do
+
+  before :all do
+    Oughtve.run %w[ --new --tangent tangy --directory /tmp ]
+  end
+
+  it "shows name and base directory of each tangent in the system" do
+    outputs = Oughtve.run(%w[ --list ]).split "\n"
+
+    # First line is a banner
+    outputs.shift
+    outputs.shift
+
+    line = outputs.shift
+    line.should =~ /default/
+    line.should =~ /\//
+
+    line = outputs.shift
+    line.should =~ /tangy/
+    line.should =~ /\/tmp/
+  end
+
+end

data/spec/scribe_spec.rb

@@ -0,0 +1,137 @@
+require File.join File.dirname(__FILE__), "spec_helper"
+
+require "stringio"
+
+
+describe Oughtve, "scribing a new note with Tangent specified" do
+
+  before :each do
+    Oughtve.run %w[ --new --tangent scriby --directory /var ]
+    Oughtve.run %w[ --new --tangent other --directory /tmp ]
+  end
+
+  after :each do
+    Oughtve::Verse.all.each {|t| t.destroy }
+    Oughtve::Chapter.all.each {|t| t.destroy }
+    Oughtve::Tangent.all(:dir.not => "/").each {|t| t.destroy }
+  end
+
+  it "creates a new Verse under the Tangent specified" do
+    Oughtve.run %w[ --scribe --tangent scriby --text Hi\ there ]
+
+    verses = Oughtve::Tangent.first(:name => "scriby").current_chapter.verses
+    verses.size.should == 1
+    verses.first.text.should == "Hi there"
+  end
+
+  it "raises an error if the name cannot be found" do
+    lambda { Oughtve.run %w[ --scribe --tangent nonesuch --text Uh-oh! ] }.should raise_error
+  end
+
+end
+
+describe Oughtve, "scribing a new note with directory specified" do
+
+  before :each do
+    Oughtve.run %w[ --new --tangent scriby --directory /var ]
+    Oughtve.run %w[ --new --tangent other --directory /tmp ]
+  end
+
+  after :each do
+    Oughtve::Verse.all.each {|t| t.destroy }
+    Oughtve::Chapter.all.each {|t| t.destroy }
+    Oughtve::Tangent.all(:dir.not => "/").each {|t| t.destroy }
+  end
+
+  it "creates a new Verse under the Tangent for the directory" do
+    Oughtve.run %w[ --scribe --directory /var --text Ho\ there ]
+
+    verses = Oughtve::Tangent.first(:name => "scriby").current_chapter.verses
+    verses.size.should == 1
+    verses.first.text.should == "Ho there"
+  end
+
+end
+
+describe Oughtve, "scribing a new note without specifying a Tangent or directory" do
+
+  before :each do
+    Oughtve.run %w[ --new --tangent scriby ]
+    Oughtve.run %w[ --new --tangent other --directory /tmp ]
+  end
+
+  after :each do
+    Oughtve::Verse.all.each {|t| t.destroy }
+    Oughtve::Chapter.all.each {|t| t.destroy }
+    Oughtve::Tangent.all(:dir.not => "/").each {|t| t.destroy }
+  end
+
+  it "creates a new Verse under the Tangent for current directory" do
+    Oughtve.run %w[ --scribe --text Hu\ there ]
+
+    verses = Oughtve::Tangent.first(:name => "scriby").current_chapter.verses
+    verses.size.should == 1
+    verses.first.text.should == "Hu there"
+  end
+
+end
+
+describe Oughtve, "scribing a new note" do
+
+  before :each do
+    Oughtve.run %w[ --new --tangent scriby ]
+    Oughtve.run %w[ --new --tangent other --directory /tmp ]
+  end
+
+  after :each do
+    Oughtve::Verse.all.each {|t| t.destroy }
+    Oughtve::Chapter.all.each {|t| t.destroy }
+    Oughtve::Tangent.all(:dir.not => "/").each {|t| t.destroy }
+
+    $stdin = STDIN
+  end
+
+  it "stores the time the note was created" do
+    before = Time.now.to_f
+    Oughtve.run %w[ --scribe --text He\ there ]
+    after = Time.now.to_f
+
+    verses = Oughtve::Tangent.first(:name => "scriby").current_chapter.verses
+    verses.size.should == 1
+    verses.first.text.should == "He there"
+
+    (before..after).should include(verses.first.time.to_f)
+  end
+
+  it "is not stricken" do
+    Oughtve.run %w[ --scribe --text Moo\ there ]
+
+    tangent = Oughtve::Tangent.first :name => "scriby"
+    (!!tangent.current_chapter.verses.first.struck).should_not == true
+  end
+
+  it "assumes any straggling nonoption parameters are a part of the text" do
+    Oughtve.run %w[ --scribe --text Aha there ]
+
+    verses = Oughtve::Tangent.first(:name => "scriby").current_chapter.verses
+    verses.size.should == 1
+    verses.first.text.should == "Aha there"
+  end
+
+  it "will read standard input if no text is given" do
+    $stdin = StringIO.new "Moo, this is standard\ninput!\n\nReally!\n"
+
+    Oughtve.run %w[ --scribe ]
+
+    verses = Oughtve::Tangent.first(:name => "scriby").current_chapter.verses
+    verses.size.should == 1
+    verses.first.text.should == "Moo, this is standard\ninput!\n\nReally!"
+  end
+
+  it "raises an error if no message is given even in standard input" do
+    $stdin = StringIO.new ""
+
+    lambda { Oughtve.run %w[ --scribe --tangent scriby ] }.should raise_error
+  end
+
+end

data/spec/show_spec.rb

@@ -0,0 +1,247 @@
+require File.join File.dirname(__FILE__), "spec_helper"
+
+describe Oughtve, "viewing notes given a tangent name" do
+
+  before :each do
+    Oughtve.run %w[ --new --tangent tangy --directory /tmp ]
+    Oughtve.run %w[ --scribe --tangent tangy Hi bob! ]
+    Oughtve.run %w[ --scribe --tangent tangy Hi Mike! ]
+    Oughtve.run %w[ --scribe --tangent tangy Hi james! ]
+  end
+
+  after :each do
+    Oughtve::Tangent.all(:name.not => "default").each {|t| t.destroy }
+  end
+
+  it "raises if named tangent cannot be found" do
+    Oughtve::Tangent.all.size.should == 2
+
+    lambda { Oughtve.run %w[  --show --tangent nonesuch ] }.should raise_error
+  end
+end
+
+describe Oughtve, "viewing notes without output options" do
+
+  before :each do
+    Oughtve.run %w[ --new --tangent tangy --directory /tmp ]
+    Oughtve.run %w[ --scribe --tangent tangy Hi bob! ]
+    Oughtve.run %w[ --scribe --tangent tangy Hi Mike! ]
+    Oughtve.run %w[ --scribe --tangent tangy Hi james! ]
+  end
+
+  after :each do
+    Oughtve::Tangent.all(:name.not => "default").each {|t| t.destroy }
+  end
+
+  it "produces a string containing text for all open notes for tangent" do
+    outputs = Oughtve.run(%w[ --show --tangent tangy ]).split "\n"
+    outputs.reject! {|line| line.nil? or line.empty? or line.strip =~ /^(-|=)+$/ }
+
+    outputs.shift.should =~ /tangy/
+    outputs.shift.should =~ /Open/
+    outputs.shift.should =~ /Hi james!/
+    outputs.shift.should =~ /Hi Mike!/
+    outputs.shift.should =~ /Hi bob!/
+  end
+
+end
+
+describe Oughtve, "viewing notes with --verbose" do
+
+  before :each do
+    Oughtve.run %w[ --new --tangent tangy --directory /tmp ]
+    Oughtve.run %w[ --scribe --tangent tangy Hi bob! ]
+    Oughtve.run %w[ --scribe --tangent tangy Hi Mike! ]
+    Oughtve.run %w[ --scribe --tangent tangy Hi james! ]
+  end
+
+  after :each do
+    Oughtve::Tangent.all(:name.not => "default").each {|t| t.destroy }
+  end
+
+  it "includes time when note was scribed" do
+    outputs = Oughtve.run(%w[ --show --tangent tangy --verbose ]).split "\n"
+    outputs.reject! {|line| line.nil? or line.empty? or line.strip =~ /^(-|=)+$/ }
+    verses = Oughtve::Tangent.first(:name => "tangy").current_chapter.verses.reverse
+
+    outputs.shift.should =~ /tangy/
+    outputs.shift.should =~ /Open/
+
+    output = outputs.shift
+    output.should =~ /Hi james!/
+    output.should =~ /##{verses[0].id}/
+    Time.parse(output.match(/\d{4}-\d{2}-\d{2} \d{2}:\d{2}:\d{2}/)[0]).to_i.should == verses[0].time.to_i
+
+    output = outputs.shift
+    output.should =~ /Hi Mike!/
+    output.should =~ /##{verses[1].id}/
+    Time.parse(output.match(/\d{4}-\d{2}-\d{2} \d{2}:\d{2}:\d{2}/)[0]).to_i.should == verses[1].time.to_i
+
+    output = outputs.shift
+    output.should =~ /Hi bob!/
+    output.should =~ /##{verses[2].id}/
+    Time.parse(output.match(/\d{4}-\d{2}-\d{2} \d{2}:\d{2}:\d{2}/)[0]).to_i.should == verses[2].time.to_i
+  end
+end
+
+describe Oughtve, "viewing notes" do
+
+  before :each do
+    Oughtve.run %w[ --new --tangent tangy --directory /tmp ]
+    Oughtve.run %w[ --scribe --tangent tangy Hi bob! ]
+    Oughtve.run %w[ --scribe --tangent tangy Hi Mike! ]
+    Oughtve.run %w[ --scribe --tangent tangy Hi james! ]
+    Oughtve.run %w[ --strike --tangent tangy --match Hi\ j ]
+  end
+
+  after :each do
+    Oughtve::Tangent.all(:name.not => "default").each {|t| t.destroy }
+  end
+
+  it "does not show stricken notes" do
+    outputs = Oughtve.run(%w[ --show --tangent tangy ]).split "\n"
+    outputs.reject! {|line| line.nil? or line.empty? or line.strip =~ /^(-|=)+$/ }
+
+    outputs.shift.should =~ /tangy/
+    outputs.shift.should =~ /Open/
+    outputs.shift.should =~ /Hi Mike!/
+    outputs.shift.should =~ /Hi bob!/
+
+    outputs.should be_empty
+  end
+end
+
+describe Oughtve, "viewing both stricken and open notes with all" do
+  before :each do
+    Oughtve.run %w[ --new --tangent tangy --directory /tmp ]
+    Oughtve.run %w[ --scribe --tangent tangy Hi bob! ]
+    Oughtve.run %w[ --scribe --tangent tangy Hi Mike! ]
+    Oughtve.run %w[ --scribe --tangent tangy Hi james! ]
+    Oughtve.run %w[ --strike --tangent tangy --match Hi\ M ]
+  end
+
+  after :each do
+    Oughtve::Tangent.all(:name.not => "default").each {|t| t.destroy }
+  end
+
+  it "shows stricken notes" do
+    outputs = Oughtve.run(%w[ --show all --tangent tangy ]).split "\n"
+    outputs.reject! {|line| line.nil? or line.empty? or line.strip =~ /^(-|=)+$/ }
+
+    outputs.shift.should =~ /tangy/
+    outputs.shift.should =~ /Open/
+
+    outputs.shift.should =~ /Hi james!/
+    outputs.shift.should =~ /Hi bob!/
+
+    outputs.shift.should =~ /Closed/
+    outputs.shift.should =~ /Hi Mike!/
+  end
+end
+
+describe Oughtve, "viewing every note for a tangent form current and previous chapters with everything" do
+  before :each do
+    Oughtve.run %w[ --new --tangent tangy --directory /tmp ]
+    Oughtve.run %w[ --scribe --tangent tangy Hi bob! ]
+    Oughtve.run %w[ --scribe --tangent tangy Hi Mike! ]
+    Oughtve.run %w[ --scribe --tangent tangy Hi james! ]
+    Oughtve.run %w[ --strike --tangent tangy --match Hi\ M ]
+    Oughtve.run %w[ --chapter End of part 1 --tangent tangy ]
+    Oughtve.run %w[ --scribe --tangent tangy Hi Mo! ]
+    Oughtve.run %w[ --scribe --tangent tangy Hi Bo! ]
+    Oughtve.run %w[ --strike --tangent tangy --match Hi\ B ]
+    Oughtve.run %w[ --chapter End of part 2 --tangent tangy ]
+    Oughtve.run %w[ --scribe --tangent tangy Hi go! ]
+    Oughtve.run %w[ --scribe --tangent tangy Hi lo! ]
+    Oughtve.run %w[ --strike --tangent tangy --match Hi\ l ]
+  end
+
+  after :each do
+    Oughtve::Tangent.all(:name.not => "default").each {|t| t.destroy }
+  end
+
+  it "shows all notes from this and previous chapters" do
+    outputs = Oughtve.run(%w[ --show old --tangent tangy ]).split "\n"
+    outputs.reject! {|line| line.nil? or line.empty? or line.strip =~ /^(-|=)+$/ }
+
+    outputs.shift.should =~ /tangy/
+
+    outputs.shift.should =~ /Open/
+    outputs.shift.should =~ /Hi go!/
+
+    outputs.shift.should =~ /Closed/
+    outputs.shift.should =~ /Hi lo!/
+
+    outputs.shift.should =~ /End of part 2/
+
+    outputs.shift.should =~ /Open/
+    outputs.shift.should =~ /Hi Mo!/
+
+    outputs.shift.should =~ /Closed/
+    outputs.shift.should =~ /Hi Bo!/
+
+    outputs.shift.should =~ /End of part 1/
+
+    outputs.shift.should =~ /Open/
+    outputs.shift.should =~ /Hi james!/
+    outputs.shift.should =~ /Hi bob!/
+
+    outputs.shift.should =~ /Closed/
+    outputs.shift.should =~ /Hi Mike!/
+  end
+end
+
+describe Oughtve, "dumping a Tangent to YAML" do
+  before :each do
+    Oughtve.run %w[ --new --tangent tangy --directory /tmp ]
+    Oughtve.run %w[ --scribe --tangent tangy Hi bob! ]
+    Oughtve.run %w[ --scribe --tangent tangy Hi Mike! ]
+    Oughtve.run %w[ --scribe --tangent tangy Hi james! ]
+    Oughtve.run %w[ --strike --tangent tangy --match Hi\ M ]
+    Oughtve.run %w[ --chapter End of part 1 --tangent tangy ]
+    Oughtve.run %w[ --scribe --tangent tangy Hi Mo! ]
+    Oughtve.run %w[ --scribe --tangent tangy Hi Bo! ]
+    Oughtve.run %w[ --strike --tangent tangy --match Hi\ B ]
+    Oughtve.run %w[ --chapter End of part 2 --tangent tangy ]
+    Oughtve.run %w[ --scribe --tangent tangy Hi go! ]
+    Oughtve.run %w[ --scribe --tangent tangy Hi lo! ]
+    Oughtve.run %w[ --strike --tangent tangy --match Hi\ l ]
+  end
+
+  after :each do
+    Oughtve::Tangent.all(:name.not => "default").each {|t| t.destroy }
+  end
+
+  it "contains all the data.. *sigh*" do
+    pending "Need to match all the data"
+    fail
+  end
+end
+
+describe Oughtve, "dumping a Tangent to JSON" do
+  before :each do
+    Oughtve.run %w[ --new --tangent tangy --directory /tmp ]
+    Oughtve.run %w[ --scribe --tangent tangy Hi bob! ]
+    Oughtve.run %w[ --scribe --tangent tangy Hi Mike! ]
+    Oughtve.run %w[ --scribe --tangent tangy Hi james! ]
+    Oughtve.run %w[ --strike --tangent tangy --match Hi\ M ]
+    Oughtve.run %w[ --chapter End of part 1 --tangent tangy ]
+    Oughtve.run %w[ --scribe --tangent tangy Hi Mo! ]
+    Oughtve.run %w[ --scribe --tangent tangy Hi Bo! ]
+    Oughtve.run %w[ --strike --tangent tangy --match Hi\ B ]
+    Oughtve.run %w[ --chapter End of part 2 --tangent tangy ]
+    Oughtve.run %w[ --scribe --tangent tangy Hi go! ]
+    Oughtve.run %w[ --scribe --tangent tangy Hi lo! ]
+    Oughtve.run %w[ --strike --tangent tangy --match Hi\ l ]
+  end
+
+  after :each do
+    Oughtve::Tangent.all(:name.not => "default").each {|t| t.destroy }
+  end
+
+  it "contains all the data.. *sigh*" do
+    pending "Need to match all the data"
+    fail
+  end
+end
+