rixmap 0.1.0

data/src/rixmapcore.hxx

@@ -0,0 +1,27 @@
+// -*- coding: utf-8 -*-
+/**
+ * Rixmapコア部分用ヘッダ
+ */
+#pragma once
+#include "rixmap.hxx"
+
+//----------------------------------------------------------------------------//
+// グローバル変数宣言
+//----------------------------------------------------------------------------//
+extern VALUE mRixmap;
+extern VALUE cRixmapBinary;
+extern VALUE cRixmapMode;
+extern VALUE cRixmapColor;
+extern VALUE cRixmapPalette;
+extern VALUE cRixmapImage;
+extern VALUE cRixmapImageLine;
+
+//----------------------------------------------------------------------------//
+// コアAPI関数プロトタイプ
+//----------------------------------------------------------------------------//
+extern void RixmapCore_Init();
+
+
+//============================================================================//
+// $Id: rixmapcore.hxx,v add33526d522 2014/04/19 16:27:29 chikuchikugonzalez $
+// vim: set sts=4 ts=4 sw=4 expandtab foldmethod=marker:

data/src/rixmapio.cxx

@@ -0,0 +1,652 @@
+// -*- coding: utf-8 -*-
+#include "rixmapio.hxx"
+
+//----------------------------------------------------------------------------//
+// C++用グローバルオブジェクト
+//----------------------------------------------------------------------------//
+
+//----------------------------------------------------------------------------//
+// グローバルオブジェクト実体
+//----------------------------------------------------------------------------//
+VALUE mRixmapImageIO     = Qnil;
+VALUE cRixmapImageIOInfo = Qnil;
+VALUE cRixmapBaseImageIO = Qnil;
+VALUE mRixmapFormat      = Qnil;
+
+//----------------------------------------------------------------------------//
+// IO系実装
+//----------------------------------------------------------------------------//
+/* Rixmap::ImageIO {{{ */
+/**
+ * 画像入出力実装クラスを登録します.
+ *
+ * @overload register(name, klass, extensions=[])
+ *   @param [Symbol,String] name 画像入出力実装名. `:BMP` とか.
+ *   @param [Class] klass 画像入出力の実装クラス.
+ *   @param [Array<String>] extensions 実装クラスに対応するファイル名拡張子リスト.
+ *   @return [void]
+ *
+ * @overload register(name, info)
+ *   @param [Symbol,String] name 画像入出力実装名
+ *   @param [Rixmap::ImageIO::ImageIOInfo] info 画像入出力実装情報.
+ *   @return [void]
+ */
+static VALUE ImageIO_Register(int argc, VALUE* argv, VALUE klass) {
+    VALUE argName, arg1, arg2;
+    rb_scan_args(argc, argv, "21", &argName, &arg1, &arg2);
+
+    // 名前を大文字化
+    VALUE strName = rb_funcall(rb_String(argName), rb_intern("upcase"), 0);
+    if (RSTRING_LEN(strName) == 0) {
+        rb_raise(rb_eArgError, "empty name is not valid");
+    }
+    VALUE symName = ID2SYM(rb_intern_str(strName));
+
+    // 引数で変更
+    VALUE info = Qnil;
+    if (RB_TYPE_P(arg1, T_CLASS)) {
+        // klass
+        VALUE objExts = Qnil;
+        if (NIL_P(arg2)) {
+            objExts = rb_ary_new();
+        } else {
+            objExts = rb_Array(arg2);
+        }
+        VALUE params[2] = {
+            arg1, objExts
+        };
+        info = rb_class_new_instance(2, params, cRixmapImageIOInfo);
+    } else if (RTEST(rb_obj_is_kind_of(arg1, cRixmapImageIOInfo))) {
+        // iio info
+        info = rb_obj_clone(arg1);
+    } else {
+        rb_raise(rb_eArgError, "unknown imageio type: %s", rb_obj_classname(arg1));
+    }
+
+    // レジストリへ入れる
+    VALUE registry = rb_iv_get(klass, "@registry");
+    OBJ_FREEZE(info);
+    rb_hash_aset(registry, symName, info);
+
+    return info;
+}
+
+/**
+ * 画像入出力実装のインスタンスを作成します.
+ *
+ * @overload new(name, *params)
+ *   @param [Symbol,String] name 画像入出力実装名.
+ *   @param [Object...] params 実装クラスのコンストラクタに渡される引数.
+ *   @return [Object] 実装クラスインスタンス.
+ */
+static VALUE ImageIO_New(int argc, VALUE* argv, VALUE klass) {
+    VALUE argName, argParams;
+    rb_scan_args(argc, argv, "1*", &argName, &argParams);
+
+    // キー名を作成
+    VALUE strName = rb_String(argName);
+    VALUE symName = ID2SYM(rb_intern_str(rb_funcall(strName, rb_intern("upcase"), 0)));
+
+    // レジストリから取得
+    VALUE registry = rb_iv_get(klass, "@registry");
+    VALUE info = rb_hash_lookup(registry, symName);
+
+    // オブジェクトを作成
+    if (NIL_P(info)) {
+        rb_raise(rb_eNotImpError, "Image-IO for %s is not implemented.", StringValueCStr(strName));
+    }
+    VALUE klsIIO = rb_funcall(info, rb_intern("imageio"), 0);
+    if (NIL_P(klsIIO)) {
+        rb_raise(rb_eNotImpError, "Image-IO for %s is not implemented.", StringValueCStr(strName));
+    }
+    long   nparam = RARRAY_LEN(argParams);
+    VALUE* params = RARRAY_PTR(argParams);
+    VALUE iio = rb_class_new_instance(nparam, params, klsIIO);
+
+    return iio;
+}
+
+/**
+ * 指定した名前に対応する画像入出力実装情報を返します.
+ *
+ * @param [Symbol,String] name 実装名
+ * @return [Rixmap::ImageIO::ImageIOInfo] 実装情報
+ */
+static VALUE ImageIO_Get(VALUE klass, VALUE argName) {
+    // キー名を作成
+    VALUE strName = rb_String(argName);
+    VALUE symName = ID2SYM(rb_intern_str(rb_funcall(strName, rb_intern("upcase"), 0)));
+
+    // レジストリから取得
+    VALUE registry = rb_iv_get(klass, "@registry");
+    VALUE info = rb_hash_lookup(registry, symName);
+
+    // 見つからなかった場合はnilになる
+    return info;
+}
+
+/**
+ * 指定したファイル名に最初にマッチした画像入出力実装情報を返します.
+ *
+ * @param [String] filename ファイル名パターン.
+ * @return [Rixmap::ImageIO::ImageIOInfo] 実装情報. 見つからない場合はnil.
+ * @see {Rixmap::ImageIO.findall}
+ */
+static VALUE ImageIO_Find(VALUE klass, VALUE argFileName) {
+    // ファイル名を文字列にしておく
+    VALUE strFileName = rb_String(argFileName);
+
+    // レジストリ
+    VALUE registry = rb_iv_get(klass, "@registry");
+
+    // 登録済みキーリストをすべて取得
+    VALUE allKeys = rb_funcall(registry, rb_intern("keys"), 0);
+
+    // キーでループする
+    long nkey = RARRAY_LEN(allKeys);
+    for (long i = 0; i < nkey; i++) {
+        VALUE tblKey = rb_ary_entry(allKeys, i);
+        VALUE tblVal = rb_hash_lookup(registry, tblKey);
+
+        if (!NIL_P(tblVal) && RTEST(rb_obj_is_kind_of(tblVal, cRixmapImageIOInfo))) {
+            VALUE iioInfo = tblVal; // 変数名だけ変えておく
+
+            // 拡張子をチェック
+            if (RTEST(rb_funcall(iioInfo, rb_intern("match?"), 1, strFileName))) {
+                // TODO 複数のフォーマットで同じ拡張子に対応している場合
+                return iioInfo;
+            }
+        } else {
+            // TODO warningぐらい出しておく？
+        }
+    }
+
+    // 見つからなかったらnil
+    return Qnil;
+}
+
+/**
+ * 指定したファイル名にマッチするすべての画像入出力情報を返します.
+ *
+ * @param [String] filename ファイル名
+ * @return [Array<Rixmap::ImageIO::ImageIOInfo>] 実装情報配列. 見つからない場合は空配列になります.
+ * @see {Rixmap::ImageIO.find}
+ */
+static VALUE ImageIO_FindAll(VALUE klass, VALUE argFileName) {
+    // ファイル名を文字列にしておく
+    VALUE strFileName = rb_String(argFileName);
+
+    // レジストリ
+    VALUE registry = rb_iv_get(klass, "@registry");
+
+    // 登録済みキーリストをすべて取得
+    VALUE allKeys = rb_funcall(registry, rb_intern("keys"), 0);
+
+    // キーでループする
+    VALUE aryInfo = rb_ary_new();
+    long nkey = RARRAY_LEN(allKeys);
+    for (long i = 0; i < nkey; i++) {
+        VALUE tblKey = rb_ary_entry(allKeys, i);
+        VALUE tblVal = rb_hash_lookup(registry, tblKey);
+
+        if (!NIL_P(tblVal) && RTEST(rb_obj_is_kind_of(tblVal, cRixmapImageIOInfo))) {
+            VALUE iioInfo = tblVal; // 変数名だけ変えておく
+
+            // 拡張子をチェック
+            if (RTEST(rb_funcall(iioInfo, rb_intern("match?"), 1, strFileName))) {
+                // 配列に追加
+                rb_ary_push(aryInfo, iioInfo);
+            }
+        } else {
+            // TODO warningぐらい出しておく？
+        }
+    }
+
+    // 見つからなかったら空配列
+    return aryInfo;
+}
+/* }}} */
+/* Rixmap::ImageIO::ImageIOInfo {{{ */
+/**
+ * 画像入出力情報クラスを初期化します.
+ *
+ * @overload initialize(klass, extensions = [])
+ *   @param [Class] klass ImageIO実装クラス
+ *   @param [Array] extensions 画像の拡張子リスト
+ *   @return [void]
+ */
+static VALUE ImageIOInfo_initialize(int argc, VALUE* argv, VALUE self) {
+    VALUE argKlass, argExtensions;
+    rb_scan_args(argc, argv, "11", &argKlass, &argExtensions);
+
+    VALUE objIOClass    = argKlass;
+    VALUE objExtensions = Qnil;
+    if (NIL_P(argExtensions)) {
+        objExtensions = rb_ary_new();
+    } else {
+        objExtensions = rb_Array(argExtensions);
+    }
+
+    rb_iv_set(self, "@imageio",    objIOClass);
+    rb_iv_set(self, "@extensions", objExtensions);
+
+    return self;
+}
+
+/**
+ * 指定したファイル名の拡張子をこの情報クラスの拡張子リストと比較して、
+ * マッチしたものが見つかった場合はtrueを返します.
+ *
+ * @param [String] filename ファイル名
+ * @return [Boolean] 拡張子リストとマッチしたものがあるばあいはtrue
+ */
+static VALUE ImageIOInfo_isMatchFileName(VALUE self, VALUE argFileName) {
+    // 型チェック
+    VALUE objExtensions = rb_iv_get(self, "@extensions");
+    if (NIL_P(objExtensions)) {
+        rb_warning("extensions is null");
+        return Qfalse;
+    }
+    if (!RB_TYPE_P(objExtensions, T_ARRAY)) {
+        rb_warning("extensions is not array");
+        return Qfalse;
+    }
+
+    // ファイル名
+    VALUE objFileName = rb_funcall(rb_String(argFileName), rb_intern("downcase"), 0);
+
+    // マッチをとる
+    long next = RARRAY_LEN(objExtensions);
+    for (long i = 0; i < next; i++) {
+        VALUE objExt = rb_funcall(rb_String(rb_ary_entry(objExtensions, i)), rb_intern("downcase"), 0);
+        if (RTEST(rb_funcall(objFileName, rb_intern("end_with?"), 1, objExt))) {
+            return Qtrue;
+        }
+    }
+    return Qfalse;
+}
+/* }}} */
+/* Rixmap::ImageIO::BaseImageIO {{{ */
+/**
+ * 画像の先頭バイトからその画像がこのクラスで読み込めるかを判定します.
+ *
+ * @param [String] magic マジックバイトデータ
+ * @return [Boolean] 読み込める形式の場合はtrue
+ */
+static VALUE BaseImageIO_IsReadableStatic(VALUE klass, VALUE argMagic) {
+    return Qfalse;
+}
+
+/**
+ * 指定画像がこのクラスで書き込めるかを判定します.
+ *
+ * @param [Rixmap::Image] image 判定対象画像
+ * @return [Boolean] 書き込める形式の場合はtrue
+ */
+static VALUE BaseImageIO_IsWritableStatic(VALUE klass, VALUE argImage) {
+    return Qfalse;
+}
+
+/**
+ * 画像入出力実装クラスを初期化します.
+ *
+ * オプションパラメータが指定されている場合は、キーをインスタンス変数名として値を設定していきます.
+ *
+ * @overload initialize(options={})
+ *   @param [Hash] options オプションパラメータ.
+ *   @return [void]
+ */
+static VALUE BaseImageIO_initialize(int argc, VALUE* argv, VALUE self) {
+    VALUE argOptions = Qnil;
+    rb_scan_args(argc, argv, "01", &argOptions);
+
+    VALUE objOptions = Qnil;
+    if (NIL_P(argOptions)) {
+        objOptions = rb_hash_new();
+    } else {
+        if (RB_TYPE_P(argOptions, T_HASH)) {
+            objOptions = argOptions;
+        } else {
+#if HAVE_RB_HASH
+            objOptions = rb_Hash(argOptions);
+#else
+            objOptions = rb_hash_new();
+#endif
+        }
+    }
+
+    VALUE keys = rb_funcall(objOptions, rb_intern("keys"), 0);
+    VALUE ivPrefix = rb_str_new_cstr("@");
+    long nkey = RARRAY_LEN(keys);
+    for (long i = 0; i < nkey; i++) {
+        VALUE key = rb_ary_entry(keys, i);
+        VALUE val = rb_hash_lookup(objOptions, key);
+        VALUE strKey = rb_String(key);
+        VALUE ivName = rb_str_dup(ivPrefix);
+        rb_str_concat(ivName, strKey);
+        rb_ivar_set(self, rb_intern_str(ivName), val);
+    }
+
+    return self;
+}
+
+/**
+ * 画像の先頭バイトからその画像がこのオブジェクトで読み込めるかどうかを判定します.
+ *
+ * @param [String] magic マジックバイトデータ
+ * @return [Boolean] 読み込める場合はtrue
+ * @see BaseImageIO.readable?
+ */
+static VALUE BaseImageIO_isReadable(VALUE self, VALUE argMagic) {
+    VALUE klass = rb_obj_class(self);
+    return rb_funcall(klass, rb_intern("readable?"), 1, argMagic);
+}
+
+/**
+ * 画像がこのオブジェクトで書き込めるかを判定します.
+ *
+ * @param [Rixmap::Image] image 判定対象画像
+ * @return [Boolean] 書き込める形式の場合はtrue
+ * @see BaseImageIO.writable?
+ */
+static VALUE BaseImageIO_isWritable(VALUE self, VALUE argImage) {
+    VALUE klass = rb_obj_class(self);
+    return rb_funcall(klass, rb_intern("writable?"), 1, argImage);
+}
+
+/**
+ * 画像をバイト列へと変換します.
+ *
+ * 変換処理は各フォーマット毎にサブクラスで実装してください.
+ *
+ * @overload encode(image, options={})
+ *   @param [Rixmap::Image] image 変換対象の画像.
+ *   @param [Hash] options 実行時のオプションパラメータ.
+ *   @return [String] 画像データを含むバイト列
+ * @raise NotImplementedError バイト列への変換処理が実装されていない場合.
+ */
+static VALUE BaseImageIO_encode(int argc, VALUE* argv, VALUE self) {
+    rb_raise(rb_eNotImpError, "%s#%s is not implemented", rb_obj_classname(self), rb_id2name(rb_frame_this_func()));
+}
+
+/**
+ * バイト列から画像を復元します.
+ *
+ * 復元処理は各フォーマット毎にサブクラスで実装してください.
+ *
+ * @overload decode(data, options={})
+ *   @param [String] data 画像データが入っているバイト列データ.
+ *   @param [Hash] options 実行時オプションパラメータ.
+ *   @return [Rixmap::Image] 復元された画像オブジェクト
+ * @raise NotImplementedError バイト列からの復元処理が実装されていない場合.
+ */
+static VALUE BaseImageIO_decode(int argc, VALUE* argv, VALUE self) {
+    rb_raise(rb_eNotImpError, "%s#%s is not implemented", rb_obj_classname(self), rb_id2name(rb_frame_this_func()));
+}
+
+/**
+ * 指定したパスへ画像を書き出します.
+ *
+ * @overload save(path, image, options={})
+ *   @param [String] path 書き込み先ファイルパス
+ *   @param [Rixmap::Image] image 書き込む画像オブジェクト.
+ *   @param [Hash] options 実行時オプションパラメータ.
+ *   @option options [Integer] :offset ファイルの書き込み開始位置 (バイト数)
+ *   @return [Integer] 書き込んだバイト数
+ * @see #encode
+ */
+static VALUE BaseImageIO_save(int argc, VALUE* argv, VALUE self) {
+    VALUE argPath, argImage, argOptions;
+    rb_scan_args(argc, argv, "21", &argPath, &argImage, &argOptions);
+
+    // 型チェックとか
+    if (!RTEST(rb_obj_is_kind_of(argImage, cRixmapImage))) {
+        rb_raise(rb_eArgError, "unexpected type of image: %s", rb_obj_classname(argImage));
+    }
+    VALUE objPath    = rb_String(argPath);
+    VALUE objImage   = argImage;
+    VALUE objOptions = Qnil;
+    if (RB_TYPE_P(argOptions, T_HASH)) {
+        objOptions = argOptions;
+    } else {
+        objOptions = rb_hash_new();
+    }
+
+    // 画像のエンコード
+    // TODO ここで発生する例外の処理
+    VALUE objData = rb_funcall(self, rb_intern("encode"), 2, objImage, objOptions);
+
+    // ファイルの書き込み位置を確認
+    VALUE optFileOffset = rb_hash_lookup(objOptions, ID2SYM(rb_intern("offset")));
+    VALUE objFileOffset = Qnil;
+    if (NIL_P(optFileOffset)) {
+        objFileOffset = INT2FIX(0);
+    } else {
+        objFileOffset = rb_Integer(optFileOffset);
+    }
+
+    // 書き込み
+    VALUE klsIO = rb_path2class("IO");
+    VALUE objWroteBytes = rb_funcall(klsIO, rb_intern("binwrite"), 2, objPath, objData, objFileOffset);
+
+    // 戻す
+    return objWroteBytes;
+}
+
+/**
+ * 指定したストリームへ画像を書き込みます.
+ *
+ * @overload write(io, image, options={})
+ *   @param [IO,StringIO] io 出力用に開かれているストリームオブジェクト
+ *   @param [Rixmap::Image] image 対象画像オブジェクト
+ *   @param [Hash] options 実行時オプションパラメータ
+ *   @return [Integer] 書き込んだバイト数
+ * @see #encode
+ */
+static VALUE BaseImageIO_write(int argc, VALUE* argv, VALUE self) {
+    VALUE argIO, argImage, argOptions;
+    rb_scan_args(argc, argv, "21", &argIO, &argImage, &argOptions);
+
+    // 型チェックとか
+    if (!RTEST(rb_obj_is_kind_of(argImage, cRixmapImage))) {
+        rb_raise(rb_eArgError, "unexpected type of image: %s", rb_obj_classname(argImage));
+    }
+    VALUE objIO      = argIO;       // TODO 型チェックする
+    VALUE objImage   = argImage;
+    VALUE objOptions = Qnil;
+    if (RB_TYPE_P(argOptions, T_HASH)) {
+        objOptions = argOptions;
+    } else {
+        objOptions = rb_hash_new();
+    }
+
+    // 画像のエンコード
+    // TODO ここで発生する例外の処理
+    VALUE objData = rb_funcall(self, rb_intern("encode"), 2, objImage, objOptions);
+
+    // FIXME ここまで #save と同じなのをどうにかしたいよね
+
+    // 書き込む
+    VALUE objWroteBytes = rb_funcall(objIO, rb_intern("write"), 1, objData);
+
+    // 戻る
+    return objWroteBytes;
+}
+
+/**
+ * 指定したパスから画像を読み込みます.
+ *
+ * @overload open(path, options={})
+ *   @param [String] path ファイルパス
+ *   @param [Hash] options 実行時オプションパラメータ
+ *   @option options [Integer] :length 読み込むファイルの長さ (バイト数)
+ *   @option options [Integer] :offset 読み込むファイルの位置
+ *   @return [Rixmap::Image] 読み込まれた画像
+ * @see #decode
+ */
+static VALUE BaseImageIO_open(int argc, VALUE* argv, VALUE self) {
+    VALUE argPath, argOptions;
+    rb_scan_args(argc, argv, "11", &argPath, &argOptions);
+
+    // 型チェックすべきか
+    VALUE objPath    = rb_String(argPath);
+    VALUE objOptions = Qnil;
+    if (RB_TYPE_P(argOptions, T_HASH)) {
+        objOptions = argOptions;
+    } else {
+        objOptions = rb_hash_new();
+    }
+
+    // オプションパラメータ
+    VALUE optLength = rb_hash_lookup(objOptions, ID2SYM("length"));
+    VALUE optOffset = rb_hash_lookup(objOptions, ID2SYM("offset"));
+    VALUE objOffset = Qnil;
+    if (NIL_P(optOffset)) {
+        objOffset = INT2FIX(0);
+    } else {
+        objOffset = rb_Integer(optOffset);
+    }
+
+    // バイト列を取得
+    VALUE klsIO = rb_path2class("IO");
+    VALUE objBytes = rb_funcall(klsIO, rb_intern("binread"), 3, objPath, optLength, objOffset);
+
+    // 画像を復元
+    // TODO ココで発生する例外対処
+    VALUE objImage = rb_funcall(self, rb_intern("decode"), 2, objBytes, objOptions);
+
+    // 戻る
+    return objImage;
+}
+
+/**
+ * 指定されたストリームから画像を読み込みます.
+ *
+ * @overload read(io, options={})
+ *   @param [IO,StringIO] io 読み込み用に開かれているストリームオブジェクト
+ *   @param [Hash] options 実行時オプションパラメータ
+ *   @option options [Integer] :length 読み込むバイト数
+ *   @return [Rixmap::Image] 読み込まれた画像
+ * @see #decode
+ */
+static VALUE BaseImageIO_read(int argc, VALUE* argv, VALUE self) {
+    VALUE argIO, argOptions;
+    rb_scan_args(argc, argv, "11", &argIO, &argOptions);
+
+    // 型チェック…？
+    VALUE objIO      = argIO;
+    VALUE objOptions = Qnil;
+    if (RB_TYPE_P(argOptions, T_HASH)) {
+        objOptions = argOptions;
+    } else {
+        objOptions = rb_hash_new();
+    }
+
+    // オプションパラメータ
+    VALUE optLength = rb_hash_lookup(objOptions, ID2SYM("length"));
+
+    // 読み込む
+    VALUE objBytes = rb_funcall(objIO, rb_intern("read"), 1, optLength);
+
+    // 復元
+    VALUE objImage = rb_funcall(self, rb_intern("decode"), 2, objBytes, objOptions);
+
+    // 戻る
+    return objImage;
+}
+/* }}} */
+
+//----------------------------------------------------------------------------//
+// 内部API実装
+//----------------------------------------------------------------------------//
+/**
+ * 初期化処理
+ */
+void RixmapIO_Init() {
+    /**
+     * Document-module: Rixmap::ImageIO
+     *
+     * IO系クラス定義モジュール.
+     */
+    mRixmapImageIO = rb_define_module_under(mRixmap, "ImageIO");
+    rb_define_singleton_method(mRixmapImageIO, "register", RUBY_METHOD_FUNC(ImageIO_Register), -1);
+    rb_define_singleton_method(mRixmapImageIO, "new",      RUBY_METHOD_FUNC(ImageIO_New), -1);
+    rb_define_singleton_method(mRixmapImageIO, "get",      RUBY_METHOD_FUNC(ImageIO_Get), 1);
+    rb_define_singleton_method(mRixmapImageIO, "find",     RUBY_METHOD_FUNC(ImageIO_Find), 1);
+    rb_define_singleton_method(mRixmapImageIO, "findall",  RUBY_METHOD_FUNC(ImageIO_FindAll), 1);
+    rb_iv_set(mRixmapImageIO, "@registry", rb_hash_new());
+
+    /**
+     * Document-class: Rixmap::ImageIO::ImageIOInfo
+     *
+     * IOクラス実装情報クラス.
+     * {Rixmap::ImageIO}モジュールの内部で使用しています.
+     */
+    cRixmapImageIOInfo = rb_define_class_under(mRixmapImageIO, "ImageIOInfo", rb_cObject);
+    rb_define_private_method(cRixmapImageIOInfo, "initialize", RUBY_METHOD_FUNC(ImageIOInfo_initialize), -1);
+    rb_define_attr(cRixmapImageIOInfo, "imageio",    1, 1);
+    rb_define_attr(cRixmapImageIOInfo, "extensions", 1, 1);
+    rb_define_method(cRixmapImageIOInfo, "match?", RUBY_METHOD_FUNC(ImageIOInfo_isMatchFileName), 1);
+
+    /**
+     * Document-class: Rixmap::ImageIO::BaseImageIO
+     *
+     * 画像入出力処理のベースクラス.
+     */
+    cRixmapBaseImageIO = rb_define_class_under(mRixmapImageIO, "BaseImageIO", rb_cObject);
+    rb_define_singleton_method(cRixmapBaseImageIO, "readable?", RUBY_METHOD_FUNC(BaseImageIO_IsReadableStatic), 1);
+    rb_define_singleton_method(cRixmapBaseImageIO, "writable?", RUBY_METHOD_FUNC(BaseImageIO_IsWritableStatic), 1);
+    rb_define_private_method(cRixmapBaseImageIO, "initialize", RUBY_METHOD_FUNC(BaseImageIO_initialize), -1);
+    rb_define_method(cRixmapBaseImageIO, "readable?", RUBY_METHOD_FUNC(BaseImageIO_isReadable), 1);
+    rb_define_method(cRixmapBaseImageIO, "writable?", RUBY_METHOD_FUNC(BaseImageIO_isWritable), 1);
+    rb_define_method(cRixmapBaseImageIO, "encode",    RUBY_METHOD_FUNC(BaseImageIO_encode), -1);
+    rb_define_method(cRixmapBaseImageIO, "decode",    RUBY_METHOD_FUNC(BaseImageIO_decode), -1);
+    rb_define_method(cRixmapBaseImageIO, "save",      RUBY_METHOD_FUNC(BaseImageIO_save), -1);
+    rb_define_method(cRixmapBaseImageIO, "write",     RUBY_METHOD_FUNC(BaseImageIO_write), -1);
+    rb_define_method(cRixmapBaseImageIO, "open",      RUBY_METHOD_FUNC(BaseImageIO_open), -1);
+    rb_define_method(cRixmapBaseImageIO, "read",      RUBY_METHOD_FUNC(BaseImageIO_read), -1);
+
+    /**
+     * Document-module: Rixmap::Format
+     *
+     * 各種フォーマット実装モジュール.
+     */
+    mRixmapFormat = rb_define_module_under(mRixmap, "Format");
+
+    // グローバル変数を保存
+    rb_global_variable(&mRixmapImageIO);
+    rb_global_variable(&cRixmapImageIOInfo);
+    rb_global_variable(&cRixmapBaseImageIO);
+    rb_global_variable(&mRixmapFormat);
+}
+
+/**
+ * 指定したフォーマット名でImageIOへklassを登録します.
+ *
+ * @param [const char*] name フォーマット名
+ * @param [VALUE] klass フォーマット実装クラスオブジェクト
+ * @param [int] num 拡張子の実装数
+ * @param [const char*...] ... 拡張子リスト
+ */
+void RixmapIO_RegisterImageIO(const char* name, volatile VALUE klass, int num, ...) {
+    volatile VALUE objName = rb_str_new_cstr(name);
+    volatile VALUE aryExts = rb_ary_new();
+
+    // 拡張子リストを処理.
+    // 可変長引数から取得する.
+    va_list vargs;
+    va_start(vargs, num);
+    for (int i = 0; i < num; i++) {
+        const char* ext = va_arg(vargs, const char*);
+        rb_ary_push(aryExts, rb_str_new_cstr(ext));
+    }
+    va_end(vargs);
+
+    // ImageIO.registerを呼び出す
+    rb_funcall(mRixmapImageIO, rb_intern("register"), 3, objName, klass, aryExts);
+}
+
+
+//============================================================================//
+// $Id: rixmapio.cxx,v 66c8edefa6c0 2014/04/20 14:22:54 chikuchikugonzalez $
+// vim: set sts=4 ts=4 sw=4 expandtab foldmethod=marker:

data/src/rixmapio.hxx

@@ -0,0 +1,25 @@
+// -*- coding: utf-8 -*-
+/**
+ * Rixmapの入出力関係ヘッダ
+ */
+#pragma once
+#include "rixmapcore.hxx"
+
+//----------------------------------------------------------------------------//
+// グローバル変数宣言
+//----------------------------------------------------------------------------//
+extern VALUE mRixmapImageIO;
+extern VALUE cRixmapImageIOInfo;
+extern VALUE cRixmapBaseImageIO;
+extern VALUE mRixmapFormat;
+
+//----------------------------------------------------------------------------//
+// コアAPI関数プロトタイプ
+//----------------------------------------------------------------------------//
+extern void RixmapIO_Init();
+extern void RixmapIO_RegisterImageIO(const char* name, volatile VALUE klass, int num, ...);
+
+
+//============================================================================//
+// $Id: rixmapio.hxx,v bb1f88e64282 2014/04/20 13:54:13 chikuchikugonzalez $
+// vim: set sts=4 ts=4 sw=4 expandtab foldmethod=marker: