w2tags 0.9.3

data/tasks/setup.rb

@@ -0,0 +1,268 @@
+# $Id$
+
+require 'rubygems'
+require 'rake'
+require 'rake/clean'
+require 'fileutils'
+require 'ostruct'
+
+class OpenStruct; undef :gem; end
+
+PROJ = OpenStruct.new(
+  # Project Defaults
+  :name => 'w2tags',
+  :summary => 'Its Way to Tags',
+  :description => 'w2tags is the way to tags, a short cut / macros. when it do it use some patern define in files (HOT file) to produce tags from minimal code to become full fledge tags',
+  :changes => nil,
+  :authors => 'Widi Harsojo',
+  :email => 'wharsojo@gmail.com',
+  :url => "\000",
+  :version => ENV['VERSION'] || '0.9.3',
+  :exclude => %w(tmp$ bak$ ~$ CVS \.svn/ \.git/ ^pkg/),
+  :release_name => ENV['RELEASE'],
+
+  # System Defaults
+  :ruby_opts => %w(-w),
+  :libs => [],
+  :manifest_file => 'Manifest.txt',
+  :history_file  => 'doc/History.rdoc',
+  :readme_file   => 'README.rdoc',
+
+  # Announce
+  :ann => OpenStruct.new(
+    :file => 'announcement.txt',
+    :text => nil,
+    :paragraphs => [],
+    :email => {
+      :from     => nil,
+      :to       => %w(ruby-talk@ruby-lang.org),
+      :server   => 'localhost',
+      :port     => 25,
+      :domain   => ENV['HOSTNAME'],
+      :acct     => nil,
+      :passwd   => nil,
+      :authtype => :plain
+    }
+  ),
+
+  # Gem Packaging
+  :gem => OpenStruct.new(
+    :dependencies => [],
+    :executables => nil,
+    :extensions => FileList['ext/**/extconf.rb'],
+    :files => nil,
+    :need_tar => false,
+    :need_zip => false,
+    :extras => {}
+  ),
+
+  # File Annotations
+  :notes => OpenStruct.new(
+    :exclude => %w(^tasks/setup\.rb$),
+    :extensions => %w(.txt .rb .erb) << '',
+    :tags => %w(FIXME OPTIMIZE TODO)
+  ),
+
+  # Rcov
+  :rcov => OpenStruct.new(
+    :dir => 'coverage',
+    :opts => %w[--sort coverage -T],
+    :threshold => 90.0,
+    :threshold_exact => false
+  ),
+
+  # Rdoc
+  :rdoc => OpenStruct.new(
+    :opts => [],
+    :include => %w(^lib/ ^bin/ ^ext/ \.txt$ \.rdoc$ MIT-LICENSE COPYING),
+    :exclude => %w(extconf\.rb$),
+    :main => nil,
+    :dir => 'doc',
+    :remote_dir => nil
+  ),
+
+  # Rubyforge
+  :rubyforge => OpenStruct.new(
+    :name => "\000"
+  ),
+
+  # Rspec
+  :spec => OpenStruct.new(
+    :files => FileList['spec/**/*_spec.rb'],
+    :opts => []
+  ),
+
+  # Subversion Repository
+  :svn => OpenStruct.new(
+    :root => nil,
+    :path => '',
+    :trunk => 'trunk',
+    :tags => 'tags',
+    :branches => 'branches'
+  ),
+
+  # Test::Unit
+  :test => OpenStruct.new(
+    :files => FileList['test/**/test_*.rb'],
+    :file  => 'test/all.rb',
+    :opts  => []
+  )
+)
+
+# Load the other rake files in the tasks folder
+rakefiles = Dir.glob('tasks/*.rake').sort
+rakefiles.unshift(rakefiles.delete('tasks/post_load.rake')).compact!
+import(*rakefiles)
+
+# Setup the project libraries
+%w(lib ext).each {|dir| PROJ.libs << dir if test ?d, dir}
+
+# Setup some constants
+WIN32 = %r/djgpp|(cyg|ms|bcc)win|mingw/ =~ RUBY_PLATFORM unless defined? WIN32
+
+DEV_NULL = WIN32 ? 'NUL:' : '/dev/null'
+
+def quiet( &block )
+  io = [STDOUT.dup, STDERR.dup]
+  STDOUT.reopen DEV_NULL
+  STDERR.reopen DEV_NULL
+  block.call
+ensure
+  STDOUT.reopen io.first
+  STDERR.reopen io.last
+  $stdout, $stderr = STDOUT, STDERR
+end
+
+DIFF = if WIN32 then 'diff.exe'
+       else
+         if quiet {system "gdiff", __FILE__, __FILE__} then 'gdiff'
+         else 'diff' end
+       end unless defined? DIFF
+
+SUDO = if WIN32 then ''
+       else
+         if quiet {system 'which sudo'} then 'sudo'
+         else '' end
+       end
+
+RCOV = WIN32 ? 'rcov.bat' : 'rcov'
+RDOC = WIN32 ? 'rdoc.bat' : 'rdoc'
+GEM  = WIN32 ? 'gem.bat'  : 'gem'
+
+%w(rcov spec/rake/spectask rubyforge bones facets/ansicode).each do |lib|
+  begin
+    require lib
+    Object.instance_eval {const_set "HAVE_#{lib.tr('/','_').upcase}", true}
+  rescue LoadError
+    Object.instance_eval {const_set "HAVE_#{lib.tr('/','_').upcase}", false}
+  end
+end
+HAVE_SVN = (Dir.entries(Dir.pwd).include?('.svn') and
+            system("svn --version 2>&1 > #{DEV_NULL}"))
+HAVE_GIT = (Dir.entries(Dir.pwd).include?('.git') and
+            system("git --version 2>&1 > #{DEV_NULL}"))
+
+# Reads a file at +path+ and spits out an array of the +paragraphs+
+# specified.
+#
+#    changes = paragraphs_of('History.txt', 0..1).join("\n\n")
+#    summary, *description = paragraphs_of('README.txt', 3, 3..8)
+#
+def paragraphs_of( path, *paragraphs )
+  title = String === paragraphs.first ? paragraphs.shift : nil
+  ary = File.read(path).delete("\r").split(/\n\n+/)
+
+  result = if title
+    tmp, matching = [], false
+    rgxp = %r/^=+\s*#{Regexp.escape(title)}/i
+    paragraphs << (0..-1) if paragraphs.empty?
+
+    ary.each do |val|
+      if val =~ rgxp
+        break if matching
+        matching = true
+        rgxp = %r/^=+/i
+      elsif matching
+        tmp << val
+      end
+    end
+    tmp
+  else ary end
+
+  result.values_at(*paragraphs)
+end
+
+# Adds the given gem _name_ to the current project's dependency list. An
+# optional gem _version_ can be given. If omitted, the newest gem version
+# will be used.
+#
+def depend_on( name, version = nil )
+  spec = Gem.source_index.find_name(name).last
+  version = spec.version.to_s if version.nil? and !spec.nil?
+
+  PROJ.gem.dependencies << case version
+    when nil; [name]
+    when %r/^\d/; [name, ">= #{version}"]
+    else [name, version] end
+end
+
+# Adds the given arguments to the include path if they are not already there
+#
+def ensure_in_path( *args )
+  args.each do |path|
+    path = File.expand_path(path)
+    $:.unshift(path) if test(?d, path) and not $:.include?(path)
+  end
+end
+
+# Find a rake task using the task name and remove any description text. This
+# will prevent the task from being displayed in the list of available tasks.
+#
+def remove_desc_for_task( names )
+  Array(names).each do |task_name|
+    task = Rake.application.tasks.find {|t| t.name == task_name}
+    next if task.nil?
+    task.instance_variable_set :@comment, nil
+  end
+end
+
+# Change working directories to _dir_, call the _block_ of code, and then
+# change back to the original working directory (the current directory when
+# this method was called).
+#
+def in_directory( dir, &block )
+  curdir = pwd
+  begin
+    cd dir
+    return block.call
+  ensure
+    cd curdir
+  end
+end
+
+# Scans the current working directory and creates a list of files that are
+# candidates to be in the manifest.
+#
+def manifest_files
+  files = []
+  exclude = Regexp.new(PROJ.exclude.join('|'))
+  Find.find '.' do |path|
+    path.sub! %r/^(\.\/|\/)/o, ''
+    next unless test ?f, path
+    next if path =~ exclude
+    files << path
+  end
+  files.sort!
+end
+
+# We need a "valid" method thtat determines if a string is suitable for use
+# in the gem specification.
+#
+class Object
+  def valid?
+    return !(self.empty? or self == "\000") if self.respond_to?(:to_str)
+    return false
+  end
+end
+
+# EOF

