ruby-terminfo-r3 0.1.1

data/ChangeLog

@@ -0,0 +1,44 @@
+2009-03-06  Tanaka Akira  <akr@fsij.org>
+
+	* version 0.2 released.
+
+2008-12-30  Tanaka Akira  <akr@fsij.org>
+
+	* terminfo.c (rt_wcswidth): check the return value of wcwidth.
+
+2008-12-30  Tanaka Akira  <akr@fsij.org>
+
+	* terminfo.c: prefer ruby/io.h over rubyio.h.
+	  include wchar.h.
+	  (FILENO): condition refined.
+	  (rt_wcswidth): new method TermInfo.wcswidth.
+
+	* extconf.rb: check ruby/io.h and ruby/encoding.h.
+	  
+2007-05-30  Tanaka Akira  <akr@fsij.org>
+
+	* terminfo.c (TermInfo.ctermid): defined.
+
+	* lib/terminfo.rb, sample/resize: use TermInfo.ctermid instead of
+	  "/dev/tty".
+
+2007-05-29  Tanaka Akira  <akr@fsij.org>
+
+	* sample/resize: new sample program.
+
+2007-04-29  Tanaka Akira  <akr@fsij.org>
+
+	* lib/terminfo.rb (TermInfo.default_object): Use File::NOCTTY for
+	  opening /dev/tty to avoid acquire a controlling terminal.
+
+2007-04-19  Tanaka Akira  <akr@fsij.org>
+
+	* extconf.rb, terminfo.c: try ncurses.h when ncurses is used.
+	  NetBSD has curses.h which is incompatible with ncurses.
+
+	* terminfo.c: define del_curterm empty on FreeBSD and OpenBSD to
+	  avoid warning and core dump.
+
+2007-04-10  Tanaka Akira  <akr@fsij.org>
+
+	* version 0.1 released.

data/README

@@ -0,0 +1,92 @@
+= ruby-terminfo-r3 - terminfo binding for Ruby-3
+
+ruby-terminfo-r3 is a terminfo binding for Ruby-3. It is a repackaged version
+of the Ruby-2 package ruby-terminfo. 
+
+Use './make_gem' to build the GEM.
+
+The home page for this package is https://github.com/clrgit/ruby-terminfo-r3,
+the original README follows below:
+
+= ruby-terminfo - terminfo binding for Ruby
+
+ruby-terminfo is a 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 
+* ctermid to avoid hardcoding /dev/tty
+* wcswidth to measure a string width in number of columns
+
+== 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"], File.open(TermInfo.ctermid, "r+"))
+  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.2.tar.gz
+
+* development version: http://github.com/akr/ruby-terminfo
+
+== Install
+
+  % ruby extconf.rb
+  % make
+  % make install
+
+== Reference Manual
+
+See rdoc/TermInfo.html or
+http://www.a-k-r.org/ruby-terminfo/rdoc/TermInfo.html
+
+== License
+
+
+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.
+
+(The modified BSD licence)

data/extconf.rb

@@ -0,0 +1,80 @@
+# 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'
+
+# Debian GNU/Linux 4.0 (etch)   curses.h, term.h, -lncurses     (ncurses.h is linked to curses.h)
+# FreeBSD 6.2                   curses.h, term.h, -lncurses     (ncurses.h is linked to curses.h)
+# OpenBSD 4.0                   curses.h, term.h, -lncurses     (curses.h includes ncurses.h by default)
+# HP-UX 11i v3                  term.h, -lcurses
+# SunOS 5.10                    curses.h, term.h, -lcurses
+
+# NetBSD 3.1 with ncurses       ncurses.h, -lncurses    (curses.h is incompatible for ncurses)
+
+have_header("curses.h")
+have_header("term.h")
+
+have_func("ctermid", "stdio.h")
+
+has_setupterm = true
+if have_library("ncurses", "setupterm")
+  have_header("ncurses.h")
+elsif have_library("curses", "setupterm") 
+else
+  has_setupterm = false
+end
+
+have_header("wchar.h")
+
+rubyio_h = nil
+rubyio_h = "ruby/io.h" if have_header("ruby/io.h")
+rubyio_h = "rubyio.h" unless rubyio_h
+
+if have_type("rb_io_t", ["ruby.h", rubyio_h])
+  have_struct_member("rb_io_t", "fd", ["ruby.h", rubyio_h])
+else
+  have_struct_member("OpenFile", "fd", ["ruby.h", rubyio_h])
+end
+
+have_header("ruby/encoding.h")
+
+if has_setupterm
+  create_header
+  create_makefile('terminfo')
+
+  open("Makefile", "a") {|mfile|
+    mfile.puts <<'End'
+rdoc:
+	rdoc --op rdoc terminfo.c lib/terminfo.rb
+End
+  }
+else
+  puts "terminfo library not found"
+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 = File.open(TermInfo.ctermid, File::RDWR|File::NOCTTY)
+      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/make_gem

