2 * mlt_events.h -- event handling
3 * Copyright (C) 2004-2005 Ushodaya Enterprises Limited
4 * Author: Charles Yates <charles.yates@pandora.be>
6 * This program is free software; you can redistribute it and/or modify
7 * it under the terms of the GNU General Public License as published by
8 * the Free Software Foundation; either version 2 of the License, or
9 * (at your option) any later version.
11 * This program 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
14 * GNU General Public License for more details.
16 * You should have received a copy of the GNU General Public License
17 * along with this program; if not, write to the Free Software Foundation,
18 * Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
26 #include "mlt_properties.h"
27 #include "mlt_events.h"
29 /** Memory leak checks.
32 //#define _MLT_EVENT_CHECKS_
34 #ifdef _MLT_EVENT_CHECKS_
35 static int events_created = 0;
36 static int events_destroyed = 0;
39 struct mlt_events_struct
45 typedef struct mlt_events_struct *mlt_events;
47 struct mlt_event_struct
52 mlt_listener listener;
56 /** Increment the reference count on this event.
59 void mlt_event_inc_ref( mlt_event this )
65 /** Increment the block count on this event.
68 void mlt_event_block( mlt_event this )
70 if ( this != NULL && this->owner != NULL )
74 /** Decrement the block count on this event.
77 void mlt_event_unblock( mlt_event this )
79 if ( this != NULL && this->owner != NULL )
86 void mlt_event_close( mlt_event this )
90 if ( -- this->ref_count == 1 )
92 if ( this->ref_count <= 0 )
94 #ifdef _MLT_EVENT_CHECKS_
96 fprintf( stderr, "Events created %d, destroyed %d\n", events_created, events_destroyed );
103 /** Forward declaration to private functions.
106 static mlt_events mlt_events_fetch( mlt_properties );
107 static void mlt_events_store( mlt_properties, mlt_events );
108 static void mlt_events_close( mlt_events );
110 /** Initialise the events structure.
113 void mlt_events_init( mlt_properties this )
115 mlt_events events = mlt_events_fetch( this );
116 if ( events == NULL )
118 events = malloc( sizeof( struct mlt_events_struct ) );
119 events->list = mlt_properties_new( );
120 mlt_events_store( this, events );
124 /** Register an event and transmitter.
127 int mlt_events_register( mlt_properties this, char *id, mlt_transmitter transmitter )
130 mlt_events events = mlt_events_fetch( this );
131 if ( events != NULL )
133 mlt_properties list = events->list;
135 error = mlt_properties_set_data( list, id, transmitter, 0, NULL, NULL );
136 sprintf( temp, "list:%s", id );
137 if ( mlt_properties_get_data( list, temp, NULL ) == NULL )
138 mlt_properties_set_data( list, temp, mlt_properties_new( ), 0, ( mlt_destructor )mlt_properties_close, NULL );
146 void mlt_events_fire( mlt_properties this, char *id, ... )
148 mlt_events events = mlt_events_fetch( this );
149 if ( events != NULL )
154 mlt_properties list = events->list;
155 mlt_properties listeners = NULL;
157 mlt_transmitter transmitter = mlt_properties_get_data( list, id, NULL );
158 sprintf( temp, "list:%s", id );
159 listeners = mlt_properties_get_data( list, temp, NULL );
161 va_start( alist, id );
163 args[ i ] = va_arg( alist, void * );
164 while( args[ i ++ ] != NULL );
167 if ( listeners != NULL )
169 for ( i = 0; i < mlt_properties_count( listeners ); i ++ )
171 mlt_event event = mlt_properties_get_data_at( listeners, i, NULL );
172 if ( event != NULL && event->owner != NULL && event->block_count == 0 )
174 if ( transmitter != NULL )
175 transmitter( event->listener, event->owner, event->service, args );
177 event->listener( event->owner, event->service );
184 /** Register a listener.
187 mlt_event mlt_events_listen( mlt_properties this, void *service, char *id, mlt_listener listener )
189 mlt_event event = NULL;
190 mlt_events events = mlt_events_fetch( this );
191 if ( events != NULL )
193 mlt_properties list = events->list;
194 mlt_properties listeners = NULL;
196 sprintf( temp, "list:%s", id );
197 listeners = mlt_properties_get_data( list, temp, NULL );
198 if ( listeners != NULL )
202 for ( i = 0; event == NULL && i < mlt_properties_count( listeners ); i ++ )
204 mlt_event entry = mlt_properties_get_data_at( listeners, i, NULL );
205 if ( entry != NULL && entry->owner != NULL )
207 if ( entry->service == service && entry->listener == listener )
210 else if ( ( entry == NULL || entry->owner == NULL ) && first_null == -1 )
218 event = malloc( sizeof( struct mlt_event_struct ) );
221 #ifdef _MLT_EVENT_CHECKS_
224 sprintf( temp, "%d", first_null == -1 ? mlt_properties_count( listeners ) : first_null );
225 event->owner = events;
226 event->ref_count = 0;
227 event->block_count = 0;
228 event->listener = listener;
229 event->service = service;
230 mlt_properties_set_data( listeners, temp, event, 0, ( mlt_destructor )mlt_event_close, NULL );
231 mlt_event_inc_ref( event );
240 /** Block all events for a given service.
243 void mlt_events_block( mlt_properties this, void *service )
245 mlt_events events = mlt_events_fetch( this );
246 if ( events != NULL )
249 mlt_properties list = events->list;
250 for ( j = 0; j < mlt_properties_count( list ); j ++ )
252 char *temp = mlt_properties_get_name( list, j );
253 if ( !strncmp( temp, "list:", 5 ) )
255 mlt_properties listeners = mlt_properties_get_data( list, temp, NULL );
256 for ( i = 0; i < mlt_properties_count( listeners ); i ++ )
258 mlt_event entry = mlt_properties_get_data_at( listeners, i, NULL );
259 if ( entry != NULL && entry->service == service )
260 mlt_event_block( entry );
267 /** Unblock all events for a given service.
270 void mlt_events_unblock( mlt_properties this, void *service )
272 mlt_events events = mlt_events_fetch( this );
273 if ( events != NULL )
276 mlt_properties list = events->list;
277 for ( j = 0; j < mlt_properties_count( list ); j ++ )
279 char *temp = mlt_properties_get_name( list, j );
280 if ( !strncmp( temp, "list:", 5 ) )
282 mlt_properties listeners = mlt_properties_get_data( list, temp, NULL );
283 for ( i = 0; i < mlt_properties_count( listeners ); i ++ )
285 mlt_event entry = mlt_properties_get_data_at( listeners, i, NULL );
286 if ( entry != NULL && entry->service == service )
287 mlt_event_unblock( entry );
294 /** Disconnect all events for a given service.
297 void mlt_events_disconnect( mlt_properties this, void *service )
299 mlt_events events = mlt_events_fetch( this );
300 if ( events != NULL )
303 mlt_properties list = events->list;
304 for ( j = 0; j < mlt_properties_count( list ); j ++ )
306 char *temp = mlt_properties_get_name( list, j );
307 if ( !strncmp( temp, "list:", 5 ) )
309 mlt_properties listeners = mlt_properties_get_data( list, temp, NULL );
310 for ( i = 0; i < mlt_properties_count( listeners ); i ++ )
312 mlt_event entry = mlt_properties_get_data_at( listeners, i, NULL );
313 char *name = mlt_properties_get_name( listeners, i );
314 if ( entry != NULL && entry->service == service )
315 mlt_properties_set_data( listeners, name, NULL, 0, NULL, NULL );
326 pthread_mutex_t mutex;
330 static void mlt_events_listen_for( mlt_properties this, condition_pair *pair )
332 pthread_mutex_lock( &pair->mutex );
333 if ( pair->done == 0 )
335 pthread_cond_signal( &pair->cond );
336 pthread_mutex_unlock( &pair->mutex );
340 mlt_event mlt_events_setup_wait_for( mlt_properties this, char *id )
342 condition_pair *pair = malloc( sizeof( condition_pair ) );
344 pthread_cond_init( &pair->cond, NULL );
345 pthread_mutex_init( &pair->mutex, NULL );
346 pthread_mutex_lock( &pair->mutex );
347 return mlt_events_listen( this, pair, id, ( mlt_listener )mlt_events_listen_for );
350 void mlt_events_wait_for( mlt_properties this, mlt_event event )
354 condition_pair *pair = event->service;
355 pthread_cond_wait( &pair->cond, &pair->mutex );
359 void mlt_events_close_wait_for( mlt_properties this, mlt_event event )
363 condition_pair *pair = event->service;
366 pthread_mutex_unlock( &pair->mutex );
367 pthread_mutex_destroy( &pair->mutex );
368 pthread_cond_destroy( &pair->cond );
372 /** Fetch the events object.
375 static mlt_events mlt_events_fetch( mlt_properties this )
377 mlt_events events = NULL;
379 events = mlt_properties_get_data( this, "_events", NULL );
383 /** Store the events object.
386 static void mlt_events_store( mlt_properties this, mlt_events events )
388 if ( this != NULL && events != NULL )
389 mlt_properties_set_data( this, "_events", events, 0, ( mlt_destructor )mlt_events_close, NULL );
392 /** Close the events object.
395 static void mlt_events_close( mlt_events events )
397 if ( events != NULL )
399 mlt_properties_close( events->list );