data/tasks/spec.rake

@@ -0,0 +1,55 @@
+# $Id$
+
+if HAVE_SPEC_RAKE_SPECTASK
+require 'spec/rake/verify_rcov'
+
+namespace :spec do
+
+  desc 'Run all specs with basic output'
+  Spec::Rake::SpecTask.new(:run) do |t|
+    t.ruby_opts = PROJ.ruby_opts
+    t.spec_opts = PROJ.spec.opts
+    t.spec_files = PROJ.spec.files
+    t.libs += PROJ.libs
+  end
+
+  desc 'Run all specs with text output'
+  Spec::Rake::SpecTask.new(:specdoc) do |t|
+    t.ruby_opts = PROJ.ruby_opts
+    t.spec_opts = PROJ.spec.opts + ['--format', 'specdoc']
+    t.spec_files = PROJ.spec.files
+    t.libs += PROJ.libs
+  end
+
+  if HAVE_RCOV
+    desc 'Run all specs with RCov'
+    Spec::Rake::SpecTask.new(:rcov) do |t|
+      t.ruby_opts = PROJ.ruby_opts
+      t.spec_opts = PROJ.spec.opts
+      t.spec_files = PROJ.spec.files
+      t.libs += PROJ.libs
+      t.rcov = true
+      t.rcov_dir = PROJ.rcov.dir
+      t.rcov_opts = PROJ.rcov.opts + ['--exclude', 'spec']
+    end
+
+    RCov::VerifyTask.new(:verify) do |t| 
+      t.threshold = PROJ.rcov.threshold
+      t.index_html = File.join(PROJ.rcov.dir, 'index.html')
+      t.require_exact_threshold = PROJ.rcov.threshold_exact
+    end
+
+    task :verify => :rcov
+    remove_desc_for_task %w(spec:clobber_rcov)
+  end
+
+end  # namespace :spec
+
+desc 'Alias to spec:run'
+task :spec => 'spec:run'
+
+task :clobber => 'spec:clobber_rcov' if HAVE_RCOV
+
+end  # if HAVE_SPEC_RAKE_SPECTASK
+
+# EOF

