cyross-ruby-miyako 2.0.5.1.0 → 2.1.0

data/Rakefile

@@ -1,7 +1,7 @@
-#! /usr/bin/env rake
-
-task :default => :ruby_miyako
-
-task :ruby_miyako do
-  system 'ruby install_miyako.rb'
-end
+#! /usr/bin/env rake
+
+task :default => :ruby_miyako
+
+task :ruby_miyako do
+  system 'ruby install_miyako.rb'
+end

data/defines.h

@@ -1,144 +1,144 @@
-/*
---
-Miyako v2.0 Extend Library "Miyako no Katana"
-Copyright (C) 2008  Cyross Makoto
-
-This library is free software; you can redistribute it and/or
-modify it under the terms of the GNU Lesser General Public
-License as published by the Free Software Foundation; either
-version 2.1 of the License, or (at your option) any later version.
-
-This library is distributed in the hope that it will be useful,
-but WITHOUT ANY WARRANTY; without even the implied warranty of
-MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
-Lesser General Public License for more details.
-
-You should have received a copy of the GNU Lesser General Public
-License along with this library; if not, write to the Free Software
-Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
-++
-*/
-
-#include <SDL.h>
-#include <SDL_ttf.h>
-#include <SDL_endian.h>
-#include <stdlib.h>
-#include <math.h>
-#include "ruby.h"
-#include "ruby/encoding.h"
-
-typedef struct
-{
-	SDL_Surface* surface;
-} Surface;
-
-typedef struct
-{
-	Uint32 r;
-	Uint32 g;
-	Uint32 b;
-	Uint32 a;
-} MiyakoColor;
-
-typedef struct
-{
-  int w;
-  int h;
-} MiyakoSize;
-
-typedef struct
-{
-  VALUE unit;
-  SDL_Surface *surface;
-  SDL_PixelFormat *fmt;
-  SDL_Rect rect;
-  MiyakoColor color;
-	Uint32 a255;
-  Uint32 *ptr;
-  int x;
-  int y;
-} MiyakoBitmap;
-
-// from rubysdl.h
-#define GLOBAL_DEFINE_GET_STRUCT(struct_name, fun, klass, klassstr) \
-struct_name* fun(VALUE obj) \
-{ \
-  struct_name* st; \
-  \
-  if(!rb_obj_is_kind_of(obj, klass)){ \
-    rb_raise(rb_eTypeError, "wrong argument type %s (expected " klassstr ")", \
-             rb_obj_classname(obj)); \
-  } \
-  Data_Get_Struct(obj, struct_name, st); \
-  return st; \
-} 
-
-#define MIYAKO_GETCOLOR(COLOR) \
-	COLOR.r = (Uint32)(((pixel & fmt->Rmask) >> fmt->Rshift) << fmt->Rloss); \
-	COLOR.g = (Uint32)(((pixel & fmt->Gmask) >> fmt->Gshift) << fmt->Gloss); \
-	COLOR.b = (Uint32)(((pixel & fmt->Bmask) >> fmt->Bshift) << fmt->Bloss); \
-	COLOR.a = (Uint32)(((pixel & fmt->Amask) >> fmt->Ashift) << fmt->Aloss);
-
-#define MIYAKO_SETCOLOR(RESULT, COLOR) \
-  RESULT = (COLOR.r >> fmt->Rloss) << fmt->Rshift | \
-           (COLOR.g >> fmt->Gloss) << fmt->Gshift | \
-           (COLOR.b >> fmt->Bloss) << fmt->Bshift | \
-           (COLOR.a >> fmt->Aloss) << fmt->Ashift;
-
-#define MIYAKO_SET_RECT(RECT, BASE) \
-  RECT.x = NUM2INT(*(RSTRUCT_PTR(BASE) + 1)); \
-  RECT.y = NUM2INT(*(RSTRUCT_PTR(BASE) + 2)); \
-  RECT.w = NUM2INT(*(RSTRUCT_PTR(BASE) + 3)); \
-  RECT.h = NUM2INT(*(RSTRUCT_PTR(BASE) + 4));
-
-#define MIYAKO_INIT_RECT1 \
-	int dlx = drect.x + x; \
-	int dly = drect.y + y; \
-	int dmx = dlx + (srect.w < drect.w ? srect.w : drect.w); \
-	int dmy = dly + (srect.h < drect.h ? srect.h : drect.h);
-  
-#define MIYAKO_INIT_RECT2 \
-	int dlx = drect.x; \
-	int dly = drect.y; \
-	int dmx = dlx + drect.w; \
-	int dmy = dly + drect.h;
-
-#define MIYAKO_INIT_RECT3 \
-  if(s2rect.w != drect.w){ return Qnil; } \
-  if(s2rect.h != drect.h){ return Qnil; } \
-  int x1 = NUM2INT(*(RSTRUCT_PTR(s1unit) + 5)); \
-  int y1 = NUM2INT(*(RSTRUCT_PTR(s1unit) + 6)); \
-  int x2 = NUM2INT(*(RSTRUCT_PTR(s2unit) + 5)); \
-  int y2 = NUM2INT(*(RSTRUCT_PTR(s2unit) + 6)); \
-  if(s1rect.x < 0 || s1rect.y < 0 || s2rect.x < 0 || s2rect.y < 0){ return Qnil; } \
-  if(s1rect.w < s2rect.w && (x1+s1rect.x+s1rect.w > s2rect.w)){ return Qnil; } \
-  if(s2rect.w < s1rect.w && (x2+s2rect.x+s2rect.w > s1rect.w)){ return Qnil; } \
-  if(s1rect.h < s2rect.h && (y1+s1rect.y+s1rect.h > s2rect.h)){ return Qnil; } \
-  if(s2rect.h < s1rect.h && (y2+s2rect.y+s2rect.h > s1rect.h)){ return Qnil; } \
-	int dlx = drect.x; \
-	int dly = drect.y; \
-	int dmx = dlx + (s1rect.w < s2rect.w ? s1rect.w : s2rect.w); \
-	int dmy = dly + (s1rect.h < s2rect.h ? s1rect.h : s2rect.h);
-  
-#define MIYAKO_PSET(XX,YY) \
-        pixel = 0; \
-        if(dcolor.a == 0) \
-        { \
-          *(pdst + YY * dst->w + XX) = (scolor.r >> fmt->Rloss) << fmt->Rshift | \
-                                       (scolor.g >> fmt->Gloss) << fmt->Gshift | \
-                                       (scolor.b >> fmt->Bloss) << fmt->Bshift | \
-                                       (scolor.a >> fmt->Aloss) << fmt->Ashift; \
-          continue; \
-        } \
-        if(scolor.a > 0) \
-        { \
-          int a1 = scolor.a + 1; \
-          int a2 = 256 - scolor.a; \
-          scolor.r = (scolor.r * a1 + dcolor.r * a2) >> 8; \
-          scolor.g = (scolor.g * a1 + dcolor.g * a2) >> 8; \
-          scolor.b = (scolor.b * a1 + dcolor.b * a2) >> 8; \
-          *(pdst + YY * dst->w + XX) = (scolor.r >> fmt->Rloss) << fmt->Rshift | \
-                                       (scolor.g >> fmt->Gloss) << fmt->Gshift | \
-                                       (scolor.b >> fmt->Bloss) << fmt->Bshift | \
-                                       (scolor.a >> fmt->Aloss) << fmt->Ashift; \
-        }
+/*
+--
+Miyako v2.0 Extend Library "Miyako no Katana"
+Copyright (C) 2008  Cyross Makoto
+
+This library is free software; you can redistribute it and/or
+modify it under the terms of the GNU Lesser General Public
+License as published by the Free Software Foundation; either
+version 2.1 of the License, or (at your option) any later version.
+
+This library is distributed in the hope that it will be useful,
+but WITHOUT ANY WARRANTY; without even the implied warranty of
+MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
+Lesser General Public License for more details.
+
+You should have received a copy of the GNU Lesser General Public
+License along with this library; if not, write to the Free Software
+Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
+++
+*/
+
+#include <SDL.h>
+#include <SDL_ttf.h>
+#include <SDL_endian.h>
+#include <stdlib.h>
+#include <math.h>
+#include "ruby.h"
+#include "ruby/encoding.h"
+
+typedef struct
+{
+	SDL_Surface* surface;
+} Surface;
+
+typedef struct
+{
+	Uint32 r;
+	Uint32 g;
+	Uint32 b;
+	Uint32 a;
+} MiyakoColor;
+
+typedef struct
+{
+  int w;
+  int h;
+} MiyakoSize;
+
+typedef struct
+{
+  VALUE unit;
+  SDL_Surface *surface;
+  SDL_PixelFormat *fmt;
+  SDL_Rect rect;
+  MiyakoColor color;
+	Uint32 a255;
+  Uint32 *ptr;
+  int x;
+  int y;
+} MiyakoBitmap;
+
+// from rubysdl.h
+#define GLOBAL_DEFINE_GET_STRUCT(struct_name, fun, klass, klassstr) \
+struct_name* fun(VALUE obj) \
+{ \
+  struct_name* st; \
+  \
+  if(!rb_obj_is_kind_of(obj, klass)){ \
+    rb_raise(rb_eTypeError, "wrong argument type %s (expected " klassstr ")", \
+             rb_obj_classname(obj)); \
+  } \
+  Data_Get_Struct(obj, struct_name, st); \
+  return st; \
+} 
+
+#define MIYAKO_GETCOLOR(COLOR) \
+	COLOR.r = (Uint32)(((pixel & fmt->Rmask) >> fmt->Rshift) << fmt->Rloss); \
+	COLOR.g = (Uint32)(((pixel & fmt->Gmask) >> fmt->Gshift) << fmt->Gloss); \
+	COLOR.b = (Uint32)(((pixel & fmt->Bmask) >> fmt->Bshift) << fmt->Bloss); \
+	COLOR.a = (Uint32)(((pixel & fmt->Amask) >> fmt->Ashift) << fmt->Aloss);
+
+#define MIYAKO_SETCOLOR(RESULT, COLOR) \
+  RESULT = (COLOR.r >> fmt->Rloss) << fmt->Rshift | \
+           (COLOR.g >> fmt->Gloss) << fmt->Gshift | \
+           (COLOR.b >> fmt->Bloss) << fmt->Bshift | \
+           (COLOR.a >> fmt->Aloss) << fmt->Ashift;
+
+#define MIYAKO_SET_RECT(RECT, BASE) \
+  RECT.x = NUM2INT(*(RSTRUCT_PTR(BASE) + 1)); \
+  RECT.y = NUM2INT(*(RSTRUCT_PTR(BASE) + 2)); \
+  RECT.w = NUM2INT(*(RSTRUCT_PTR(BASE) + 3)); \
+  RECT.h = NUM2INT(*(RSTRUCT_PTR(BASE) + 4));
+
+#define MIYAKO_INIT_RECT1 \
+	int dlx = drect.x + x; \
+	int dly = drect.y + y; \
+	int dmx = dlx + (srect.w < drect.w ? srect.w : drect.w); \
+	int dmy = dly + (srect.h < drect.h ? srect.h : drect.h);
+  
+#define MIYAKO_INIT_RECT2 \
+	int dlx = drect.x; \
+	int dly = drect.y; \
+	int dmx = dlx + drect.w; \
+	int dmy = dly + drect.h;
+
+#define MIYAKO_INIT_RECT3 \
+  if(s2rect.w != drect.w){ return Qnil; } \
+  if(s2rect.h != drect.h){ return Qnil; } \
+  int x1 = NUM2INT(*(RSTRUCT_PTR(s1unit) + 5)); \
+  int y1 = NUM2INT(*(RSTRUCT_PTR(s1unit) + 6)); \
+  int x2 = NUM2INT(*(RSTRUCT_PTR(s2unit) + 5)); \
+  int y2 = NUM2INT(*(RSTRUCT_PTR(s2unit) + 6)); \
+  if(s1rect.x < 0 || s1rect.y < 0 || s2rect.x < 0 || s2rect.y < 0){ return Qnil; } \
+  if(s1rect.w < s2rect.w && (x1+s1rect.x+s1rect.w > s2rect.w)){ return Qnil; } \
+  if(s2rect.w < s1rect.w && (x2+s2rect.x+s2rect.w > s1rect.w)){ return Qnil; } \
+  if(s1rect.h < s2rect.h && (y1+s1rect.y+s1rect.h > s2rect.h)){ return Qnil; } \
+  if(s2rect.h < s1rect.h && (y2+s2rect.y+s2rect.h > s1rect.h)){ return Qnil; } \
+	int dlx = drect.x; \
+	int dly = drect.y; \
+	int dmx = dlx + (s1rect.w < s2rect.w ? s1rect.w : s2rect.w); \
+	int dmy = dly + (s1rect.h < s2rect.h ? s1rect.h : s2rect.h);
+  
+#define MIYAKO_PSET(XX,YY) \
+        pixel = 0; \
+        if(dcolor.a == 0) \
+        { \
+          *(pdst + YY * dst->w + XX) = (scolor.r >> fmt->Rloss) << fmt->Rshift | \
+                                       (scolor.g >> fmt->Gloss) << fmt->Gshift | \
+                                       (scolor.b >> fmt->Bloss) << fmt->Bshift | \
+                                       (scolor.a >> fmt->Aloss) << fmt->Ashift; \
+          continue; \
+        } \
+        if(scolor.a > 0) \
+        { \
+          int a1 = scolor.a + 1; \
+          int a2 = 256 - scolor.a; \
+          scolor.r = (scolor.r * a1 + dcolor.r * a2) >> 8; \
+          scolor.g = (scolor.g * a1 + dcolor.g * a2) >> 8; \
+          scolor.b = (scolor.b * a1 + dcolor.b * a2) >> 8; \
+          *(pdst + YY * dst->w + XX) = (scolor.r >> fmt->Rloss) << fmt->Rshift | \
+                                       (scolor.g >> fmt->Gloss) << fmt->Gshift | \
+                                       (scolor.b >> fmt->Bloss) << fmt->Bshift | \
+                                       (scolor.a >> fmt->Aloss) << fmt->Ashift; \
+        }

