some bugfixes, westley property handling reorg, make rescale respect the aspect ratio...
[melted] / src / modules / fezzik / producer_fezzik.c
1 /*
2 * producer_fezzik.c -- a normalising filter
3 * Copyright (C) 2003-2004 Ushodaya Enterprises Limited
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 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.
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 #include "producer_fezzik.h"
22
23 #include <stdio.h>
24 #include <stdlib.h>
25 #include <string.h>
26
27 #include <framework/mlt.h>
28
29 static void track_service( mlt_tractor tractor, void *service, mlt_destructor destructor )
30 {
31 mlt_properties properties = mlt_tractor_properties( tractor );
32 int registered = mlt_properties_get_int( properties, "_registered" );
33 char *key = mlt_properties_get( properties, "_registered" );
34 char *real = malloc( strlen( key ) + 2 );
35 sprintf( real, "_%s", key );
36 mlt_properties_set_data( properties, real, service, 0, destructor, NULL );
37 mlt_properties_set_int( properties, "_registered", ++ registered );
38 free( real );
39 }
40
41 static mlt_producer create_producer( char *file )
42 {
43 mlt_producer result = NULL;
44
45 // 1st Line preferences
46 if ( strstr( file, ".inigo" ) )
47 result = mlt_factory_producer( "inigo_file", file );
48 else if ( strstr( file, ".mpg" ) )
49 result = mlt_factory_producer( "mcmpeg", file );
50 else if ( strstr( file, ".mpeg" ) )
51 result = mlt_factory_producer( "mcmpeg", file );
52 else if ( strstr( file, ".dv" ) )
53 result = mlt_factory_producer( "mcdv", file );
54 else if ( strstr( file, ".dif" ) )
55 result = mlt_factory_producer( "mcdv", file );
56 else if ( strstr( file, ".jpg" ) )
57 result = mlt_factory_producer( "pixbuf", file );
58 else if ( strstr( file, ".JPG" ) )
59 result = mlt_factory_producer( "pixbuf", file );
60 else if ( strstr( file, ".jpeg" ) )
61 result = mlt_factory_producer( "pixbuf", file );
62 else if ( strstr( file, ".png" ) )
63 result = mlt_factory_producer( "pixbuf", file );
64 else if ( strstr( file, ".txt" ) )
65 result = mlt_factory_producer( "pango", file );
66 else if ( strstr( file, ".westley" ) )
67 result = mlt_factory_producer( "westley", file );
68 else if ( strstr( file, ".ogg" ) )
69 result = mlt_factory_producer( "vorbis", file );
70
71 // 2nd Line fallbacks
72 if ( result == NULL )
73 {
74 if ( strstr( file, ".dv" ) )
75 result = mlt_factory_producer( "libdv", file );
76 else if ( strstr( file, ".dif" ) )
77 result = mlt_factory_producer( "libdv", file );
78 }
79
80 // 3rd line fallbacks
81 if ( result == NULL )
82 result = mlt_factory_producer( "avformat", file );
83
84 // 4th line fallbacks
85 if ( result == NULL )
86 result = mlt_factory_producer( "ffmpeg", file );
87
88 return result;
89 }
90
91 static mlt_service create_filter( mlt_tractor tractor, mlt_service last, char *effect )
92 {
93 char *id = strdup( effect );
94 char *arg = strchr( id, ':' );
95 if ( arg != NULL )
96 *arg ++ = '\0';
97 mlt_filter filter = mlt_factory_filter( id, arg );
98 if ( filter != NULL )
99 {
100 mlt_filter_connect( filter, last, 0 );
101 track_service( tractor, filter, ( mlt_destructor )mlt_filter_close );
102 last = mlt_filter_service( filter );
103 }
104 free( id );
105 return last;
106 }
107
108 mlt_producer producer_fezzik_init( char *arg )
109 {
110 // Create the producer that the tractor will contain
111 mlt_producer producer = create_producer( arg );
112
113 // Build the tractor if we have a producer and it isn't already westley'd :-)
114 if ( producer != NULL && mlt_properties_get( mlt_producer_properties( producer ), "westley" ) == NULL )
115 {
116 // Construct the tractor
117 mlt_tractor tractor = mlt_tractor_init( );
118
119 // Sanity check
120 if ( tractor != NULL )
121 {
122 // Extract the tractor properties
123 mlt_properties properties = mlt_tractor_properties( tractor );
124
125 // Our producer will be the last service
126 mlt_service last = mlt_producer_service( producer );
127
128 // Set the registered count
129 mlt_properties_set_int( properties, "_registered", 0 );
130
131 // Register our producer for seeking in the tractor
132 mlt_properties_set_data( properties, "producer", producer, 0, ( mlt_destructor )mlt_producer_close, NULL );
133
134 // Now attach normalising filters
135 last = create_filter( tractor, last, "rescale" );
136 last = create_filter( tractor, last, "resize" );
137 last = create_filter( tractor, last, "resample" );
138
139 // Connect the tractor to the last
140 mlt_tractor_connect( tractor, last );
141
142 // Finally, inherit properties from producer
143 mlt_properties_inherit( properties, mlt_producer_properties( producer ) );
144
145 // Now make sure we don't lose our inherited identity
146 mlt_properties_set_int( properties, "_mlt_service_hidden", 1 );
147
148 // This is a temporary hack to ensure that westley doesn't dig too deep
149 // and fezzik doesn't overdo it with throwing rocks...
150 mlt_properties_set( properties, "westley", "was here" );
151
152 // Now, we return the producer of the tractor
153 producer = mlt_tractor_producer( tractor );
154 }
155 }
156
157 // Return the tractor's producer
158 return producer;
159 }
160