Just another Ruby porter,

■ 雪

予報通りの雪。うっすら雪化粧という感じ。非常に寒い。

■ 最近の略語

本の題名ではあるが。

TRW - The Ruby Way
TYS - Teach YourSelf
TYR21D - Teach Yourself Ruby in 21 Days

■ RES

ブラジルのOutlookはRESになるのか？ブラジルじゃなくてポルトガル語か。

■ ^P

^Lじゃないと改頁にならないです。

■ bareruby

makeをRubyで書く話がruby-talkで続いているが、 たぶんbootstrapに関しては何も考えてないんだろう。 というわけでbarerubyだ。 microとかtinyだと別なのもを想像するのでbareにした。

_ gcc -c *.c:

% gcc -c array.c
In file included from array.c:15:
ruby.h:21:20: config.h: No such file or directory

% touch config.h
% gcc -c *.c
エラーがいっぱい
% ls *.o
array.o   dmyext.o  hash.o     math.o     range.o    st.o        version.o
bignum.o  enum.o    inits.o    numeric.o  re.o       string.o
class.o   error.o   main.o     object.o   regex.o    struct.o
compar.o  gc.o      marshal.o  prec.o     sprintf.o  variable.o
% ls *.c
array.c   dmyext.c  hash.c     math.c     random.c  sprintf.c  variable.c
bignum.c  enum.c    inits.c    numeric.c  range.c   st.c       version.c
class.c   error.c   io.c       object.c   re.c      string.c
compar.c  eval.c    lex.c      pack.c     regex.c   struct.c
dir.c     file.c    main.c     prec.c     ruby.c    time.c
dln.c     gc.c      marshal.c  process.c  signal.c  util.c

_ dir.c:

dir.c:232: parse error before "DIR"

_ dln.c:

dln.c:1675: `X_OK' undeclared (first use in this function)

_ eval.c:

eval.c:81: redefinition of `struct timeval'

eval.c:5336: `DLEXT' undeclared here (not in a function)

#define DLEXT ".so"

eval.c:6614: `free' undeclared (first use in this function)

_ file.c:

file.c:124: `free' undeclared (first use in this function)

file.c:396: parse error before "GETGROUPS_T"

#define GETGROUPS_T int

_ io.c:

io.c:1281: `O_RDONLY' undeclared (first use in this function)

_ parse.c:

_ pack.c:

pack.c:82: `TOKEN_PASTE' declared as function returning a function

#define TOKEN_PASTE(x,y) x##y

_ process.c:

process.c:594: `hfunc' undeclared (first use in this function)
process.c:594: `qfunc' undeclared (first use in this function)
process.c:594: `ifunc' undeclared (first use in this function)

#define RETSIGTYPE void

_ random.c:

random.c:158: `RAND_MAX' undeclared (first use in this function)

_ ruby.c:

ruby.c:266: `RUBY_SITE_LIB2' undeclared (first use in this function)
ruby.c:270: `RUBY_SITE_ARCHLIB' undeclared (first use in this function)
ruby.c:271: `RUBY_SITE_LIB' undeclared (first use in this function)
ruby.c:273: `RUBY_LIB' undeclared (first use in this function)
ruby.c:277: `RUBY_ARCHLIB' undeclared (first use in this function)

_ signal.c:

signal.c:348: parse error before "sighandle"
signal.c:378: parse error before "sigbus"
signal.c:465: `func' undeclared (first use in this function)

_ time.c:

time.c:22: redefinition of `struct timeval'
time.c:60: `free' undeclared (first use in this function)

_ util.c:

util.c:90: `W_OK' undeclared (first use in this function)

_ gcc -o bareruby *.o:

file.o(.text+0x1ae6): the `getwd' function is dangerous and should not be used.

array.o(.text+0x483): undefined reference to `RSHIFT'

bignum.o(.text+0x2e62): undefined reference to `pow'

pack.o(.text+0xd47): undefined reference to `NUM2U32'

re.o(.text+0x2e6): undefined reference to `ruby_re_mbcinit'
re.o(.text+0xc07): undefined reference to `ruby_re_compile_pattern'
re.o(.text+0xdcb): undefined reference to `ruby_re_copy_registers'
re.o(.text+0x13ef): undefined reference to `ruby_re_search'
re.o(.text+0x1ba0): undefined reference to `ruby_re_free_pattern'
re.o(.text+0x2caa): undefined reference to `ruby_re_set_casetable'
regex.o(.text+0x198f): undefined reference to `xrealloc'
regex.o(.text+0x3680): undefined reference to `scan_hex'
regex.o(.text+0x36bb): undefined reference to `scan_oct'

string.o(.text+0x60bc): undefined reference to `crypt'

