reapack-index 1.0beta2 → 1.0beta3

data/test/test_index.rb

@@ -9,7 +9,7 @@ class TestIndex < MiniTest::Test
   end
 
   def teardown
-    File.delete @dummy_path if File.exists? @dummy_path
+    File.delete @dummy_path if File.exist? @dummy_path
   end
 
   def test_type_of
@@ -19,14 +19,43 @@ class TestIndex < MiniTest::Test
     assert_equal :script, ReaPack::Index.type_of('Track/instrument_track.eel')
   end
 
-  def test_source_for
-    assert_nil ReaPack::Index.source_for('http://google.com')
+  def test_url_template
+    index = ReaPack::Index.new @dummy_path
+    assert_nil index.url_template
+
+    index.url_template = 'https://get.cfillion.tk/?v=$version&f=$path'
+    assert_equal 'https://get.cfillion.tk/?v=$version&f=$path', index.url_template
+
+    index.url_template = 'https://google.com/$path'
+    assert_equal 'https://google.com/$path', index.url_template
+
+    error = assert_raises ReaPack::Index::Error do
+      index.url_template = 'no path placeholder!'
+    end
 
-    assert_equal 'https://github.com/User/Repo/raw/$commit/$path',
-      ReaPack::Index.source_for('git@github.com:User/Repo.git')
+    assert_match '$path', error.message
+    assert_equal 'https://google.com/$path', index.url_template
 
-    assert_equal 'https://github.com/User/Repo/raw/$commit/$path',
-      ReaPack::Index.source_for('https://github.com/User/Repo.git')
+    index.url_template = nil
+    assert_nil index.url_template
+  end
+
+  def test_url_template_unsupported_scheme
+    index = ReaPack::Index.new @dummy_path
+
+    error = assert_raises ReaPack::Index::Error do
+      index.url_template = 'scp://cfillion.tk/$path'
+    end
+
+    assert_match /invalid url/i, error.message
+  end
+
+  def test_files
+    index = ReaPack::Index.new @dummy_path
+    assert_empty index.files
+
+    index.files = ['a', 'b/c']
+    assert_equal ['a', 'b/c'], index.files
   end
 
   def test_validate_standalone
@@ -98,10 +127,9 @@ class TestIndex < MiniTest::Test
 
   def test_new_package
     index = ReaPack::Index.new @dummy_path
-    assert_empty index.files
-
     index.files = ['Category/Path/Instrument Track.lua']
-    index.source_pattern = '$path'
+    index.url_template = 'http://host/$path'
+
     index.scan index.files.first, <<-IN
       @version 1.0
       @changelog Hello World
@@ -122,7 +150,7 @@ class TestIndex < MiniTest::Test
     <reapack name="Instrument Track.lua" type="script">
       <version name="1.0">
         <changelog><![CDATA[Hello World]]></changelog>
-        <source platform="all">Category/Path/Instrument%20Track.lua</source>
+        <source platform="all">http://host/Category/Path/Instrument%20Track.lua</source>
       </version>
     </reapack>
   </category>
@@ -134,10 +162,9 @@ class TestIndex < MiniTest::Test
 
   def test_default_category
     index = ReaPack::Index.new @dummy_path
-    assert_empty index.files
-
     index.files = ['script.lua', 'Hello/World']
-    index.source_pattern = '$path'
+    index.url_template = 'http://host/$path'
+
     index.scan index.files.first, <<-IN
       @version 1.0
       @provides Hello/World
@@ -149,8 +176,8 @@ class TestIndex < MiniTest::Test
   <category name="Other">
     <reapack name="script.lua" type="script">
       <version name="1.0">
-        <source platform="all">script.lua</source>
-        <source platform="all" file="Hello/World">Hello/World</source>
+        <source platform="all">http://host/script.lua</source>
+        <source platform="all" file="Hello/World">http://host/Hello/World</source>
       </version>
     </reapack>
   </category>
@@ -164,9 +191,10 @@ class TestIndex < MiniTest::Test
   def test_edit_version_amend_off
     index = ReaPack::Index.new @real_path
     assert_equal false, index.amend