data/tasks/svn.rake

@@ -0,0 +1,48 @@
+# $Id$
+
+if HAVE_SVN
+
+unless PROJ.svn.root
+  info = %x/svn info ./
+  m = %r/^Repository Root:\s+(.*)$/.match(info)
+  PROJ.svn.root = (m.nil? ? '' : m[1])
+end
+PROJ.svn.root = File.join(PROJ.svn.root, PROJ.svn.path) unless PROJ.svn.path.empty?
+
+namespace :svn do
+
+  # A prerequisites task that all other tasks depend upon
+  task :prereqs
+
+  desc 'Show tags from the SVN repository'
+  task :show_tags => 'svn:prereqs' do |t|
+    tags = %x/svn list #{File.join(PROJ.svn.root, PROJ.svn.tags)}/
+    tags.gsub!(%r/\/$/, '')
+    tags = tags.split("\n").sort {|a,b| b <=> a}
+    puts tags
+  end
+
+  desc 'Create a new tag in the SVN repository'
+  task :create_tag => 'svn:prereqs' do |t|
+    v = ENV['VERSION'] or abort 'Must supply VERSION=x.y.z'
+    abort "Versions don't match #{v} vs #{PROJ.version}" if v != PROJ.version
+
+    svn = PROJ.svn
+    trunk = File.join(svn.root, svn.trunk)
+    tag = "%s-%s" % [PROJ.name, PROJ.version]
+    tag = File.join(svn.root, svn.tags, tag)
+    msg = "Creating tag for #{PROJ.name} version #{PROJ.version}"
+
+    puts "Creating SVN tag '#{tag}'"
+    unless system "svn cp -m '#{msg}' #{trunk} #{tag}"
+      abort "Tag creation failed" 
+    end
+  end
+
+end  # namespace :svn
+
+task 'gem:release' => 'svn:create_tag'
+
+end  # if PROJ.svn.path
+
+# EOF