data/extern.h

@@ -1,29 +1,29 @@
-/*
---
-Miyako v2.0 Extend Library "Miyako no Katana"
-Copyright (C) 2008  Cyross Makoto
-
-This library is free software; you can redistribute it and/or
-modify it under the terms of the GNU Lesser General Public
-License as published by the Free Software Foundation; either
-version 2.1 of the License, or (at your option) any later version.
-
-This library is distributed in the hope that it will be useful,
-but WITHOUT ANY WARRANTY; without even the implied warranty of
-MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
-Lesser General Public License for more details.
-
-You should have received a copy of the GNU Lesser General Public
-License along with this library; if not, write to the Free Software
-Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
-++
-*/
-
-extern void _miyako_setup_unit(VALUE unit, SDL_Surface *screen, MiyakoBitmap *mb, VALUE x, VALUE y, int use_yield);
-extern void _miyako_setup_unit_2(VALUE unit_s, VALUE unit_d, 
-                                SDL_Surface *screen,
-                                MiyakoBitmap *mb_s, MiyakoBitmap *mb_d,
-                                VALUE x, VALUE y, int use_yield);
-extern int _miyako_init_rect(MiyakoBitmap *src, MiyakoBitmap *dst, MiyakoSize *size);
-extern void _miyako_yield_unit_1(MiyakoBitmap *src);
-extern void _miyako_yield_unit_2(MiyakoBitmap *src, MiyakoBitmap *dst);
+/*
+--
+Miyako v2.0 Extend Library "Miyako no Katana"
+Copyright (C) 2008  Cyross Makoto
+
+This library is free software; you can redistribute it and/or
+modify it under the terms of the GNU Lesser General Public
+License as published by the Free Software Foundation; either
+version 2.1 of the License, or (at your option) any later version.
+
+This library is distributed in the hope that it will be useful,
+but WITHOUT ANY WARRANTY; without even the implied warranty of
+MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
+Lesser General Public License for more details.
+
+You should have received a copy of the GNU Lesser General Public
+License along with this library; if not, write to the Free Software
+Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
+++
+*/
+
+extern void _miyako_setup_unit(VALUE unit, SDL_Surface *screen, MiyakoBitmap *mb, VALUE x, VALUE y, int use_yield);
+extern void _miyako_setup_unit_2(VALUE unit_s, VALUE unit_d, 
+                                SDL_Surface *screen,
+                                MiyakoBitmap *mb_s, MiyakoBitmap *mb_d,
+                                VALUE x, VALUE y, int use_yield);
+extern int _miyako_init_rect(MiyakoBitmap *src, MiyakoBitmap *dst, MiyakoSize *size);
+extern void _miyako_yield_unit_1(MiyakoBitmap *src);
+extern void _miyako_yield_unit_2(MiyakoBitmap *src, MiyakoBitmap *dst);

