2 * $Id: rb_timer.c 9 2004-06-19 19:53:47Z tilman $
4 * Copyright (C) 2004 Tilman Sauerbeck (tilman at code-monkey de)
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
36 static int on_timer (void *data)
39 RbEcoreTimer *timer = data;
41 r = rb_funcall ((VALUE) timer->cb, rb_intern ("call"), 0);
43 /* if the callback returns false, we return 0 and Ecore
44 * will remove the timer
47 timer->deleted = true;
52 static VALUE c_init (VALUE self, VALUE interval)
54 RbEcoreTimer *timer = NULL;
56 Data_Get_Struct (self, RbEcoreTimer, timer);
58 timer->cb = (void *) rb_block_proc ();
59 timer->timer = ecore_timer_add (NUM2DBL (interval),
65 static void c_free (RbEcoreTimer *timer)
67 if (timer->timer && !timer->deleted)
68 ecore_timer_del (timer->timer);
73 static VALUE c_new (VALUE klass, VALUE interval)
78 self = Data_Make_Struct (klass, RbEcoreTimer, NULL, c_free, timer);
81 rb_obj_call_init (self, 1, argv);
86 static VALUE c_delete (VALUE self)
88 RbEcoreTimer *timer = NULL;
90 Data_Get_Struct (self, RbEcoreTimer, timer);
92 if (timer->timer && !timer->deleted) {
93 ecore_timer_del (timer->timer);
95 timer->deleted = true;
97 rb_raise (rb_eException, "Timer already deleted!");
102 void Init_Timer (void)
104 cTimer = rb_define_class_under (mEcore, "Timer", rb_cObject);
106 rb_define_singleton_method (cTimer, "new", c_new, 1);
107 rb_define_method (cTimer, "initialize", c_init, 1);
108 rb_define_method (cTimer, "delete", c_delete, 0);