xiki 0.5.0a

data/tests/console_test.rb

@@ -0,0 +1,11 @@
+require 'test/unit'
+$:.unshift File.expand_path("..")
+require 'console'
+require 'ol'
+class CodeTreeTest < Test::Unit::TestCase
+
+  def test_extract_method
+    assert_equal("ssh foo@foo.org", Console.ssh_line("/foo@foo.org/"))
+    assert_equal("ssh -p 1234 foo@foo.org", Console.ssh_line("foo@foo.org:1234"))
+  end
+end

data/tests/couch_db_test.rb

@@ -0,0 +1,12 @@
+require 'test/unit'
+$:.unshift File.expand_path("..")
+require 'couch_db'
+require 'ol'
+
+class CouchDbTest < Test::Unit::TestCase
+
+  def test_tmp
+    assert true
+  end
+
+end

data/tests/diff_log_test.rb

@@ -0,0 +1,43 @@
+require 'test/unit'
+$:.unshift "../"
+require 'diff_log'
+
+class FileTreeTest < Test::Unit::TestCase
+  # Should correctly format simple diff
+  def test_format
+    formatted = DiffLog.format("/projects/xiki/trunk/", "diff_log.rb",
+      "|--- /projects/xiki/trunk/diff_log.rb	2008-03-03 20:35:30.000000000 -0500
+       |+++ /tmp/latest-diff.txt	2008-03-03 20:35:44.000000000 -0500
+       |@@ -56,0 +57 @@
+       |+#new
+       |".gsub(/^ *\|/, '')
+       )
+
+    result =
+      "|/projects/xiki/trunk/
+       |  diff_log.rb
+       |    :57
+       |      +|#new
+       |".gsub(/^ *\|/, '')
+    assert_equal(result, formatted)
+  end
+
+  # Should correctly format simple diff
+  def test_format_without_path
+    formatted = DiffLog.format("/projects/xiki/trunk/", "diff_log.rb",
+      "|--- /projects/xiki/trunk/diff_log.rb	2008-03-03 20:35:30.000000000 -0500
+       |+++ /tmp/latest-diff.txt	2008-03-03 20:35:44.000000000 -0500
+       |@@ -56,0 +57 @@
+       |+#new
+       |".gsub(/^ *\|/, '')
+       )
+
+    result =
+      "|/projects/xiki/trunk/
+       |  diff_log.rb
+       |    :57
+       |      +|#new
+       |".gsub(/^ *\|/, '')
+    assert_equal(result, formatted)
+  end
+end

data/tests/el_mixin.rb

@@ -0,0 +1,16 @@
+class Elvar
+  def method_missing(func, *args, &block)
+    # Do nothing
+    print "B"
+  end
+end
+
+module ElMixin
+  def elvar
+    Elvar.new
+  end
+  def method_missing(func, *args, &block)
+    # Do nothing
+    print "B"
+  end
+end

data/tests/git_test.rb

@@ -0,0 +1,95 @@
+require 'test/unit'
+$:.unshift "../"
+require 'ol'
+require 'core_ext'
+require 'yaml'
+require 'git'
+
+class GitTest < Test::Unit::TestCase
+
+  @@status_raw = '
+    # On branch master
+    # Changes to be committed:
+    #   (use "git reset HEAD <file>..." to unstage)
+    #
+    #	new file:   unadded.txt
+    #	modified:   modified.rb
+    #
+    # Changed but not updated:
+    #   (use "git add <file>..." to update what will be committed)
+    #
+    #	modified:   changed.rb
+    #	modified:   modifiedandadded.rb
+    #
+    # Untracked files:
+    #   (use "git add <file>..." to include in what will be committed)
+    #
+    #	untracked.rb
+    #	untracked2.rb
+    '.unindent
+
+  @@status_parsed = '
+    | On branch master
+    | Changes to be committed:
+    |   (use "git reset HEAD <file>..." to unstage)
+    - new file: unadded.txt
+    - modified: modified.rb
+    | Changed but not updated:
+    |   (use "git add <file>..." to update what will be committed)
+    - modified: changed.rb
+    - modified: modifiedandadded.rb
+    | Untracked files:
+    |   (use "git add <file>..." to include in what will be committed)
+    - untracked.rb
+    - untracked2.rb
+    '.unindent
+
+  @@status_parsed_only_new = '
+    | On branch master
+    | Initial commit
+    | Untracked files:
+    |   (use "git add <file>..." to include in what will be committed)
+    - a.txt
+    nothing added to commit but untracked files present (use "git add" to track)
+    '.unindent
+
+  # Should parse status initially
+  def test_status_internal
+    result = Git.status_internal @@status_raw
+    assert_equal @@status_parsed, result
+  end
+
+  # Should parse status into hash of arrays
+  def test_status_to_hash
+
+    # Parse it
+    hash = Git.status_to_hash @@status_parsed
+
+    assert hash[:unadded]
+    assert_equal [
+      ['modified', 'changed.rb'],
+      ['modified', 'modifiedandadded.rb']],
+      hash[:unadded]
+
+    assert hash[:added]
+    assert_equal [
+      ['new file', 'unadded.txt'],
+      ['modified', 'modified.rb']],
+      hash[:added]
+
+    assert hash[:untracked]
+    assert_equal [
+      ['untracked', 'untracked.rb'],
+      ['untracked', 'untracked2.rb']],
+      hash[:untracked]
+  end
+
+  # Should handle only new
+  def test_status_to_hash_only_new
+    # Parse it
+    hash = Git.status_to_hash @@status_parsed_only_new
+
+    assert hash[:untracked]
+  end
+
+end