-    index.source_pattern = 'http://google.com/$path'
 
+    index.url_template = 'http://google.com/$path'
     index.files = ['Category Name/Hello World.lua']
+
     index.scan index.files.first, <<-IN
       @version 1.0
       @changelog New Changelog!
@@ -181,8 +209,9 @@ class TestIndex < MiniTest::Test
     index.amend = true
     assert_equal true, index.amend
 
-    index.source_pattern = 'http://google.com/$path'
+    index.url_template = 'http://google.com/$path'
     index.files = ['Category Name/Hello World.lua']
+
     index.scan index.files.first, <<-IN
       @version 1.0
       @changelog New Changelog!
@@ -212,9 +241,10 @@ class TestIndex < MiniTest::Test
   def test_edit_version_amend_unmodified
     index = ReaPack::Index.new @real_path
     index.amend = true
-    index.source_pattern = 'https://google.com/$path'
 
+    index.url_template = 'https://google.com/$path'
     index.files = ['Category Name/Hello World.lua']
+
     index.scan index.files.first, <<-IN
       @version 1.0
       @author cfillion
@@ -227,12 +257,10 @@ class TestIndex < MiniTest::Test
 
   def test_file_unlisted
     index = ReaPack::Index.new @dummy_path
-    index.source_pattern = 'http://google.com/$path'
+    index.url_template = 'http://google.com/$path'
 
     error = assert_raises ReaPack::Index::Error do
-     index.scan 'unlisted.lua', <<-IN
-       @version 1.0
-     IN
+     index.scan 'unlisted.lua', '@version 1.0'
     end
 
     assert_equal 'unlisted.lua: No such file or directory', error.message
@@ -246,38 +274,25 @@ class TestIndex < MiniTest::Test
     assert_equal expected, File.read(index.path)
   end
 
-  def test_source_pattern_unset
+  def test_make_url_without_template
     index = ReaPack::Index.new @dummy_path
     index.files = ['script.lua']
 
     error = assert_raises ReaPack::Index::Error do
-     index.scan index.files.first, <<-IN
-       @version 1.0
-     IN
+     index.scan index.files.first, '@version 1.0'
     end
 
-    assert_match /source pattern is unset/i, error.message
-  end
-
-  def test_source_pattern_no_path
-    index = ReaPack::Index.new @dummy_path
-    index.files = ['script.lua']
-    
-    assert_raises ArgumentError do
-      index.source_pattern = 'no path variable here'
-    end
+    assert_match /url template is unset/i, error.message
   end
 
-  def test_source_pattern_defaut_branch
+  def test_make_url_defaut_branch
     index = ReaPack::Index.new @dummy_path
     index.files = ['Category/script.lua']
-    index.source_pattern = '$commit/$path'
+    index.url_template = 'http://host/$commit/$path'
 
     index.commit = nil
 
-    index.scan index.files.first, <<-IN
-      @version 1.0
-    IN
+    index.scan index.files.first, '@version 1.0'
 
     expected = <<-XML
 <?xml version="1.0" encoding="utf-8"?>
@@ -285,7 +300,7 @@ class TestIndex < MiniTest::Test
   <category name="Category">
     <reapack name="script.lua" type="script">
       <version name="1.0">
-        <source platform="all">master/Category/script.lua</source>
+        <source platform="all">http://host/master/Category/script.lua</source>
       </version>
     </reapack>
   </category>
@@ -296,16 +311,14 @@ class TestIndex < MiniTest::Test
     assert_equal expected, File.read(@dummy_path)
   end
 
-  def test_source_pattern_commit
+  def test_make_url_commit
     index = ReaPack::Index.new @dummy_path
     index.files = ['Category/script.lua']
-    index.source_pattern = '$commit/$path'
+    index.url_template = 'http://host/$commit/$path'
 
     index.commit = @commit
 
-    index.scan index.files.first, <<-IN
-      @version 1.0
-    IN
+    index.scan index.files.first, '@version 1.0'
 
     expected = <<-XML
 <?xml version="1.0" encoding="utf-8"?>
