2003-01-09 12:36:05 +00:00
|
|
|
/* strlist.c - string helpers
|
2006-04-19 11:26:11 +00:00
|
|
|
* Copyright (C) 1998, 2000, 2001, 2006 Free Software Foundation, Inc.
|
2003-01-09 12:36:05 +00:00
|
|
|
*
|
2006-10-02 11:54:35 +00:00
|
|
|
* This file is part of JNLIB.
|
2003-01-09 12:36:05 +00:00
|
|
|
*
|
2006-10-02 11:54:35 +00:00
|
|
|
* JNLIB is free software; you can redistribute it and/or modify it
|
|
|
|
* under the terms of the GNU Lesser General Public License as
|
2007-07-04 19:49:40 +00:00
|
|
|
* published by the Free Software Foundation; either version 3 of
|
2006-10-02 11:54:35 +00:00
|
|
|
* the License, or (at your option) any later version.
|
2003-01-09 12:36:05 +00:00
|
|
|
*
|
2006-10-02 11:54:35 +00:00
|
|
|
* JNLIB 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
|
|
|
|
* Lesser General Public License for more details.
|
2003-01-09 12:36:05 +00:00
|
|
|
*
|
2006-10-02 11:54:35 +00:00
|
|
|
* You should have received a copy of the GNU Lesser General Public
|
2007-07-04 19:49:40 +00:00
|
|
|
* License along with this program; if not, see <http://www.gnu.org/licenses/>.
|
2003-01-09 12:36:05 +00:00
|
|
|
*/
|
|
|
|
|
|
|
|
#include <config.h>
|
|
|
|
#include <stdlib.h>
|
|
|
|
#include <string.h>
|
|
|
|
#include <stdarg.h>
|
|
|
|
#include <ctype.h>
|
|
|
|
|
|
|
|
#include "libjnlib-config.h"
|
|
|
|
#include "strlist.h"
|
2006-04-19 11:26:11 +00:00
|
|
|
#ifdef JNLIB_NEED_UTF8CONV
|
|
|
|
#include "utf8conv.h"
|
|
|
|
#endif
|
2003-01-09 12:36:05 +00:00
|
|
|
|
|
|
|
void
|
2003-11-17 12:20:11 +00:00
|
|
|
free_strlist( strlist_t sl )
|
2003-01-09 12:36:05 +00:00
|
|
|
{
|
2003-11-17 12:20:11 +00:00
|
|
|
strlist_t sl2;
|
2003-01-09 12:36:05 +00:00
|
|
|
|
|
|
|
for(; sl; sl = sl2 ) {
|
|
|
|
sl2 = sl->next;
|
|
|
|
jnlib_free(sl);
|
|
|
|
}
|
|
|
|
}
|
|
|
|
|
|
|
|
|
2003-11-17 12:20:11 +00:00
|
|
|
strlist_t
|
|
|
|
add_to_strlist( strlist_t *list, const char *string )
|
2003-01-09 12:36:05 +00:00
|
|
|
{
|
2003-11-17 12:20:11 +00:00
|
|
|
strlist_t sl;
|
2003-01-09 12:36:05 +00:00
|
|
|
|
|
|
|
sl = jnlib_xmalloc( sizeof *sl + strlen(string));
|
|
|
|
sl->flags = 0;
|
|
|
|
strcpy(sl->d, string);
|
|
|
|
sl->next = *list;
|
|
|
|
*list = sl;
|
|
|
|
return sl;
|
|
|
|
}
|
|
|
|
|
2006-04-19 11:26:11 +00:00
|
|
|
|
|
|
|
/* Same as add_to_strlist() but if is_utf8 is *not* set, a conversion
|
|
|
|
to UTF-8 is done. */
|
|
|
|
#ifdef JNLIB_NEED_UTF8CONV
|
2003-11-17 12:20:11 +00:00
|
|
|
strlist_t
|
|
|
|
add_to_strlist2( strlist_t *list, const char *string, int is_utf8 )
|
2003-01-09 12:36:05 +00:00
|
|
|
{
|
2006-04-19 11:26:11 +00:00
|
|
|
strlist_t sl;
|
|
|
|
|
|
|
|
if (is_utf8)
|
|
|
|
sl = add_to_strlist( list, string );
|
|
|
|
else
|
|
|
|
{
|
|
|
|
char *p = native_to_utf8( string );
|
|
|
|
sl = add_to_strlist( list, p );
|
|
|
|
jnlib_free ( p );
|
2003-01-09 12:36:05 +00:00
|
|
|
}
|
2006-04-19 11:26:11 +00:00
|
|
|
return sl;
|
2003-01-09 12:36:05 +00:00
|
|
|
}
|
2006-04-19 11:26:11 +00:00
|
|
|
#endif /* JNLIB_NEED_UTF8CONV*/
|
2003-01-09 12:36:05 +00:00
|
|
|
|
2003-11-17 12:20:11 +00:00
|
|
|
strlist_t
|
|
|
|
append_to_strlist( strlist_t *list, const char *string )
|
2003-01-09 12:36:05 +00:00
|
|
|
{
|
2003-11-17 12:20:11 +00:00
|
|
|
strlist_t r, sl;
|
2003-01-09 12:36:05 +00:00
|
|
|
|
|
|
|
sl = jnlib_xmalloc( sizeof *sl + strlen(string));
|
|
|
|
sl->flags = 0;
|
|
|
|
strcpy(sl->d, string);
|
|
|
|
sl->next = NULL;
|
|
|
|
if( !*list )
|
|
|
|
*list = sl;
|
|
|
|
else {
|
|
|
|
for( r = *list; r->next; r = r->next )
|
|
|
|
;
|
|
|
|
r->next = sl;
|
|
|
|
}
|
|
|
|
return sl;
|
|
|
|
}
|
|
|
|
|
2006-05-23 16:19:43 +00:00
|
|
|
|
|
|
|
#ifdef JNLIB_NEED_UTF8CONV
|
2003-11-17 12:20:11 +00:00
|
|
|
strlist_t
|
|
|
|
append_to_strlist2( strlist_t *list, const char *string, int is_utf8 )
|
2003-01-09 12:36:05 +00:00
|
|
|
{
|
2006-05-23 16:19:43 +00:00
|
|
|
strlist_t sl;
|
|
|
|
|
|
|
|
if( is_utf8 )
|
|
|
|
sl = append_to_strlist( list, string );
|
|
|
|
else
|
|
|
|
{
|
|
|
|
char *p = native_to_utf8 (string);
|
|
|
|
sl = append_to_strlist( list, p );
|
|
|
|
jnlib_free( p );
|
2003-01-09 12:36:05 +00:00
|
|
|
}
|
2006-05-23 16:19:43 +00:00
|
|
|
return sl;
|
2003-01-09 12:36:05 +00:00
|
|
|
}
|
2006-05-23 16:19:43 +00:00
|
|
|
#endif /* JNLIB_NEED_UTF8CONV */
|
2003-01-09 12:36:05 +00:00
|
|
|
|
2003-11-17 12:20:11 +00:00
|
|
|
|
|
|
|
/* Return a copy of LIST. */
|
|
|
|
strlist_t
|
|
|
|
strlist_copy (strlist_t list)
|
|
|
|
{
|
|
|
|
strlist_t newlist = NULL, sl, *last;
|
|
|
|
|
|
|
|
last = &newlist;
|
|
|
|
for (; list; list = list->next)
|
|
|
|
{
|
|
|
|
sl = jnlib_xmalloc (sizeof *sl + strlen (list->d));
|
|
|
|
sl->flags = list->flags;
|
|
|
|
strcpy(sl->d, list->d);
|
|
|
|
sl->next = NULL;
|
|
|
|
*last = sl;
|
|
|
|
last = &sl;
|
|
|
|
}
|
|
|
|
return newlist;
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
strlist_t
|
|
|
|
strlist_prev( strlist_t head, strlist_t node )
|
2003-01-09 12:36:05 +00:00
|
|
|
{
|
2003-11-17 12:20:11 +00:00
|
|
|
strlist_t n;
|
2003-01-09 12:36:05 +00:00
|
|
|
|
|
|
|
for(n=NULL; head && head != node; head = head->next )
|
|
|
|
n = head;
|
|
|
|
return n;
|
|
|
|
}
|
|
|
|
|
2003-11-17 12:20:11 +00:00
|
|
|
strlist_t
|
|
|
|
strlist_last( strlist_t node )
|
2003-01-09 12:36:05 +00:00
|
|
|
{
|
|
|
|
if( node )
|
|
|
|
for( ; node->next ; node = node->next )
|
|
|
|
;
|
|
|
|
return node;
|
|
|
|
}
|
|
|
|
|
|
|
|
|
2003-06-18 19:56:13 +00:00
|
|
|
char *
|
2003-11-17 12:20:11 +00:00
|
|
|
strlist_pop (strlist_t *list)
|
2003-06-18 19:56:13 +00:00
|
|
|
{
|
|
|
|
char *str=NULL;
|
2003-11-17 12:20:11 +00:00
|
|
|
strlist_t sl=*list;
|
2003-06-18 19:56:13 +00:00
|
|
|
|
|
|
|
if(sl)
|
|
|
|
{
|
|
|
|
str=jnlib_xmalloc(strlen(sl->d)+1);
|
|
|
|
strcpy(str,sl->d);
|
|
|
|
|
|
|
|
*list=sl->next;
|
|
|
|
jnlib_free(sl);
|
|
|
|
}
|
|
|
|
|
|
|
|
return str;
|
|
|
|
}
|
|
|
|
|