rroonga 1.0.1-x86-mingw32 → 1.1.0-x86-mingw32

data/ext/groonga/rb-grn-patricia-trie.c

@@ -90,7 +90,7 @@ VALUE rb_cGrnPatriciaTrie;
  *   ともでき、その場合は自動的にGroonga::Recordからレコード
  *   IDを取得する。
  *
- *   省略した場合は文字列をキーとして使用する。この場合、
+ *   省略した場合はShortText型をキーとして使用する。この場合、
  *   4096バイトまで使用可能である。
  *
  * [+:value_type+]
@@ -206,7 +206,7 @@ rb_grn_patricia_trie_s_create (int argc, VALUE *argv, VALUE klass)
 	flags |= GRN_OBJ_KEY_WITH_SIS;
 
     if (NIL_P(rb_key_type)) {
-	flags |= GRN_OBJ_KEY_VAR_SIZE;
+	key_type = grn_ctx_at(context, GRN_DB_SHORT_TEXT);
     } else {
 	key_type = RVAL2GRNOBJECT(rb_key_type, &context);
     }
@@ -221,7 +221,7 @@ rb_grn_patricia_trie_s_create (int argc, VALUE *argv, VALUE klass)
 			     flags, key_type, value_type);
     if (!table)
 	rb_grn_context_check(context, rb_ary_new4(argc, argv));
-    rb_table = GRNOBJECT2RVAL(klass, context, table, RB_GRN_TRUE);
+    rb_table = GRNOBJECT2RVAL(klass, context, table, GRN_TRUE);
 
     if (!NIL_P(rb_default_tokenizer))
 	rb_funcall(rb_table, rb_intern("default_tokenizer="), 1,
@@ -252,17 +252,17 @@ rb_grn_patricia_trie_s_create (int argc, VALUE *argv, VALUE klass)
  *
  * [+:operator+]
  *   マッチしたレコードをどのように扱うか。指定可能な値は以
- *   下の通り。省略した場合はGroonga::Operation::OR。
+ *   下の通り。省略した場合はGroonga::Operator::OR。
  *
- *   [Groonga::Operation::OR]
+ *   [Groonga::Operator::OR]
  *     マッチしたレコードを追加。すでにレコードが追加され
  *     ている場合は何もしない。
- *   [Groonga::Operation::AND]
+ *   [Groonga::Operator::AND]
  *     マッチしたレコードのスコアを増加。マッチしなかった
  *     レコードを削除。
- *   [Groonga::Operation::BUT]
+ *   [Groonga::Operator::BUT]
  *     マッチしたレコードを削除。
- *   [Groonga::Operation::ADJUST]
+ *   [Groonga::Operator::ADJUST]
  *     マッチしたレコードのスコアを増加。
  *
  * [+:type+]
@@ -289,7 +289,7 @@ rb_grn_patricia_trie_search (int argc, VALUE *argv, VALUE self)
     grn_obj *key, *domain, *result;
     grn_operator operator;
     grn_search_optarg search_options;
-    rb_grn_boolean search_options_is_set = RB_GRN_FALSE;
+    grn_bool search_options_is_set = GRN_FALSE;
     VALUE rb_key, options, rb_result, rb_operator, rb_type;
 
     rb_grn_table_key_support_deconstruct(SELF(self), &table, &context,
@@ -312,7 +312,7 @@ rb_grn_patricia_trie_search (int argc, VALUE *argv, VALUE self)
 				  GRN_OBJ_TABLE_HASH_KEY | GRN_OBJ_WITH_SUBREC,
 				  table, 0);
 	rb_grn_context_check(context, self);
-	rb_result = GRNOBJECT2RVAL(Qnil, context, result, RB_GRN_TRUE);
+	rb_result = GRNOBJECT2RVAL(Qnil, context, result, GRN_TRUE);
     } else {
 	result = RVAL2GRNOBJECT(rb_result, &context);
     }
@@ -381,7 +381,7 @@ rb_grn_patricia_trie_scan (VALUE self, VALUE rb_string)
     grn_pat_scan_hit hits[1024];
     const char *string;
     long string_length;
-    rb_grn_boolean block_given;
+    grn_bool block_given;
 
     string = StringValuePtr(rb_string);
     string_length = RSTRING_LEN(rb_string);
@@ -459,7 +459,7 @@ rb_grn_patricia_trie_prefix_search (VALUE self, VALUE rb_prefix)
 			      GRN_OBJ_TABLE_HASH_KEY,
 			      table, 0);
     rb_grn_context_check(context, self);