■ bareruby.sh

% LIBS='-lm -lcrypt' sh bareruby.sh
% ./bareruby -v
ruby 1.6.6 (2001-12-21) [unknown-unknown]

できたね。packのテストを外してsample/test.rbを実行してみる。

% ln -s bareruby miniruby
% ./bareruby sample/test.rb
(snip)
marshal
not ok marshal 1 -- sample/test.rb:1063
(snip)
test: 314 failed 1

というわけでmarshalだけだ。これもたぶんSIZEOFだな。 marshalは外そう。

■ Cygwinでbareruby.sh

% CC=gcc LIBS=-lcrypt bash ./bareruby.sh

compileは問題なく進む。MAXPATHLENのredefined警告がうるさい。 Cygwinはunistd.hをincludeすると定義されるらしい。 とりあえずsys/param.hもcheckしよう。

file.o(.text+0x250b):file.c: undefined reference to `flock'

__CHECKER__を定義しよう。って__CHECKER__ってなんだ？

io.o(.text+0x1ca):io.c: undefined reference to `ReadDataPending'

これは苦しいね。常に0を返すか？bareinits.cに入れてみよう。

signal.o(.text+0xb9a):signal.c: undefined reference to `sigmask'
signal.o(.text+0xbd0):signal.c: undefined reference to `sigsetmask'
signal.o(.text+0xbfc):signal.c: undefined reference to `sigsetmask'
signal.o(.text+0xcc3):signal.c: undefined reference to `sigblock'

面倒だなあ。いっそsignal.oも外すか。ってそれは無理だ。 bareinits.cにdummyを用意しよう。

■ MinGWでbareruby.sh

%  CC='gcc -mno-cygwin' ./bareruby.sh
(snip)
gcc -mno-cygwin -I.   -c dir.c
dir.c: In function `dir_s_mkdir':
dir.c:484: too many arguments to function `mkdir'

そりゃそうだ。不本意ながらmingw32のcheckを入れよう。

warning: `va_start' redefined

がうるさいが、コンパイルはok。が、リンクでundefinedがいっぱい。 win32/win32.cを無視してるからだ。 crypt.cも対応して、LIBSに-lwsock32を入れてみると

bignum.o(.text+0x1276):bignum.c: undefined reference to `isinf'
bignum.o(.text+0x12bd):bignum.c: undefined reference to `isnan'
file.o(.text+0x3054):file.c: undefined reference to `getwd'

てな感じ。やっぱ関数をcheckしないのは無理があるか？ getwdに関してはdir.cではifdefなしでgetcwdを使っているので、 getcwdにしても問題なさそう。 missing/{isinf,isnan}.cをコピーするか。

これでtestも通った。

■ FreeBSD 3.3, NetBSD 1.5でbareruby.sh

問題なし。比較的新しいOSなら通るでしょう。

とりあえずここまでできたから、思う存分makeを作ってくれ。 が、その前にconfigure.rbが必要だと気づいた。

■ Ruby 1.7でbareruby.sh

bignum.cで思い切りエラー。世の中そんなに甘くないのである。 明日へつづく(たぶん)。

■ sourceforgeのftp

ftp://ftp1.sf.net/pub/sourceforge/プロジェクト名という感じでftpでアクセスできる。 たとえばmingwなら こう だ。 P4W からの情報。

■ Ruby 1.7でbareruby.sh

結局SIZEOFを解決させないとbignum.cはコンパイルできない。これも外すか？ それは絶対無理だな。 逆にSIZEOF対応すればmarshalもpack.cもいけるわけだよね。 そっちの線でいったほうがいいか。 小さいものを作ろうとしてるわけでもないし、外さない方向のほうがいいか。

■ SIZEOF_FOO

configureを見るとsizeof(foo)をfprintfしてcatするだけ。 autoconf-2.5xだとクロスの場合にも対応してて、 なんだかよくわからない方法でsizeを計算してる。 そこまでやらなくてもという気がするので、 barerubyをクロス対応させるときは環境変数だな。

調べるのはint, short, long, long long, __int64, void *, float, doubleだ。 とりあえずできた( bareruby.sh )。

■ getwd

