glib2 1.0.3 → 1.1.0

data/ext/glib2/rbglib_threads.c

@@ -1,20 +1,32 @@
 /* -*- c-file-style: "ruby"; indent-tabs-mode: nil -*- */
-/************************************************
-
-  rbglib_threads.c -
-
-  $Author: mutoh $
-  $Date: 2005/03/06 14:10:17 $
-
-  Copyright (C) 2005 Masao Mutoh
-************************************************/
+/*
+ *  Copyright (C) 2011  Ruby-GNOME2 Project Team
+ *  Copyright (C) 2005  Masao Mutoh
+ *
+ *  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., 51 Franklin Street, Fifth Floor, Boston,
+ *  MA  02110-1301  USA
+ */
 
 #include "rbgprivate.h"
 
-static VALUE gthreads;
+#define RG_TARGET_NAMESPACE cThread
+
+static VALUE RG_TARGET_NAMESPACE;
 
 static VALUE
-gt_init(VALUE self)
+rg_s_init(VALUE self)
 {
 #ifdef HAVE_G_THREAD_INIT
 #ifdef G_THREADS_ENABLED
@@ -25,7 +37,7 @@ gt_init(VALUE self)
 }
 
 static VALUE
-gt_supported(VALUE self)
+rg_s_supported_p(G_GNUC_UNUSED VALUE self)
 {
 #ifdef HAVE_G_THREAD_INIT
 #ifdef G_THREADS_ENABLED
@@ -40,10 +52,10 @@ gt_supported(VALUE self)
 }
 
 void
-Init_glib_threads()
+Init_glib_threads(void)
 {
-    gthreads = rb_define_class_under(mGLib, "Thread", rb_cObject);
+    RG_TARGET_NAMESPACE = rb_define_class_under(mGLib, "Thread", rb_cObject);
 
-    rb_define_singleton_method(gthreads, "init", gt_init, 0);
-    rb_define_singleton_method(gthreads, "supported?", gt_supported, 0);
+    RG_DEF_SMETHOD(init, 0);
+    RG_DEF_SMETHOD_P(supported, 0);
 }

data/ext/glib2/rbglib_timer.c

@@ -1,13 +1,23 @@
 /* -*- c-file-style: "ruby"; indent-tabs-mode: nil -*- */
-/************************************************
-
-  rbglib_timer.c -
-
-  $Author: mutoh $
-  $Date: 2005/11/23 14:27:58 $
-
-  Copyright (C) 2005 Masao Mutoh
-************************************************/
+/*
+ *  Copyright (C) 2011  Ruby-GNOME2 Project Team
+ *  Copyright (C) 2005  Masao Mutoh
+ *
+ *  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., 51 Franklin Street, Fifth Floor, Boston,
+ *  MA  02110-1301  USA
+ */
 
 #include "rbgprivate.h"
 
@@ -42,7 +52,7 @@ timer_copy(GTimer *timer)
   return new_timer;
 }
 