-    rb_result = GRNOBJECT2RVAL(Qnil, context, result, RB_GRN_TRUE);
+    rb_result = GRNOBJECT2RVAL(Qnil, context, result, GRN_TRUE);
 
     GRN_BULK_REWIND(key);
     RVAL2GRNKEY(rb_prefix, context, key, domain_id, domain, self);

data/ext/groonga/rb-grn-plugin.c

@@ -0,0 +1,134 @@
+/* -*- c-file-style: "ruby" -*- */
+/*
+  Copyright (C) 2011  Kouhei Sutou <kou@clear-code.com>
+
+  This library is free software; you can redistribute it and/or
+  modify it under the terms of the GNU Lesser General Public
+  License version 2.1 as published by the Free Software Foundation.
+
+  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 "rb-grn.h"
+
+#define SELF(object) (RVAL2GRNCONTEXT(object))
+
+static VALUE cGrnPlugin;
+
+/*
+ * Document-class: Groonga::Plugin
+ *
+ * プラグイン。現在のところ、Rubyでgroongaのプラグインを作成
+ * することはできず、Cで作成された既存のプラグインを登録する
+ * ことができるだけです。
+ */
+
+grn_id
+rb_grn_plugin_from_ruby_object (VALUE object)
+{
+    RbGrnPlugin *rb_grn_plugin;
+
+    if (!RVAL2CBOOL(rb_obj_is_kind_of(object, cGrnPlugin))) {
+	rb_raise(rb_eTypeError, "not a groonga plugin");
+    }
+
+    Data_Get_Struct(object, RbGrnPlugin, rb_grn_plugin);
+    if (!rb_grn_plugin)
+	rb_raise(rb_eGrnError, "groonga plugin is NULL");
+    return rb_grn_plugin->id;
+}
+
+void
+rb_grn_plugin_fin (grn_id id)
+{
+}
+
+static void
+rb_grn_plugin_free (void *pointer)
+{
+    RbGrnPlugin *rb_grn_plugin = pointer;
+
+    xfree(rb_grn_plugin);
+}
+
+static VALUE
+rb_grn_plugin_alloc (VALUE klass)
+{
+    return Data_Wrap_Struct(klass, NULL, rb_grn_plugin_free, NULL);
+}
+
+/*
+ * call-seq:
+ *   Groonga::Plugin.register(name, options=nil)
+ *   Groonga::Plugin.register({:path => path, :context => nil})
+ *
+ * 既存のプラグインをデータベースに登録する。
+ *
+ * _name_を指定した場合はその名前のプラグインを登録する。
+ *
+ * _path_を指定した場合はそのパスのプラグインを登録する。
+ *
+ * _options_にはハッシュでオプションを指定する。指定できるオ
+ * プションは以下の通り。
+ *
+ * [+:context+]
+ *   データベースを結びつけるコンテキスト。省略すると
+ *   Groonga::Context.defaultを利用する。
+ */
+static VALUE
+rb_grn_plugin_s_register (int argc, VALUE *argv, VALUE klass)
+{
+    const char *name = NULL, *path = NULL;
+    VALUE rb_options, rb_name = Qnil, rb_path, rb_context;
+    grn_ctx *context;
+
+    if (argc >= 1) {
+        rb_name = rb_check_string_type(argv[0]);
+    }
+
+    if (NIL_P(rb_name)) {
+        rb_scan_args(argc, argv, "01", &rb_options);
+        rb_grn_scan_options(rb_options,
+                            "path", &rb_path,
+                            "context", &rb_context,
+                            NULL);
+        path = StringValueCStr(rb_path);
+    } else {
+        rb_scan_args(argc, argv, "11", &rb_name, &rb_options);
+        rb_grn_scan_options(rb_options,
+                            "context", &rb_context,
+                            NULL);
+        name = StringValueCStr(rb_name);
+    }
+
+    if (NIL_P(rb_context)) {
+        rb_context = rb_grn_context_get_default();
+    }
+    context = RVAL2GRNCONTEXT(rb_context);
+
+    if (name) {
+        grn_plugin_register(context, name);
+    } else {
+        grn_plugin_register_by_path(context, path);
+    }
+
+    rb_grn_context_check(context, rb_ary_new4(argc, argv));
+    return Qnil;
+}
+
+void
+rb_grn_init_plugin (VALUE mGrn)
+{
+    cGrnPlugin = rb_define_class_under(mGrn, "Plugin", rb_cObject);
+    rb_define_alloc_func(cGrnPlugin, rb_grn_plugin_alloc);
+
+    rb_define_singleton_method(cGrnPlugin, "register",
+			       rb_grn_plugin_s_register, -1);
+}

