ruby-terminfo 0.1.1

data/ChangeLog

@@ -0,0 +1,3 @@
+2007-04-10  Tanaka Akira  <akr@fsij.org>
+
+	* version 0.1 released.

data/README

@@ -0,0 +1,80 @@
+= ruby-terminfo - terminfo binding for Ruby
+
+== Author
+
+Tanaka Akira <akr@fsij.org>
+
+== Home Page
+
+http://www.a-k-r.org/ruby-terminfo/
+
+== Feature
+
+* easy to use method, control, for combination of tigetstr/tparm/tputs.
+* low-level terminfo binding (setupterm, tigetflag, tigetnum, tigetstr, tparm, tputs)
+* TIOCGWINSZ/TIOCSWINSZ ioctl for screen size 
+
+== Usage
+
+=== easy to use methods
+
+  require 'terminfo'
+  TermInfo.control("cuf", 7)    # cursor forward 7 columns
+  p TermInfo.screen_size        # use TIOCGWINSZ, LINES/COLUMNS env. or terminfo lines#/cols#
+
+=== low level methods
+
+  require 'terminfo'
+  t = TermInfo.new(ENV["TERM"], STDOUT)
+  print t.tputs(t.tparm(t.tigetstr("cuf"), 7), 1)  # cursor forward 7 columns
+  p TermInfo.tiocgwinsz(STDOUT)                    # use TIOCGWINSZ
+
+== Requirements
+
+* ruby : http://www.ruby-lang.org/
+
+== Download
+
+* latest release: http://www.a-k-r.org/ruby-terminfo/ruby-terminfo-0.1.tar.gz
+
+* development version in Subversion repository:
+
+  % svn co svn://svn@svn.a-k-r.org/akr/ruby-terminfo/trunk ruby-terminfo
+
+== Install
+
+  % ruby extconf.rb
+  % make
+  % make install
+
+== Reference Manual
+
+See rdoc/classes/TermInfo.html or
+http://www.a-k-r.org/ruby-terminfo/rdoc/classes/TermInfo.html
+
+== License
+
+The modified BSD licence
+
+  Redistribution and use in source and binary forms, with or without
+  modification, are permitted provided that the following conditions are met:
+  
+   1. Redistributions of source code must retain the above copyright notice, this
+      list of conditions and the following disclaimer.
+   2. Redistributions in binary form must reproduce the above copyright notice,
+      this list of conditions and the following disclaimer in the documentation
+      and/or other materials provided with the distribution.
+   3. The name of the author may not be used to endorse or promote products
+      derived from this software without specific prior written permission.
+  
+  THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR IMPLIED
+  WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES OF
+  MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO
+  EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL,
+  EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT
+  OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
+  INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
+  CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING
+  IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY
+  OF SUCH DAMAGE.
+

data/Rakefile

