research.m1stereo.tv/gitweb/ - melted/blob - 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 an int64 on this property.
 100 */
 101
 102 int mlt_property_set_int64( mlt_property this, int64_t value )
 103 {
 104         mlt_property_clear( this );
 105         this->types = mlt_prop_int64;
 106         this->prop_int64 = value;
 107         return 0;
 108 }
 109
 110 /** Set a data on this property.
 111 */
 112
 113 int mlt_property_set_data( mlt_property this, void *value, int length, mlt_destructor destructor, mlt_serialiser serialiser )
 114 {
 115         if ( this->data == value )
 116                 this->destructor = NULL;
 117         mlt_property_clear( this );
 118         this->types = mlt_prop_data;
 119         this->data = value;
 120         this->length = length;
 121         this->destructor = destructor;
 122         this->serialiser = serialiser;
 123         return 0;
 124 }
 125
 126 /** Get an int from this property.
 127 */
 128
 129 int mlt_property_get_int( mlt_property this )
 130 {
 131         if ( this->types & mlt_prop_int )
 132                 return this->prop_int;
 133         else if ( this->types & mlt_prop_double )
 134                 return ( int )this->prop_double;
 135         else if ( this->types & mlt_prop_timecode )
 136                 return ( int )this->prop_timecode;
 137         else if ( this->types & mlt_prop_int64 )
 138                 return ( int )this->prop_int64;
 139         else if ( this->types & mlt_prop_string )
 140                 return atoi( this->prop_string );
 141         return 0;
 142 }
 143
 144 /** Get a double from this property.
 145 */
 146
 147 double mlt_property_get_double( mlt_property this )
 148 {
 149         if ( this->types & mlt_prop_double )
 150                 return this->prop_double;
 151         else if ( this->types & mlt_prop_int )
 152                 return ( double )this->prop_int;
 153         else if ( this->types & mlt_prop_timecode )
 154                 return ( double )this->prop_timecode;
 155         else if ( this->types & mlt_prop_int64 )
 156                 return ( double )this->prop_int64;
 157         else if ( this->types & mlt_prop_string )
 158                 return atof( this->prop_string );
 159         return 0;
 160 }
 161
 162 /** Get a timecode from this property.
 163 */
 164
 165 mlt_timecode mlt_property_get_timecode( mlt_property this )
 166 {
 167         if ( this->types & mlt_prop_timecode )
 168                 return this->prop_timecode;
 169         else if ( this->types & mlt_prop_int )
 170                 return ( mlt_timecode )this->prop_int;
 171         else if ( this->types & mlt_prop_double )
 172                 return ( mlt_timecode )this->prop_double;
 173         else if ( this->types & mlt_prop_int64 )
 174                 return ( mlt_timecode )this->prop_int64;
 175         else if ( this->types & mlt_prop_string )
 176                 return ( mlt_timecode )atof( this->prop_string );
 177         return 0;
 178 }
 179
 180 /** Get an int64 from this property.
 181 */
 182
 183 int64_t mlt_property_get_int64( mlt_property this )
 184 {
 185         if ( this->types & mlt_prop_int64 )
 186                 return this->prop_int64;
 187         else if ( this->types & mlt_prop_int )
 188                 return ( int64_t )this->prop_int;
 189         else if ( this->types & mlt_prop_double )
 190                 return ( int64_t )this->prop_double;
 191         else if ( this->types & mlt_prop_timecode )
 192                 return ( int64_t )this->prop_timecode;
 193         else if ( this->types & mlt_prop_string )
 194                 return ( int64_t )atof( this->prop_string );
 195         return 0;
 196 }
 197
 198 /** Get a string from this property.
 199 */
 200
 201 char *mlt_property_get_string( mlt_property this )
 202 {
 203         // Construct a string if need be
 204         if ( ! ( this->types & mlt_prop_string ) )
 205         {
 206                 if ( this->types & mlt_prop_int )
 207                 {
 208                         this->types |= mlt_prop_string;
 209                         this->prop_string = malloc( 32 );
 210                         sprintf( this->prop_string, "%d", this->prop_int );
 211                 }
 212                 else if ( this->types & mlt_prop_double )
 213                 {
 214                         this->types |= mlt_prop_string;
 215                         this->prop_string = malloc( 32 );
 216                         sprintf( this->prop_string, "%e", this->prop_double );
 217                 }
 218                 else if ( this->types & mlt_prop_timecode )
 219                 {
 220                         this->types |= mlt_prop_string;
 221                         this->prop_string = malloc( 32 );
 222                         sprintf( this->prop_string, "%e", this->prop_timecode );
 223                 }
 224                 else if ( this->types & mlt_prop_int64 )
 225                 {
 226                         this->types |= mlt_prop_string;
 227                         this->prop_string = malloc( 32 );
 228                         sprintf( this->prop_string, "%lld", this->prop_int64 );
 229                 }
 230                 else if ( this->types & mlt_prop_data && this->serialiser != NULL )
 231                 {
 232                         this->types |= mlt_prop_string;
 233                         this->prop_string = this->serialiser( this->data, this->length );
 234                 }
 235         }
 236
 237         // Return the string (may be NULL)
 238         return this->prop_string;
 239 }
 240
 241 /** Get a data and associated length.
 242 */
 243
 244 void *mlt_property_get_data( mlt_property this, int *length )
 245 {
 246         // Assign length if not NULL
 247         if ( length != NULL )
 248                 *length = this->length;
 249
 250         // Return the data (note: there is no conversion here)
 251         return this->data;
 252 }
 253
 254 /** Close this property.
 255 */
 256
 257 void mlt_property_close( mlt_property this )
 258 {
 259         mlt_property_clear( this );
 260         free( this );
 261 }
 262
 263