data/ext/groonga/rb-grn-procedure.c

@@ -34,7 +34,7 @@ rb_grn_procedure_from_ruby_object (VALUE object)
 
 VALUE
 rb_grn_procedure_to_ruby_object (grn_ctx *context, grn_obj *procedure,
-				 rb_grn_boolean owner)
+				 grn_bool owner)
 {
     return GRNOBJECT2RVAL(rb_cGrnProcedure, context, procedure, owner);
 }

data/ext/groonga/rb-grn-query.c

@@ -34,7 +34,7 @@ struct _RbGrnQuery
 {
     grn_ctx *context;
     grn_query *query;
-    rb_grn_boolean owner;
+    grn_bool owner;
 };
 
 VALUE rb_cGrnQuery;
@@ -86,7 +86,7 @@ rb_grn_query_to_ruby_object (grn_ctx *context, grn_query *query)
     rb_grn_query = ALLOC(RbGrnQuery);
     rb_grn_query->context = context;
     rb_grn_query->query = query;
-    rb_grn_query->owner = RB_GRN_FALSE;
+    rb_grn_query->owner = GRN_FALSE;
 
     return Data_Wrap_Struct(rb_cGrnQuery, NULL,
                             rb_rb_grn_query_free, rb_grn_query);
@@ -146,10 +146,10 @@ rb_grn_operator_from_ruby_object (VALUE rb_operator)
  *   演算子の既定値(演算子を省略した場合にどの演算を行うか)
  *   を指定する。
  *
- *   [Groonga::Operation::OR]
- *   [Groonga::Operation::AND]
- *   [Groonga::Operation::BUT]
- *   [Groonga::Operation::ADJUST]
+ *   [Groonga::Operator::OR]
+ *   [Groonga::Operator::AND]
+ *   [Groonga::Operator::BUT]
+ *   [Groonga::Operator::ADJUST]
  *     (FIXME: 挙動の違いを検証する必要性あり?
  *            Groonga::Expressionとの関連性は?)
  *
@@ -195,7 +195,7 @@ rb_grn_query_initialize (int argc, VALUE *argv, VALUE self)
     DATA_PTR(self) = rb_grn_query;
     rb_grn_query->context = context;
     rb_grn_query->query = query;
-    rb_grn_query->owner = RB_GRN_TRUE;
+    rb_grn_query->owner = GRN_TRUE;
 
     rb_iv_set(self, "@context", rb_context);
 

data/ext/groonga/rb-grn-snippet.c

@@ -25,7 +25,7 @@ struct _RbGrnSnippet
 {
     grn_ctx *context;
     grn_snip *snippet;
-    rb_grn_boolean owner;
+    grn_bool owner;
 };
 
 VALUE rb_cGrnSnippet;
@@ -76,7 +76,7 @@ rb_rb_grn_snippet_free (void *object)
 
 VALUE
 rb_grn_snippet_to_ruby_object (grn_ctx *context, grn_snip *snippet,
-			       rb_grn_boolean owner)
+			       grn_bool owner)
 {
     RbGrnSnippet *rb_grn_snippet;
 
@@ -201,7 +201,7 @@ rb_grn_snippet_initialize (int argc, VALUE *argv, VALUE self)
     DATA_PTR(self) = rb_grn_snippet;
     rb_grn_snippet->context = context;
     rb_grn_snippet->snippet = snippet;
-    rb_grn_snippet->owner = RB_GRN_TRUE;
+    rb_grn_snippet->owner = GRN_TRUE;
 
     rb_iv_set(self, "@context", rb_context);
 
@@ -302,6 +302,7 @@ rb_grn_snippet_execute (VALUE self, VALUE rb_string)
 
     rc = grn_snip_exec(context, snippet, string, string_length,
                        &n_results, &max_tagged_length);
+    rb_grn_context_check(context, self);
     rb_grn_rc_check(rc, self);
 
     rb_results = rb_ary_new2(n_results);

data/ext/groonga/rb-grn-table-cursor.c

@@ -42,7 +42,7 @@ rb_grn_table_cursor_from_ruby_object (VALUE object, grn_ctx **context)
 VALUE
 rb_grn_table_cursor_to_ruby_object (VALUE klass, grn_ctx *context,
 				    grn_table_cursor *cursor,
-				    rb_grn_boolean owner)
+				    grn_bool owner)
 {
     return GRNOBJECT2RVAL(klass, context, cursor, owner);
 }