data/tests/keys_test.rb

@@ -0,0 +1,19 @@
+require 'test/unit'
+$:.unshift "../"
+require 'ol'
+require 'core_ext'
+require 'yaml'
+require 'keys'
+
+class GitTest < Test::Unit::TestCase
+
+  def test_words_to_letters
+    assert_equal "TE", Keys.words_to_letters("to_end")
+  end
+
+  def test_status_to_hash
+    assert_equal "C-t C-e", Keys.translate_keys("TE")
+    assert_equal "M-t C-e", Keys.translate_keys("_TE")
+  end
+
+end

data/tests/line_test.rb

@@ -0,0 +1,38 @@
+require 'test/unit'
+$:.unshift "../"
+require 'line'
+require 'core_ext'
+
+class LineTest < Test::Unit::TestCase
+
+  def test_normal
+    assert_equal "you", Line.without_label(:line=>"- hey: you")
+  end
+
+  def test_just_bullet
+    assert_equal "you", Line.without_label(:line=>"- you")
+  end
+
+  def test_blank
+    assert_equal "", Line.without_label(:line=>"- hey: ")
+  end
+
+  def test_with_indent
+    assert_equal "you", Line.without_label(:line=>"  - hey: you")
+    assert_equal "", Line.without_label(:line=>"    - hey: ")
+    assert_equal "you", Line.without_label(:line=>"    - you")
+  end
+
+  def test_leave_indent
+    assert_equal "  you", Line.without_label(:line=>"  - hey: you", :leave_indent=>true)
+    assert_equal "    ", Line.without_label(:line=>"    - hey: ", :leave_indent=>true)
+  end
+
+  # Make sure it doesn't mess up the string
+  def test_side_effects
+    before = "  - label: hey1"
+    Line.without_label(:line=>before)
+    assert_equal "  - label: hey1", before
+  end
+
+end

data/tests/merb_test.rb

@@ -0,0 +1,11 @@
+require 'test/unit'
+$:.unshift "../"
+require 'merb'
+require 'core_ext'
+
+class MerbTest < Test::Unit::TestCase
+
+  def test_name_from_dir
+    assert_equal "you", Merb.name_from_dir("/hey/you")
+  end
+end

data/tests/redmine_test.rb

@@ -0,0 +1,50 @@
+require 'test/unit'
+$:.unshift "../"
+require 'redmine'
+require 'core_ext'
+
+class RedmineTest < Test::Unit::TestCase
+
+  # Should correctly format simple diff
+  def test_redmine_to_xiki
+    before =
+      "#Dev Team Todo
+       ##h2
+       * Ad
+       * 70
+       ** Make them show
+       ".unindent
+
+    after =
+      "| Dev Team Todo
+       || h2
+       - Ad
+       - 70
+         - Make them show
+       ".unindent
+
+    assert_equal(after, Redmine.redmine_to_xiki(before))
+  end
+
+  # Should correctly format simple diff
+  def test_xiki_to_redmine
+    before =
+      "| Dev Team Todo
+       || h2
+       - Ad
+       - 70
+         - Make them show
+       ".unindent
+
+    after =
+      "#Dev Team Todo
+       ##h2
+       * Ad
+       * 70
+       ** Make them show
+       ".unindent
+
+    assert_equal(after, Redmine.xiki_to_redmine(before))
+  end
+
+end

data/tests/remote_test.rb

@@ -0,0 +1,31 @@
+require 'rubygems'
+require 'test/unit'
+$:.unshift "../"
+require 'remote'
+
+class RemoteTest < Test::Unit::TestCase
+
+  def test_split_root
+    assert_equal(['user', 'foo.com', '2122', '/var/main'], Remote.split_root('user@foo.com:2122/var/main'))
+    assert_equal(['user', 'foo.com', '2122', '/'], Remote.split_root('user@foo.com:2122/'))
+    assert_equal(['user', 'foo.com', '2122', '/'], Remote.split_root('user@foo.com:2122'))
+  end
+
+  def test_sort
+    txt = "ajax/
+        apcx.orig
+        css/
+        f.wav
+        ".gsub(/^ +/, '')
+
+    expected = ["ajax/", "css/", "apcx.orig", "f.wav"]
+    assert_equal(expected, Remote.sort(txt))
+  end
+
+  def test_split_root
+    assert_equal(["xiki", "xiki.org", "222", "/tmp"], Remote.split_root("xiki@xiki.org:222/tmp/"))
+    assert_equal(["xiki", "xiki.org", "22", "/tmp"], Remote.split_root("xiki@xiki.org/tmp/"))
+    assert_equal(["xiki", "xiki.org", "22", "/tmp"], Remote.split_root("/xiki@xiki.org/tmp/"))
+  end
+
+end