data/tasks/test.rake

@@ -0,0 +1,38 @@
+# $Id$
+
+require 'rake/testtask'
+
+namespace :test do
+
+  Rake::TestTask.new(:run) do |t|
+    t.libs = PROJ.libs
+    t.test_files = if test(?f, PROJ.test.file) then [PROJ.test.file]
+                   else PROJ.test.files end
+    t.ruby_opts += PROJ.ruby_opts
+    t.ruby_opts += PROJ.test.opts
+  end
+
+  if HAVE_RCOV
+    desc 'Run rcov on the unit tests'
+    task :rcov => :clobber_rcov do
+      opts = PROJ.rcov.opts.dup << '-o' << PROJ.rcov.dir
+      opts = opts.join(' ')
+      files = if test(?f, PROJ.test.file) then [PROJ.test.file]
+              else PROJ.test.files end
+      files = files.join(' ')
+      sh "#{RCOV} #{files} #{opts}"
+    end
+
+    task :clobber_rcov do
+      rm_r 'coverage' rescue nil
+    end
+  end
+
+end  # namespace :test
+
+desc 'Alias to test:run'
+task :test => 'test:run'
+
+task :clobber => 'test:clobber_rcov' if HAVE_RCOV
+
+# EOF

data/test/enlightning.hot

@@ -0,0 +1,3 @@
+
+>>_w
+$0

data/test/feature.hot

@@ -0,0 +1,28 @@
+>>_d
+.rows$$ $0
+
+>>_x
+%x$$ $0
+
+>>_y
+%x$$ =$0
+
+>>_int
+%div#$0.reverse~ /
+
+>>_int2
+&tbl=dodol
+%input{type="text" id="&tbl!_$0" name="$0"}= @&tbl!.$0
+
+>>_form
+%form$${method="post" action="==$0"}
+
+>>_form2
+%form$${method="post" action="$0."}
+
+>>_form3
+%form$${method="post" action="$0{}{}{}."}
+
+>>_code
+%span$$ $0
+

data/test/parser_test.rb

