Adding miracle
[melted] / mlt++ / swig / mltpp.i
1 /**
2  * mltpp.i - Swig Bindings for mlt++
3  * Copyright (C) 2004-2005 Charles Yates
4  * Author: Charles Yates <charles.yates@pandora.be>
5  *
6  * This program is free software; you can redistribute it and/or modify
7  * it under the terms of the GNU Lesser General Public License as published
8  * by the Free Software Foundation; either version 2 of the License, or
9  * (at your option) any later version.
10  *
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.
15  *
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.
19  */
20
21 %module mltpp
22 %include "carrays.i"
23 %array_class(unsigned char, unsignedCharArray);
24
25 %{
26 #include <mlt++/Mlt.h>
27 %}
28
29 /** These methods return objects which should be gc'd.
30  */
31
32 namespace Mlt {
33 %newobject Factory::producer( char *, char * );
34 %newobject Factory::filter( char *, char * );
35 %newobject Factory::transition( char *, char * );
36 %newobject Factory::consumer( char *, char * );
37 %newobject Service::producer( );
38 %newobject Service::consumer( );
39 %newobject Service::get_frame( int );
40 %newobject Service::filter( int );
41 %newobject Producer::filter( int );
42 %newobject Playlist::current( );
43 %newobject Playlist::clip_info( int );
44 %newobject Multitrack::track( int );
45 %newobject Tractor::multitrack( );
46 %newobject Tractor::field( );
47 %newobject Tractor::track( int );
48 }
49
50 /** Classes to wrap.
51  */
52
53 %include <framework/mlt_types.h>
54 %include <framework/mlt_factory.h>
55 %include <MltFactory.h>
56 %include <MltEvent.h>
57 %include <MltProperties.h>
58 %include <MltFrame.h>
59 %include <MltService.h>
60 %include <MltProducer.h>
61 %include <MltPlaylist.h>
62 %include <MltConsumer.h>
63 %include <MltFilter.h>
64 %include <MltTransition.h>
65 %include <MltMultitrack.h>
66 %include <MltField.h>
67 %include <MltTractor.h>
68 %include <MltFilteredConsumer.h>
69 %include <MltMiracle.h>
70
71 #if defined(SWIGRUBY)
72
73 %{
74
75 static void ruby_listener( mlt_properties owner, void *object );
76
77 class RubyListener
78 {
79         public:
80                 RubyListener( Mlt::Properties &properties, char *id, VALUE callback ) : 
81                         callback( callback ) 
82                 {
83                         properties.listen( id, this, ( mlt_listener )ruby_listener );
84                 }
85
86         void mark( ) 
87                 { 
88                         ((void (*)(VALUE))(rb_gc_mark))( callback ); 
89                 }
90
91         void doit( ) 
92                 {
93                 ID method = rb_intern( "call" );
94                 rb_funcall( callback, method, 0 );
95         }
96
97         private:
98                 VALUE callback;
99 };
100
101 static void ruby_listener( mlt_properties owner, void *object )
102 {
103         RubyListener *o = static_cast< RubyListener * >( object );
104         o->doit( );
105 }
106
107 void markRubyListener( void* p ) 
108 {
109     RubyListener *o = static_cast<RubyListener*>( p );
110     o->mark( );
111 }
112
113 %}
114
115 // Ruby wrapper
116 %rename( Listener )  RubyListener;
117 %markfunc RubyListener "markRubyListener";
118
119 class RubyListener 
120 {
121         public:
122                 RubyListener( Mlt::Properties &properties, char *id, VALUE callback );
123 };
124
125 #endif
126