ふむ。1.7ではすでにgetwdは駆逐されてたのか。 じゃ、HAVE_GETCWDを無条件でdefineしとこう。

■ Cygwin Ruby 1.7でbareruby.sh

testしたらSEGVってしまった。普通に作れば問題ないので何かが足りないようだ。 gc.cの

# define STACK_LEVEL_MAX 655300

が大きすぎるからか。gc.cにパッチをあてよう。

■ MinGW Ruby 1.7でbareruby.sh

こっちはsystemと表示したっきり返ってこない。

% ./bareruby -e 'system "echo foo"'
foo

でpromptに戻らない。systemがなんかまずいって、あ、RETSIGTYPEか？ もちろん普通に作れば問題ない。こっちも何かが足りないようだ。

同じ名前で*.oを作ると共存できないので、barray.oのように名前を変えよう。

HAVE_WAITPIDだった。 win32/win32.cを見るとwait()はreturn 0;だから無限ループになるのも無理はない。

■ Linux 2.4.17

出たね。クリスマスにはちょっと早いが。

■ SUPER MILD

広末がCMに出てるとこを久し振りに見る。

■ elif

shにelifがないのが痛い。 {}を使って

{ test -e foo.c && src=foo.c; } ||
{ test -e bar.c && src=bar.c; } ||
{ src=hoge.c; }

という手を捻り出してみた。 {}はconfigureでも使ってるので、まあ、いいかな。 ;を忘れるとエラーになる。zshだと;はなくてもいい。

てゆか、なぜおいらはelifがないと思ったんだろう？ あるに決まってるじゃん。

■ bareruby.sh

bareruby.shはsrcdir対応にした。

■ RubyUnit 0.5.1

更新。

■ FreeBSD 3.3でbareruby.sh

FreeBSD 3.3でRuby 1.6.6をbareruby.shすると

bpack.o: In function `pack_pack':
bpack.o(.text+0xf6d): undefined reference to `NUM2U32'

となる。どうも

#if SIZEOF_SHORT != 2 || SIZEOF_LONG != 4
# define NATINT_PACK
#endif

が真になってしまうのが原因のようだ。でもconfig.hはちゃんと

#define SIZEOF_INT 4
#define SIZEOF_SHORT 2
#define SIZEOF_LONG_LONG 8
#define SIZEOF_LONG 4
#define SIZEOF___INT64 0
#define SIZEOF_VOIDP 4
#define SIZEOF_FLOAT 4
#define SIZEOF_DOUBLE 8

となっているんだけどなあ。不思議だ。

なお1.7だと問題ない。そのあたりに違いはないのに。

あ、SIZEOF対応前のconfig.hがsource directoryにあったからか。 -I.を後に置いたほうがいいな。

■ NHKスペシャル

25分も遅れるなよー。明日からは2時間で予約しとこ。

■ Solaris 2.5でbareruby.sh

isinf, snprintf, vsnprintfがundefined。 missingは全部リンクしちゃうか？

■ RubyUnit 0.5.2

更新。

■ GNU make

GNU makeを作るにはmakeがないことも考えられていて、 build.shというのがついてくる。いやbuild.sh.inがついてくる。 build.shはconfigureすると作られる。 なるほど。そういう手もあるのか。

■ bareruby.bat

mswin32に関しては特に何も考えてない。 調べる必要がないから、最初から決めうちでいいわけだし。

nmake -n

した結果をそのままbareruby.batにするぐらいでいいんじゃないかな。

■ djgppでbareruby

bareruby.batで思い出した。というかすっかり存在を忘れてた。 今クロスしか環境ないから試せないんだよねえ。 ちなみに

% ../bareruby.sh \
  --srcdir=../ruby16 \
  --CC=i586-pc-msdosdjgpp-gcc \
  --RSHIFT_SIGN=yes \
  --SIZEOF_INT=4 \
  --SIZEOF_SHORT=2 \
  --SIZEOF_LONG=4 \
  --SIZEOF_LONG_LONG=8 \
  --SIZEOF___INT64=0 \
  --SIZEOF_VOIDP=4 \
  --SIZEOF_FLOAT=4 \
  --SIZEOF_DOUBLE=8 \
  --yacc='bison -y'

ぐらいは通ってたりする。作ってみてこれほど意味のないものはないと思うが。 barerubyはminirubyと同じで、その場で実行できないと意味がない。

■ 今日の最終bareruby.sh

_ missing/:

_ b*.o -> _*.o:

■ NHKスペシャル