data/tests/rest_tree_test.rb

@@ -0,0 +1,70 @@
+require 'test/unit'
+$:.unshift File.expand_path("..")
+require 'rest_tree'
+require 'ol'
+
+class RestTreeTest < Test::Unit::TestCase
+
+  def test_handles?
+    assert RestTree.handles?(['GET http://foo.com', 'hey'])
+    assert ! RestTree.handles?(['HEY http://foo.com', 'hey'])
+  end
+
+  def test_extract_root_verb
+    list = ['POST http://foo.com', 'PUT hey']
+    assert_equal 'POST', RestTree.extract_root_verb(list)
+    assert_equal ['http://foo.com', 'PUT hey'], list
+  end
+
+  def test_extract_verb
+    line = 'POST hey'
+    assert_equal 'POST', RestTree.extract_verb(line)
+    assert_equal 'hey', line
+
+    line = 'DELETE'
+    assert_equal 'DELETE', RestTree.extract_verb(line)
+    assert line.empty?   # Should be nothing left
+
+    assert_equal nil, RestTree.extract_verb('hiya')
+  end
+
+  def test_launch_inner
+    # Single line
+    verb, path, body = RestTree.launch_inner ["PUT http://localhost:5984/foo/"], nil
+    assert_equal ['PUT', 'http://localhost:5984/foo/', nil], [verb, path, body]
+
+    # More path
+    verb, path, body = RestTree.launch_inner ["GET http://localhost:5984/foo/", "bar/"], nil
+    assert_equal ['GET', 'http://localhost:5984/foo/bar/', nil], [verb, path, body]
+
+    # More path and verb
+    verb, path, body = RestTree.launch_inner ['GET http://localhost:5984/foo/', 'bar/', 'POST'], nil
+    assert_equal ['POST', 'http://localhost:5984/foo/bar/', nil], [verb, path, body]
+
+    # More path, verb, and body
+    verb, path, body = RestTree.launch_inner ['GET http://localhost:5984/foo/', 'bar/', 'POST ["txt"]'], nil
+    assert_equal ['POST', 'http://localhost:5984/foo/bar/', '["txt"]'], [verb, path, body]
+  end
+
+  def test_launch_inner_with_children
+    # TODO Just verb with children
+    verb, path, body = RestTree.launch_inner ['GET http://localhost:5984/foo/', 'POST'], ['a', 'b']
+    assert_equal ['POST', 'http://localhost:5984/foo/', "a\nb\n"], [verb, path, body]
+
+    # TODO Quoted children (should be ignored)
+    verb, path, body = RestTree.launch_inner ['GET http://localhost:5984/foo/', 'POST'], ['|a', '|b']
+    assert_equal ['POST', 'http://localhost:5984/foo/', nil], [verb, path, body]
+
+
+  end
+
+  def test_remove_before_root
+    # No root anywhere
+    assert_equal [], RestTree.remove_before_root(["CodeTree.menu/"])
+    assert_equal ["GET http://foo.com"], RestTree.remove_before_root(['GET http://foo.com'])
+    assert_equal ["GET http://foo.com"], RestTree.remove_before_root(['crap', 'GET http://foo.com'])
+    assert_equal ["GET http://localhost:5984/mem/"], RestTree.remove_before_root(["CodeTree.menu/", "CouchDb.menu/", ".rest/", "mem/", "GET http://localhost:5984/mem/"])
+
+  end
+
+end

data/xiki.gemspec

@@ -0,0 +1,37 @@
+# Generated by jeweler
+# DO NOT EDIT THIS FILE DIRECTLY
+# Instead, edit Jeweler::Tasks in Rakefile, and run 'rake gemspec'
+# -*- encoding: utf-8 -*-
+
+Gem::Specification.new do |s|
+  s.name = "xiki"
+  s.version = "0.5.0a"
+
+  s.required_rubygems_version = Gem::Requirement.new(">= 0") if s.respond_to? :required_rubygems_version=
+  s.authors = ["Craig Muth"]
+  s.date = "2011-08-24"
+  s.executables = ["xiki"]
+  s.summary = "A shell console with GUI features."
+  s.description = "Xiki does what shell consoles do, but lets you edit everything at any time. It's trivial to make your own commands and menus to access other tools."
+  s.email = "craig.muth@gmail.com"
+  s.extra_rdoc_files = [
+    "LICENSE",
+    "README.markdown"
+  ]
+  files = `git ls-files`.split("\n")
+
+# TMP
+  files = files.select{|o| o !~ /^etc\/xiki/}
+
+  s.files = files
+  s.homepage = "http://xiki.org"
+  s.licenses = ["MIT"]
+  s.require_paths = ["."]
+  #   s.rubygems_version = "1.8.24"
+
+  #     current_version = Gem::Specification::CURRENT_SPECIFICATION_VERSION
+  #     s.specification_version = 3
+
+  s.add_development_dependency("rspec", ["~> 2.3.0"])
+
+end