Initial revision
[melted] / src / framework / mlt_property.c
1 /*
2 * mlt_property.c -- property class
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 "config.h"
22
23 #include "mlt_property.h"
24
25 #include <stdio.h>
26 #include <stdlib.h>
27 #include <string.h>
28
29 /** Construct and uninitialised property.
30 */
31
32 mlt_property mlt_property_init( )
33 {
34 return calloc( sizeof( struct mlt_property_s ), 1 );
35 }
36
37 /** Clear a property.
38 */
39
40 void mlt_property_clear( mlt_property this )
41 {
42 // Special case data handling
43 if ( this->types & mlt_prop_data && this->destructor != NULL )
44 this->destructor( this->data );
45
46 // Special case string handling
47 if ( this->types & mlt_prop_string )
48 free( this->prop_string );
49
50 // We can wipe it now.
51 memset( this, 0, sizeof( struct mlt_property_s ) );
52 }
53
54 /** Set an int on this property.
55 */
56
57 int mlt_property_set_int( mlt_property this, int value )
58 {
59 mlt_property_clear( this );
60 this->types = mlt_prop_int;
61 this->prop_int = value;
62 return 0;
63 }
64
65 /** Set a double on this property.
66 */
67
68 int mlt_property_set_double( mlt_property this, double value )
69 {
70 mlt_property_clear( this );
71 this->types = mlt_prop_double;
72 this->prop_double = value;
73 return 0;
74 }
75
76 /** Set a timecode on this property.
77 */
78
79 int mlt_property_set_timecode( mlt_property this, mlt_timecode value )
80 {
81 mlt_property_clear( this );
82 this->types = mlt_prop_timecode;
83 this->prop_timecode = value;
84 return 0;
85 }
86
87 /** Set a string on this property.
88 */
89
90 int mlt_property_set_string( mlt_property this, char *value )
91 {
92 mlt_property_clear( this );
93 this->types = mlt_prop_string;
94 if ( value != NULL )
95 this->prop_string = strdup( value );
96 return this->prop_string != NULL;
97 }
98
99 /** Set a data on this property.
100 */
101
102 int mlt_property_set_data( mlt_property this, void *value, int length, mlt_destructor destructor, mlt_serialiser serialiser )
103 {
104 mlt_property_clear( this );
105 this->types = mlt_prop_data;
106 this->data = value;
107 this->length = length;
108 this->destructor = destructor;
109 this->serialiser = serialiser;
110 return 0;
111 }
112
113 /** Get an int from this property.
114 */
115
116 int mlt_property_get_int( mlt_property this )
117 {
118 if ( this->types & mlt_prop_int )
119 return this->prop_int;
120 else if ( this->types & mlt_prop_double )
121 return ( int )this->prop_double;
122 else if ( this->types & mlt_prop_timecode )
123 return ( int )this->prop_timecode;
124 else if ( this->types & mlt_prop_string )
125 return atoi( this->prop_string );
126 return 0;
127 }
128
129 /** Get a double from this property.
130 */
131
132 double mlt_property_get_double( mlt_property this )
133 {
134 if ( this->types & mlt_prop_double )
135 return this->prop_double;
136 else if ( this->types & mlt_prop_int )
137 return ( double )this->prop_int;
138 else if ( this->types & mlt_prop_timecode )
139 return ( double )this->prop_timecode;
140 else if ( this->types & mlt_prop_string )
141 return atof( this->prop_string );
142 return 0;
143 }
144
145 /** Get a timecode from this property.
146 */
147
148 mlt_timecode mlt_property_get_timecode( mlt_property this )
149 {
150 if ( this->types & mlt_prop_timecode )
151 return this->prop_timecode;
152 else if ( this->types & mlt_prop_int )
153 return ( mlt_timecode )this->prop_int;
154 else if ( this->types & mlt_prop_double )
155 return ( mlt_timecode )this->prop_double;
156 else if ( this->types & mlt_prop_string )
157 return ( mlt_timecode )atof( this->prop_string );
158 return 0;
159 }
160
161 /** Get a string from this property.
162 */
163
164 char *mlt_property_get_string( mlt_property this )
165 {
166 // Construct a string if need be
167 if ( ! ( this->types & mlt_prop_string ) )
168 {
169 if ( this->types & mlt_prop_int )
170 {
171 this->types |= mlt_prop_string;
172 this->prop_string = malloc( 32 );
173 sprintf( this->prop_string, "%d", this->prop_int );
174 }
175 else if ( this->types & mlt_prop_double )
176 {
177 this->types |= mlt_prop_string;
178 this->prop_string = malloc( 32 );
179 sprintf( this->prop_string, "%e", this->prop_double );
180 }
181 else if ( this->types & mlt_prop_timecode )
182 {
183 this->types |= mlt_prop_string;
184 this->prop_string = malloc( 32 );
185 sprintf( this->prop_string, "%e", this->prop_timecode );
186 }
187 else if ( this->types & mlt_prop_data && this->serialiser != NULL )
188 {
189 this->types |= mlt_prop_string;
190 this->prop_string = this->serialiser( this->data, this->length );
191 }
192 }
193
194 // Return the string (may be NULL)
195 return this->prop_string;
196 }
197
198 /** Get a data and associated length.
199 */
200
201 void *mlt_property_get_data( mlt_property this, int *length )
202 {
203 // Assign length if not NULL
204 if ( length != NULL )
205 *length = this->length;
206
207 // Return the data (note: there is no conversion here)
208 return this->data;
209 }
210
211 /** Close this property.
212 */
213
214 void mlt_property_close( mlt_property this )
215 {
216 mlt_property_clear( this );
217 free( this );
218 }
219
220