in point fix, low latency sdl, minor fixes
[melted] / src / framework / mlt_properties.c
index a0f39f2..7a7010e 100644 (file)
 
 typedef struct
 {
+       int hash[ 199 ];
        char **name;
        mlt_property *value;
        int count;
        int size;
+       mlt_properties mirror;
 }
 property_list;
 
@@ -72,38 +74,143 @@ mlt_properties mlt_properties_new( )
        return this;
 }
 
+/** Load properties from a file.
+*/
+
+mlt_properties mlt_properties_load( char *filename )
+{
+       // Construct a standalone properties object
+       mlt_properties this = mlt_properties_new( );
+
+       if ( this != NULL )
+       {
+               // Open the file
+               FILE *file = fopen( filename, "r" );
+
+               // Load contents of file
+               if ( file != NULL )
+               {
+                       // Temp string
+                       char temp[ 1024 ];
+
+                       // Read each string from the file
+                       while( fgets( temp, 1024, file ) )
+                       {
+                               // Chomp the string
+                               temp[ strlen( temp ) - 1 ] = '\0';
+
+                               // Parse and set the property
+                               if ( strcmp( temp, "" ) && temp[ 0 ] != '#' )
+                                       mlt_properties_parse( this, temp );
+                       }
+
+                       // Close the file
+                       fclose( file );
+               }
+       }
+
+       // Return the pointer
+       return this;
+}
+
+static inline int generate_hash( char *name )
+{
+       int hash = 0;
+       int i = 1;
+       while ( *name )
+               hash = ( hash + ( i ++ * ( *name ++ & 31 ) ) ) % 199;
+       return hash;
+}
+
+/** Special case - when a container (such as fezzik) is protecting another 
+       producer, we need to ensure that properties are passed through to the
+       real producer.
+*/
+
+static inline void mlt_properties_do_mirror( mlt_properties this, char *name )
+{
+       property_list *list = this->private;
+       if ( list->mirror != NULL ) 
+       {
+               char *value = mlt_properties_get( this, name );
+               if ( value != NULL )
+                       mlt_properties_set( list->mirror, name, value );
+       }
+}
+
+/** Allow the specification of a mirror.
+*/
+
+void mlt_properties_mirror( mlt_properties this, mlt_properties that )
+{
+       property_list *list = this->private;
+       list->mirror = that;
+}
+
 /** Inherit all serialisable properties from that into this.
 */
 
 int mlt_properties_inherit( mlt_properties this, mlt_properties that )
 {
        int count = mlt_properties_count( that );
-       while ( count -- )
+       int i = 0;
+       for ( i = 0; i < count; i ++ )
        {
-               char *value = mlt_properties_get_value( that, count );
+               char *value = mlt_properties_get_value( that, i );
                if ( value != NULL )
                {
-                       char *name = mlt_properties_get_name( that, count );
+                       char *name = mlt_properties_get_name( that, i );
                        mlt_properties_set( this, name, value );
                }
        }
        return 0;
 }
 
+/** Pass all properties from 'that' that match the prefix to 'this' (excluding the prefix).
+*/
+
+int mlt_properties_pass( mlt_properties this, mlt_properties that, char *prefix )
+{
+       int count = mlt_properties_count( that );
+       int length = strlen( prefix );
+       int i = 0;
+       for ( i = 0; i < count; i ++ )
+       {
+               char *name = mlt_properties_get_name( that, i );
+               if ( !strncmp( name, prefix, length ) )
+               {
+                       char *value = mlt_properties_get_value( that, i );
+                       if ( value != NULL )
+                               mlt_properties_set( this, name + length, value );
+               }
+       }
+       return 0;
+}
+
 /** Locate a property by name
 */
 
-static mlt_property mlt_properties_find( mlt_properties this, char *name )
+static inline mlt_property mlt_properties_find( mlt_properties this, char *name )
 {
-       mlt_property value = NULL;
        property_list *list = this->private;
-       int i = 0;
+       mlt_property value = NULL;
+       int key = generate_hash( name );
+       int i = list->hash[ key ] - 1;
 
-       // Locate the item 
-       for ( i = 0; value == NULL && i < list->count; i ++ )
-               if ( !strcmp( list->name[ i ], name ) )
+       if ( i >= 0 )
+       {
+               // Check if we're hashed
+               if ( list->count > 0 &&
+                       name[ 0 ] == list->name[ i ][ 0 ] && 
+                       !strcmp( list->name[ i ], name ) )
                        value = list->value[ i ];
 
+               // Locate the item 
+               for ( i = list->count - 1; value == NULL && i >= 0; i -- )
+                       if ( name[ 0 ] == list->name[ i ][ 0 ] && !strcmp( list->name[ i ], name ) )
+                               value = list->value[ i ];
+       }
+
        return value;
 }
 
