renatofilho@320: /**
renatofilho@320:  * GMyth Library
renatofilho@320:  *
renatofilho@320:  * @file gmyth/gmyth_stringlist.c
renatofilho@320:  * 
renatofilho@320:  * @brief <p> This component contains functions for dealing with the stringlist
renatofilho@320:  * format of the mythprotocol.
renatofilho@320:  * 
renatofilho@320:  * Copyright (C) 2006 INdT - Instituto Nokia de Tecnologia.
renatofilho@320:  * @author Hallyson Luiz de Morais Melo <hallyson.melo@indt.org.br>
renatofilho@320:  *
renatofilho@320:  *//*
renatofilho@320:  * 
renatofilho@320:  * This program is free software; you can redistribute it and/or modify
renatofilho@320:  * it under the terms of the GNU Lesser General Public License as published by
renatofilho@320:  * the Free Software Foundation; either version 2 of the License, or
renatofilho@320:  * (at your option) any later version.
renatofilho@320:  *
renatofilho@320:  * This program is distributed in the hope that it will be useful,
renatofilho@320:  * but WITHOUT ANY WARRANTY; without even the implied warranty of
renatofilho@320:  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
renatofilho@320:  * GNU General Public License for more details.
renatofilho@320:  *
renatofilho@320:  * You should have received a copy of the GNU Lesser General Public License
renatofilho@320:  * along with this program; if not, write to the Free Software
renatofilho@320:  * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
renatofilho@320:  */
renatofilho@320:  
renatofilho@320: #ifdef HAVE_CONFIG_H
renatofilho@320: #include "config.h"
renatofilho@320: #endif
renatofilho@320: 
renatofilho@320: #include "gmyth_stringlist.h"
renatofilho@320:  
renatofilho@320: #include "gmyth_debug.h"
renatofilho@320: 
renatofilho@320: static void gmyth_string_list_class_init          (GMythStringListClass *klass);
renatofilho@320: static void gmyth_string_list_init                (GMythStringList *object);
renatofilho@320: 
renatofilho@320: static void gmyth_string_list_dispose  (GObject *object);
renatofilho@320: static void gmyth_string_list_finalize (GObject *object);
renatofilho@320: 
renatofilho@320: G_DEFINE_TYPE(GMythStringList, gmyth_string_list, G_TYPE_OBJECT)
renatofilho@320:     
renatofilho@320: static void
renatofilho@320: gmyth_string_list_class_init (GMythStringListClass *klass)
renatofilho@320: {
renatofilho@320: 	GObjectClass *gobject_class;
renatofilho@320: 
renatofilho@320:     gobject_class = (GObjectClass *) klass;
renatofilho@320: 	
renatofilho@320:     gobject_class->dispose  = gmyth_string_list_dispose;
renatofilho@320:     gobject_class->finalize = gmyth_string_list_finalize;	
renatofilho@320: }
renatofilho@320: 
renatofilho@320: static void
renatofilho@320: gmyth_string_list_init (GMythStringList *gmyth_string_list)
renatofilho@320: {
renatofilho@320: 	gmyth_string_list->glist = NULL;
renatofilho@320: }
renatofilho@320: 
renatofilho@320: static void
renatofilho@320: gmyth_string_list_dispose  (GObject *object)
renatofilho@320: {
renatofilho@320: 	GMythStringList *gmyth_string_list = GMYTH_STRING_LIST(object);
renatofilho@320: 
renatofilho@320: 	if (gmyth_string_list->glist)
renatofilho@320: 		gmyth_string_list_clear_all(gmyth_string_list);
renatofilho@320: 
renatofilho@320: 	G_OBJECT_CLASS (gmyth_string_list_parent_class)->dispose (object);
renatofilho@320: }
renatofilho@320: 
renatofilho@320: static void
renatofilho@320: gmyth_string_list_finalize (GObject *object)
renatofilho@320: {
renatofilho@320: 	//GMythStringList *gmyth_string_list = GMYTH_STRING_LIST(object);
renatofilho@320: 
renatofilho@320: 	g_signal_handlers_destroy (object);
renatofilho@320: 
renatofilho@320: 	G_OBJECT_CLASS (gmyth_string_list_parent_class)->finalize (object);
renatofilho@320: }
renatofilho@320: 
renatofilho@320: /** Creates a new instance of GStringList.
renatofilho@320:  * 
renatofilho@320:  * @return a new instance of GStringList.
renatofilho@320:  */
renatofilho@320: GMythStringList *
renatofilho@320: gmyth_string_list_new ()
renatofilho@320: {
renatofilho@320:     GMythStringList *gmyth_string_list = GMYTH_STRING_LIST (g_object_new (GMYTH_STRING_LIST_TYPE, NULL));
renatofilho@320:     return gmyth_string_list;
renatofilho@320: }
renatofilho@320: 
renatofilho@320: /** Appends a guint64 to the string list.
renatofilho@320:  * 
renatofilho@320:  * @param strlist The GMythStringList instance.
renatofilho@320:  * @param value The guint64 to be appended.
renatofilho@320:  * 
renatofilho@320:  * @return The appended guint64 converted to a GString object.
renatofilho@320:  */
renatofilho@320: GString*
renatofilho@320: gmyth_string_list_append_int ( GMythStringList *strlist, const gint value )
renatofilho@320: {
renatofilho@320: 	GString *tmp_str = g_string_new ("");
renatofilho@320: 
renatofilho@320: 	g_string_printf (tmp_str, "%d", value);
renatofilho@320: 
renatofilho@320: 	gmyth_string_list_append_string (strlist, tmp_str);
renatofilho@320: 
renatofilho@320: 	return tmp_str;	
renatofilho@320: }
renatofilho@320: 
renatofilho@320: /** Appends a guint64 to the string list.
renatofilho@320:  * 
renatofilho@320:  * @param strlist The GMythStringList instance.
renatofilho@320:  * @param value The guint64 to be appended.
renatofilho@320:  * 
renatofilho@320:  * @return The appended guint64 converted to a GString object.
renatofilho@320:  */
renatofilho@320: GString*
renatofilho@320: gmyth_string_list_append_uint64 ( GMythStringList *strlist, const guint64 value)
renatofilho@320: {
renatofilho@320: 	GString *tmp_str1 = g_string_new ("");
renatofilho@320: 	GString *tmp_str2 = g_string_new ("");
renatofilho@320: 	gmyth_debug ( "value = %llu.\n", value);
renatofilho@320: 
renatofilho@320: 	gulong l2 = ( (guint64)value & 0xffffffff  );
renatofilho@320: 	gulong l1 = ( (guint64)value >> 32 );
renatofilho@320:   
renatofilho@320: 	/* high order part of guint64 value */
renatofilho@320: 	g_string_printf (tmp_str1, "%lu", l1);
renatofilho@320: 	
renatofilho@320: 	gmyth_debug( "[%s] uint64 (high) = %s\n", __FUNCTION__, tmp_str1->str );
renatofilho@320: 
renatofilho@320: 	//gmyth_string_list_append_string (strlist, tmp_str1);
renatofilho@320: 	strlist->glist = g_list_append( strlist->glist, tmp_str1 );
renatofilho@320: 
renatofilho@320:  	/* low order part of guint64 value */
renatofilho@320: 	g_string_printf (tmp_str2, "%lu", l2);
renatofilho@320: 
renatofilho@320: 	gmyth_debug( "[%s] uint64 (low) = %s\n", __FUNCTION__, tmp_str2->str );
renatofilho@320: 
renatofilho@320: 	strlist->glist = g_list_append( strlist->glist, tmp_str2 );
renatofilho@320: 
renatofilho@320: 	//gmyth_string_list_append_string (strlist, tmp_str2);
renatofilho@320: 
renatofilho@320: 	return tmp_str2;	
renatofilho@320: }
renatofilho@320: 
renatofilho@320: /** Appends a gint64 to the string list.
renatofilho@320:  * 
renatofilho@320:  * @param strlist The GMythStringList instance.
renatofilho@320:  * @param value The gint64 to be appended.
renatofilho@320:  * 
renatofilho@320:  * @return The appended gint64 converted to a GString object.
renatofilho@320:  */
renatofilho@320: GString*
renatofilho@320: gmyth_string_list_append_int64 ( GMythStringList *strlist, const gint64 value)
renatofilho@320: {
renatofilho@320: 	GString *tmp_str1 = g_string_new ("");
renatofilho@320: 	GString *tmp_str2 = g_string_new ("");
renatofilho@320: 	gmyth_debug ( "value = %lld.\n", value );
renatofilho@320: 
renatofilho@320: 	glong l2 = ( (gint64)value & 0xffffffff  );
renatofilho@320: 	glong l1 = ( (gint64)value >> 32 );
renatofilho@320:   
renatofilho@320: 	/* high order part of gint64 value */
renatofilho@320: 	g_string_printf (tmp_str1, "%ld", l1);
renatofilho@320: 	
renatofilho@320: 	gmyth_debug( "[%s] int64 (high) = %s\n", __FUNCTION__, tmp_str1->str );
renatofilho@320: 
renatofilho@320: 	//gmyth_string_list_append_string (strlist, tmp_str1);
renatofilho@320: 	strlist->glist = g_list_append( strlist->glist, tmp_str1 );
renatofilho@320: 
renatofilho@320:  	/* low order part of gint64 value */
renatofilho@320: 	g_string_printf (tmp_str2, "%ld", l2);
renatofilho@320: 
renatofilho@320: 	gmyth_debug( "[%s] int64 (low) = %s\n", __FUNCTION__, tmp_str2->str );
renatofilho@320: 
renatofilho@320: 	strlist->glist = g_list_append( strlist->glist, tmp_str2 );
renatofilho@320: 
renatofilho@320: 	return tmp_str2;
renatofilho@320: }
renatofilho@320: 
renatofilho@320: /** Appends a char array to the string list.
renatofilho@320:  * 
renatofilho@320:  * @param strlist The GMythStringList instance.
renatofilho@320:  * @param value The char array to be appended.
renatofilho@320:  * 
renatofilho@320:  * @return The appended char array converted to a GString object.
renatofilho@320:  */
renatofilho@320: GString*
renatofilho@320: gmyth_string_list_append_char_array ( GMythStringList *strlist, const gchar* value )
renatofilho@320: {
renatofilho@320: 	GString *tmp_str = NULL;
renatofilho@320: 	
renatofilho@320: 	g_return_val_if_fail( strlist != NULL, NULL );
renatofilho@320: 	
renatofilho@320: 	tmp_str = g_string_new (value);
renatofilho@320: 
renatofilho@320: 	g_return_val_if_fail( tmp_str != NULL, NULL );
renatofilho@320: 
renatofilho@320: 	gmyth_string_list_append_string (strlist, tmp_str);
renatofilho@320: 
renatofilho@320: 	return tmp_str;		
renatofilho@320: }
renatofilho@320: 
renatofilho@320: /** Appends a string to the string list.
renatofilho@320:  * 
renatofilho@320:  * @param strlist The GMythStringList instance.
renatofilho@320:  * @param value The string to be appended.
renatofilho@320:  * 
renatofilho@320:  * @return The appended string itself. 
renatofilho@320:  */
renatofilho@320: GString*
renatofilho@320: gmyth_string_list_append_string ( GMythStringList *strlist, GString *value )
renatofilho@320: {
renatofilho@320: 	g_return_val_if_fail( strlist != NULL, NULL );
renatofilho@320: 
renatofilho@320: 	strlist->glist = g_list_append (strlist->glist, value);
renatofilho@320: 
renatofilho@320: 	return value;
renatofilho@320: }
renatofilho@320: 
renatofilho@320: /** Gets an integer value from the string list at the given position.
renatofilho@320:  * 
renatofilho@320:  * @param strlist The GMythStringList instance.
renatofilho@320:  * @param index the integer position in the list, starting with zero.
renatofilho@320:  * @return The integer value.
renatofilho@320:  */
renatofilho@320: gint
renatofilho@320: gmyth_string_list_get_int ( GMythStringList *strlist, const gint index )
renatofilho@320: {
renatofilho@320: 	//TODO: Create static method check_index()
renatofilho@320: 	GString *tmp_str = NULL;
renatofilho@320: 	
renatofilho@320: 	g_return_val_if_fail( strlist != NULL, 0 );
renatofilho@320: 
renatofilho@320: 	tmp_str = (GString *) g_list_nth_data (strlist->glist, index);
renatofilho@320: 
renatofilho@320: 	g_return_val_if_fail( tmp_str != NULL && tmp_str->str != NULL, 0 );
renatofilho@320: 	
renatofilho@320: 	return (gint) ( /* 0x00000000ffffffffL &  (gint64)*/g_ascii_strtoull ( tmp_str->str, NULL, 10 ) );
renatofilho@320: }
renatofilho@320: 
renatofilho@320: /** Gets a guint64 value from the string list at the given position.
renatofilho@320:  * According to the Mythtv protocol, the 64 bits value is formed by
renatofilho@320:  * two strings.
renatofilho@320:  * 
renatofilho@320:  * @param strlist The GMythStringList instance.
renatofilho@320:  * @param index the index of the first string forming the 64 bits value. 
renatofilho@320:  * Index starts with zero.
renatofilho@320:  * @return The guint64 value.
renatofilho@320:  */
renatofilho@320: guint64
renatofilho@320: gmyth_string_list_get_uint64 ( GMythStringList *strlist, const gint index )
renatofilho@320: {
renatofilho@320: 	//TODO: Create static method check_index()
renatofilho@320: 	guint64 ret_value = 0;
renatofilho@320: 	guint64 l2 = 0;
renatofilho@320: 
renatofilho@320: 	g_return_val_if_fail( strlist != NULL, 0 );
renatofilho@320:   
renatofilho@320: 	const GString *tmp_str1 = (GString *) g_list_nth_data (strlist->glist, index);
renatofilho@320: 	const GString *tmp_str2 = (GString *) g_list_nth_data (strlist->glist, index+1);
renatofilho@320: 
renatofilho@320: 	if ( tmp_str1 != NULL )
renatofilho@320: 		gmyth_debug ( "[%s] seek high bytes = %s\n", __FUNCTION__, tmp_str1->str );
renatofilho@320: 	if ( tmp_str2 == NULL || strlen( tmp_str2->str ) > 0 ) {
renatofilho@320: 	} else {
renatofilho@320: 		gmyth_debug ( "[%s] seek low bytes = %s\n", __FUNCTION__, tmp_str2->str );
renatofilho@320: 	}
renatofilho@320: 	
renatofilho@320: 	guint64 l1 = ( (guint64)g_ascii_strtoull (tmp_str1->str, NULL, 10) /*& 0xffffffff*/  );
renatofilho@320: 	if ( tmp_str2 != NULL && tmp_str2->str != NULL && strlen(tmp_str2->str) > 0 ) {
renatofilho@320: 		l2 = ( (guint64)g_ascii_strtoull (tmp_str2->str, NULL, 10) /*& 0xffffffff*/  );
renatofilho@320: 	} else {
renatofilho@320: 		l2 = l1;
renatofilho@320: 		l1 = 0;
renatofilho@320: 	}
renatofilho@320: 
renatofilho@320: 	gmyth_debug ( "[%s]\t[l1 == %llu, l2 == %llu]\n", __FUNCTION__, l1, l2 );
renatofilho@320: 	
renatofilho@320: 	ret_value = ((guint64)(l2) /*& 0xffffffff*/) | ((guint64)l1 << 32);
renatofilho@320:   
renatofilho@320: 	gmyth_debug( "[%s] returning uint64 value = %llu\n", __FUNCTION__, ret_value );	
renatofilho@320: 	
renatofilho@320: 	return ret_value;
renatofilho@320: }
renatofilho@320: 
renatofilho@320: /** Gets a gint64 value from the string list at the given position.
renatofilho@320:  * According to the Mythtv protocol, the 64 bits value is formed by
renatofilho@320:  * two strings.
renatofilho@320:  * 
renatofilho@320:  * @param strlist The GMythStringList instance.
renatofilho@320:  * @param index the index of the first string forming the 64 bits value. 
renatofilho@320:  * Index starts with zero.
renatofilho@320:  * @return The gint64 value.
renatofilho@320:  */
renatofilho@320: gint64
renatofilho@320: gmyth_string_list_get_int64 ( GMythStringList *strlist, const gint index )
renatofilho@320: {
renatofilho@320: 	//TODO: Create static method check_index()
renatofilho@320: 	gint64 ret_value = 0;
renatofilho@320: 	gint64 l2 = 0;
renatofilho@320: 
renatofilho@320: 	g_return_val_if_fail( strlist != NULL, 0 );
renatofilho@320:   
renatofilho@320: 	const GString *tmp_str1 = (GString *) g_list_nth_data (strlist->glist, index);
renatofilho@320: 	const GString *tmp_str2 = (GString *) g_list_nth_data (strlist->glist, index+1);
renatofilho@320: 
renatofilho@320: 	if ( tmp_str1 != NULL )
renatofilho@320: 		gmyth_debug ( "[%s] seek high bytes = %s\n", __FUNCTION__, tmp_str1->str );
renatofilho@320: 	if ( tmp_str2 == NULL || strlen( tmp_str2->str ) > 0 ) {
renatofilho@320: 	} else {
renatofilho@320: 		gmyth_debug ( "[%s] seek low bytes = %s\n", __FUNCTION__, tmp_str2->str );
renatofilho@320: 	}
renatofilho@320: 	
renatofilho@320: 	gint64 l1 = ( (guint64)g_ascii_strtoull (tmp_str1->str, NULL, 10) /*& 0xffffffff*/  );
renatofilho@320: 	if ( tmp_str2 != NULL && tmp_str2->str != NULL && strlen(tmp_str2->str) > 0 ) {
renatofilho@320: 		l2 = ( (gint64)g_ascii_strtoull (tmp_str2->str, NULL, 10) /*& 0xffffffff*/  );
renatofilho@320: 	} else {
renatofilho@320: 		l2 = l1;
renatofilho@320: 		l1 = 0;
renatofilho@320: 	}
renatofilho@320: 
renatofilho@320: 	gmyth_debug ( "[%s]\t[l1 == %lld, l2 == %lld]\n", __FUNCTION__, l1, l2 );
renatofilho@320: 	
renatofilho@320: 	ret_value = ((gint64)(l2) /*& 0xffffffff*/) | ((gint64)l1 << 32);
renatofilho@320:   
renatofilho@320: 	gmyth_debug( "[%s] returning int64 value = %lld\n", __FUNCTION__, ret_value );	
renatofilho@320: 	
renatofilho@320: 	return ret_value;
renatofilho@320: }
renatofilho@320: 
renatofilho@320: 
renatofilho@320: /** Gets a string from the string list at the given position.
renatofilho@320:  * 
renatofilho@320:  * @param strlist The GMythStringList instance.
renatofilho@320:  * @param index the string position in the list, starting with zero.
renatofilho@320:  * @return A pointer to the string data.
renatofilho@320:  */
renatofilho@320: GString*
renatofilho@320: gmyth_string_list_get_string ( GMythStringList *strlist, const gint index )
renatofilho@320: {
renatofilho@320: 	if (!strlist || !(strlist->glist)) {
renatofilho@320: 		g_warning ("%s received Null arguments", __FUNCTION__);
renatofilho@320: 		return NULL;
renatofilho@320: 	}
renatofilho@320: 
renatofilho@320: 	return (GString *) g_list_nth_data (strlist->glist, index);
renatofilho@320: }
renatofilho@320: 
renatofilho@320: 
renatofilho@320: #if 0
renatofilho@320: static void
renatofilho@320: gmyth_string_list_clear_element( GString *str_elem, void *data_aux )
renatofilho@320: {
renatofilho@320: 	if ( str_elem != NULL ) {
renatofilho@320: 		g_string_free( str_elem, TRUE );
renatofilho@320: 	}
renatofilho@320: }
renatofilho@320: #endif
renatofilho@320: 
renatofilho@320: /** Removes all strings from the string list.
renatofilho@320:  * 
renatofilho@320:  * @param strlist The GMythStringList instance.
renatofilho@320:  */
renatofilho@320: void
renatofilho@320: gmyth_string_list_clear_all ( GMythStringList *strlist )
renatofilho@320: {
renatofilho@320: 	if ( strlist != NULL && strlist->glist ) {
renatofilho@320: 	        //g_list_foreach( strlist->glist, (GFunc)gmyth_string_list_clear_element, NULL );
renatofilho@320: 		g_list_free (strlist->glist);
renatofilho@320: 		strlist->glist = NULL;
renatofilho@320: 	}
renatofilho@320: }
renatofilho@320: 
renatofilho@320: /** Retrieves the number of elements in the string list.
renatofilho@320:  * 
renatofilho@320:  * @param strlist The GMythStringList instance.
renatofilho@320:  * @return the string list length.
renatofilho@320:  */
renatofilho@320: gint
renatofilho@320: gmyth_string_list_length ( GMythStringList *strlist )
renatofilho@320: {
renatofilho@320: 	g_return_val_if_fail( strlist != NULL && strlist->glist != NULL, 0 );
renatofilho@320: 
renatofilho@320: 	return g_list_length (strlist->glist);
renatofilho@320: }