-GType
+static GType
 g_timer_get_type(void)
 {
     static GType our_type = 0;
@@ -56,24 +66,25 @@ g_timer_get_type(void)
 
 #define G_TYPE_TIMER (g_timer_get_type())
 
+#define RG_TARGET_NAMESPACE cTimer
 #define _SELF(s) ((GTimer*)RVAL2BOXED(s, G_TYPE_TIMER))
 
 static VALUE
-timer_initialize(VALUE self)
+rg_initialize(VALUE self)
 {
     G_INITIALIZE(self, g_timer_new());
     return Qnil;
 }
 
 static VALUE
-timer_start(VALUE self)
+rg_start(VALUE self)
 {
     g_timer_start(_SELF(self));
     return self;
 }
 
 static VALUE
-timer_stop(VALUE self)
+rg_stop(VALUE self)
 {
     g_timer_stop(_SELF(self));
     return self;
@@ -81,7 +92,7 @@ timer_stop(VALUE self)
 
 #if GLIB_CHECK_VERSION(2,4,0)
 static VALUE
-timer_continue(VALUE self)
+rg_continue(VALUE self)
 {
     g_timer_continue(_SELF(self));
     return self;
@@ -89,7 +100,7 @@ timer_continue(VALUE self)
 #endif
 
 static VALUE
-timer_elapsed(VALUE self)
+rg_elapsed(VALUE self)
 {
     gulong microseconds;
     gdouble ret = g_timer_elapsed(_SELF(self), &microseconds);
@@ -98,23 +109,23 @@ timer_elapsed(VALUE self)
 }
 
 static VALUE
-timer_reset(VALUE self)
+rg_reset(VALUE self)
 {
     g_timer_reset(_SELF(self));
     return self;
 }
 
 void
-Init_glib_timer()
+Init_glib_timer(void)
 {
-    VALUE timer = G_DEF_CLASS(G_TYPE_TIMER, "Timer", mGLib); 
+    VALUE RG_TARGET_NAMESPACE = G_DEF_CLASS(G_TYPE_TIMER, "Timer", mGLib); 
 
-    rb_define_method(timer, "initialize", timer_initialize, 0);
-    rb_define_method(timer, "start", timer_start, 0);
-    rb_define_method(timer, "stop", timer_stop, 0);
+    RG_DEF_METHOD(initialize, 0);
+    RG_DEF_METHOD(start, 0);
+    RG_DEF_METHOD(stop, 0);
 #if GLIB_CHECK_VERSION(2,4,0)
-    rb_define_method(timer, "continue", timer_continue, 0);
+    RG_DEF_METHOD(continue, 0);
 #endif
-    rb_define_method(timer, "elapsed", timer_elapsed, 0);
-    rb_define_method(timer, "reset", timer_reset, 0);
+    RG_DEF_METHOD(elapsed, 0);
+    RG_DEF_METHOD(reset, 0);
 }

data/ext/glib2/rbglib_ucs4.c

@@ -0,0 +1,79 @@
+/* -*- c-file-style: "ruby"; indent-tabs-mode: nil -*- */
+/*
+ *  Copyright (C) 2011  Ruby-GNOME2 Project Team
+ *  Copyright (C) 2006  Kouhei Sutou
+ *
+ *  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., 51 Franklin Street, Fifth Floor, Boston,
+ *  MA  02110-1301  USA
+ */
+
+#include "rbgprivate.h"
+#include "rbglib.h"
+
+#define RG_TARGET_NAMESPACE mUCS4
+
+static VALUE
+rg_m_to_utf16(G_GNUC_UNUSED VALUE self, VALUE rb_ucs4)
+{
+    VALUE result;
+    gunichar *ucs4;
+    gunichar2 *utf16;
+    glong len, items_written;
+    GError *error = NULL;
+
+    ucs4 = (gunichar *)StringValuePtr(rb_ucs4);
+    len = RSTRING_LEN(rb_ucs4) / sizeof(*ucs4);
+
+    utf16 = g_ucs4_to_utf16(ucs4, len, NULL, &items_written, &error);
+
+    if (error)
+        RAISE_GERROR(error);
+
+    result = CSTR2RVAL_LEN_UTF16((char *)utf16,
+                                   items_written * sizeof(*utf16));
+    g_free(utf16);
+    return result;
+}
+
+static VALUE
+rg_m_to_utf8(G_GNUC_UNUSED VALUE self, VALUE rb_ucs4)
+{
+    VALUE result;
+    gunichar *ucs4;
+    gchar *utf8;
+    glong len, items_written;
+    GError *error = NULL;
+
+    ucs4 = (gunichar *)StringValuePtr(rb_ucs4);
+    len = RSTRING_LEN(rb_ucs4) / sizeof(*ucs4);
+
+    utf8 = g_ucs4_to_utf8(ucs4, len, NULL, &items_written, &error);
+
+    if (error)
+        RAISE_GERROR(error);
+
+    result = CSTR2RVAL_LEN(utf8, items_written);
+    g_free(utf8);
+    return result;
+}
+
+void
+Init_glib_ucs4(void)
+{
+    VALUE RG_TARGET_NAMESPACE = rb_define_module_under(mGLib, "UCS4");
+
+    RG_DEF_MODFUNC(to_utf16, 1);
+    RG_DEF_MODFUNC(to_utf8, 1);
+}

data/ext/glib2/rbglib_unichar.c

@@ -0,0 +1,209 @@
+/* -*- c-file-style: "ruby"; indent-tabs-mode: nil -*- */
+/*
+ *  Copyright (C) 2011  Ruby-GNOME2 Project Team
+ *  Copyright (C) 2006  Kouhei Sutou
+ *
+ *  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., 51 Franklin Street, Fifth Floor, Boston,
+ *  MA  02110-1301  USA
+ */
+
+#include "rbgprivate.h"
+#include "rbglib.h"
+
+#define RG_TARGET_NAMESPACE mUniChar
+
+#define DEF_IS_UNICHAR(name)                                         \
+static VALUE                                                         \
+rbglib_m_unichar_is ## name(G_GNUC_UNUSED VALUE self, VALUE unichar) \
+{                                                                    \
+    return CBOOL2RVAL(g_unichar_is ## name(NUM2UINT(unichar)));      \
+}
+
+DEF_IS_UNICHAR(alnum)
+DEF_IS_UNICHAR(alpha)
+DEF_IS_UNICHAR(cntrl)
+DEF_IS_UNICHAR(digit)
+DEF_IS_UNICHAR(graph)
+DEF_IS_UNICHAR(lower)
+DEF_IS_UNICHAR(print)
+DEF_IS_UNICHAR(punct)
+DEF_IS_UNICHAR(space)
+DEF_IS_UNICHAR(upper)
+DEF_IS_UNICHAR(xdigit)
+DEF_IS_UNICHAR(title)
+DEF_IS_UNICHAR(defined)
+DEF_IS_UNICHAR(wide)
+#if GLIB_CHECK_VERSION(2,12,0)
+DEF_IS_UNICHAR(wide_cjk)
+#endif
+
+#undef DEF_IS_UNICHAR
+
+static VALUE
+rg_m_to_upper(G_GNUC_UNUSED VALUE self, VALUE unichar)
+{
+    return UINT2NUM(g_unichar_toupper(NUM2UINT(unichar)));
+}
+
+static VALUE
+rg_m_to_lower(G_GNUC_UNUSED VALUE self, VALUE unichar)
+{
+    return UINT2NUM(g_unichar_tolower(NUM2UINT(unichar)));
+}
+
+static VALUE
+rg_m_to_title(G_GNUC_UNUSED VALUE self, VALUE unichar)
+{
+    return UINT2NUM(g_unichar_totitle(NUM2UINT(unichar)));
+}
+
+static VALUE
+rg_m_digit_value(G_GNUC_UNUSED VALUE self, VALUE unichar)
+{
+    return INT2NUM(g_unichar_digit_value(NUM2UINT(unichar)));
+}
+
+static VALUE
+rg_m_xdigit_value(G_GNUC_UNUSED VALUE self, VALUE unichar)
+{
+    return INT2NUM(g_unichar_xdigit_value(NUM2UINT(unichar)));
+}
+
+static VALUE
+rg_m_type(G_GNUC_UNUSED VALUE self, VALUE unichar)
+{
+    return GENUM2RVAL(g_unichar_type(NUM2UINT(unichar)),
+                      G_TYPE_UNICODE_TYPE);
+}
+
+static VALUE
+rg_m_break_type(G_GNUC_UNUSED VALUE self, VALUE unichar)
+{
+    return GENUM2RVAL(g_unichar_break_type(NUM2UINT(unichar)),
+                      G_TYPE_UNICODE_BREAK_TYPE);
+}
+
+#if GLIB_CHECK_VERSION(2,4,0)
+static VALUE
+rg_m_get_mirror_char(G_GNUC_UNUSED VALUE self, VALUE unichar)
+{
+    gunichar mirrored_char;
+
+    if (g_unichar_get_mirror_char(NUM2UINT(unichar), &mirrored_char)) {
+        return UINT2NUM(mirrored_char);
+    } else {
+        return unichar;
+    }
+}
+#endif
+
+#if GLIB_CHECK_VERSION(2,14,0)
+static VALUE
+rg_m_combining_class(G_GNUC_UNUSED VALUE self, VALUE unichar)
+{
+    return INT2NUM(g_unichar_combining_class(NUM2UINT(unichar)));
+}
+
+static VALUE
+rg_m_get_script(G_GNUC_UNUSED VALUE self, VALUE unichar)
+{
+    return GENUM2RVAL(g_unichar_get_script(NUM2UINT(unichar)),
+                      G_TYPE_UNICODE_SCRIPT);
+}
+
+static VALUE
+rg_m_mark_p(G_GNUC_UNUSED VALUE self, VALUE unichar)
+{
+    return CBOOL2RVAL(g_unichar_ismark(NUM2UINT(unichar)));
+}
+
+static VALUE
+rg_m_zero_width_p(G_GNUC_UNUSED VALUE self, VALUE unichar)
+{
+    return CBOOL2RVAL(g_unichar_iszerowidth(NUM2UINT(unichar)));
+}
+#endif
+
+static VALUE
+rg_m_to_utf8(G_GNUC_UNUSED VALUE self, VALUE unichar)
+{
+    gchar utf8[6];
+    gint len;
+
+    len = g_unichar_to_utf8(NUM2UINT(unichar), utf8);
+    return CSTR2RVAL_LEN(utf8, len);
+}
+
+void
+Init_glib_unichar(void)
+{
+    VALUE RG_TARGET_NAMESPACE = rb_define_module_under(mGLib, "UniChar");
+
+    rb_define_module_function(RG_TARGET_NAMESPACE, "alnum?",
+                              rbglib_m_unichar_isalnum, 1);
+    rb_define_module_function(RG_TARGET_NAMESPACE, "alpha?",
+                              rbglib_m_unichar_isalpha, 1);
+    rb_define_module_function(RG_TARGET_NAMESPACE, "cntrl?",
+                              rbglib_m_unichar_iscntrl, 1);
+    rb_define_module_function(RG_TARGET_NAMESPACE, "digit?",
+                              rbglib_m_unichar_isdigit, 1);
+    rb_define_module_function(RG_TARGET_NAMESPACE, "graph?",
+                              rbglib_m_unichar_isgraph, 1);
+    rb_define_module_function(RG_TARGET_NAMESPACE, "lower?",
+                              rbglib_m_unichar_islower, 1);
+    rb_define_module_function(RG_TARGET_NAMESPACE, "print?",
+                              rbglib_m_unichar_isprint, 1);
+    rb_define_module_function(RG_TARGET_NAMESPACE, "punct?",
+                              rbglib_m_unichar_ispunct, 1);
+    rb_define_module_function(RG_TARGET_NAMESPACE, "space?",
+                              rbglib_m_unichar_isspace, 1);
+    rb_define_module_function(RG_TARGET_NAMESPACE, "upper?",
+                              rbglib_m_unichar_isupper, 1);
+    rb_define_module_function(RG_TARGET_NAMESPACE, "xdigit?",
+                              rbglib_m_unichar_isxdigit, 1);
+    rb_define_module_function(RG_TARGET_NAMESPACE, "title?",
+                              rbglib_m_unichar_istitle, 1);
+    rb_define_module_function(RG_TARGET_NAMESPACE, "defined?",
+                              rbglib_m_unichar_isdefined, 1);
+    rb_define_module_function(RG_TARGET_NAMESPACE, "wide?",
+                              rbglib_m_unichar_iswide, 1);
+#if GLIB_CHECK_VERSION(2,12,0)
+    rb_define_module_function(RG_TARGET_NAMESPACE, "wide_cjk?",
+                              rbglib_m_unichar_iswide_cjk, 1);
+#endif
+
+    RG_DEF_MODFUNC(to_upper, 1);
+    RG_DEF_MODFUNC(to_lower, 1);
+    RG_DEF_MODFUNC(to_title, 1);
+
+    RG_DEF_MODFUNC(digit_value, 1);
+    RG_DEF_MODFUNC(xdigit_value, 1);
+
+    RG_DEF_MODFUNC(type, 1);
+    RG_DEF_MODFUNC(break_type, 1);
+
+#if GLIB_CHECK_VERSION(2,4,0)
+    RG_DEF_MODFUNC(get_mirror_char, 1);
+#endif
+
+#if GLIB_CHECK_VERSION(2,14,0)
+    RG_DEF_MODFUNC(combining_class, 1);
+    RG_DEF_MODFUNC(get_script, 1);
+    RG_DEF_MODFUNC_P(mark, 1);
+    RG_DEF_MODFUNC_P(zero_width, 1);
+#endif
+
+    RG_DEF_MODFUNC(to_utf8, 1);
+}