present 0.0.2

data/ChangeLog

@@ -0,0 +1,4 @@
+== 0.0.1 / 2008-08-31
+
+* initial release
+

data/README

@@ -0,0 +1,41 @@
+
+= present
+
+Presentation tool for terminal.
+
+== Description
+
+This program is for terminal addicts.
+You can present your slide by using your favorite terminal.
+
+== Installation
+
+=== Archive Installation
+
+	rake install
+
+=== Gem Installation
+
+	gem install present
+
+
+== Features/Problems
+
+
+== Synopsis
+
+  present [options] file [duration] [page]
+
+    `file` specifies presentation file. there is an example in the sample/ dir.
+    
+    `duration` specifies expected duration in minute. This is optional. The
+    default value is 5 min.
+
+    `page` specifies the page number which will be started from. This is
+    optional. The default value is 1.
+
+== Copyright
+
+Author::    Genki Takiuchi <genki@s21g.com>
+Copyright:: Copyright (c) 2008 Genki Takiuchi
+License::   

data/Rakefile

@@ -0,0 +1,149 @@
+require 'rubygems'
+require 'rake'
+require 'rake/clean'
+require 'rake/testtask'
+require 'rake/packagetask'
+require 'rake/gempackagetask'
+require 'rake/rdoctask'
+require 'rake/contrib/rubyforgepublisher'
+require 'rake/contrib/sshpublisher'
+require 'fileutils'
+
+$:.unshift File.join(File.dirname(__FILE__), 'lib')
+require 'present'
+include FileUtils
+
+NAME              = "present"
+AUTHOR            = "Genki Takiuchi"
+EMAIL             = "genki@s21g.com"
+DESCRIPTION       = "Presentation tool for terminal."
+RUBYFORGE_PROJECT = "cocktail-party"
+HOMEPATH          = "http://#{RUBYFORGE_PROJECT}.rubyforge.org"
+BIN_FILES         = %w(present)
+
+VERS              = Present::VERSION
+REV = File.read(".svn/entries")[/committed-rev="(d+)"/, 1] rescue nil
+CLEAN.include ['**/.*.sw?', '*.gem', '.config']
+RDOC_OPTS = [
+	'--title', "#{NAME} documentation",
+	"--charset", "utf-8",
+	"--opname", "index.html",
+	"--line-numbers",
+	"--main", "README",
+	"--inline-source",
+]
+
+task :default => [:test]
+task :package => [:clean]
+
+Rake::TestTask.new("test") do |t|
+	t.libs   << "test"
+	t.pattern = "test/**/*_test.rb"
+	t.verbose = true
+end
+
+spec = Gem::Specification.new do |s|
+	s.name              = NAME
+	s.version           = VERS
+	s.platform          = Gem::Platform::RUBY
+	s.has_rdoc          = true
+	s.extra_rdoc_files  = ["README", "ChangeLog"]
+	s.rdoc_options     += RDOC_OPTS + ['--exclude', '^(examples|extras)/']
+	s.summary           = DESCRIPTION
+	s.description       = DESCRIPTION
+	s.author            = AUTHOR
+	s.email             = EMAIL
+	s.homepage          = HOMEPATH
+	s.executables       = BIN_FILES
+	s.rubyforge_project = RUBYFORGE_PROJECT
+	s.bindir            = "bin"
+	s.require_path      = "lib"
+	#s.autorequire       = ""
+	s.test_files        = Dir["test/*_test.rb"]
+
+	#s.add_dependency('activesupport', '>=1.3.1')
+	s.add_dependency('ncurses')
+	s.add_dependency('text')
+	s.add_dependency('escape')
+	#s.required_ruby_version = '>= 1.8.2'
+
+	s.files = %w(README ChangeLog Rakefile) +
+		Dir.glob("{bin,doc,test,lib,templates,generator,extras,website,script}/**/*") + 
+		Dir.glob("ext/**/*.{h,c,rb}") +
+		Dir.glob("examples/**/*.rb") +
+		Dir.glob("tools/*.rb") +
+		Dir.glob("rails/*.rb")
+
+	s.extensions = FileList["ext/**/extconf.rb"].to_a
+end
+
+Rake::GemPackageTask.new(spec) do |p|
+	p.need_tar = true
+	p.gem_spec = spec
+end
+
+task :install do
+	name = "#{NAME}-#{VERS}.gem"
+	sh %{rake package}
+	sh %{sudo gem install pkg/#{name}}
+end
+
+task :uninstall => [:clean] do
+	sh %{sudo gem uninstall #{NAME}}
+end
+
+
+Rake::RDocTask.new do |rdoc|
+	rdoc.rdoc_dir = 'html'
+	rdoc.options += RDOC_OPTS
+	rdoc.template = "resh"
+	#rdoc.template = "#{ENV['template']}.rb" if ENV['template']
+	if ENV['DOC_FILES']
+		rdoc.rdoc_files.include(ENV['DOC_FILES'].split(/,\s*/))
+	else
+		rdoc.rdoc_files.include('README', 'ChangeLog')
+		rdoc.rdoc_files.include('lib/**/*.rb')
+		rdoc.rdoc_files.include('ext/**/*.c')
+	end
+end
+
+desc "Publish to RubyForge"
+task :rubyforge => [:rdoc, :package] do
+	require 'rubyforge'
+	Rake::RubyForgePublisher.new(RUBYFORGE_PROJECT, 'takiuchi').upload
+end
+
+desc 'Package and upload the release to rubyforge.'
+task :release => [:clean, :package] do |t|
+	v = ENV["VERSION"] or abort "Must supply VERSION=x.y.z"
+	abort "Versions don't match #{v} vs #{VERS}" unless v == VERS
+	pkg = "pkg/#{NAME}-#{VERS}"
+
+	require 'rubyforge'
+	rf = RubyForge.new.configure
+	puts "Logging in"
+	rf.login
+
+	c = rf.userconfig
+#	c["release_notes"] = description if description
+#	c["release_changes"] = changes if changes
+	c["preformatted"] = true
+
+	files = [
+		"#{pkg}.tgz",
+		"#{pkg}.gem"
+	].compact
+
+	puts "Releasing #{NAME} v. #{VERS}"
+	rf.add_release RUBYFORGE_PROJECT, NAME, VERS, *files
+end
+
+desc 'Show information about the gem.'
+task :debug_gem do
+	puts spec.to_ruby
+end
+
+desc 'Update gem spec'
+task :gemspec do
+  open("#{NAME}.gemspec", 'w').write spec.to_ruby
+end

data/bin/present

@@ -0,0 +1,12 @@
+#!/usr/bin/env ruby
+$:.unshift File.join(File.dirname(__FILE__), '../lib')
+require 'optparse'
+require 'present'
+
+Version = Present::VERSION
+opt = OptionParser.new
+opt.banner = "Usage: present [options] file [duration] [page]"
+opt.on_tail('-v', '--version', 'Show version.'){puts opt.ver; exit}
+opt.order!(ARGV)
+
+Present.new(*ARGV).start

data/lib/present.rb

@@ -0,0 +1,227 @@
+require 'rubygems'
+require 'ncurses'
+require 'text'
+require 'escape'
+require 'nkf'
+require 'present/page'
+
+class Present
+  VERSION = '0.0.2'
+  TIOCGWINSZ = 0x5413
+
+  def initialize(path, timer = 5, page = 1)
+    @source = path
+    @script = NKF.nkf('-e', open(path).read)
+    @stanzas = @script.split(/\n\n+/)
+    str = [0, 0, 0, 0].pack("SSSS")
+    if $stdin.ioctl(TIOCGWINSZ, str) >= 0 then
+      @rows, @cols, xpixels, ypixels = str.unpack("SSSS")
+    else
+      @rows, @cols = 13, 40
+    end
+    @pages = @stanzas.map{|stanza| Page.new(stanza, self)}
+    @page = page.to_i - 1
+    @timer = timer.to_i * 60
+  end
+
+  def start
+    Ncurses.initscr
+    Ncurses.raw
+    Ncurses.cbreak
+    Ncurses.noecho
+    Ncurses.start_color
+    Ncurses.refresh
+    @win = Ncurses::WINDOW.new @rows - 1, @cols, 0, 0
+    @win.keypad true
+    Ncurses.nodelay @win, 1
+    @status = Ncurses::WINDOW.new 1, @cols + 1, @rows - 1, 0
+    @status.color_set 1, nil
+    @start = Time.now
+    @colors = {}
+    register_pair Ncurses::COLOR_BLACK, Ncurses::COLOR_WHITE
+    while page = @pages[@page]
+      @row = @rows / 4
+      paginate
+      page.start
+      
+      begin
+        input = @win.getch
+        case input
+        when 27, ?q; return # exit
+        when ?:; scan_command
+        when ?k, ?h, 259, 260; @page = [@page - 1, 0].max
+        when ?<; @page = 0
+        when ?>; @page = @pages.size - 1
+        when ?j, ?l, 10, 13, 32, 258, 261
+          @page = [@page + 1, @pages.size - 1].min
+        when ?r; reload
+        else
+          sleep 0.1
+          paginate
+        end
+      end while input == -1
+    end
+  ensure
+    Ncurses.endwin
+  end
+
+  def figlet(font, cols, text)
+    font = 'term' if mb?(text)
+    cmd = Escape.shell_command(['figlet', '-f', "#{font}.flf", '-w', cols.to_s])
+    IO.popen(cmd, 'r+') do |io|
+      io.write text
+      io.close_write
+      io.read
+    end
+  end
+
+  def reload
+    Ncurses.endwin
+    exec "#{$0} #{@source} #{@timer/60} #{@page + 1}"
+  end
+
+  def center(text, options = {})
+    return if text.empty?
+    font = options[:font] || 'mini'
+    text = figlet font, @cols, text
+    rows, cols = sizeof(text)
+    top = (@rows - rows)/2
+    left = (@cols - cols)/2
+    @win.attron Ncurses::A_BOLD
+    text = text.split("\n").each_with_index do |line, i|
+      mvwprintw top + i, left, line
+    end
+    @win.attroff Ncurses::A_BOLD
+  end
+
+  def caption(text, options = {})
+    return if text.empty?
+    font = options[:font] || 'mini'
+    text = figlet font, @cols, text
+    rows, cols = sizeof(text)
+    top = (@rows - rows - 2)/2
+    left = (@cols - cols)/2
+    @win.attron Ncurses::A_BOLD
+    text = text.split("\n").each_with_index do |line, i|
+      mvwprintw top + i, left, line
+    end
+    @win.attroff Ncurses::A_BOLD
+    @row = top + rows + 1
+  end
+
+  def line(text, options = {})
+    return @row += 1 if text.empty?
+    font = options[:font] || 'term'
+    @row = options[:row] if options[:row]
+    @row += options[:padding] if options[:padding]
+    text = figlet font, @cols, text
+    rows, cols = sizeof(text)
+    left = options[:left] || (@cols - cols)/2
+    left = @cols - cols - options[:right] if right = options[:right]
+    @win.attron Ncurses::A_BOLD if options[:bold]
+    text = text.split("\n").each_with_index do |line, i|
+      mvwprintw @row + i, left, line
+    end
+    @win.attroff Ncurses::A_BOLD if options[:bold]
+    @row += rows + options[:margin].to_i
+  end
+
+  def color(front, back = Ncurses::COLOR_BLACK)
+    if front =~ /^\d+$/
+      pair_id = front.to_i
+    elsif front.is_a?(String)
+      front = eval "Ncurses::COLOR_#{front.upcase}"
+    end
+    if back.is_a?(String)
+      back = eval "Ncurses::COLOR_#{back.upcase}"
+    end
+    pair_id ||= register_pair front, back
+    @win.color_set pair_id, nil
+  end
+
+  def wait(time)
+    if time == 0.0
+      case input = @status.getch
+      when ?j, 32, 10, 13, 27
+      else Ncurses.ungetch input
+      end
+    else
+      sleep time
+    end
+  end
+
+  def sizeof(text)
+    lines = text.split("\n")
+    cols = lines.map{|line| line.length}.max
+    [lines.size, cols]
+  end
+
+  def mb?(text)
+    text.split(//u).size != text.length
+  end
+
+  def paginate
+    @status.mvwprintw 0, 0, " " * @cols
+    pages = @pages.size
+    k = pages.to_s.length
+    j = 2 + k*2
+    @status.mvwprintw 0, 0, "%#{k}d/%#{k}d|" % [@page + 1, pages]
+    cols = @cols - 6 - j
+    q = cols % pages
+    r = q > 0 ? pages / q : 0
+    w = [cols / pages, 1].max
+    w += 1 if r > 0 && @page % r == r - 1
+    x = (@page*cols + pages/2) / pages
+    @status.mvwprintw 0, x + j, "*" * w
+    time = Time.now.to_i - @start.to_i
+    min, sec = time / 60, time % 60
+    @status.mvwprintw 0, cols + j, "|%02d:%02d" % [min, sec]
+    @status.refresh
+  end
+
+  def scan_command
+    @status.mvwprintw 0, 0, " "*@cols
+    @status.mvwprintw 0, 0, ':'
+    buf = []
+    begin
+      case input = @status.getch
+      when 10, 13; break
+      when 27; return nil
+      when 127; buf.pop
+      else buf << input
+      end
+      @status.mvwprintw 0, 1, " "*(@cols - 1)
+      @status.mvwprintw 0, 1, buf.pack('C*')
+      @status.refresh
+    end while input > 0
+    command, *args = buf.pack('C*').split(/\s+/)
+    command = "do_#{command}"
+    send command, *args rescue nil if respond_to? command
+  end
+
+  def register_pair(front, back)
+    key = [front, back]
+    return @colors[key] if @colors[key]
+    pair_id = @colors.size + 1
+    Ncurses.init_pair pair_id, front, back
+    @colors[key] = pair_id
+  end
+
+  def method_missing(method, *args, &block)
+    @win.send method, *args, &block
+  end
+
+  def do_go(page)
+    @page = [[0, page.to_i - 1].max, @pages.size - 1].min
+  end
+
+  def do_sh
+    Ncurses.endwin
+    system ENV['SHELL'] || 'sh'
+    Ncurses.resetty
+  end
+
+  def do_q
+    exit
+  end
+end

data/lib/present/page.rb

@@ -0,0 +1,55 @@
+class Present
+  class Page
+    def initialize(stanza, screen)
+      @lines = stanza.split("\n")
+      @screen = screen
+    end
+
+    def start
+      @screen.clear
+      stack = [['cap', '']]
+      execute_command = proc do
+        command, text = stack.pop
+        dispatch_command command, text
+        @screen.refresh
+      end
+      @lines.each do |line|
+        text, command = line.split(/\s+/, 2).reverse
+        if command
+          execute_command.call
+          stack.push [command, text]
+        else
+          stack.last[1] += "\n#{text}"
+        end
+      end
+      execute_command.call
+    end
+
+  private
+    def dispatch_command(command, text)
+      case command
+      when '='
+        @screen.caption text
+      when '-'
+        @screen.line text
+      when '<'
+        @screen.line text, :left => 1, :padding => 1
+      when '>'
+        @screen.line text, :right => 1, :padding => 1
+      when /(\++)(\-?)/
+        @screen.line '- ' + text, :left => $1.length*2 - 1,
+          :padding => $2.empty? ? 1 : 0
+      when '*'
+        @screen.line text, :row => 1, :bold => true
+      when '.'
+        @screen.center text.empty? ? "fin" : text, :font => 'mini'
+      when '#'
+        @screen.center text, :font => 'mini'
+      when '%'
+        @screen.color *text.split(/\s+/)
+      when ','
+        @screen.wait text.to_f
+      end
+    end
+  end
+end

data/test/present_test.rb

@@ -0,0 +1,5 @@
+require File.dirname(__FILE__) + '/test_helper.rb'
+
+require "test/unit"
+class PresentTest < Test::Unit::TestCase
+end

data/test/test_helper.rb

@@ -0,0 +1,3 @@
+require 'test/unit'
+require File.dirname(__FILE__) + '/../lib/present'
+

metadata

@@ -0,0 +1,102 @@
+--- !ruby/object:Gem::Specification 
+name: present
+version: !ruby/object:Gem::Version 
+  version: 0.0.2
+platform: ruby
+authors: 
+- Genki Takiuchi
+autorequire: 
+bindir: bin
+cert_chain: []
+
+date: 2008-08-31 00:00:00 +09:00
+default_executable: 
+dependencies: 
+- !ruby/object:Gem::Dependency 
+  name: ncurses
+  type: :runtime
+  version_requirement: 
+  version_requirements: !ruby/object:Gem::Requirement 
+    requirements: 
+    - - ">="
+      - !ruby/object:Gem::Version 
+        version: "0"
+    version: 
+- !ruby/object:Gem::Dependency 
+  name: text
+  type: :runtime
+  version_requirement: 
+  version_requirements: !ruby/object:Gem::Requirement 
+    requirements: 
+    - - ">="
+      - !ruby/object:Gem::Version 
+        version: "0"
+    version: 
+- !ruby/object:Gem::Dependency 
+  name: escape
+  type: :runtime
+  version_requirement: 
+  version_requirements: !ruby/object:Gem::Requirement 
+    requirements: 
+    - - ">="
+      - !ruby/object:Gem::Version 
+        version: "0"
+    version: 
+description: Presentation tool for terminal.
+email: genki@s21g.com
+executables: 
+- present
+extensions: []
+
+extra_rdoc_files: 
+- README
+- ChangeLog
+files: 
+- README
+- ChangeLog
+- Rakefile
+- bin/present
+- test/test_helper.rb
+- test/present_test.rb
+- lib/present
+- lib/present/page.rb
+- lib/present.rb
+has_rdoc: true
+homepage: http://cocktail-party.rubyforge.org
+post_install_message: 
+rdoc_options: 
+- --title
+- present documentation
+- --charset
+- utf-8
+- --opname
+- index.html
+- --line-numbers
+- --main
+- README
+- --inline-source
+- --exclude
+- ^(examples|extras)/
+require_paths: 
+- lib
+required_ruby_version: !ruby/object:Gem::Requirement 
+  requirements: 
+  - - ">="
+    - !ruby/object:Gem::Version 
+      version: "0"
+  version: 
+required_rubygems_version: !ruby/object:Gem::Requirement 
+  requirements: 
+  - - ">="
+    - !ruby/object:Gem::Version 
+      version: "0"
+  version: 
+requirements: []
+
+rubyforge_project: cocktail-party
+rubygems_version: 1.2.0
+signing_key: 
+specification_version: 2
+summary: Presentation tool for terminal.
+test_files: 
+- test/present_test.rb