@@ -113,11 +220,12 @@ static mlt_property mlt_properties_find( mlt_properties this, char *name )
 static mlt_property mlt_properties_add( mlt_properties this, char *name )
 {
        property_list *list = this->private;
+       int key = generate_hash( name );
 
        // Check that we have space and resize if necessary
        if ( list->count == list->size )
        {
-               list->size += 10;
+               list->size += 50;
                list->name = realloc( list->name, list->size * sizeof( char * ) );
                list->value = realloc( list->value, list->size * sizeof( mlt_property ) );
        }
@@ -126,6 +234,10 @@ static mlt_property mlt_properties_add( mlt_properties this, char *name )
        list->name[ list->count ] = strdup( name );
        list->value[ list->count ] = mlt_property_init( );
 
+       // Assign to hash table
+       if ( list->hash[ key ] == 0 )
+               list->hash[ key ] = list->count + 1;
+
        // Return and increment count accordingly
        return list->value[ list->count ++ ];
 }
@@ -158,11 +270,22 @@ int mlt_properties_set( mlt_properties this, char *name, char *value )
 
        // Set it if not NULL
        if ( property != NULL )
+       {
                error = mlt_property_set_string( property, value );
+               mlt_properties_do_mirror( this, name );
+       }
 
        return error;
 }
 
+/** Set or default the property.
+*/
+
+int mlt_properties_set_or_default( mlt_properties this, char *name, char *value, char *def )
+{
+       return mlt_properties_set( this, name, value == NULL ? def : value );
+}
+
 /** Get a string value by name.
 */
 
@@ -194,6 +317,17 @@ char *mlt_properties_get_value( mlt_properties this, int index )
        return NULL;
 }
 
+/** Get a data value by index.
+*/
+
+void *mlt_properties_get_data_at( mlt_properties this, int index, int *size )
+{
+       property_list *list = this->private;
+       if ( index >= 0 && index < list->count )
+               return mlt_property_get_data( list->value[ index ], size );
+       return NULL;
+}
+
 /** Return the number of items in the list.
 */
 
@@ -222,6 +356,13 @@ int mlt_properties_parse( mlt_properties this, char *namevalue )
                strcpy( value, "" );
        }
 
+       if ( strlen( value ) > 1 && value[ 0 ] == '\"' )
+       {
+               strcpy( value, value + 1 );
+               if ( value[ strlen( value ) - 1 ] == '\"' )
+                       value[ strlen( value ) - 1 ] = '\0';
+       }
+
        error = mlt_properties_set( this, name, value );
 
        free( name );
@@ -251,7 +392,10 @@ int mlt_properties_set_int( mlt_properties this, char *name, int value )
 
        // Set it if not NULL
        if ( property != NULL )
+       {
                error = mlt_property_set_int( property, value );
+               mlt_properties_do_mirror( this, name );
+       }
 
        return error;
 }
@@ -277,7 +421,10 @@ int mlt_properties_set_double( mlt_properties this, char *name, double value )
 
        // Set it if not NULL
        if ( property != NULL )
+       {
                error = mlt_property_set_double( property, value );
+               mlt_properties_do_mirror( this, name );
+       }
 
        return error;
 }
@@ -303,7 +450,10 @@ int mlt_properties_set_position( mlt_properties this, char *name, mlt_position v
 
        // Set it if not NULL
        if ( property != NULL )
+       {
                error = mlt_property_set_position( property, value );
+               mlt_properties_do_mirror( this, name );
+       }
 
        return error;
 }
@@ -334,6 +484,45 @@ int mlt_properties_set_data( mlt_properties this, char *name, void *value, int l
        return error;
 }
 
+/** Rename a property.
+*/
+
+int mlt_properties_rename( mlt_properties this, char *source, char *dest )
+{
+       mlt_property value = mlt_properties_find( this, dest );
+
+       if ( value == NULL )
+       {
+               property_list *list = this->private;
+               int i = 0;
+
+               // Locate the item 
+               for ( i = 0; i < list->count; i ++ )
+               {
+                       if ( !strcmp( list->name[ i ], source ) )
+                       {
+                               free( list->name[ i ] );
+                               list->name[ i ] = strdup( dest );
+                               list->hash[ generate_hash( dest ) ] = i + 1;
+                               break;
+                       }
+               }
+       }
+
+       return value != NULL;
+}
+
+/** Dump the properties.
+*/
+
+void mlt_properties_dump( mlt_properties this, FILE *output )
+{
+       property_list *list = this->private;
+       int i = 0;
+       for ( i = 0; i < list->count; i ++ )
+               fprintf( stderr, "%s = %s\n", list->name[ i ], mlt_properties_get( this, list->name[ i ] ) );
+}
+
 /** Close the list.
 */
 
@@ -343,7 +532,7 @@ void mlt_properties_close( mlt_properties this )
        int index = 0;
 
        // Clean up names and values
-       for ( index = 0; index < list->count; index ++ )
+       for ( index = list->count - 1; index >= 0; index -- )
        {
                free( list->name[ index ] );
                mlt_property_close( list->value[ index ] );