今日は10分遅れだ。やはり定刻通りには始まらない。 鬼界カルデラってなんか怖そうな名前だ。

■ GCC 3.0.3

Yendot で知る。

今回は別のPCで

% ./configure \
  --enable-languages=c,c++ \
  --with-system-zlib \
  --enable-sjlj-exceptions \
  --enable-threads \
  i586-pc-linux-gnu
% make bootstrap
% make prefix=$HOME/gcc-3.0.3/usr/local install
% cd ~/gcc-3.0.3
% tar cfvz gcc-3.0.3-bin.tar.gz usr

してtarballを作ってみた。

■ Hybris

そんなクリスマスプレゼントはいらない、ocnのsomebody。

■ Dirと空白

Ruby 1.7になって空白はファイル名の一部とみなすようになった。でも

Dir["foo/*", "bar/*"]

はどうなったんだっけ？ どっちにしても1.6と共存を考えた場合、 実装されてもしばらくは使わないほうがいいだろう。 Cygwin用に setup.ini を作るスクリプトを考えてたんだけど、

Dir["ruby-*-i386-cygwin.tar.gz ext/*.tar.gz"]

が出てきてしまった。しかたないので空白を使わない方法を考えよう。

_ 安直に2つに分けてから足す:

Dir["ruby-*-i386-cygwin.tar.gz"] + Dir["ext/*.tar.gz"]

_ dir.cをいじってDir::[], Dir::globが複数の文字列を受けとれるようにする:

Dir["ruby-*-i386-cygwin.tar.gz", "ext/*.tar.gz"]

_ {,}を使う:

Dir["{ruby-*-i386-cygwin.tar.gz,ext/*.tar.gz}"]

dir.cはいじる必要なし
複数パターンを指定したいときは{,}を使え

■ Release

今日は出ないか。

■ Ruby 1.6.6

JST的には間に合わなかったが、ruby-talk的には十分Merry Christmasか。

■ w3m

そのundefined具合から想像するに相当な移植作業が必要です。 socket関係は<winsock.h>あたりをincludeして-lwsock32をlinkすればよさそうだけど、 大きなところではtermiosの代わりを書くとかselectとか。

■ setup.ini.rb

いちいちuploadして試さないといけないのかと思ったら、setup.exeで

Install from Local Directory

を選べばlocalでtestできることに、今頃気づいた。 というわけで、これから充実させようと思う。

■ drb 1.3.4.2

更新。

■ News Gateway

1.6.6のnet/smtpの仕様変更で動かなくなっていたらしい。 失敗しても何のエラー表示もないようなので要確認。

で、何が変更されたんでしょう？

これ を見ると、 元の記事はruby-talk MLへ流れてない。 ここ2日ほどcomp.lang.rubyへ投稿された記事は、 このままruby-talk MLへは来ないのかもしれない。

■ Linux 2.4.18-pre1

Makefileはこのままだと

2.4.18pre1

になってしまうけどいいのか？

EXTRAVERSION = -pre1-preempt

とした。preempt patchもなんかつけて欲しいなあ。

■ skk ML

今月のspam率は21/153だ。

■ Broken link on your website

最初はよくあるspamだと思ったんだけど、 よく見るとNextへのリンクが切れてるという内容で ^*1、 このモニタリングサービスを受けたければclickしろとかあって、 結局spamなのか？ そのページへアクセスするのも負けた気がするし、放っておくことにする。

それはそれとして、Nextへのリンクを来年一年分用意しとこう。

■ ruby-talk ML

流量が元に戻ってきた。

■ [Cygwin] setup.ini

[test]があるとメニューに出てこない。困ったな。

■ The [ruby-talk:12345] in mailing list subject lines should:

こんなアンケート取ってたのか。

あ、 とうとう外すことにしたらしい 。

■ Ruby/GD

熱とか帰省でそれどころじゃないかもしれませんが、 今ならmkmf.logを残すようになっているので、 これを見ると原因がわかるかもしれません。

■ [sh] シェルスクリプト

CVS限定でいいのならcvsの終了ステータスを見るのが一番軽いかも。

% cvs diff -u1 version.h
% echo $?
0
% echo "" >>version.h
% cvs diff -u1 version.h >/dev/null
% echo $?
1

■ News Gateway

今気づいたんだけどPostedを見ると12/25の記事が来てる。 ということは徐々に流れて来てたのか。

違った。単にoutboxに残っていたらしい。いわゆる 送信箱問題 か。