data/install_miyako.rb

@@ -1,87 +1,87 @@
-# Miyako2.0 install script
-# 2009 Cyross Makoto
-
-if RUBY_VERSION < '1.9.1'
-  puts 'Sorry. Miyako needs Ruby 1.9.1 or above...'
-  exit
-end
-
-begin
-require 'sdl'
-rescue
-  puts 'Sorry. Miyako needs Ruby/SDL...'
-  exit
-end
-
-if SDL::VERSION < '2.1'
-  puts 'Sorry. Miyako needs Ruby/SDL 2.1.0 or above...'
-  exit
-end
-
-require 'rbconfig'
-require 'fileutils'
-require 'optparse'
-
-option = { :noop => false, :verbose => true }
-not_force = true
-
-ARGV.options do |opt|
-  opt.on('--no-harm'){ option[:noop] = true }
-  opt.on('--force'){ not_force = false }
-  opt.on('--quiet'){ option[:verbose] = false }
-
-  opt.parse!
-end
-
-ext_dir = "./"
-osn = Config::CONFIG["target_os"].downcase
-if osn =~ /mswin|mingw|cygwin|bccwin/
-  ext_dir = "win/"
-elsif osn =~ /darwin/ # Mac OS X
-  if ENV['SDL_CONFIG_PATH'] 
-    system(Config::CONFIG["ruby_install_name"] + " extconf.rb --with-sdl-config='#{ENV['SDL_CONFIG_PATH']}'; make")
-  else
-    system(Config::CONFIG["ruby_install_name"] + " extconf.rb --with-sdl-config='sdl-config'; make")
-  end
-else # linux, U*IX...
-  if ENV['SDL_CONFIG_PATH'] 
-    system(Config::CONFIG["ruby_install_name"] + " extconf.rb --with-sdl-config='#{ENV['SDL_CONFIG_PATH']}'; make")
-  else
-    system(Config::CONFIG["ruby_install_name"] + " extconf.rb --with-sdl-config='sdl-config'; make")
-  end
-end
-
-sitelibdir = Config::CONFIG["sitelibdir"] + "/Miyako"
-apidir = sitelibdir + "/API"
-extdir = sitelibdir + "/EXT"
-
-if FileTest.exist?(sitelibdir) && not_force
-  puts "#{sitelibdir} is arleady exists."
-  puts "Are you sure?(Y/else)"
-  exit unless $stdin.gets.split(//)[0].upcase == 'Y'
-end
-
-FileUtils.remove_dir(sitelibdir, true)
-FileUtils.mkpath(sitelibdir, option)
-FileUtils.mkpath(apidir, option)
-FileUtils.mkpath(extdir, option)
-
-if osn =~ /darwin/ # Mac OS X
-  Dir.glob(ext_dir + "*.bundle"){|fname| FileUtils.install(fname, sitelibdir, option)}
-else # Windows, linux, U*IX...
-  Dir.glob(ext_dir + "*.so"){|fname| FileUtils.install(fname, sitelibdir, option)}
-end
-Dir.glob("lib/Miyako/*.rb"){|fname| FileUtils.install(fname, sitelibdir, option)}
-Dir.glob("lib/Miyako/API/*.rb"){|fname| FileUtils.install(fname, apidir, option)}
-Dir.glob("lib/Miyako/EXT/*.rb"){|fname| FileUtils.install(fname, extdir, option)}
-
-unless osn =~ /mswin|mingw|cygwin|bccwin/
-  FileUtils.chmod(0755, sitelibdir)
-  FileUtils.chmod(0755, apidir)
-  FileUtils.chmod(0755, extdir)
-  FileUtils.chmod(0644, sitelibdir+'/miyako.rb')
-  Dir.glob(sitelibdir+"/*.so"){|fname| FileUtils.chmod(0644, fname)} # for linux,bsd
-  Dir.glob(sitelibdir+"/*.bundle"){|fname| FileUtils.chmod(0644, fname)} # for macosx
-  Dir.glob(apidir+"/*.rb"){|fname| FileUtils.chmod(0644, fname)}
-  Dir.glob(extdir+"/*.rb"){|fname| FileUtils.chmod(0644, fname)}
-end
+# Miyako2.0 install script
+# 2009 Cyross Makoto
+
+if RUBY_VERSION < '1.9.1'
+  puts 'Sorry. Miyako needs Ruby 1.9.1 or above...'
+  exit
+end
+
+begin
+require 'sdl'
+rescue
+  puts 'Sorry. Miyako needs Ruby/SDL...'
+  exit
+end
+
+if SDL::VERSION < '2.1'
+  puts 'Sorry. Miyako needs Ruby/SDL 2.1.0 or above...'
+  exit
+end
+
+require 'rbconfig'
+require 'fileutils'
+require 'optparse'
+
+option = { :noop => false, :verbose => true }
+not_force = true
+
+ARGV.options do |opt|
+  opt.on('--no-harm'){ option[:noop] = true }
+  opt.on('--force'){ not_force = false }
+  opt.on('--quiet'){ option[:verbose] = false }
+
+  opt.parse!
+end
+
+ext_dir = "./"
+osn = Config::CONFIG["target_os"].downcase
+if osn =~ /mswin|mingw|cygwin|bccwin/
+  ext_dir = "win/"
+elsif osn =~ /darwin/ # Mac OS X
+  if ENV['SDL_CONFIG_PATH'] 
+    system(Config::CONFIG["ruby_install_name"] + " extconf.rb --with-sdl-config='#{ENV['SDL_CONFIG_PATH']}'; make")
+  else
+    system(Config::CONFIG["ruby_install_name"] + " extconf.rb --with-sdl-config='sdl-config'; make")
+  end
+else # linux, U*IX...
+  if ENV['SDL_CONFIG_PATH'] 
+    system(Config::CONFIG["ruby_install_name"] + " extconf.rb --with-sdl-config='#{ENV['SDL_CONFIG_PATH']}'; make")
+  else
+    system(Config::CONFIG["ruby_install_name"] + " extconf.rb --with-sdl-config='sdl-config'; make")
+  end
+end
+
+sitelibdir = Config::CONFIG["sitelibdir"] + "/Miyako"
+apidir = sitelibdir + "/API"
+extdir = sitelibdir + "/EXT"
+
+if FileTest.exist?(sitelibdir) && not_force
+  puts "#{sitelibdir} is arleady exists."
+  puts "Are you sure?(Y/else)"
+  exit unless $stdin.gets.split(//)[0].upcase == 'Y'
+end
+
+FileUtils.remove_dir(sitelibdir, true)
+FileUtils.mkpath(sitelibdir, option)
+FileUtils.mkpath(apidir, option)
+FileUtils.mkpath(extdir, option)
+
+if osn =~ /darwin/ # Mac OS X
+  Dir.glob(ext_dir + "*.bundle"){|fname| FileUtils.install(fname, sitelibdir, option)}
+else # Windows, linux, U*IX...
+  Dir.glob(ext_dir + "*.so"){|fname| FileUtils.install(fname, sitelibdir, option)}
+end
+Dir.glob("lib/Miyako/*.rb"){|fname| FileUtils.install(fname, sitelibdir, option)}
+Dir.glob("lib/Miyako/API/*.rb"){|fname| FileUtils.install(fname, apidir, option)}
+Dir.glob("lib/Miyako/EXT/*.rb"){|fname| FileUtils.install(fname, extdir, option)}
+
+unless osn =~ /mswin|mingw|cygwin|bccwin/
+  FileUtils.chmod(0755, sitelibdir)
+  FileUtils.chmod(0755, apidir)
+  FileUtils.chmod(0755, extdir)
+  FileUtils.chmod(0644, sitelibdir+'/miyako.rb')
+  Dir.glob(sitelibdir+"/*.so"){|fname| FileUtils.chmod(0644, fname)} # for linux,bsd
+  Dir.glob(sitelibdir+"/*.bundle"){|fname| FileUtils.chmod(0644, fname)} # for macosx
+  Dir.glob(apidir+"/*.rb"){|fname| FileUtils.chmod(0644, fname)}
+  Dir.glob(extdir+"/*.rb"){|fname| FileUtils.chmod(0644, fname)}
+end