-/*
- * vim:ts=8:sw=3:sts=8:noexpandtab:cino=>5n-3f0^-2{2
- */
/* Leave the OpenBSD version below so we can track upstream fixes */
/* $OpenBSD: strlcpy.c,v 1.11 2006/05/05 15:27:38 millert Exp $ */
* OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
*/
-/*
- * vim:ts=8:sw=3:sts=8:noexpandtab:cino=>5n-3f0^-2{2
- */
#ifdef HAVE_CONFIG_H
# include "config.h"
#include <stdlib.h>
#include <string.h>
#include <limits.h>
+#include <ctype.h>
#ifdef HAVE_ICONV
# include <errno.h>
#include "eina_str.h"
/*============================================================================*
- * Local *
- *============================================================================*/
+* Local *
+*============================================================================*/
/**
* @cond LOCAL
*/
static inline Eina_Bool
eina_str_has_suffix_helper(const char *str,
- const char *suffix,
- int (*cmp)(const char *, const char *))
+ const char *suffix,
+ int (*cmp)(const char *, const char *))
{
size_t str_len;
size_t suffix_len;
+ if ((!str) || (!suffix)) return EINA_FALSE;
str_len = strlen(str);
suffix_len = eina_strlen_bounded(suffix, str_len);
if (suffix_len == (size_t)-1)
- return EINA_FALSE;
+ return EINA_FALSE;
return cmp(str + str_len - suffix_len, suffix) == 0;
}
static inline char **
-eina_str_split_full_helper(const char *str, const char *delim, int max_tokens, unsigned int *elements)
+eina_str_split_full_helper(const char *str,
+ const char *delim,
+ int max_tokens,
+ unsigned int *elements)
{
- char *s, **str_array;
+ char *s, *pos, **str_array;
const char *src;
size_t len, dlen;
- unsigned int tokens;
+ unsigned int tokens = 0, x;
+ const char *idx[256] = {NULL};
+ if (max_tokens < 0) max_tokens = 0;
+ if (max_tokens == 1)
+ {
+ str_array = malloc(sizeof(char *) * 2);
+ if (!str_array)
+ {
+ if (elements)
+ *elements = 0;
+
+ return NULL;
+ }
+
+ s = strdup(str);
+ if (!s)
+ {
+ free(str_array);
+ if (elements)
+ *elements = 0;
+
+ return NULL;
+ }
+ if (elements)
+ *elements = 1;
+ str_array[0] = s;
+ return str_array;
+ }
dlen = strlen(delim);
if (dlen == 0)
{
- if (elements) *elements = 0;
- return NULL;
+ if (elements)
+ *elements = 0;
+
+ return NULL;
}
- tokens = 0;
src = str;
/* count tokens and check strlen(str) */
while (*src != '\0')
{
- const char *d = delim, *d_end = d + dlen;
- const char *tmp = src;
- for (; (d < d_end) && (*tmp != '\0'); d++, tmp++)
- {
- if (EINA_LIKELY(*d != *tmp))
- break;
- }
- if (EINA_UNLIKELY(d == d_end))
- {
- src = tmp;
- tokens++;
- }
- else
- src++;
+ const char *d = delim, *d_end = d + dlen;
+ const char *tmp = src;
+ for (; (d < d_end) && (*tmp != '\0'); d++, tmp++)
+ {
+ if (EINA_LIKELY(*d != *tmp))
+ break;
+ }
+ if (EINA_UNLIKELY(d == d_end))
+ {
+ src = tmp;
+ if (tokens < (sizeof(idx) / sizeof(idx[0])))
+ {
+ idx[tokens] = tmp;
+ //printf("token %d='%s'\n", tokens + 1, idx[tokens]);
+ }
+ tokens++;
+ if (tokens && (tokens == (unsigned int)max_tokens)) break;
+ }
+ else
+ src++;
}
- len = src - str;
-
- if ((max_tokens > 0) && (tokens > (unsigned int)max_tokens))
- tokens = max_tokens;
+ len = src - str + strlen(src);
str_array = malloc(sizeof(char *) * (tokens + 2));
if (!str_array)
{
- if (elements) *elements = 0;
- return NULL;
+ if (elements)
+ *elements = 0;
+
+ return NULL;
+ }
+
+ if (!tokens)
+ {
+ s = strdup(str);
+ if (!s)
+ {
+ free(str_array);
+ if (elements)
+ *elements = 0;
+
+ return NULL;
+ }
+ str_array[0] = s;
+ str_array[1] = NULL;
+ if (elements)
+ *elements = 1;
+ return str_array;
}
s = malloc(len + 1);
if (!s)
{
- free(str_array);
- if (elements) *elements = 0;
- return NULL;
+ free(str_array);
+ if (elements)
+ *elements = 0;
+
+ return NULL;
}
- /* copy tokens and string */
- tokens = 0;
str_array[0] = s;
- src = str;
- while (*src != '\0')
+
+ if (len == tokens * dlen)
+ {
+ /* someone's having a laugh somewhere */
+ memset(s, 0, len + 1);
+ for (x = 1; x < tokens + 1; x++)
+ str_array[x] = s + x;
+ str_array[x] = NULL;
+ if (elements)
+ *elements = x;
+ return str_array;
+ }
+ /* copy tokens and string */
+ if (idx[0] - str - dlen > len)
+ {
+ /* FIXME: don't think this can happen but putting this here just in case */
+ abort();
+ }
+ pos = s;
+ for (x = 0; x < MIN(tokens, (sizeof(idx) / sizeof(idx[0]))); x++)
{
- const char *d = delim, *d_end = d + dlen;
- const char *tmp = src;
- for (; (d < d_end) && (*tmp != '\0'); d++, tmp++)
- {
- if (EINA_LIKELY(*d != *tmp))
- break;
- }
- if (EINA_UNLIKELY(d == d_end))
- {
- src = tmp;
- *s = '\0';
- s += dlen;
- tokens++;
- str_array[tokens] = s;
- }
- else
- {
- *s = *src;
- s++;
- src++;
- }
+ if (x + 1 < (sizeof(idx) / sizeof(idx[0])))
+ {
+ /* first one is special */
+ if (!x)
+ {
+ eina_strlcpy(pos, str, idx[x] - str - dlen + 1);
+ str_array[x] = pos;
+ //printf("str_array[%d] = '%s'\n", x, str_array[x]);
+ pos += idx[x] - str - dlen + 1;
+ if ((tokens == 1) && (idx[0]))
+ {
+ eina_strlcpy(pos, idx[x], len + 1 - (pos - s));
+ x++, tokens++;
+ str_array[x] = pos;
+ }
+ }
+ /* more tokens */
+ else if (idx[x + 1])
+ {
+ eina_strlcpy(pos, idx[x - 1], idx[x] - idx[x - 1] - dlen + 1);
+ str_array[x] = pos;
+ //printf("str_array[%d] = '%s'\n", x, str_array[x]);
+ pos += idx[x] - idx[x - 1] - dlen + 1;
+ }
+ /* last token */
+ else
+ {
+ if (max_tokens && ((unsigned int)max_tokens < tokens + 1))
+ eina_strlcpy(pos, idx[x - 1], len + 1 - (pos - s));
+ else
+ {
+ //printf("diff: %d\n", len + 1 - (pos - s));
+ eina_strlcpy(pos, idx[x - 1], idx[x] - idx[x - 1] - dlen + 1);
+ str_array[x] = pos;
+ //printf("str_array[%d] = '%s'\n", x, str_array[x]);
+ pos += idx[x] - idx[x - 1] - dlen + 1;
+ x++, tokens++;
+ eina_strlcpy(pos, idx[x - 1], len + 1 - (pos - s));
+ }
+ str_array[x] = pos;
+ //printf("str_array[%d] = '%s'\n", x, str_array[x]);
+ }
+ }
+ /* no more tokens saved after this one */
+ else
+ {
+ eina_strlcpy(pos, idx[x - 1], idx[x] - idx[x - 1] - dlen + 1);
+ str_array[x] = pos;
+ //printf("str_array[%d] = '%s'\n", x, str_array[x]);
+ pos += idx[x] - idx[x - 1] - dlen + 1;
+ src = idx[x];
+ x++, tokens++;
+ str_array[x] = s = pos;
+ break;
+ }
}
- *s = '\0';
- str_array[tokens + 1] = NULL;
- if (elements) *elements = (tokens + 1);
+ if ((x != tokens) && ((!max_tokens) || (x < tokens)))
+ {
+ while (*src != '\0')
+ {
+ const char *d = delim, *d_end = d + dlen;
+ const char *tmp = src;
+ for (; (d < d_end) && (*tmp != '\0'); d++, tmp++)
+ {
+ if (EINA_LIKELY(*d != *tmp))
+ break;
+ }
+ if (((!max_tokens) || (((tokens == (unsigned int)max_tokens) || x < tokens - 2))) && (EINA_UNLIKELY(d == d_end)))
+ {
+ src = tmp;
+ *s = '\0';
+ s++, x++;
+ //printf("str_array[%d] = '%s'\n", x, str_array[x - 1]);
+ str_array[x] = s;
+ }
+ else
+ {
+ *s = *src;
+ s++, src++;
+ }
+ }
+ *s = 0;
+ }
+ str_array[tokens] = NULL;
+ if (elements)
+ *elements = tokens;
+
return str_array;
}
*/
/*============================================================================*
- * Global *
- *============================================================================*/
+* Global *
+*============================================================================*/
/*============================================================================*
- * API *
- *============================================================================*/
+* API *
+*============================================================================*/
-
-/**
- * @brief Copy a c-string to another.
- *
- * @param dst The destination string.
- * @param src The source string.
- * @param siz The size of the destination string.
- * @return The length of the source string.
- *
- * This function copies up to @p siz - 1 characters from the
- * NUL-terminated string @p src to @p dst, NUL-terminating the result
- * (unless @p siz is equal to 0). The returned value is the length of
- * @p src. If the returned value is greater than @p siz, truncation
- * occured.
- */
EAPI size_t
eina_strlcpy(char *dst, const char *src, size_t siz)
{
/* Copy as many bytes as will fit */
if (n != 0)
- {
- while (--n != 0)
- {
- if ((*d++ = *s++) == '\0')
- break;
- }
- }
+ while (--n != 0)
+ {
+ if ((*d++ = *s++) == '\0')
+ break;
+ }
/* Not enough room in dst, add NUL and traverse rest of src */
if (n == 0)
{
- if (siz != 0)
- *d = '\0'; /* NUL-terminate dst */
- while (*s++)
- ;
+ if (siz != 0)
+ *d = '\0'; /* NUL-terminate dst */
+
+ while (*s++)
+ ;
}
- return(s - src - 1); /* count does not include NUL */
+ return(s - src - 1); /* count does not include NUL */
#endif
}
-/**
- * @brief Append a c-string.
- *
- * @param dst The destination string.
- * @param src The source string.
- * @param siz The size of the destination string.
- * @return The length of the source string plus MIN(siz, strlen(initial dst))
- *
- * This function appends @p src to @p dst of size @p siz (unlike
- * strncat, @p siz is the full size of @p dst, not space left). At
- * most @p siz - 1 characters will be copied. Always NUL terminates
- * (unless @p siz <= strlen(dst)). This function returns strlen(src) +
- * MIN(siz, strlen(initial dst)). If the returned value is greater or
- * equal than @p siz, truncation occurred.
- */
EAPI size_t
eina_strlcat(char *dst, const char *src, size_t siz)
{
/* Find the end of dst and adjust bytes left but don't go past end */
while (n-- != 0 && *d != '\0')
- d++;
+ d++;
dlen = d - dst;
n = siz - dlen;
if (n == 0)
- return(dlen + strlen(s));
+ return(dlen + strlen(s));
+
while (*s != '\0') {
- if (n != 1) {
- *d++ = *s;
- n--;
- }
- s++;
- }
+ if (n != 1)
+ {
+ *d++ = *s;
+ n--;
+ }
+
+ s++;
+ }
*d = '\0';
- return(dlen + (s - src)); /* count does not include NUL */
+ return(dlen + (s - src)); /* count does not include NUL */
}
-/**
- * @brief Check if the given string has the given prefix.
- *
- * @param str The string to work with.
- * @param prefix The prefix to check for.
- * @return #EINA_TRUE if the string has the given prefix, #EINA_FALSE otherwise.
- *
- * This function returns #EINA_TRUE if @p str has the prefix
- * @p prefix, #EINA_FALSE otherwise. If the length of @p prefix is
- * greater than @p str, #EINA_FALSE is returned.
- */
EAPI Eina_Bool
eina_str_has_prefix(const char *str, const char *prefix)
{
str_len = strlen(str);
prefix_len = eina_strlen_bounded(prefix, str_len);
if (prefix_len == (size_t)-1)
- return EINA_FALSE;
+ return EINA_FALSE;
return (strncmp(str, prefix, prefix_len) == 0);
}
-/**
- * @brief Check if the given string has the given suffix.
- *
- * @param str The string to work with.
- * @param suffix The suffix to check for.
- * @return #EINA_TRUE if the string has the given suffix, #EINA_FALSE otherwise.
- *
- * This function returns #EINA_TRUE if @p str has the suffix
- * @p suffix, #EINA_FALSE otherwise. If the length of @p suffix is
- * greater than @p str, #EINA_FALSE is returned.
- */
-/**
- * @param str the string to work with
- * @param suffix the suffix to check for
- * @return true if str has the given suffix
- * @brief checks if the string has the given suffix
- */
EAPI Eina_Bool
eina_str_has_suffix(const char *str, const char *suffix)
{
return eina_str_has_suffix_helper(str, suffix, strcmp);
}
-/**
- * @brief Check if the given string has the given suffix.
- *
- * @param str The string to work with.
- * @param ext The extension to check for.
- * @return #EINA_TRUE if the string has the given extension, #EINA_FALSE otherwise.
- *
- * This function does the same like eina_str_has_suffix(), but with a
- * case insensitive compare.
- */
EAPI Eina_Bool
eina_str_has_extension(const char *str, const char *ext)
{
return eina_str_has_suffix_helper(str, ext, strcasecmp);
}
-/**
- * @brief Split a string using a delimiter and returns number of elements.
- *
- * @param str The string to split.
- * @param delim The string which specifies the places at which to split the string.
- * @param max_tokens The maximum number of strings to split string into.
- * @param elements Where to return the number of elements in returned
- * array (not counting the terminating @c NULL). May be @c NULL.
- * @return A newly-allocated NULL-terminated array of strings.
- *
- * This functin splits @p str into a maximum of @p max_tokens pieces,
- * using the given delimiter @p delim. @p delim is not included in any
- * of the resulting strings, unless @p max_tokens is reached. If
- * @p max_tokens is less than @c 1, the string is splitted completely. If
- * @p max_tokens is reached, the last string in the returned string
- * array contains the remainder of string. The returned value is a
- * newly allocated NUL-terminated array of string. To free it, free
- * the first element of the array and the array itself.
- *
- * @see eina_str_split()
- */
EAPI char **
-eina_str_split_full(const char *str, const char *delim, int max_tokens, unsigned int *elements)
+eina_str_split_full(const char *str,
+ const char *delim,
+ int max_tokens,
+ unsigned int *elements)
{
return eina_str_split_full_helper(str, delim, max_tokens, elements);
}
-/**
- * @brief Split a string using a delimiter.
- *
- * @param str The string to split.
- * @param delim The string which specifies the places at which to split the string.
- * @param max_tokens The maximum number of strings to split string into.
- * @return A newly-allocated NULL-terminated array of strings.
- *
- * This functin splits @p str into a maximum of @p max_tokens pieces,
- * using the given delimiter @p delim. @p delim is not included in any
- * of the resulting strings, unless @p max_tokens is reached. If
- * @p max_tokens is less than @c 1, the string is splitted completely. If
- * @p max_tokens is reached, the last string in the returned string
- * array contains the remainder of string. The returned value is a
- * newly allocated NUL-terminated array of string. To free it, free
- * the first element of the array and the array itself.
- */
EAPI char **
eina_str_split(const char *str, const char *delim, int max_tokens)
{
return eina_str_split_full_helper(str, delim, max_tokens, NULL);
}
-/**
- * @brief Join two strings of known length.
- *
- * @param dst The buffer to store the result.
- * @param size Size (in byte) of the buffer.
- * @param sep The separator character to use.
- * @param a First string to use, before @p sep.
- * @param a_len length of @p a.
- * @param b Second string to use, after @p sep.
- * @param b_len length of @p b.
- * @return The number of characters printed.
- *
- * This function joins the strings @p a and @p b (in that order) and
- * separate them with @p sep. The result is stored in the buffer
- * @p dst and at most @p size - 1 characters will be written and the
- * string is NULL-terminated. @p a_len is the length of @p a (not
- * including '\0') and @p b_len is the length of @p b (not including
- * '\0'). This function returns the number of characters printed (not
- * including the trailing '\0' used to end output to strings). Just
- * like snprintf(), it will not write more than @p size bytes, thus a
- * returned value of @p size or more means that the output was
- * truncated.
- *
- * @see eina_str_join()
- * @see eina_str_join_static()
- */
EAPI size_t
-eina_str_join_len(char *dst, size_t size, char sep, const char *a, size_t a_len, const char *b, size_t b_len)
+eina_str_join_len(char *dst,
+ size_t size,
+ char sep,
+ const char *a,
+ size_t a_len,
+ const char *b,
+ size_t b_len)
{
size_t ret = a_len + b_len + 1;
size_t off;
- if (size < 1) return ret;
+ if (size < 1)
+ return ret;
if (size <= a_len)
{
- memcpy(dst, a, size - 1);
- dst[size - 1] = '\0';
- return ret;
+ memcpy(dst, a, size - 1);
+ dst[size - 1] = '\0';
+ return ret;
}
- memcpy(dst, a, a_len);
+ memcpy(dst, a, a_len);
off = a_len;
if (size <= off + 1)
{
- dst[size - 1] = '\0';
- return ret;
+ dst[size - 1] = '\0';
+ return ret;
}
dst[off] = sep;
if (size <= off + b_len + 1)
{
- memcpy(dst + off, b, size - off - 1);
- dst[size - 1] = '\0';
- return ret;
+ memcpy(dst + off, b, size - off - 1);
+ dst[size - 1] = '\0';
+ return ret;
}
- memcpy(dst + off, b, b_len);
+ memcpy(dst + off, b, b_len);
dst[off + b_len] = '\0';
return ret;
}
-/**
- * @brief Use iconv to convert a text string from one encoding to another
- *
- * @param enc_from encoding to convert from
- * @param enc_to encoding to convert to
- * @param text text to convert
- *
- */
#ifdef HAVE_ICONV
EAPI char *
eina_str_convert(const char *enc_from, const char *enc_to, const char *text)
char *new_txt, *inp, *outp;
size_t inb, outb, outlen, tob, outalloc;
- if (!text) return NULL;
+ if (!text)
+ return NULL;
+
ic = iconv_open(enc_to, enc_from);
- if (ic == (iconv_t)(-1)) return NULL;
- new_txt = malloc(64);
- inb = strlen(text);
- outb = 64;
- inp = (char*)text;
- outp = new_txt;
+ if (ic == (iconv_t)(-1))
+ return NULL;
+
+ new_txt = malloc(64);
+ inb = strlen(text);
+ outb = 64;
+ inp = (char *)text;
+ outp = new_txt;
outalloc = 64;
- outlen = 0;
+ outlen = 0;
- for (;;)
+ for (;; )
{
- size_t count;
-
- tob = outb;
- count = iconv(ic, &inp, &inb, &outp, &outb);
- outlen += tob - outb;
- if (count == (size_t)(-1))
- {
- if (errno == E2BIG)
- {
- new_txt = realloc(new_txt, outalloc + 64);
- outp = new_txt + outlen;
- outalloc += 64;
- outb += 64;
- }
- else if (errno == EILSEQ)
- {
- if (new_txt) free(new_txt);
- new_txt = NULL;
- break;
- }
- else if (errno == EINVAL)
- {
- if (new_txt) free(new_txt);
- new_txt = NULL;
- break;
- }
- else
- {
- if (new_txt) free(new_txt);
- new_txt = NULL;
- break;
- }
- }
- if (inb == 0)
- {
- if (outalloc == outlen) new_txt = realloc(new_txt, outalloc + 1);
- new_txt[outlen] = 0;
- break;
- }
+ size_t count;
+
+ tob = outb;
+ count = iconv(ic, &inp, &inb, &outp, &outb);
+ outlen += tob - outb;
+ if (count == (size_t)(-1))
+ {
+ if (errno == E2BIG)
+ {
+ new_txt = realloc(new_txt, outalloc + 64);
+ outp = new_txt + outlen;
+ outalloc += 64;
+ outb += 64;
+ }
+ else if (errno == EILSEQ)
+ {
+ if (new_txt)
+ free(new_txt);
+
+ new_txt = NULL;
+ break;
+ }
+ else if (errno == EINVAL)
+ {
+ if (new_txt)
+ free(new_txt);
+
+ new_txt = NULL;
+ break;
+ }
+ else
+ {
+ if (new_txt)
+ free(new_txt);
+
+ new_txt = NULL;
+ break;
+ }
+ }
+
+ if (inb == 0)
+ {
+ if (outalloc == outlen)
+ new_txt = realloc(new_txt, outalloc + 1);
+
+ new_txt[outlen] = 0;
+ break;
+ }
}
iconv_close(ic);
return new_txt;
}
#else
EAPI char *
-eina_str_convert(const char *enc_from __UNUSED__, const char *enc_to __UNUSED__, const char *text __UNUSED__)
+eina_str_convert(const char *enc_from __UNUSED__,
+ const char *enc_to __UNUSED__,
+ const char *text __UNUSED__)
{
return NULL;
}
#endif
-/**
- * @brief Put a \ before and Space( ), \ or ' in a string.
- *
- * @param str the string to escape
- *
- * A newly allocated string is returned.
- */
EAPI char *
eina_str_escape(const char *str)
{
const char *s;
s2 = malloc((strlen(str) * 2) + 1);
- if (!s2) return NULL;
+ if (!s2)
+ return NULL;
+
for (s = str, d = s2; *s != 0; s++, d++)
{
- if ((*s == ' ') || (*s == '\\') || (*s == '\''))
- {
- *d = '\\';
- d++;
- }
- *d = *s;
+ if ((*s == ' ') || (*s == '\\') || (*s == '\''))
+ {
+ *d = '\\';
+ d++;
+ }
+
+ *d = *s;
}
*d = 0;
return s2;
}
+
+EAPI void
+eina_str_tolower(char **str)
+{
+ char *p;
+ if ((!str) || (!(*str)))
+ return;
+
+ for (p = *str; (*p); p++)
+ *p = tolower((unsigned char )(*p));
+}
+
+EAPI void
+eina_str_toupper(char **str)
+{
+ char *p;
+ if ((!str) || (!(*str)))
+ return;
+
+ for (p = *str; (*p); p++)
+ *p = toupper((unsigned char)(*p));
+}