■ [Cygwin] Ruby/GTK 0.26

やっぱり、SEGVってしまうなあ。0.24で試してみよう。

じゃなくて これ を解決してなかったんだ。 gdbで実行してみると、src/rbgtk.cのrbgtk_poll()で起きてる。 あれ？ここは使わないはずなんだけどなあ。 わかった。 _WIN32 は今のCygwinでは定義されてない。 素直に-DNATIVE_WIN32しよう。というわけで こう してみた。

0.26からはgtkじゃなくてruby-gtkになってる。 gtk-0.25は消したほうがいいか？

■ nakatanihirokatsu

だからBadtrans.Bを送ってこないように。

■ Re: I think I found the problem with the gateway

結局Net::SMTP.{new,start}の最初の引数であるSMTP serverが省略不可になったんだけど、 Daveさんのスクリプトの例外処理に不備があり捕らえることができなかったというのが原因のようだ。 仕様変更とはそういうことか。 1.6.5では省略した場合'localhost'とみなしている。

■ Ruby/GDその2

なるほど。-lmはRuby/GDだけの問題じゃないはずなので、 extmk.rb.in,mkmf.rbのhave_libraryを書き換えて、 "m"だったらmswin32では無条件でappend_libraryしないで成功させてしまってもよさそうですね。mingw32も同じか。

     if /mswin32|mingw/ =~ RUBY_PLATFORM
+      return true if lib == 'm'
       r = try_link(<<"SRC", libs)

てな感じで。commitしとこう。ぐは。yesを表示しなきゃだめだ。

また間違えた。ext/extmk.rb.inはyesを表示しちゃだめ。

■ UETA, Masayuki

Re: [ruby-list:27433] Re: Cygwin + Oracle...

というSubjectでBadtrans.Bが来た。 Badtrans.Bってそんな小細工もするのか。

■ "Seiichiro Nanjo"

急にBadtrans.Bが増えたのはなぜ？

■ uconv 0.48

更新。

■ Telnet daemon of Cygwin

サービスで動かしたときはuserが自分ではないので、 mount tableがない状態になってます。mount -sで設定すればいけます。

あとntsecとnteaは元々同時には使えません。 nteaでは使い物にならないので、ntsecができたようなもんなので。

■ configure.rb.in

autoconf.rbもあることだし、そろそろconfigure.rb.inに手を出すか。 大晦日はことのほか暇だったりする。 最初はそのまま1.7のconfigure.inを一行一行変換していくことにする。 最近Rubyのスクリプトもあまり書いてないので、丁度いい練習にもなるかな。

_ autoconf.rb:

% cvs -d :pserver:anonymous@www.modruby.net:/var/cvs login
Logging in to :pserver:anonymous@www.modruby.net:2401/var/cvs
CVS password: そのままReturn
% cvs -d :pserver:anonymous@www.modruby.net:/var/cvs co autoconf_ruby

_ MAJOR, MINOR, TEENY:

_ File.foreach:

File.foreach File.join $srcdir, "version.h" do |line|
  if /RUBY_VERSION "(\d+)\.(\d+)\.(\d+)"/ =~ line
     $MAJOR, $MINOR, $TEENY = $1, $2, $3
     break
  end
end
AC_SUBST("MAJOR")
AC_SUBST("MINOR")
AC_SUBST("TEENY")

$MAJOR, $MINOR, $TEENY =
  open(File.join($srcdir, "eruby.h")).
    grep(/ERUBY_VERSION/)[0].
      scan(/(\d+).(\d+).(\d+)/)[0]

_ Array#indexes, Array#indices, Array#select:

$~.to_a.indexes(1, 2, 3)

warning: Array#indexes is deprecated; use Array#select
warning: Array#indices is deprecated; use Array#select

_ respond_to?:

unless [].respond_to? :collect!
  class Array
    alias collect! filter
  end
end

_ gcc checking:

AC_ARG_WITH('gcc', '--without-gcc             never use gcc') do |withval|
  case withval
  when /^no$/
    $CC ||= 'cc'
  when /^yes$/
    $CC ||= 'gcc'
  else
    $CC = withval
  end
end

_ importenv.rb:

% CC=foo-cc ruby configure.rb

require 'importenv'

% CC=gcc ruby -e 'p $CC'
nil
% CC=gcc ruby -rimportenv -e 'p $CC'
"gcc"

_ mkmf.rb:

■ Win32OLE 0.3.2

更新。