data/ext/groonga/rb-grn-table-key-support.c

@@ -457,23 +457,6 @@ rb_grn_table_key_support_get_column_value (int argc, VALUE *argv, VALUE self)
     return rb_grn_table_get_column_value_raw(self, id, rb_name);
 }
 
-/*
- * call-seq:
- *   table.find(key) -> Groonga::Record
- *
- * テーブルの_key_に対応するレコードを返す。
- *
- * 0.9.0から非推奨。代わりにtable[key]を使うこと。
- */
-static VALUE
-rb_grn_table_key_support_find (VALUE self, VALUE rb_key)
-{
-    rb_warn("#find is deprecated. Use #[] instead: %s",
-	    rb_grn_inspect(self));
-
-    return rb_grn_table_key_support_array_reference(self, rb_key);
-}
-
 static VALUE
 rb_grn_table_key_support_get_value_by_key (VALUE self, VALUE rb_key)
 {
@@ -508,12 +491,12 @@ static VALUE
 rb_grn_table_key_support_get_value (int argc, VALUE *argv, VALUE self)
 {
     VALUE rb_id_or_key, rb_options;
-    rb_grn_boolean use_key;
+    grn_bool use_key;
 
     rb_scan_args(argc, argv, "11", &rb_id_or_key, &rb_options);
 
     if (NIL_P(rb_options)) {
-	use_key = RB_GRN_TRUE;
+	use_key = GRN_TRUE;
     } else {
 	VALUE rb_option_id;
 
@@ -579,12 +562,12 @@ static VALUE
 rb_grn_table_key_support_set_value (int argc, VALUE *argv, VALUE self)
 {
     VALUE rb_id_or_key, rb_value, rb_options;
-    rb_grn_boolean use_key;
+    grn_bool use_key;
 
     rb_scan_args(argc, argv, "21", &rb_id_or_key, &rb_value, &rb_options);
 
     if (NIL_P(rb_options)) {
-	use_key = RB_GRN_TRUE;
+	use_key = GRN_TRUE;
     } else {
 	VALUE rb_option_id;
 
@@ -625,7 +608,7 @@ rb_grn_table_key_support_get_default_tokenizer (VALUE self)
 				 NULL);
     rb_grn_context_check(context, self);
 
-    return GRNOBJECT2RVAL(Qnil, context, tokenizer, RB_GRN_FALSE);
+    return GRNOBJECT2RVAL(Qnil, context, tokenizer, GRN_FALSE);
 }
 
 /*
@@ -691,6 +674,25 @@ rb_grn_table_key_support_normalize_key_p (VALUE self)
     return CBOOL2RVAL(table->header.flags & GRN_OBJ_KEY_NORMALIZE);
 }
 
+/*
+ * call-seq:
+ *   table.support_key? -> true/false
+ *
+ * テーブルでキーを使えるなら+true+、使えないなら+false+を返
+ * す。キーを使えないテーブルはGroonga::Arrayだけ。
+ */
+static VALUE
+rb_grn_table_key_support_support_key_p (VALUE self)
+{
+    grn_obj *table;
+
+    rb_grn_table_key_support_deconstruct(SELF(self), &table, NULL,
+					 NULL, NULL, NULL,
+					 NULL, NULL, NULL,
+					 NULL);
+    return table->header.domain == GRN_ID_NIL ? Qfalse : Qtrue;
+}
+
 void
 rb_grn_init_table_key_support (VALUE mGrn)
 {
@@ -709,8 +711,6 @@ rb_grn_init_table_key_support (VALUE mGrn)
     rb_define_method(rb_mGrnTableKeySupport, "delete",
 		     rb_grn_table_key_support_delete, 1);
 
-    rb_define_method(rb_mGrnTableKeySupport, "find",
-		     rb_grn_table_key_support_find, 1);
     rb_define_method(rb_mGrnTableKeySupport, "[]",
 		     rb_grn_table_key_support_array_reference, 1);
     rb_define_method(rb_mGrnTableKeySupport, "[]=",
@@ -733,4 +733,7 @@ rb_grn_init_table_key_support (VALUE mGrn)
 
     rb_define_method(rb_mGrnTableKeySupport, "normalize_key?",
 		     rb_grn_table_key_support_normalize_key_p, 0);
+
+    rb_define_method(rb_mGrnTableKeySupport, "support_key?",
+		     rb_grn_table_key_support_support_key_p, 0);
 }

data/ext/groonga/rb-grn-table.c

@@ -51,7 +51,7 @@ rb_grn_table_from_ruby_object (VALUE object, grn_ctx **context)
 
 VALUE
 rb_grn_table_to_ruby_object (grn_ctx *context, grn_obj *table,
-			     rb_grn_boolean owner)
+			     grn_bool owner)
 {
     return GRNOBJECT2RVAL(Qnil, context, table, owner);
 }
@@ -75,6 +75,7 @@ rb_grn_table_bind (RbGrnTable *rb_grn_table,
     rb_grn_object = RB_GRN_OBJECT(rb_grn_table);
     rb_grn_table->value = grn_obj_open(context, GRN_BULK, 0,
 				       rb_grn_object->range_id);
+    rb_grn_table->columns = Qnil;
     rb_grn_table->columns = rb_ary_new();
 }
 
@@ -202,7 +203,7 @@ rb_grn_table_inspect_content (VALUE self, VALUE inspected)
 
 /*
  * call-seq:
- *   _table_.inspect -> String
+ *   table.inspect -> String
  *
  * テーブルの中身を人に見やすい文字列で返す。
  */
@@ -242,20 +243,14 @@ rb_grn_table_inspect (VALUE self)
  *   カラムの値の格納方法について指定する。省略した場合は、
  *   +:scalar+になる。
  *
- *   [+:scalar+]
- *     スカラ値(単独の値)を格納する。
- *
- *   [+:vector+]
- *     値の配列を格納する。
+ *   [+:scalar+] スカラ値(単独の値)を格納する。
+ *   [+:vector+] 値の配列を格納する。
  *
  * [+:compress+]
  *   値の圧縮方法を指定する。省略した場合は、圧縮しない。
  *
- *   [+:zlib+]
- *     値をzlib圧縮して格納する。
- *
- *   [+:lzo+]
- *     値をlzo圧縮して格納する。
+ *   [+:zlib+] 値をzlib圧縮して格納する。
+ *   [+:lzo+] 値をlzo圧縮して格納する。
  */
 static VALUE
 rb_grn_table_define_column (int argc, VALUE *argv, VALUE self)
@@ -336,7 +331,7 @@ rb_grn_table_define_column (int argc, VALUE *argv, VALUE self)
 			     rb_ary_new3(2, self, rb_ary_new4(argc, argv)));
     }
 
-    rb_column = GRNCOLUMN2RVAL(Qnil, context, column, RB_GRN_TRUE);
+    rb_column = GRNCOLUMN2RVAL(Qnil, context, column, GRN_TRUE);
     rb_ary_push(columns, rb_column);
     rb_grn_named_object_set_name(RB_GRN_NAMED_OBJECT(DATA_PTR(rb_column)),
 				 name, name_size);
@@ -344,6 +339,27 @@ rb_grn_table_define_column (int argc, VALUE *argv, VALUE self)
     return rb_column;
 }
 
