* src/sort.frag.h (digit): Declare here based on externally
[mono.git] / eglib / src / gstr.c
index 6a72c104139e3934446700ea1cc1529d00340883..771724d2d1ae29d12cb582704663dc10a4098080 100644 (file)
@@ -29,6 +29,7 @@
 #define _GNU_SOURCE
 #include <stdio.h>
 #include <string.h>
+#include <ctype.h>
 #include <glib.h>
 
 /* This is not a macro, because I dont want to put _GNU_SOURCE in the glib.h header */
@@ -51,6 +52,62 @@ g_strfreev (gchar **str_array)
        g_free (orig);
 }
 
+guint
+g_strv_length(gchar **str_array)
+{
+       gint length = 0;
+       g_return_val_if_fail(str_array != NULL, 0);
+       for(length = 0; str_array[length] != NULL; length++);
+       return length;
+}
+
+gboolean
+g_str_has_suffix(const gchar *str, const gchar *suffix)
+{
+       gint str_length;
+       gint suffix_length;
+       
+       g_return_val_if_fail(str != NULL, FALSE);
+       g_return_val_if_fail(suffix != NULL, FALSE);
+
+       str_length = strlen(str);
+       suffix_length = strlen(suffix);
+
+       return suffix_length <= str_length ?
+               strncmp(str + str_length - suffix_length, suffix, suffix_length) == 0 :
+               FALSE;
+}
+
+gboolean
+g_str_has_prefix(const gchar *str, const gchar *prefix)
+{
+       gint str_length;
+       gint prefix_length;
+       
+       g_return_val_if_fail(str != NULL, FALSE);
+       g_return_val_if_fail(prefix != NULL, FALSE);
+
+       str_length = strlen(str);
+       prefix_length = strlen(prefix);
+
+       return prefix_length <= str_length ?
+               strncmp(str, prefix, prefix_length) == 0 :
+               FALSE;
+}
+
+gchar *
+g_strdup_vprintf (const gchar *format, va_list args)
+{
+       int n;
+       char *ret;
+       
+       n = vasprintf (&ret, format, args);
+       if (n == -1)
+               return NULL;
+
+       return ret;
+}
+
 gchar *
 g_strdup_printf (const gchar *format, ...)
 {
@@ -104,7 +161,7 @@ g_strconcat (const gchar *first, ...)
 }
 
 gchar ** 
-g_strsplit(const gchar *string, const gchar *delimiter, gint max_tokens)
+g_strsplit (const gchar *string, const gchar *delimiter, gint max_tokens)
 {
        gchar *string_c;
        gchar *strtok_save, **vector;
@@ -114,24 +171,24 @@ g_strsplit(const gchar *string, const gchar *delimiter, gint max_tokens)
 
        g_return_val_if_fail(string != NULL, NULL);
        g_return_val_if_fail(delimiter != NULL, NULL);
-       g_return_val_if_fail(delimiter[0] != '\0', NULL);
+       g_return_val_if_fail(delimiter[0] != 0, NULL);
        
        token_length = strlen(string);
        string_c = (gchar *)g_malloc(token_length + 1);
-       strncpy(string_c, string, token_length);
-       string_c[token_length] = '\0';
+       memcpy(string_c, string, token_length);
+       string_c[token_length] = 0;
        
        vector = NULL;
        token = (gchar *)strtok_r(string_c, delimiter, &strtok_save);
-       
+
        while(token != NULL) {
                token_length = strlen(token);
-               token_c = (gchar *)malloc(token_length + 1);
-               strncpy(token_c, token, token_length);
-               token_c[token_length] = '\0';
+               token_c = (gchar *)g_malloc(token_length + 1);
+               memcpy(token_c, token, token_length);
+               token_c[token_length] = 0;
 
                vector = vector == NULL ? 
-                       (gchar **)g_malloc(sizeof(vector)) :
+                       (gchar **)g_malloc(2 * sizeof(vector)) :
                        (gchar **)g_realloc(vector, (size + 1) * sizeof(vector));
        
                vector[size - 1] = token_c;     
@@ -148,10 +205,158 @@ g_strsplit(const gchar *string, const gchar *delimiter, gint max_tokens)
                }
        }
 
-       vector[size - 1] = NULL;
+       if(vector != NULL && size > 0) {
+               vector[size - 1] = NULL;
+       }
+       
        g_free(string_c);
        string_c = NULL;
 
        return vector;
 }
 
+gchar *
+g_strreverse (gchar *str)
+{
+       guint len, half;
+       gint i;
+       gchar c;
+
+       if (str == NULL)
+               return NULL;
+
+       len = strlen (str);
+       half = len / 2;
+       len--;
+       for (i = 0; i < half; i++, len--) {
+               c = str [i];
+               str [i] = str [len];
+               str [len] = c;
+       }
+       return str;
+}
+
+gchar *
+g_strjoin (const gchar *separator, ...)
+{
+       va_list args;
+       char *res, *s;
+       int len, slen;
+
+       if (separator != NULL)
+               slen = strlen (separator);
+       else
+               slen = 0;
+       len = 0;
+       va_start (args, separator);
+       for (s = va_arg (args, char *); s != NULL; s = va_arg (args, char *)){
+               len += strlen (s);
+               len += slen;
+       }
+       va_end (args);
+       if (len == 0)
+               return g_strdup ("");
+       
+       /* Remove the last separator */
+       if (slen > 0 && len > 0)
+               len -= slen;
+       len++;
+       res = g_malloc (len);
+       va_start (args, separator);
+       s = va_arg (args, char *);
+       strcpy (res, s);
+       for (s = va_arg (args, char *); s != NULL; s = va_arg (args, char *)){
+               if (separator != NULL)
+                       strcat (res, separator);
+               strcat (res, s);
+       }
+       va_end (args);
+
+       return res;
+}
+
+gchar *
+g_strchug (gchar *str)
+{
+       gint len;
+       gchar *tmp;
+
+       if (str == NULL)
+               return NULL;
+
+       tmp = str;
+       while (*tmp && isspace (*tmp)) tmp++;
+       if (str != tmp) {
+               len = strlen (str) - (tmp - str - 1);
+               memmove (str, tmp, len);
+       }
+       return str;
+}
+
+gchar *
+g_strchomp (gchar *str)
+{
+       gchar *tmp;
+
+       if (str == NULL)
+               return NULL;
+
+       tmp = str + strlen (str) - 1;
+       while (*tmp && isspace (*tmp)) tmp--;
+       *(tmp + 1) = '\0';
+       return str;
+}
+
+gint
+g_printf(gchar const *format, ...)
+{
+       va_list args;
+       gint ret;
+
+       va_start(args, format);
+       ret = vprintf(format, args);
+       va_end(args);
+
+       return ret;
+}
+
+gint
+g_fprintf(FILE *file, gchar const *format, ...)
+{
+       va_list args;
+       gint ret;
+
+       va_start(args, format);
+       ret = vfprintf(file, format, args);
+       va_end(args);
+
+       return ret;
+}
+
+gint
+g_sprintf(gchar *string, gchar const *format, ...)
+{
+       va_list args;
+       gint ret;
+
+       va_start(args, format);
+       ret = vsprintf(string, format, args);
+       va_end(args);
+
+       return ret;
+}
+
+gint
+g_snprintf(gchar *string, gulong n, gchar const *format, ...)
+{
+       va_list args;
+       gint ret;
+       
+       va_start(args, format);
+       ret = vsnprintf(string, n, format, args);
+       va_end(args);
+
+       return ret;
+}
+
+