2 * $Id: rb_idler.c 154 2004-12-09 18:49:18Z tilman $
4 * Copyright (C) 2004 ruby-ecore team (see AUTHORS)
6 * This library is free software; you can redistribute it and/or
7 * modify it under the terms of the GNU Lesser General Public
8 * License as published by the Free Software Foundation; either
9 * version 2.1 of the License, or (at your option) any later version.
11 * This library is distributed in the hope that it will be useful,
12 * but WITHOUT ANY WARRANTY; without even the implied warranty of
13 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
14 * Lesser General Public License for more details.
16 * You should have received a copy of the GNU Lesser General Public
17 * License along with this library; if not, write to the Free Software
18 * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
34 static int on_idler (void *data)
37 RbIdler *idler = data;
39 r = rb_funcall (idler->callback, rb_intern ("call"), 0);
41 /* if the callback returns false, we return 0 and Ecore
42 * will remove the idler
45 idler->deleted = true;
50 static void c_mark (RbIdler *idler)
52 rb_gc_mark (idler->callback);
55 static void c_free (RbIdler *idler)
57 if (idler->real && !idler->deleted)
58 ecore_idler_del (idler->real);
67 * Ecore::Idler.new { block } => idler
69 * Creates an Ecore::Idler object.
70 * When Ecore is idle, the specified block will be called.
71 * If the block returns false, the idler is deleted.
73 static VALUE c_new (VALUE klass)
78 if (!rb_block_given_p ())
81 self = Data_Make_Struct (klass, RbIdler, c_mark, c_free, idler);
85 idler->callback = rb_block_proc ();
86 idler->deleted = false;
87 idler->real = ecore_idler_add (on_idler, idler);
89 rb_obj_call_init (self, 0, NULL);
98 * Deletes <i>idler</i>.
100 static VALUE c_delete (VALUE self)
102 GET_OBJ (self, RbIdler, idler);
104 if (idler->real && !idler->deleted) {
105 ecore_idler_del (idler->real);
107 idler->deleted = true;
109 rb_raise (rb_eException, "Idler already deleted!");
114 void Init_Idler (void)
116 VALUE c = rb_define_class_under (mEcore, "Idler", rb_cObject);
118 rb_define_singleton_method (c, "new", c_new, 0);
119 rb_define_method (c, "delete", c_delete, 0);