+static grn_bool
+n_gram_tokenizer_p(grn_ctx *context, grn_obj *tokenizer)
+{
+    char tokenizer_name[GRN_TABLE_MAX_KEY_SIZE];
+    int name_size;
+
+    name_size = grn_obj_name(context, tokenizer,
+			     tokenizer_name, sizeof(tokenizer_name) - 1);
+    if (name_size == 0)
+	return GRN_FALSE;
+
+    tokenizer_name[name_size] = '\0';
+
+#define HAVE_PREFIX_P(prefix) \
+    (strncmp(tokenizer_name, prefix, strlen(prefix)) == 0)
+    return (HAVE_PREFIX_P("TokenUnigram") ||
+	    HAVE_PREFIX_P("TokenBigram") ||
+	    HAVE_PREFIX_P("TokenTrigram"));
+#undef HAVE_PREFIX_P
+}
+
 /*
  * call-seq:
  *   table.define_index_column(name, value_type, options={}) -> Groonga::IndexColumn
@@ -428,8 +444,14 @@ rb_grn_table_define_index_column (int argc, VALUE *argv, VALUE self)
 	flags |= GRN_OBJ_PERSISTENT;
     }
 
-    if (RVAL2CBOOL(rb_with_section))
+    if (NIL_P(rb_with_section)) {
+	if (TYPE(rb_sources) == T_ARRAY && RARRAY_LEN(rb_sources) > 1) {
+	    flags |= GRN_OBJ_WITH_SECTION;
+	}
+    } else if (RVAL2CBOOL(rb_with_section)) {
 	flags |= GRN_OBJ_WITH_SECTION;
+    }
+
 
     if (RVAL2CBOOL(rb_with_weight))
 	flags |= GRN_OBJ_WITH_WEIGHT;
@@ -437,16 +459,12 @@ rb_grn_table_define_index_column (int argc, VALUE *argv, VALUE self)
     if (NIL_P(rb_with_position) &&
 	(table->header.type == GRN_TABLE_HASH_KEY ||
 	 table->header.type == GRN_TABLE_PAT_KEY)) {
-	grn_id tokenizer_id;
 	grn_obj *tokenizer;
 
 	tokenizer = grn_obj_get_info(context, table,
 				     GRN_INFO_DEFAULT_TOKENIZER,
 				     NULL);
-	tokenizer_id = grn_obj_id(context, tokenizer);
-	if ((tokenizer_id == GRN_DB_UNIGRAM) ||
-	    (tokenizer_id == GRN_DB_BIGRAM) ||
-	    (tokenizer_id == GRN_DB_TRIGRAM)) {
+	if (tokenizer && n_gram_tokenizer_p(context, tokenizer)) {
 	    rb_with_position = Qtrue;
 	}
     }
@@ -463,7 +481,7 @@ rb_grn_table_define_index_column (int argc, VALUE *argv, VALUE self)
 			     rb_ary_new3(2, self, rb_ary_new4(argc, argv)));
     }
 
-    rb_column = GRNCOLUMN2RVAL(Qnil, context, column, RB_GRN_TRUE);
+    rb_column = GRNCOLUMN2RVAL(Qnil, context, column, GRN_TRUE);
     if (!NIL_P(rb_source))
 	rb_funcall(rb_column, rb_intern("source="), 1, rb_source);
     if (!NIL_P(rb_sources))
@@ -513,7 +531,7 @@ rb_grn_table_get_column (VALUE self, VALUE rb_name)
     grn_obj *column;
     const char *name = NULL;
     unsigned name_size = 0;
-    rb_grn_boolean owner;
+    grn_bool owner;
     VALUE rb_column;
     VALUE columns;
     VALUE *raw_columns;
@@ -616,8 +634,10 @@ rb_grn_table_get_columns (int argc, VALUE *argv, VALUE self)
     rb_grn_context_check(context, self);
 
     rb_columns = rb_ary_new2(n);
-    if (n == 0)
+    if (n == 0) {
+	grn_obj_unlink(context, columns);
 	return rb_columns;
+    }
 
     cursor = grn_table_cursor_open(context, columns, NULL, 0, NULL, 0,
 				   0, -1, GRN_CURSOR_ASCENDING);
@@ -631,10 +651,11 @@ rb_grn_table_get_columns (int argc, VALUE *argv, VALUE self)
 	grn_table_cursor_get_key(context, cursor, &key);
 	column_id = key;
 	column = grn_ctx_at(context, *column_id);
-	rb_column = GRNOBJECT2RVAL(Qnil, context, column, RB_GRN_FALSE);
+	rb_column = GRNOBJECT2RVAL(Qnil, context, column, GRN_FALSE);
 	rb_ary_push(rb_columns, rb_column);
     }
     rc = grn_table_cursor_close(context, cursor);
+    grn_obj_unlink(context, columns);
     if (rc != GRN_SUCCESS) {
 	rb_grn_context_check(context, self);
 	rb_grn_rc_check(rc, self);
@@ -657,7 +678,6 @@ rb_grn_table_have_column (VALUE self, VALUE rb_name)
     grn_obj *column;
     const char *name = NULL;
     unsigned name_size = 0;
-    VALUE result = Qfalse;
 
     rb_grn_table_deconstruct(SELF(self), &table, &context,
 			     NULL, NULL,
@@ -666,14 +686,12 @@ rb_grn_table_have_column (VALUE self, VALUE rb_name)
 
     ruby_object_to_column_name(rb_name, &name, &name_size);
     column = grn_obj_column(context, table, name, name_size);
-    if (!column)
+    if (column) {
+	grn_obj_unlink(context, column);
+	return Qtrue;
+    } else {
 	return Qfalse;
-
-    if (column->header.type != GRN_ACCESSOR)
-	result = Qtrue;
-    grn_obj_unlink(context, column);
-
-    return result;
+    }
 }
 
 static grn_table_cursor *
@@ -773,7 +791,7 @@ rb_grn_table_open_grn_cursor (int argc, VALUE *argv, VALUE self,
 /*
  * call-seq:
  *   table.open_cursor(options={}) -> Groonga::TableCursor
- *   table.open_cursor(options={}) {|cursor| ... }
+ *   table.open_cursor(options={}) {|cursor| }
  *
  * カーソルを生成して返す。ブロックを指定すると、そのブロッ
  * クに生成したカーソルが渡され、ブロックを抜けると自動的に
@@ -926,7 +944,7 @@ rb_grn_table_truncate (VALUE self)
 
 /*
  * call-seq:
- *   table.each {|record| ...}
+ *   table.each {|record| } -> nil
  *
  * テーブルに登録されているレコードを順番にブロックに渡す。
  */