@@ -313,7 +326,7 @@ class TestIndex < MiniTest::Test
   <category name="Category">
     <reapack name="script.lua" type="script">
       <version name="1.0">
-        <source platform="all">#{@commit}/Category/script.lua</source>
+        <source platform="all">http://host/#{@commit}/Category/script.lua</source>
       </version>
     </reapack>
   </category>
@@ -324,17 +337,9 @@ class TestIndex < MiniTest::Test
     assert_equal expected, File.read(@dummy_path)
   end
 
-  def test_nil_source_pattern
-    index = ReaPack::Index.new @dummy_path
-
-    error = assert_raises ArgumentError do
-     index.source_pattern = nil
-    end
-  end
-
   def test_missing_version
     index = ReaPack::Index.new @dummy_path
-    index.source_pattern = '$path'
+    index.url_template = 'http://host/$path'
     index.files = ['test.lua']
 
     error = assert_raises ReaPack::Index::Error do
@@ -346,7 +351,7 @@ class TestIndex < MiniTest::Test
 
   def test_changelog_boolean
     index = ReaPack::Index.new @dummy_path
-    index.source_pattern = '$path'
+    index.url_template = 'http://host/$path'
     index.files = ['test.lua']
 
     error = assert_raises ReaPack::Index::Error do
@@ -361,7 +366,7 @@ class TestIndex < MiniTest::Test
 
   def test_author
     index = ReaPack::Index.new @dummy_path
-    index.source_pattern = '$path'
+    index.url_template = 'http://host/$path'
     index.files = ['Category/script.lua']
 
     index.scan index.files.first, <<-IN
@@ -375,7 +380,7 @@ class TestIndex < MiniTest::Test
   <category name="Category">
     <reapack name="script.lua" type="script">
       <version name="1.0" author="cfillion">
-        <source platform="all">Category/script.lua</source>
+        <source platform="all">http://host/Category/script.lua</source>
       </version>
     </reapack>
   </category>
@@ -388,7 +393,7 @@ class TestIndex < MiniTest::Test
 
   def test_author_boolean
     index = ReaPack::Index.new @dummy_path
-    index.source_pattern = '$path'
+    index.url_template = 'http://host/$path'
     index.files = ['test.lua']
 
     error = assert_raises ReaPack::Index::Error do
@@ -403,7 +408,7 @@ class TestIndex < MiniTest::Test
 
   def test_author_multiline
     index = ReaPack::Index.new @dummy_path
-    index.source_pattern = '$path'
+    index.url_template = 'http://host/$path'
     index.files = ['test.lua']
 
     error = assert_raises ReaPack::Index::Error do
@@ -420,7 +425,7 @@ class TestIndex < MiniTest::Test
 
   def test_provides
     index = ReaPack::Index.new @dummy_path