@@ -0,0 +1,24 @@
+#!/usr/bin/bash
+
+set -eo pipefail
+
+# Create the GEM package. The gem command is not used to create the package
+# because it doesn't contain a Gemspec file. Instead it is create using tar and
+# gzip
+
+NAME="ruby-terminfo-r3"
+VERSION="0.1.1"
+PCK=$NAME-$VERSION
+FILES="README ChangeLog lib/terminfo.rb terminfo.c extconf.rb make_gem"
+
+tar cf - $FILES | gzip --best --stdout >data.tar.gz
+gzip --best --stdout metadata >metadata.gz
+tar cf $PCK.gem data.tar.gz metadata.gz
+rm data.tar.gz metadata.gz
+
+
+#tar zcf - $FILES | gzip --best --stdout >data.tar.gz
+#gzip --best --stdout metadata >metadata.gz
+#tar cf $PCK.gem data.tar.gz metadata.gz
+#rm data.tar.gz metadata.gz
+

data/terminfo.c

@@ -0,0 +1,427 @@
+/* terminfo.c - Ruby binding for terminfo library.
+
+Copyright (C) 2007, 2008 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"
+#ifdef HAVE_RUBY_IO_H
+# include "ruby/io.h"
+#else
+# include "rubyio.h"
+#endif
+#include "extconf.h"
+
+#if defined(HAVE_NCURSES_H)
+#include <ncurses.h>
+#elif defined(HAVE_CURSES_H)
+#include <curses.h>
+#endif
+
+#ifdef HAVE_TERM_H
+#include <term.h>
+#endif
+
+#include <termios.h>
+#include <sys/ioctl.h>
+#include <unistd.h>
+
+#ifdef HAVE_WCHAR_H
+#include <wchar.h>
+#endif
+
+static VALUE cTermInfo;
+static VALUE eTermInfoError;
+
+#ifndef HAVE_TYPE_RB_IO_T
+typedef OpenFile rb_io_t;
+#endif
+
+#if defined(HAVE_RB_IO_T_FD) || defined(HAVE_ST_FD)
+# define FILENO(fptr) (fptr->fd)
+#else
+# define FILENO(fptr) fileno(fptr->f)
+#endif
+
+#if (defined(__FreeBSD__) && __FreeBSD_cc_version <= 602001) || \
+    defined(__OpenBSD__)
+/*
+  * warning on FreeBSD
+    http://www.FreeBSD.org/cgi/query-pr.cgi?pr=108117&cat=
+  * core dump on OpenBSD
+    http://cvs.openbsd.org/cgi-bin/query-pr-wrapper?full=yes&textonly=yes&numbers=5447
+*/
+#define del_curterm(oterm) do {} while(0)
+#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;
+}
+
+/*
+ * 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
+}
+
+/*
+ * TermInfo.ctermid
+ *
+ * TermInfo.ctermid returns a pathname for the current controling terminal,
+ * such as "/dev/tty".
+ */
+static VALUE
+rt_ctermid(VALUE self)
+{
+#ifdef HAVE_CTERMID
+  char buf[L_ctermid];
+  return rb_str_new2(ctermid(buf));
+#else
+  return rb_str_new2("/dev/tty");
+#endif
+}
+
+/*
+ * TermInfo.wcswidth(str)
+ *
+ * TermInfo.wcswidth returns a the number of columns of str,
+ * according to current locale.
+ */
+static VALUE
+rt_wcswidth(VALUE self, VALUE str)
+{
+  char *s;
+  size_t l, r;
+  mbstate_t mbs;
+  wchar_t wc;
+  long cols;
+  int width;
+
+#ifdef HAVE_RUBY_ENCODING_H
+  /* The encoding of str is assumed to be the locale encoding on Ruby 1.8. */
+  str = rb_str_encode(str, rb_enc_from_encoding(rb_locale_encoding()), 0, Qnil);
+#endif
+
+  memset(&mbs,0,sizeof(mbstate_t));
+
+  s = StringValueCStr(str);
+  l = RSTRING_LEN(str);
+
+  cols = 0;
+  while (0 < l) {
+    r = mbrtowc(&wc, s, l, &mbs);
+    if (r == 0)
+      rb_raise(rb_eArgError, "NUL found");
+
+    width = wcwidth(wc);
+    if (width == -1)
+      rb_raise(rb_eArgError, "non-printable charactor found");
+    cols += width;
+
+    l -= r;
+    s += r;
+  }
+
+  return LONG2NUM(cols);
+}
+
+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);
+
+  rb_define_module_function(cTermInfo, "ctermid", rt_ctermid, 0);
+
+  rb_define_module_function(cTermInfo, "wcswidth", rt_wcswidth, 1);
+}

metadata

@@ -0,0 +1,73 @@
+--- !ruby/object:Gem::Specification 
+name: ruby-terminfo-r3
+version: !ruby/object:Gem::Version 
+  version: 0.1.1
+platform: ruby
+authors: 
+- Tanaka Akira
+- Claus Rasmussen
+autorequire: 
+bindir: bin
+cert_chain: []
+
+date: 2022-07-20 00:00:00 +02:00
+default_executable: 
+dependencies: []
+
+description: terminfo binding for Ruby-3. Derives from the ruby-terminfo package
+email: akr@fsij.org
+executables: []
+
+extensions: 
+- extconf.rb
+extra_rdoc_files: 
+- README
+- ChangeLog
+files: 
+- README
+- ChangeLog
+- lib/terminfo.rb
+- terminfo.c
+- extconf.rb
+- make_gem
+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-3
+test_files: []
+