@@ -0,0 +1,143 @@
+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'
+include FileUtils
+
+NAME              = "ruby-terminfo"
+AUTHOR            = "Tanaka Akira"
+EMAIL             = "akr@fsij.org"
+DESCRIPTION       = "terminfo binding for Ruby"
+RUBYFORGE_PROJECT = "ruby-terminfo"
+HOMEPATH          = "http://#{RUBYFORGE_PROJECT}.rubyforge.org"
+BIN_FILES         = %w( )
+
+VERS              = "0.1.1"
+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.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("*.{c,rb}") +
+		Dir.glob("examples/**/*.rb") +
+		Dir.glob("tools/*.rb") +
+		Dir.glob("rails/*.rb")
+
+	s.extensions = ["extconf.rb"]
+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('**/*.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/extconf.rb

@@ -0,0 +1,53 @@
+# extconf.rb - a part of a Ruby binding for terminfo library.
+#
+# Copyright (C) 2007 Tanaka Akira. All rights reserved.
+# 
+# Redistribution and use in source and binary forms, with or without
+# modification, are permitted provided that the following conditions
+# are met:
+# 
+#  1. Redistributions of source code must retain the above copyright
+#     notice, this list of conditions and the following disclaimer.
+#  2. Redistributions in binary form must reproduce the above
+#     copyright notice, this list of conditions and the following
+#     disclaimer in the documentation and/or other materials provided
+#     with the distribution.
+#  3. The name of the author may not be used to endorse or promote
+#     products derived from this software without specific prior
+#     written permission.
+# 
+# THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
+# IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED
+# WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
+# ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY
+# DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
+# DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE
+# GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
+# INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY,
+# WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING
+# NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS
+# SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
+
+require 'mkmf'
+
+# GNU/Linux     -lncurses
+# FreeBSD       -lncurses
+# HP-UX         -lcurses
+
+have_library("ncurses", "setupterm") or
+have_library("curses", "setupterm") 
+
+have_type("rb_io_t", ["ruby.h", "rubyio.h"])
+have_struct_member("rb_io_t", "fd", ["ruby.h", "rubyio.h"])
+have_struct_member("OpenFile", "fd", ["ruby.h", "rubyio.h"])
+
+create_header
+create_makefile('terminfo')
+
+open("Makefile", "a") {|mfile|
+  mfile.puts <<'End'
+rdoc:
+	rdoc --op rdoc terminfo.c lib/terminfo.rb
+End
+}
+

data/lib/terminfo.rb

@@ -0,0 +1,140 @@
+# terminfo.rb - a part of a Ruby binding for terminfo library.
+#
+# Copyright (C) 2007 Tanaka Akira. All rights reserved.
+# 
+# Redistribution and use in source and binary forms, with or without
+# modification, are permitted provided that the following conditions
+# are met:
+# 
+#  1. Redistributions of source code must retain the above copyright
+#     notice, this list of conditions and the following disclaimer.
+#  2. Redistributions in binary form must reproduce the above
+#     copyright notice, this list of conditions and the following
+#     disclaimer in the documentation and/or other materials provided
+#     with the distribution.
+#  3. The name of the author may not be used to endorse or promote
+#     products derived from this software without specific prior
+#     written permission.
+# 
+# THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
+# IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED
+# WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
+# ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY
+# DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
+# DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE
+# GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
+# INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY,
+# WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING
+# NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS
+# SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
+
+require 'terminfo.so'
+
+class TermInfo
+  def TermInfo.default_object
+    unless defined? @default_terminfo
+      io = open("/dev/tty", "r+")
+      io.sync = true
+      @default_terminfo = TermInfo.new(ENV['TERM'], io)
+    end
+    @default_terminfo
+  end
+
+  def TermInfo.control_string(*args) default_object.control_string(*args) end
+  def TermInfo.control(*args) default_object.control(*args) end
+  def TermInfo.write(str) default_object.write(str) end
+  def TermInfo.flush(&block) default_object.flush(&block) end
+  def TermInfo.screen_size() default_object.screen_size() end
+  def TermInfo.screen_lines() default_object.screen_lines() end
+  def TermInfo.screen_height() default_object.screen_height() end
+  def TermInfo.screen_columns() default_object.screen_columns() end
+  def TermInfo.screen_width() default_object.screen_width() end
+  def TermInfo.io() default_object.io() end
+
+  def initialize(term=ENV['TERM'], io=STDERR)
+    setupterm(term, io.fileno)
+    @term = term
+    @io = io
+  end
+  attr_reader :io
+
+  def inspect
+    "\#<#{self.class}:#{@term}>"
+  end
+
+  # TermInfo#control_string return a string to control terminal.
+  #
+  #   TermInfo#control_string([afflines,] capname, p1, p2, ...)
+  #
+  # capname is a terminfo string capability such as "cuu", "el".
+  #
+  # p1, p2, ... are parameters for the capability.
+  #
+  # afflines is a number of lines affected. (used for determining padding length)
+  def control_string(*args)
+    afflines = 1
+    raise ArgumentError, "capname requried" if args.empty?
+    afflines = args.shift.to_i if args.first.respond_to?(:to_int)
+    raise ArgumentError, "capname not given" if !args.first.respond_to?(:to_str)
+    capname = args.shift.to_str 
+    self.tputs(self.tparm(self.tigetstr(capname), *args), afflines)
+  end
+
+  # TermInfo#control controls a terminal. 
+  #
+  # It prints the result of control_string to io specified at initialization.
+  def control(*args)
+    @io.write(self.control_string(*args))
+    nil
+  end
+
+  def write(str)
+    @io.write(str)
+  end
+
+  def flush
+    oldlevel = nil
+    if block_given?
+      oldlevel = Thread.current[:TermInfo_Flush_level]
+      oldsync = @io.sync
+      begin
+        Thread.current[:TermInfo_Flush_level] = (oldlevel || 0) + 1
+        @io.sync = false
+        yield
+      ensure
+        Thread.current[:TermInfo_Flush_level] = oldlevel
+        @io.sync = oldsync
+      end
+    end
+    @io.flush if oldlevel == nil
+    nil
+  end
+
+  # returns terminal screen size in a two element array: [lines, columns].
+  def screen_size
+    begin
+      size = TermInfo.tiocgwinsz(@io)
+    rescue NotImplementedError
+      size = [0,0]
+    end
+    if size[0] == 0
+      size[0] = ENV.include?('LINES') ? ENV['LINES'].to_i : self.tigetnum("lines")
+    end
+    if size[1] == 0
+      size[1] = ENV.include?('COLUMNS') ? ENV['COLUMNS'].to_i : self.tigetnum("cols")
+    end
+    size
+  end
+
+  # returns terminal screen height.
+  def screen_lines
+    self.screen_size[0]
+  end
+  alias screen_height screen_lines
+
+  # returns terminal screen width.
+  def screen_columns
+    self.screen_size[1]
+  end
+  alias screen_width screen_columns
+end

data/terminfo.c

@@ -0,0 +1,336 @@
+/* terminfo.c - Ruby binding for terminfo library.
+
+Copyright (C) 2007 Tanaka Akira. All rights reserved.
+
+Redistribution and use in source and binary forms, with or without
+modification, are permitted provided that the following conditions
+are met:
+
+ 1. Redistributions of source code must retain the above copyright
+    notice, this list of conditions and the following disclaimer.
+ 2. Redistributions in binary form must reproduce the above
+    copyright notice, this list of conditions and the following
+    disclaimer in the documentation and/or other materials provided
+    with the distribution.
+ 3. The name of the author may not be used to endorse or promote
+    products derived from this software without specific prior
+    written permission.
+
+THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
+IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED
+WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
+ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY
+DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
+DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE
+GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
+INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY,
+WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING
+NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS
+SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
+*/
+
+#include "ruby.h"
+#include "rubyio.h"
+#include "extconf.h"
+
+#include <curses.h>
+#include <term.h>
+#include <termios.h>
+#include <sys/ioctl.h>
+
+static VALUE cTermInfo;
+static VALUE eTermInfoError;
+
+#ifndef HAVE_TYPE_RB_IO_T
+typedef OpenFile rb_io_t;
+#endif
+
+static void
+rt_free(void *ptr)
+{
+  if(ptr != NULL)
+    del_curterm(ptr);
+}
+
+static VALUE
+rt_alloc(VALUE klass)
+{
+  return Data_Wrap_Struct(klass, NULL, rt_free, 0);
+}
+
+static TERMINAL *
+check_rt(VALUE self)
+{
+    Check_Type(self, T_DATA);
+    if (RDATA(self)->dfree != rt_free) {
+        rb_raise(rb_eTypeError, "wrong argument type %s (expected TermInfo)",
+                 rb_class2name(CLASS_OF(self)));
+    }
+    return DATA_PTR(self);
+}
+
+static void
+setup(VALUE self)
+{
+  TERMINAL *old;
+  TERMINAL *term = check_rt(self);
+  if (term == NULL) { rb_raise(eTermInfoError, "terminfo object not initialized"); }
+  if (cur_term == term)
+    return;
+  old = set_curterm(term);
+}
+
+/*
+ * TermInfo#setupterm(term, fd) => int
+ *
+ * TermInfo#setupterm initializes TermInfo object.
+ *
+ * term is a string of nil.
+ * If nil is given, the environment variable $TERM is used.
+ *
+ * fd is a file descriptor for target terminal.
+ */
+static VALUE
+rt_setupterm(VALUE self, VALUE v_term, VALUE v_fd)
+{
+  char *term;
+  int fd;
+  int err;
+  int ret;
+  if (check_rt(self) != NULL) { rb_raise(eTermInfoError, "terminfo object already initialized"); }
+
+  if (v_term == Qnil)
+    term = NULL;
+  else
+    term = StringValueCStr(v_term);
+  fd = NUM2INT(v_fd);
+
+  ret = setupterm(term, fd, &err);
+  if (ret == ERR) {
+    if (err == 1) rb_raise(eTermInfoError, "hardcopy terminal");
+    else if (err == 0) rb_raise(eTermInfoError, "terminal could not be found");
+    else if (err == -1) rb_raise(eTermInfoError, "terminfo database could not be found");
+    else rb_raise(eTermInfoError, "unexpected setupterm error");
+  }
+
+  DATA_PTR(self) = cur_term;
+
+  return INT2NUM(err);
+}
+
+/*
+ * TermInfo#tigetflag(capname) => int
+ *
+ * TermInfo#tigetflag returns a boolean capability specified by capname.
+ */
+static VALUE
+rt_tigetflag(VALUE self, VALUE v_capname)
+{
+  int ret;
+  setup(self);
+  ret = tigetflag(StringValueCStr(v_capname));
+  if (ret == -1) { rb_raise(eTermInfoError, "not a boolean capability"); }
+  return RTEST(ret) ? Qtrue : Qfalse;
+}
+
+/*
+ * TermInfo#tigetnum(capname) => int
+ *
+ * TermInfo#tigetnum returns a numeric capability specified by capname.
+ */
+static VALUE
+rt_tigetnum(VALUE self, VALUE v_capname)
+{
+  int ret;
+  setup(self);
+  ret = tigetnum(StringValueCStr(v_capname));
+  if (ret == -2) { rb_raise(eTermInfoError, "not a numeric capability"); }
+  if (ret == -1) { rb_raise(eTermInfoError, "canceled or absent numeric capability"); }
+  return INT2NUM(ret);
+}
+
+/*
+ * TermInfo#tigetstr(capname) => str
+ *
+ * TermInfo#tigetstr returns a string capability specified by capname.
+ *
+ * The return value should be printed after tputs is applied.
+ * Also tparm should be applied if it has parameters.
+ *
+ *   io.print ti.tputs(ti.tparm(ti.tigetstr("cuf"), 2))
+ *
+ * Note that "cuf" means "cursor forward".
+ */
+static VALUE
+rt_tigetstr(VALUE self, VALUE v_capname)
+{
+  char *ret;
+  setup(self);
+  ret = tigetstr(StringValueCStr(v_capname));
+  if (ret == (char*)-1) {
+    rb_raise(eTermInfoError, "not a string capability");
+  }
+  if (ret == 0) {
+    rb_raise(eTermInfoError, "canceled or absent string capability");
+  }
+  return rb_str_new2(ret);
+}
+
+/*
+ * TermInfo#tparm(str, ...) => str
+ *
+ * TermInfo#tparm expands parameters in str returned by tigetstr.
+ */
+static VALUE
+rt_tparm(int argc, VALUE *argv, VALUE self)
+{
+  char *capname, *ret;
+  setup(self);
+  VALUE v_capname, v1, v2, v3, v4, v5, v6, v7, v8, v9;
+  long p1, p2, p3, p4, p5, p6, p7, p8, p9;
+  setup(self);
+
+  if (rb_scan_args(argc, argv, "19", &v_capname, &v1, &v2, &v3, &v4, &v5, &v6, &v7, &v8, &v9) == 0) {
+    rb_raise(rb_eArgError, "capname required");
+  }
+
+  capname = StringValueCStr(v_capname);
+#define conv(p, v) do { if (v == Qnil) p = 0; else p = NUM2LONG(v); } while(0)
+  conv(p1, v1);
+  conv(p2, v2);
+  conv(p3, v3);
+  conv(p4, v4);
+  conv(p5, v5);
+  conv(p6, v6);
+  conv(p7, v7);
+  conv(p8, v8);
+  conv(p9, v9);
+
+  ret = tparm(capname, p1, p2, p3, p4, p5, p6, p7, p8, p9);
+
+  if (ret == NULL) { rb_raise(eTermInfoError, "tparm failed"); }
+
+  return rb_str_new2(ret);
+}
+
+static VALUE putfunc_output; /* xxx: not thread safe */
+
+static int
+putfunc(int arg)
+{
+  char ch = arg;
+  rb_str_cat(putfunc_output, &ch, 1);
+  return arg;
+}
+
+/*
+ * TermInfo#tputs(str, affcnt) => str
+ *
+ * TermInfo#tputs expands padding informaiton using padding characters.
+ * affcnt is a number of lines affected by the str.
+ */
+static VALUE
+rt_tputs(VALUE self, VALUE v_str, VALUE v_affcnt)
+{
+  int ret;
+  char *str;
+  int affcnt;
+  VALUE output;
+
+  setup(self);
+  str = StringValueCStr(v_str);
+  affcnt = NUM2INT(v_affcnt);
+
+  putfunc_output = output = rb_str_new2("");
+  ret = tputs(str, affcnt, putfunc);
+  putfunc_output = Qnil;
+
+  if (ret == ERR) { rb_raise(eTermInfoError, "tputs failed"); }
+
+  return output;
+}
+
+#if defined(HAVE_ST_FD)
+# define FILENO(fptr) (fptr->fd)
+#elif defined(HAVE_RB_IO_T_FD)
+# define FILENO(fptr) fileno(fptr->fd)
+#else
+# define FILENO(fptr) fileno(fptr->f)
+#endif
+
+/*
+ * TermInfo.tiocgwinsz(io) => [row, col]
+ *
+ * TermInfo.tiocgwinsz returns the screen size of the terminal refered by io,
+ * using TIOCGWINSZ ioctl.
+ */
+static VALUE
+rt_tiocgwinsz(VALUE self, VALUE io)
+{
+#ifdef TIOCGWINSZ
+  rb_io_t *fptr;
+  struct winsize sz;
+  int ret;
+
+  GetOpenFile(io, fptr);
+
+  ret = ioctl(FILENO(fptr), TIOCGWINSZ, &sz);
+  if (ret == -1) rb_raise(rb_eIOError, "TIOCGWINSZ failed");
+
+  return rb_ary_new3(2, INT2NUM(sz.ws_row), INT2NUM(sz.ws_col));
+#else
+  rb_notimplement();
+#endif
+}
+
+/*
+ * TermInfo.tiocswinsz(io, row, col)
+ *
+ * TermInfo.tiocgwinsz update the screen size information of the terminal refered by io,
+ * using TIOCSWINSZ ioctl.
+ *
+ * It returns nil.
+ */
+static VALUE
+rt_tiocswinsz(VALUE self, VALUE io, VALUE row, VALUE col)
+{
+#ifdef TIOCSWINSZ
+  rb_io_t *fptr;
+  struct winsize sz;
+  int ret;
+
+  GetOpenFile(io, fptr);
+
+  sz.ws_row = NUM2INT(row);
+  sz.ws_col = NUM2INT(col);
+
+  ret = ioctl(FILENO(fptr), TIOCSWINSZ, &sz);
+  if (ret == -1) rb_raise(rb_eIOError, "TIOCSWINSZ failed");
+
+  return Qnil;
+#else
+  rb_notimplement();
+#endif
+}
+
+void
+Init_terminfo()
+{
+  putfunc_output = Qnil;
+  rb_global_variable(&putfunc_output);
+
+  cTermInfo = rb_define_class("TermInfo", rb_cData);
+  eTermInfoError = rb_define_class_under(cTermInfo, "TermInfoError", rb_eRuntimeError);
+
+  rb_define_alloc_func(cTermInfo, rt_alloc);
+
+  rb_define_method(cTermInfo, "setupterm", rt_setupterm, 2);
+  rb_define_method(cTermInfo, "tigetflag", rt_tigetflag, 1);
+  rb_define_method(cTermInfo, "tigetnum", rt_tigetnum, 1);
+  rb_define_method(cTermInfo, "tigetstr", rt_tigetstr, 1);
+  rb_define_method(cTermInfo, "tparm", rt_tparm, -1);
+  rb_define_method(cTermInfo, "tputs", rt_tputs, 2);
+
+  rb_define_module_function(cTermInfo, "tiocgwinsz", rt_tiocgwinsz, 1);
+  rb_define_module_function(cTermInfo, "tiocswinsz", rt_tiocswinsz, 3);
+}

metadata

@@ -0,0 +1,72 @@
+--- !ruby/object:Gem::Specification 
+name: ruby-terminfo
+version: !ruby/object:Gem::Version 
+  version: 0.1.1
+platform: ruby
+authors: 
+- Tanaka Akira
+autorequire: 
+bindir: bin
+cert_chain: []
+
+date: 2009-02-13 00:00:00 +13:00
+default_executable: 
+dependencies: []
+
+description: terminfo binding for Ruby
+email: akr@fsij.org
+executables: []
+
+extensions: 
+- extconf.rb
+extra_rdoc_files: 
+- README
+- ChangeLog
+files: 
+- README
+- ChangeLog
+- Rakefile
+- lib/terminfo.rb
+- terminfo.c
+- extconf.rb
+has_rdoc: true
+homepage: http://ruby-terminfo.rubyforge.org
+licenses: []
+
+post_install_message: 
+rdoc_options: 
+- --title
+- ruby-terminfo 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: ruby-terminfo
+rubygems_version: 1.3.5
+signing_key: 
+specification_version: 2
+summary: terminfo binding for Ruby
+test_files: []
+