-    index.source_pattern = '$path'
+    index.url_template = 'http://host/$path'
 
     index.files = [
       'Category/script.lua',
@@ -441,9 +446,9 @@ class TestIndex < MiniTest::Test
   <category name="Category">
     <reapack name="script.lua" type="script">
       <version name="1.0">
-        <source platform="all">Category/script.lua</source>
-        <source platform="all" file="../Resources/unicode.dat">Resources/unicode.dat</source>
-        <source platform="all" file="test.png">Category/test.png</source>
+        <source platform="all">http://host/Category/script.lua</source>
+        <source platform="all" file="../Resources/unicode.dat">http://host/Resources/unicode.dat</source>
+        <source platform="all" file="test.png">http://host/Category/test.png</source>
       </version>
     </reapack>
   </category>
@@ -456,8 +461,7 @@ class TestIndex < MiniTest::Test
 
   def test_provides_unlisted
     index = ReaPack::Index.new @dummy_path
-    index.source_pattern = '$path'
-
+    index.url_template = 'http://host/$path'
     index.files = ['Category/script.lua']
 
     error = assert_raises ReaPack::Index::Error do
@@ -473,7 +477,7 @@ class TestIndex < MiniTest::Test
 
   def test_provides_duplicate
     index = ReaPack::Index.new @dummy_path
-    index.source_pattern = '$path'
+    index.url_template = 'http://host/$path'
 
     error = assert_raises ReaPack::Index::Error do
      index.scan 'script.lua', <<-IN
@@ -490,7 +494,7 @@ class TestIndex < MiniTest::Test
 
   def test_provides_duplicate_platforms
     index = ReaPack::Index.new @dummy_path
-    index.source_pattern = '$path'
+    index.url_template = 'http://host/$path'
     index.files = ['script.lua', 'test.png', 'test.png']
 
     index.scan index.files.first, <<-IN
@@ -503,7 +507,7 @@ class TestIndex < MiniTest::Test
 
   def test_invalid_platform
     index = ReaPack::Index.new @dummy_path
-    index.source_pattern = '$path'
+    index.url_template = 'http://host/$path'
 
     error = assert_raises ReaPack::Index::Error do
       index.scan 'test.lua', <<-IN
@@ -519,7 +523,7 @@ class TestIndex < MiniTest::Test
 
   def test_provides_platform
     index = ReaPack::Index.new @dummy_path
-    index.source_pattern = '$path'
+    index.url_template = 'http://host/$path'
 
     index.files = [
       'Category/script.lua',
@@ -548,13 +552,13 @@ class TestIndex < MiniTest::Test
   <category name="Category">
     <reapack name="script.lua" type="script">
       <version name="1.0">
-        <source platform="all">Category/script.lua</source>
-        <source platform="windows" file="winall.png">Category/winall.png</source>
-        <source platform="win32" file="win32bit.png">Category/win32bit.png</source>
-        <source platform="win64" file="win64bit.png">Category/win64bit.png</source>
-        <source platform="darwin" file="osxall.png">Category/osxall.png</source>
-        <source platform="darwin32" file="osx32bit.png">Category/osx32bit.png</source>
-        <source platform="darwin64" file="osx64bit.png">Category/osx64bit.png</source>
+        <source platform="all">http://host/Category/script.lua</source>
+        <source platform="windows" file="winall.png">http://host/Category/winall.png</source>
+        <source platform="win32" file="win32bit.png">http://host/Category/win32bit.png</source>
+        <source platform="win64" file="win64bit.png">http://host/Category/win64bit.png</source>
+        <source platform="darwin" file="osxall.png">http://host/Category/osxall.png</source>
+        <source platform="darwin32" file="osx32bit.png">http://host/Category/osx32bit.png</source>
+        <source platform="darwin64" file="osx64bit.png">http://host/Category/osx64bit.png</source>
       </version>
     </reapack>
   </category>
@@ -567,11 +571,8 @@ class TestIndex < MiniTest::Test
 
   def test_main_platform
     index = ReaPack::Index.new @dummy_path
-    index.source_pattern = '$path'
-
-    index.files = [
-      'Category/script.lua',
-    ]
+    index.url_template = 'http://host/$path'
+    index.files = ['Category/script.lua']
 
     index.scan index.files.first, <<-IN
       @version 1.0
@@ -586,8 +587,8 @@ class TestIndex < MiniTest::Test
   <category name="Category">
     <reapack name="script.lua" type="script">
       <version name="1.0">
-        <source platform="darwin">Category/script.lua</source>
-        <source platform="win64">Category/script.lua</source>
+        <source platform="darwin">http://host/Category/script.lua</source>
+        <source platform="win64">http://host/Category/script.lua</source>
       </version>
     </reapack>
   </category>
@@ -598,12 +599,9 @@ class TestIndex < MiniTest::Test
     assert_equal expected, File.read(@dummy_path)
   end
 
-  def test_source_custom_url
+  def test_provides_custom_url
     index = ReaPack::Index.new @dummy_path
-
-    index.files = [
-      'Category/script.lua',
-    ]
+    index.files = ['Category/script.lua']
 
     index.scan index.files.first, <<-IN
       @version 1.0
@@ -681,14 +679,12 @@ class TestIndex < MiniTest::Test
 
   def test_version_time
     index = ReaPack::Index.new @dummy_path
-    index.source_pattern = '$path'
+    index.url_template = 'http://host/$path'
     index.files = ['Category/script.lua']
 
     index.time = Time.new 2016, 2, 11, 20, 16, 40, -5 * 3600
 
-    index.scan index.files.first, <<-IN
-      @version 1.0
-    IN
+    index.scan index.files.first, '@version 1.0'
 
     expected = <<-XML
 <?xml version="1.0" encoding="utf-8"?>
@@ -696,7 +692,7 @@ class TestIndex < MiniTest::Test
   <category name="Category">
     <reapack name="script.lua" type="script">
       <version name="1.0" time="2016-02-12T01:16:40Z">
-        <source platform="all">Category/script.lua</source>
+        <source platform="all">http://host/Category/script.lua</source>
       </version>
     </reapack>
   </category>
@@ -787,10 +783,7 @@ class TestIndex < MiniTest::Test
 
   def test_extension
     index = ReaPack::Index.new @dummy_path
-
-    index.files = [
-      'Extensions/reapack.ext',
-    ]
+    index.files = ['Extensions/reapack.ext']
 
     index.scan index.files.first, <<-IN
       @version 1.0
@@ -814,4 +807,87 @@ class TestIndex < MiniTest::Test
     index.write!
     assert_equal expected, File.read(@dummy_path)
   end
+
+  def test_effect
+    index = ReaPack::Index.new @dummy_path
+    index.url_template = 'http://host/$path'
+    index.files = ['Dynamics/super_compressor.jsfx']
+
+    index.scan index.files.first, '@version 1.0'
+
+    expected = <<-XML
+<?xml version="1.0" encoding="utf-8"?>
+<index version="1">
+  <category name="Dynamics">
+    <reapack name="super_compressor.jsfx" type="effect">
+      <version name="1.0">
+        <source platform="all">http://host/Dynamics/super_compressor.jsfx</source>
+      </version>
+    </reapack>
+  </category>
+</index>
+    XML
+
+    index.write!
+    assert_equal expected, File.read(@dummy_path)
+  end
+
+  def test_sort_tags
+    index = ReaPack::Index.new @dummy_path
+    index.url_template = 'http://host/$path'
+    index.files = ['Hello/world.lua']
+
+    index.description = 'hello'
+
+    index.scan index.files.first, '@version 1.0'
+
+    index.write!
+    assert_match /<category.+<metadata>/m, File.read(@dummy_path)
+  end
+
+  def test_sort_categories
+    index = ReaPack::Index.new @dummy_path
+    index.url_template = 'http://host/$path'
+    index.files = ['zebra/agent.lua', 'bee/agent.lua']
+
+    index.scan index.files.first, '@version 1.0'
+    index.scan index.files.last, '@version 1.0'
+
+    index.write!
+    assert_match /bee.+zebra/m, File.read(@dummy_path)
+  end
+
+  def test_sort_packages
+    index = ReaPack::Index.new @dummy_path
+    index.url_template = 'http://host/$path'
+    index.files = ['zebra.lua', 'bee.lua']
+
+    index.scan index.files.first, '@version 1.0'
+    index.scan index.files.last, '@version 1.0'
+
+    index.write!
+    assert_match /bee.+zebra/m, File.read(@dummy_path)
+  end
+
+  def test_name
+    index = ReaPack::Index.new @dummy_path
+    assert_empty index.name
+
+    index.name = 'Hello World'
+    assert_equal '1 modified metadata, empty index', index.changelog
+
+    error = assert_raises ReaPack::Index::Error do index.name = '.'; end
+    assert_raises ReaPack::Index::Error do index.name = 'hello/world'; end
+    assert_equal "Invalid name: '.'", error.message
+
+    assert_equal 'Hello World', index.name
+
+    expected = <<-XML
+<?xml version="1.0" encoding="utf-8"?>
+<index version="1" name="Hello World"/>
+    XML
+
+    index.write!
+    assert_equal expected, File.read(@dummy_path)
+  end
 end