@@ -1130,8 +1148,8 @@ rb_grn_table_sort (int argc, VALUE *argv, VALUE self)
 
 /*
  * call-seq:
- *   table.group(key, options={}) -> Groonga::Hash
  *   table.group([key1, key2, ...], options={}) -> [Groonga::Hash, ...]
+ *   table.group(key, options={}) -> Groonga::Hash
  *
  * _table_のレコードを_key1_, _key2_, _..._で指定したキーの
  * 値でグループ化する。多くの場合、キーにはカラムを指定する。
@@ -1214,7 +1232,7 @@ rb_grn_table_group (int argc, VALUE *argv, VALUE self)
 	results[i].flags = 0;
 	results[i].op = GRN_OP_OR;
 
-	rb_result = GRNOBJECT2RVAL(Qnil, context, result, RB_GRN_TRUE);
+	rb_result = GRNOBJECT2RVAL(Qnil, context, result, GRN_TRUE);
 	rb_ary_push(rb_results, rb_result);
     }
 
@@ -1241,7 +1259,11 @@ rb_grn_table_group (int argc, VALUE *argv, VALUE self)
 VALUE
 rb_grn_table_array_reference (VALUE self, VALUE rb_id)
 {
-    return rb_grn_record_new_raw(self, rb_id, Qnil);
+    if (FIXNUM_P(rb_id)) {
+	return rb_grn_record_new_raw(self, rb_id, Qnil);
+    } else {
+	return Qnil;
+    }
 }
 
 VALUE
@@ -1527,7 +1549,7 @@ rb_grn_table_unlock_ensure (VALUE self)
  *
  * call-seq:
  *   table.lock(options={})
- *   table.lock(options={}) {...}
+ *   table.lock(options={}) {}
  *
  * _table_をロックする。ロックに失敗した場合は
  * Groonga::ResourceDeadlockAvoided例外が発生する。
@@ -1703,19 +1725,19 @@ rb_grn_table_is_locked (int argc, VALUE *argv, VALUE self)
  * 指定する。演算子は以下の通り。
  *
  * [なし]
- *   [カラム値] == [値]
+ *   \[カラム値] == [値]
  * [<tt>!</tt>]
- *   [カラム値] != [値]
+ *   \[カラム値] != [値]
  * [<tt><</tt>]
- *   [カラム値] < [値]
+ *   \[カラム値] < [値]
  * [<tt>></tt>]
- *   [カラム値] > [値]
+ *   \[カラム値] > [値]
  * [<tt><=</tt>]
- *   [カラム値] <= [値]
+ *   \[カラム値] <= [値]
  * [<tt>>=</tt>]
- *   [カラム値] >= [値]
+ *   \[カラム値] >= [値]
  * [<tt>@</tt>]
- *   [カラム値]が[値]を含んでいるかどうか
+ *   \[カラム値]が[値]を含んでいるかどうか
  *
  * 例:
  *   "name:daijiro" # "name"カラムの値が"daijiro"のレコードにマッチ
@@ -1735,18 +1757,17 @@ rb_grn_table_is_locked (int argc, VALUE *argv, VALUE self)
  *
  * [+:operator+]
  *   マッチしたレコードをどのように扱うか。指定可能な値は以
- *   下の通り。省略した場合はGroonga::Operation::OR。
- *
- *   [Groonga::Operation::OR]
- *     マッチしたレコードを追加。すでにレコードが追加され
- *     ている場合は何もしない。
- *   [Groonga::Operation::AND]
- *     マッチしたレコードのスコアを増加。マッチしなかった
- *     レコードを削除。
- *   [Groonga::Operation::BUT]
- *     マッチしたレコードを削除。
- *   [Groonga::Operation::ADJUST]
- *     マッチしたレコードのスコアを増加。
+ *   下の通り。省略した場合はGroonga::Operator::OR。
+ *
+ *   [Groonga::Operator::OR] マッチしたレコードを追加。すで
+ *                           にレコードが追加されている場合
+ *                           は何もしない。
+ *   [Groonga::Operator::AND] マッチしたレコードのスコアを増
+ *                            加。マッチしなかったレコード
+ *                            を削除。
+ *   [Groonga::Operator::BUT] マッチしたレコードを削除。
+ *   [Groonga::Operator::ADJUST] マッチしたレコードのスコア
+ *                               を増加。
  *
  * [+:result+]
  *   検索結果を格納するテーブル。マッチしたレコードが追加さ
@@ -1831,7 +1852,7 @@ rb_grn_table_select (int argc, VALUE *argv, VALUE self)
 				  GRN_TABLE_HASH_KEY | GRN_OBJ_WITH_SUBREC,
 				  table,
 				  NULL);
-	rb_result = GRNTABLE2RVAL(context, result, RB_GRN_TRUE);
+	rb_result = GRNTABLE2RVAL(context, result, GRN_TRUE);
     } else {
 	result = RVAL2GRNTABLE(rb_result, &context);
     }
@@ -1855,7 +1876,7 @@ rb_grn_table_select (int argc, VALUE *argv, VALUE self)
 
     rb_attr(rb_singleton_class(rb_result),
 	    rb_intern("expression"),
-	    RB_GRN_TRUE, RB_GRN_FALSE, RB_GRN_FALSE);
+	    GRN_TRUE, GRN_FALSE, GRN_FALSE);
     rb_iv_set(rb_result, "@expression", rb_expression);
 
     return rb_result;
@@ -1942,6 +1963,19 @@ rb_grn_table_merge_bang (VALUE self, VALUE rb_other)
     return rb_grn_table_set_operation_bang(self, rb_other, GRN_OP_ADJUST);
 }
 
+/*
+ * call-seq:
+ *   table.support_key? -> true/false
+ *
+ * _table_に主キーが設定されていれば+true+、されていなければ
+ * +false+を返す。
+ */
+static VALUE
+rb_grn_table_support_key_p (VALUE self)
+{
+    return Qfalse;
+}
+
 /*
  * call-seq:
  *   table.support_sub_records? -> true/false
@@ -1962,6 +1996,29 @@ rb_grn_table_support_sub_records_p (VALUE self)
     return CBOOL2RVAL(table->header.flags & GRN_OBJ_WITH_SUBREC);
 }
 
+/*
+ * call-seq:
+ *   table.exist?(id) -> true/false
+ *
+ * _table_に_id_で指定したIDのレコードが存在する場合は+true+、
+ * 存在しない場合は+false+を返す。
+ *
+ * 注意: 実行には相応のコストがかかるのであまり頻繁に呼ばな
+ * いようにして下さい。
+ */
+static VALUE
+rb_grn_table_exist_p (VALUE self, VALUE id)
+{
+    grn_ctx *context;
+    grn_obj *table;
+
+    rb_grn_table_deconstruct(SELF(self), &table, &context,
+			     NULL, NULL,
+			     NULL, NULL, NULL,
+			     NULL);
+    return CBOOL2RVAL(grn_table_at(context, table, NUM2UINT(id)));
+}
+
 void
 rb_grn_init_table (VALUE mGrn)
 {
@@ -2029,9 +2086,13 @@ rb_grn_init_table (VALUE mGrn)
     rb_define_method(rb_cGrnTable, "merge!",
 		     rb_grn_table_merge_bang, 1);
 
+    rb_define_method(rb_cGrnTable, "support_key?",
+		     rb_grn_table_support_key_p, 0);
     rb_define_method(rb_cGrnTable, "support_sub_records?",
 		     rb_grn_table_support_sub_records_p, 0);
 
+    rb_define_method(rb_cGrnTable, "exist?", rb_grn_table_exist_p, 1);
+
     rb_grn_init_table_key_support(mGrn);
     rb_grn_init_array(mGrn);
     rb_grn_init_hash(mGrn);