@@ -0,0 +1,203 @@
+require 'test/unit'
+require 'rubygems'
+require 'w2tags'
+require 'w2tags_no_parsing'
+require 'w2tags_basic_usability'
+require 'w2tags_form'
+require 'w2tags_hot'
+require 'w2tags_hot_var'
+require 'w2tags_enlightning'
+
+class ParserTest < Test::Unit::TestCase
+
+  W2TAGS = W2Tags::Parser.new
+  W2TAGS.silent= true
+  
+  include W2tagsNoParsing
+  include W2tagsBasicUsability    
+  include W2tagsForm
+  include W2tagsHotVar
+  include W2tagsEnlightning
+  
+  def test_haml_like
+easy_test(<<W2TAGS____________,<<EXPECTED__________)
+%div dodol
+%div garut
+W2TAGS____________
+<div>dodol</div>
+<div>garut</div>
+EXPECTED__________
+      
+easy_test(<<W2TAGS____________,<<EXPECTED__________)
+%div
+  %div garut
+W2TAGS____________
+<div>
+  <div>garut</div>
+</div>
+EXPECTED__________
+
+easy_test(<<W2TAGS____________,<<EXPECTED__________)
+%div#container
+  %div.daerah garut
+W2TAGS____________
+<div id="container">
+  <div class="daerah">garut</div>
+</div>
+EXPECTED__________
+
+easy_test(<<W2TAGS____________,<<EXPECTED__________)
+#container
+  .daerah garut
+  #di.jawa barat
+W2TAGS____________
+<div id="container">
+  <div class="daerah">garut</div>
+  <div id="di" class="jawa">barat</div>
+</div>
+EXPECTED__________
+
+easy_test(<<W2TAGS____________,<<EXPECTED__________)
+#ids.dodol.garut
+  #ids.dodol.garut/
+W2TAGS____________
+<div id="ids" class="dodol garut">
+  <div id="ids" class="dodol garut"/>
+</div>
+EXPECTED__________
+      
+easy_test(<<W2TAGS____________,<<EXPECTED__________)
+#ids.dodol.garut{kota="malang"}
+  #ids.dodol.garut{kota="malang"} /
+W2TAGS____________
+<div id="ids" class="dodol garut" kota="malang">
+  <div id="ids" class="dodol garut" kota="malang"/>
+</div>
+EXPECTED__________
+
+  end
+  
+  def test_next_tags
+easy_test(<<W2TAGS____________,<<EXPECTED__________)
+%html
+  ^ 
+W2TAGS____________
+<html>
+  <head>
+  </head>
+</html>
+EXPECTED__________
+
+easy_test(<<W2TAGS____________,<<EXPECTED__________)
+%ul
+  ^ list 1;list 2
+%ol
+  ^ list 1;list 2
+W2TAGS____________
+<ul>
+  <li>list 1</li>
+  <li>list 2</li>
+</ul>
+<ol>
+  <li>list 1</li>
+  <li>list 2</li>
+</ol>
+EXPECTED__________
+
+easy_test(<<W2TAGS____________,<<EXPECTED__________)
+%dl
+  ^ list 1;list 2
+%dd
+  ^ list 1;list 2
+W2TAGS____________
+<dl>
+  <dt>list 1</dt>
+  <dt>list 2</dt>
+</dl>
+<dd>
+  <dt>list 1</dt>
+  <dt>list 2</dt>
+</dd>
+EXPECTED__________
+
+easy_test(<<W2TAGS____________,<<EXPECTED__________)
+%select
+  ^{value="1"} list 1
+  ^{value="2"} list 2
+W2TAGS____________
+<select>
+  <option value="1">list 1</option>
+  <option value="2">list 2</option>
+</select>
+EXPECTED__________
+
+easy_test(<<W2TAGS____________,<<EXPECTED__________)
+%form
+  ^ 1
+  ^ 2
+W2TAGS____________
+<form>
+  <input value="1"/>
+  <input value="2"/>
+</form>
+EXPECTED__________
+
+easy_test(<<W2TAGS____________,<<EXPECTED__________)
+%table
+  %tr
+    ^ header 1;header 2
+  %tr
+    ^ column 1;column 2
+W2TAGS____________
+<table>
+  <tr>
+    <th>header 1</th>
+    <th>header 2</th>
+  </tr>
+  <tr>
+    <td>column 1</td>
+    <td>column 2</td>
+  </tr>
+</table>
+EXPECTED__________
+  end
+  
+  def test_w2tags
+easy_test(<<W2TAGS____________,<<EXPECTED__________)
+:names
+W2TAGS____________
+<input name="names" />
+EXPECTED__________
+
+easy_test(<<W2TAGS____________,<<EXPECTED__________)
+:names#ids.classes OK
+W2TAGS____________
+<input name="names" id="ids" class="classes" value="OK"/>
+EXPECTED__________
+  end
+  
+  def test_hot_htm
+easy_test(<<W2TAGS____________,<<EXPECTED__________)
+%js jquery
+-js liveclick
+W2TAGS____________
+<script type="text/javascript" src="jquery.js" > </script>
+<script type="text/javascript" src="liveclick.js" > </script>
+EXPECTED__________
+
+easy_test(<<W2TAGS____________,<<EXPECTED__________)
+%css base
+-css layout
+W2TAGS____________
+<link rel="stylesheet" href="base.css" type="text/css" media="screen, projection" />
+<link rel="stylesheet" href="layout.css" type="text/css" media="screen, projection" />
+EXPECTED__________
+  end
+  
+  private
+  
+  def easy_test(w2tg,expected)
+    assert_equal(expected,W2TAGS::parse_line(w2tg,true).join)
+  end
+
+end

data/test/tricky.hot

@@ -0,0 +1,8 @@
+>>input
+<input *all*value="$0"/>
+
+>>text
+<input *all*type="text" value="$0"/>
+
+>>submit
+<input *all*type="submit" value="$0"/>

data/test/vars.hot

@@ -0,0 +1,30 @@
+>>_vars
+-!
+ $$
+ nm=$:
+ id=$#
+ cl=$.
+ at=$@
+
+>>_var2
+-!
+ $$
+ nm=*:
+ id=*#
+ cl=*.
+ at=*@
+
+>>_var3
+-!
+ *all*
+ *name*
+ *id*
+ *class*
+ *@
+
+>>_var4
+$me
+*code*
+
+>>_var5
+$tag