-/*
- * mlt_deque.c -- double ended queue
- * Copyright (C) 2003-2004 Ushodaya Enterprises Limited
- * Author: Charles Yates <charles.yates@pandora.be>
+/**
+ * \file mlt_deque.c
+ * \brief double ended queue
+ * \see mlt_deque_s
*
- * This program is free software; you can redistribute it and/or modify
- * it under the terms of the GNU General Public License as published by
- * the Free Software Foundation; either version 2 of the License, or
- * (at your option) any later version.
+ * Copyright (C) 2003-2009 Ushodaya Enterprises Limited
+ * \author Charles Yates <charles.yates@pandora.be>
*
- * This program is distributed in the hope that it will be useful,
+ * This library is free software; you can redistribute it and/or
+ * modify it under the terms of the GNU Lesser General Public
+ * License as published by the Free Software Foundation; either
+ * version 2.1 of the License, or (at your option) any later version.
+ *
+ * This library is distributed in the hope that it will be useful,
* but WITHOUT ANY WARRANTY; without even the implied warranty of
- * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
- * GNU General Public License for more details.
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
+ * Lesser General Public License for more details.
*
- * You should have received a copy of the GNU General Public License
- * along with this program; if not, write to the Free Software Foundation,
- * Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
+ * You should have received a copy of the GNU Lesser General Public
+ * License along with this library; if not, write to the Free Software
+ * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
*/
// Local header files
#include <stdlib.h>
#include <string.h>
-/** Private structure.
-*/
+/** \brief Deque entry class
+ *
+ */
+
+typedef union
+{
+ void *addr;
+ int value;
+ double floating;
+}
+deque_entry;
+
+/** \brief Double-Ended Queue (deque) class
+ *
+ * The double-ended queue is a very versatile data structure. MLT uses it as
+ * list, stack, and circular queue.
+ */
struct mlt_deque_s
{
- void **list;
+ deque_entry *list;
int size;
int count;
};
/** Create a deque.
-*/
+ *
+ * \public \memberof mlt_deque_s
+ * \return a new deque
+ */
mlt_deque mlt_deque_init( )
{
}
/** Return the number of items in the deque.
-*/
+ *
+ * \public \memberof mlt_deque_s
+ * \param this a deque
+ * \return the number of items
+ */
int mlt_deque_count( mlt_deque this )
{
}
/** Allocate space on the deque.
-*/
+ *
+ * \private \memberof mlt_deque_s
+ * \param this a deque
+ * \return true if there was an error
+ */
static int mlt_deque_allocate( mlt_deque this )
{
if ( this->count == this->size )
{
- this->list = realloc( this->list, sizeof( void * ) * ( this->size + 20 ) );
+ this->list = realloc( this->list, sizeof( deque_entry ) * ( this->size + 20 ) );
this->size += 20;
}
return this->list == NULL;
}
/** Push an item to the end.
-*/
+ *
+ * \public \memberof mlt_deque_s
+ * \param this a deque
+ * \param item an opaque pointer
+ * \return true if there was an error
+ */
int mlt_deque_push_back( mlt_deque this, void *item )
{
int error = mlt_deque_allocate( this );
if ( error == 0 )
- this->list[ this->count ++ ] = item;
+ this->list[ this->count ++ ].addr = item;
return error;
}
/** Pop an item.
-*/
+ *
+ * \public \memberof mlt_deque_s
+ * \param this a pointer
+ * \return an opaque pointer
+ */
void *mlt_deque_pop_back( mlt_deque this )
{
- return this->count > 0 ? this->list[ -- this->count ] : NULL;
+ return this->count > 0 ? this->list[ -- this->count ].addr : NULL;
}
/** Queue an item at the start.
-*/
+ *
+ * \public \memberof mlt_deque_s
+ * \param this a deque
+ * \param item an opaque pointer
+ * \return true if there was an error
+ */
int mlt_deque_push_front( mlt_deque this, void *item )
{
if ( error == 0 )
{
- memmove( &this->list[ 1 ], this->list, ( this->count ++ ) * sizeof( void * ) );
- this->list[ 0 ] = item;
+ memmove( &this->list[ 1 ], this->list, ( this->count ++ ) * sizeof( deque_entry ) );
+ this->list[ 0 ].addr = item;
}
return error;
}
/** Remove an item from the start.
-*/
+ *
+ * \public \memberof mlt_deque_s
+ * \param this a pointer
+ * \return an opaque pointer
+ */
void *mlt_deque_pop_front( mlt_deque this )
{
if ( this->count > 0 )
{
- item = this->list[ 0 ];
- memmove( this->list, &this->list[ 1 ], ( -- this->count ) * sizeof( void * ) );
+ item = this->list[ 0 ].addr;
+ memmove( this->list, &this->list[ 1 ], ( -- this->count ) * sizeof( deque_entry ) );
}
return item;
}
/** Inquire on item at back of deque but don't remove.
-*/
+ *
+ * \public \memberof mlt_deque_s
+ * \param this a deque
+ * \return an opaque pointer
+ */
void *mlt_deque_peek_back( mlt_deque this )
{
- return this->count > 0 ? this->list[ this->count - 1 ] : NULL;
+ return this->count > 0 ? this->list[ this->count - 1 ].addr : NULL;
}
/** Inquire on item at front of deque but don't remove.
-*/
+ *
+ * \public \memberof mlt_deque_s
+ * \param this a deque
+ * \return an opaque pointer
+ */
void *mlt_deque_peek_front( mlt_deque this )
{
- return this->count > 0 ? this->list[ 0 ] : NULL;
+ return this->count > 0 ? this->list[ 0 ].addr : NULL;
+}
+
+/** Push an integer to the end.
+ *
+ * \public \memberof mlt_deque_s
+ * \param this a deque
+ * \param item an integer
+ * \return true if there was an error
+ */
+
+int mlt_deque_push_back_int( mlt_deque this, int item )
+{
+ int error = mlt_deque_allocate( this );
+
+ if ( error == 0 )
+ this->list[ this->count ++ ].value = item;
+
+ return error;
+}
+
+/** Pop an integer.
+ *
+ * \public \memberof mlt_deque_s
+ * \param this a deque
+ * \return an integer
+ */
+
+int mlt_deque_pop_back_int( mlt_deque this )
+{
+ return this->count > 0 ? this->list[ -- this->count ].value : 0;
}
-/** Close the queue.
-*/
+/** Queue an integer at the start.
+ *
+ * \public \memberof mlt_deque_s
+ * \param this a deque
+ * \param item an integer
+ * \return true if there was an error
+ */
+
+int mlt_deque_push_front_int( mlt_deque this, int item )
+{
+ int error = mlt_deque_allocate( this );
+
+ if ( error == 0 )
+ {
+ memmove( &this->list[ 1 ], this->list, ( this->count ++ ) * sizeof( deque_entry ) );
+ this->list[ 0 ].value = item;
+ }
+
+ return error;
+}
+
+/** Remove an integer from the start.
+ *
+ * \public \memberof mlt_deque_s
+ * \param this a deque
+ * \return an integer
+ */
+
+int mlt_deque_pop_front_int( mlt_deque this )
+{
+ int item = 0;
+
+ if ( this->count > 0 )
+ {
+ item = this->list[ 0 ].value;
+ memmove( this->list, &this->list[ 1 ], ( -- this->count ) * sizeof( deque_entry ) );
+ }
+
+ return item;
+}
+
+/** Inquire on an integer at back of deque but don't remove.
+ *
+ * \public \memberof mlt_deque_s
+ * \param this a deque
+ * \return an integer
+ */
+
+int mlt_deque_peek_back_int( mlt_deque this )
+{
+ return this->count > 0 ? this->list[ this->count - 1 ].value : 0;
+}
+
+/** Inquire on an integer at front of deque but don't remove.
+ *
+ * \public \memberof mlt_deque_s
+ * \param this a deque
+ * \return an integer
+ */
+
+int mlt_deque_peek_front_int( mlt_deque this )
+{
+ return this->count > 0 ? this->list[ 0 ].value : 0;
+}
+
+/** Push a double float to the end.
+ *
+ * \public \memberof mlt_deque_s
+ * \param this a deque
+ * \param item a double float
+ * \return true if there was an error
+ */
+
+int mlt_deque_push_back_double( mlt_deque this, double item )
+{
+ int error = mlt_deque_allocate( this );
+
+ if ( error == 0 )
+ this->list[ this->count ++ ].floating = item;
+
+ return error;
+}
+
+/** Pop a double float.
+ *
+ * \public \memberof mlt_deque_s
+ * \param this a deque
+ * \return a double float
+ */
+
+double mlt_deque_pop_back_double( mlt_deque this )
+{
+ return this->count > 0 ? this->list[ -- this->count ].floating : 0;
+}
+
+/** Queue a double float at the start.
+ *
+ * \public \memberof mlt_deque_s
+ * \param this a deque
+ * \param item a double float
+ * \return true if there was an error
+ */
+
+int mlt_deque_push_front_double( mlt_deque this, double item )
+{
+ int error = mlt_deque_allocate( this );
+
+ if ( error == 0 )
+ {
+ memmove( &this->list[ 1 ], this->list, ( this->count ++ ) * sizeof( deque_entry ) );
+ this->list[ 0 ].floating = item;
+ }
+
+ return error;
+}
+
+/** Remove a double float from the start.
+ *
+ * \public \memberof mlt_deque_s
+ * \param this a deque
+ * \return a double float
+ */
+
+double mlt_deque_pop_front_double( mlt_deque this )
+{
+ double item = 0;
+
+ if ( this->count > 0 )
+ {
+ item = this->list[ 0 ].floating;
+ memmove( this->list, &this->list[ 1 ], ( -- this->count ) * sizeof( deque_entry ) );
+ }
+
+ return item;
+}
+
+/** Inquire on a double float at back of deque but don't remove.
+ *
+ * \public \memberof mlt_deque_s
+ * \param this a deque
+ * \return a double float
+ */
+
+double mlt_deque_peek_back_double( mlt_deque this )
+{
+ return this->count > 0 ? this->list[ this->count - 1 ].floating : 0;
+}
+
+/** Inquire on a double float at front of deque but don't remove.
+ *
+ * \public \memberof mlt_deque_s
+ * \param this a deque
+ * \return a double float
+ */
+
+double mlt_deque_peek_front_double( mlt_deque this )
+{
+ return this->count > 0 ? this->list[ 0 ].floating : 0;
+}
+
+/** Destroy the queue.
+ *
+ * \public \memberof mlt_deque_s
+ * \param this a deque
+ */
void mlt_deque_close( mlt_deque this )
{
free( this->list );
free( this );
}
-
-
projects / melted / blobdiff