1 /* GLIB - Library of useful routines for C programming
2 * Copyright (C) 1995-1997 Peter Mattis, Spencer Kimball and Josh MacDonald
4 * This library is free software; you can redistribute it and/or
5 * modify it under the terms of the GNU Lesser General Public
6 * License as published by the Free Software Foundation; either
7 * version 2 of the License, or (at your option) any later version.
9 * This library is distributed in the hope that it will be useful,
10 * but WITHOUT ANY WARRANTY; without even the implied warranty of
11 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
12 * Lesser General Public License for more details.
14 * You should have received a copy of the GNU Lesser General Public
15 * License along with this library; if not, write to the
16 * Free Software Foundation, Inc., 59 Temple Place - Suite 330,
17 * Boston, MA 02111-1307, USA.
21 * Modified by the GLib Team and others 1997-2000. See the AUTHORS
22 * file for a list of people on the GLib Team. See the ChangeLog
23 * files for a list of changes. These files are distributed with
24 * GLib at ftp://ftp.gtk.org/pub/gtk/.
33 #define _GNU_SOURCE /* For stpcpy */
41 #include <ctype.h> /* For tolower() */
42 #if !defined (HAVE_STRSIGNAL) || !defined(NO_SYS_SIGLIST_DECL)
48 #include "gprintfint.h"
56 /* do not include <unistd.h> in this place since it
57 * interferes with g_strsignal() on some OSes
60 static const guint16 ascii_table_data[256] = {
61 0x004, 0x004, 0x004, 0x004, 0x004, 0x004, 0x004, 0x004,
62 0x004, 0x104, 0x104, 0x004, 0x104, 0x104, 0x004, 0x004,
63 0x004, 0x004, 0x004, 0x004, 0x004, 0x004, 0x004, 0x004,
64 0x004, 0x004, 0x004, 0x004, 0x004, 0x004, 0x004, 0x004,
65 0x140, 0x0d0, 0x0d0, 0x0d0, 0x0d0, 0x0d0, 0x0d0, 0x0d0,
66 0x0d0, 0x0d0, 0x0d0, 0x0d0, 0x0d0, 0x0d0, 0x0d0, 0x0d0,
67 0x459, 0x459, 0x459, 0x459, 0x459, 0x459, 0x459, 0x459,
68 0x459, 0x459, 0x0d0, 0x0d0, 0x0d0, 0x0d0, 0x0d0, 0x0d0,
69 0x0d0, 0x653, 0x653, 0x653, 0x653, 0x653, 0x653, 0x253,
70 0x253, 0x253, 0x253, 0x253, 0x253, 0x253, 0x253, 0x253,
71 0x253, 0x253, 0x253, 0x253, 0x253, 0x253, 0x253, 0x253,
72 0x253, 0x253, 0x253, 0x0d0, 0x0d0, 0x0d0, 0x0d0, 0x0d0,
73 0x0d0, 0x473, 0x473, 0x473, 0x473, 0x473, 0x473, 0x073,
74 0x073, 0x073, 0x073, 0x073, 0x073, 0x073, 0x073, 0x073,
75 0x073, 0x073, 0x073, 0x073, 0x073, 0x073, 0x073, 0x073,
76 0x073, 0x073, 0x073, 0x0d0, 0x0d0, 0x0d0, 0x0d0, 0x004
77 /* the upper 128 are all zeroes */
80 const guint16 * const g_ascii_table = ascii_table_data;
84 * @str: the string to duplicate
86 * Duplicates a string. If @str is %NULL it returns %NULL.
87 * The returned string should be freed with g_free()
88 * when no longer needed.
90 * Returns: a newly-allocated copy of @str
93 g_strdup (const gchar *str)
100 length = strlen (str) + 1;
101 new_str = g_new (char, length);
102 memcpy (new_str, str, length);
112 * @mem: the memory to copy.
113 * @byte_size: the number of bytes to copy.
115 * Allocates @byte_size bytes of memory, and copies @byte_size bytes into it
116 * from @mem. If @mem is %NULL it returns %NULL.
118 * Returns: a pointer to the newly-allocated copy of the memory, or %NULL if @mem
122 g_memdup (gconstpointer mem,
129 new_mem = g_malloc (byte_size);
130 memcpy (new_mem, mem, byte_size);
140 * @str: the string to duplicate
141 * @n: the maximum number of bytes to copy from @str
143 * Duplicates the first @n bytes of a string, returning a newly-allocated
144 * buffer @n + 1 bytes long which will always be nul-terminated.
145 * If @str is less than @n bytes long the buffer is padded with nuls.
146 * If @str is %NULL it returns %NULL.
147 * The returned value should be freed when no longer needed.
150 * To copy a number of characters from a UTF-8 encoded string, use
151 * g_utf8_strncpy() instead.
154 * Returns: a newly-allocated buffer containing the first @n bytes
155 * of @str, nul-terminated
158 g_strndup (const gchar *str,
165 new_str = g_new (gchar, n + 1);
166 strncpy (new_str, str, n);
177 * @length: the length of the new string
178 * @fill_char: the byte to fill the string with
180 * Creates a new string @length bytes long filled with @fill_char.
181 * The returned string should be freed when no longer needed.
183 * Returns: a newly-allocated string filled the @fill_char
186 g_strnfill (gsize length,
191 str = g_new (gchar, length + 1);
192 memset (str, (guchar)fill_char, length);
200 * @dest: destination buffer.
201 * @src: source string.
203 * Copies a nul-terminated string into the dest buffer, include the
204 * trailing nul, and return a pointer to the trailing nul byte.
205 * This is useful for concatenating multiple strings together
206 * without having to repeatedly scan for the end.
208 * Return value: a pointer to trailing nul byte.
211 g_stpcpy (gchar *dest,
215 g_return_val_if_fail (dest != NULL, NULL);
216 g_return_val_if_fail (src != NULL, NULL);
217 return stpcpy (dest, src);
219 register gchar *d = dest;
220 register const gchar *s = src;
222 g_return_val_if_fail (dest != NULL, NULL);
223 g_return_val_if_fail (src != NULL, NULL);
226 while (*s++ != '\0');
234 * @format: a standard printf() format string, but notice
235 * <link linkend="string-precision">string precision pitfalls</link>
236 * @args: the list of parameters to insert into the format string
238 * Similar to the standard C vsprintf() function but safer, since it
239 * calculates the maximum space required and allocates memory to hold
240 * the result. The returned string should be freed with g_free() when
243 * See also g_vasprintf(), which offers the same functionality, but
244 * additionally returns the length of the allocated string.
246 * Returns: a newly-allocated string holding the result
249 g_strdup_vprintf (const gchar *format,
252 gchar *string = NULL;
254 g_vasprintf (&string, format, args);
261 * @format: a standard printf() format string, but notice
262 * <link linkend="string-precision">string precision pitfalls</link>
263 * @Varargs: the parameters to insert into the format string
265 * Similar to the standard C sprintf() function but safer, since it
266 * calculates the maximum space required and allocates memory to hold
267 * the result. The returned string should be freed with g_free() when no
270 * Returns: a newly-allocated string holding the result
273 g_strdup_printf (const gchar *format,
279 va_start (args, format);
280 buffer = g_strdup_vprintf (format, args);
288 * @string1: the first string to add, which must not be %NULL
289 * @Varargs: a %NULL-terminated list of strings to append to the string
291 * Concatenates all of the given strings into one long string.
292 * The returned string should be freed with g_free() when no longer needed.
294 * Note that this function is usually not the right function to use to
295 * assemble a translated message from pieces, since proper translation
296 * often requires the pieces to be reordered.
298 * <warning><para>The variable argument list <emphasis>must</emphasis> end
299 * with %NULL. If you forget the %NULL, g_strconcat() will start appending
300 * random memory junk to your string.</para></warning>
302 * Returns: a newly-allocated string containing all the string arguments
305 g_strconcat (const gchar *string1, ...)
316 l = 1 + strlen (string1);
317 va_start (args, string1);
318 s = va_arg (args, gchar*);
322 s = va_arg (args, gchar*);
326 concat = g_new (gchar, l);
329 ptr = g_stpcpy (ptr, string1);
330 va_start (args, string1);
331 s = va_arg (args, gchar*);
334 ptr = g_stpcpy (ptr, s);
335 s = va_arg (args, gchar*);
344 * @nptr: the string to convert to a numeric value.
345 * @endptr: if non-%NULL, it returns the character after
346 * the last character used in the conversion.
348 * Converts a string to a #gdouble value.
349 * It calls the standard strtod() function to handle the conversion, but
350 * if the string is not completely converted it attempts the conversion
351 * again with g_ascii_strtod(), and returns the best match.
353 * This function should seldomly be used. The normal situation when reading
354 * numbers not for human consumption is to use g_ascii_strtod(). Only when
355 * you know that you must expect both locale formatted and C formatted numbers
356 * should you use this. Make sure that you don't pass strings such as comma
357 * separated lists of values, since the commas may be interpreted as a decimal
358 * point in some locales, causing unexpected results.
360 * Return value: the #gdouble value.
363 g_strtod (const gchar *nptr,
371 g_return_val_if_fail (nptr != NULL, 0);
376 val_1 = strtod (nptr, &fail_pos_1);
378 if (fail_pos_1 && fail_pos_1[0] != 0)
379 val_2 = g_ascii_strtod (nptr, &fail_pos_2);
381 if (!fail_pos_1 || fail_pos_1[0] == 0 || fail_pos_1 >= fail_pos_2)
384 *endptr = fail_pos_1;
390 *endptr = fail_pos_2;
397 * @nptr: the string to convert to a numeric value.
398 * @endptr: if non-%NULL, it returns the character after
399 * the last character used in the conversion.
401 * Converts a string to a #gdouble value.
403 * This function behaves like the standard strtod() function
404 * does in the C locale. It does this without actually changing
405 * the current locale, since that would not be thread-safe.
406 * A limitation of the implementation is that this function
407 * will still accept localized versions of infinities and NANs.
409 * This function is typically used when reading configuration
410 * files or other non-user input that should be locale independent.
411 * To handle input from the user you should normally use the
412 * locale-sensitive system strtod() function.
414 * To convert from a #gdouble to a string in a locale-insensitive
415 * way, use g_ascii_dtostr().
417 * If the correct value would cause overflow, plus or minus %HUGE_VAL
418 * is returned (according to the sign of the value), and %ERANGE is
419 * stored in %errno. If the correct value would cause underflow,
420 * zero is returned and %ERANGE is stored in %errno.
422 * This function resets %errno before calling strtod() so that
423 * you can reliably detect overflow and underflow.
425 * Return value: the #gdouble value.
428 g_ascii_strtod (const gchar *nptr,
433 struct lconv *locale_data;
434 const char *decimal_point;
435 int decimal_point_len;
436 const char *p, *decimal_point_pos;
437 const char *end = NULL; /* Silence gcc */
440 g_return_val_if_fail (nptr != NULL, 0);
444 locale_data = localeconv ();
445 decimal_point = locale_data->decimal_point;
446 decimal_point_len = strlen (decimal_point);
448 g_assert (decimal_point_len != 0);
450 decimal_point_pos = NULL;
453 if (decimal_point[0] != '.' ||
454 decimal_point[1] != 0)
457 /* Skip leading space */
458 while (g_ascii_isspace (*p))
461 /* Skip leading optional sign */
462 if (*p == '+' || *p == '-')
466 (p[1] == 'x' || p[1] == 'X'))
469 /* HEX - find the (optional) decimal point */
471 while (g_ascii_isxdigit (*p))
475 decimal_point_pos = p++;
477 while (g_ascii_isxdigit (*p))
480 if (*p == 'p' || *p == 'P')
482 if (*p == '+' || *p == '-')
484 while (g_ascii_isdigit (*p))
489 else if (g_ascii_isdigit (*p) || *p == '.')
491 while (g_ascii_isdigit (*p))
495 decimal_point_pos = p++;
497 while (g_ascii_isdigit (*p))
500 if (*p == 'e' || *p == 'E')
502 if (*p == '+' || *p == '-')
504 while (g_ascii_isdigit (*p))
509 /* For the other cases, we need not convert the decimal point */
512 if (decimal_point_pos)
516 /* We need to convert the '.' to the locale specific decimal point */
517 copy = g_malloc (end - nptr + 1 + decimal_point_len);
520 memcpy (c, nptr, decimal_point_pos - nptr);
521 c += decimal_point_pos - nptr;
522 memcpy (c, decimal_point, decimal_point_len);
523 c += decimal_point_len;
524 memcpy (c, decimal_point_pos + 1, end - (decimal_point_pos + 1));
525 c += end - (decimal_point_pos + 1);
529 val = strtod (copy, &fail_pos);
530 strtod_errno = errno;
534 if (fail_pos - copy > decimal_point_pos - nptr)
535 fail_pos = (char *)nptr + (fail_pos - copy) - (decimal_point_len - 1);
537 fail_pos = (char *)nptr + (fail_pos - copy);
547 copy = g_malloc (end - (char *)nptr + 1);
548 memcpy (copy, nptr, end - nptr);
549 *(copy + (end - (char *)nptr)) = 0;
552 val = strtod (copy, &fail_pos);
553 strtod_errno = errno;
557 fail_pos = (char *)nptr + (fail_pos - copy);
565 val = strtod (nptr, &fail_pos);
566 strtod_errno = errno;
572 errno = strtod_errno;
580 * @buffer: A buffer to place the resulting string in
581 * @buf_len: The length of the buffer.
582 * @d: The #gdouble to convert
584 * Converts a #gdouble to a string, using the '.' as
587 * This functions generates enough precision that converting
588 * the string back using g_ascii_strtod() gives the same machine-number
589 * (on machines with IEEE compatible 64bit doubles). It is
590 * guaranteed that the size of the resulting string will never
591 * be larger than @G_ASCII_DTOSTR_BUF_SIZE bytes.
593 * Return value: The pointer to the buffer with the converted string.
596 g_ascii_dtostr (gchar *buffer,
600 return g_ascii_formatd (buffer, buf_len, "%.17g", d);
605 * @buffer: A buffer to place the resulting string in
606 * @buf_len: The length of the buffer.
607 * @format: The printf()-style format to use for the
608 * code to use for converting.
609 * @d: The #gdouble to convert
611 * Converts a #gdouble to a string, using the '.' as
612 * decimal point. To format the number you pass in
613 * a printf()-style format string. Allowed conversion
614 * specifiers are 'e', 'E', 'f', 'F', 'g' and 'G'.
616 * If you just want to want to serialize the value into a
617 * string, use g_ascii_dtostr().
619 * Return value: The pointer to the buffer with the converted string.
622 g_ascii_formatd (gchar *buffer,
627 struct lconv *locale_data;
628 const char *decimal_point;
629 int decimal_point_len;
634 g_return_val_if_fail (buffer != NULL, NULL);
635 g_return_val_if_fail (format[0] == '%', NULL);
636 g_return_val_if_fail (strpbrk (format + 1, "'l%") == NULL, NULL);
638 format_char = format[strlen (format) - 1];
640 g_return_val_if_fail (format_char == 'e' || format_char == 'E' ||
641 format_char == 'f' || format_char == 'F' ||
642 format_char == 'g' || format_char == 'G',
645 if (format[0] != '%')
648 if (strpbrk (format + 1, "'l%"))
651 if (!(format_char == 'e' || format_char == 'E' ||
652 format_char == 'f' || format_char == 'F' ||
653 format_char == 'g' || format_char == 'G'))
657 _g_snprintf (buffer, buf_len, format, d);
659 locale_data = localeconv ();
660 decimal_point = locale_data->decimal_point;
661 decimal_point_len = strlen (decimal_point);
663 g_assert (decimal_point_len != 0);
665 if (decimal_point[0] != '.' ||
666 decimal_point[1] != 0)
670 while (g_ascii_isspace (*p))
673 if (*p == '+' || *p == '-')
676 while (isdigit ((guchar)*p))
679 if (strncmp (p, decimal_point, decimal_point_len) == 0)
683 if (decimal_point_len > 1)
685 rest_len = strlen (p + (decimal_point_len-1));
686 memmove (p, p + (decimal_point_len-1), rest_len);
696 g_parse_long_long (const gchar *nptr,
697 const gchar **endptr,
701 /* this code is based on on the strtol(3) code from GNU libc released under
702 * the GNU Lesser General Public License.
704 * Copyright (C) 1991,92,94,95,96,97,98,99,2000,01,02
705 * Free Software Foundation, Inc.
707 #define ISSPACE(c) ((c) == ' ' || (c) == '\f' || (c) == '\n' || \
708 (c) == '\r' || (c) == '\t' || (c) == '\v')
709 #define ISUPPER(c) ((c) >= 'A' && (c) <= 'Z')
710 #define ISLOWER(c) ((c) >= 'a' && (c) <= 'z')
711 #define ISALPHA(c) (ISUPPER (c) || ISLOWER (c))
712 #define TOUPPER(c) (ISLOWER (c) ? (c) - 'a' + 'A' : (c))
713 #define TOLOWER(c) (ISUPPER (c) ? (c) - 'A' + 'a' : (c))
718 const gchar *s, *save;
721 g_return_val_if_fail (nptr != NULL, 0);
724 if (base == 1 || base > 36)
734 /* Skip white space. */
738 if (G_UNLIKELY (!*s))
741 /* Check for a sign. */
750 /* Recognize number prefix and if BASE is zero, figure it out ourselves. */
753 if ((base == 0 || base == 16) && TOUPPER (s[1]) == 'X')
764 /* Save the pointer so we can check later if anything happened. */
766 cutoff = G_MAXUINT64 / base;
767 cutlim = G_MAXUINT64 % base;
774 if (c >= '0' && c <= '9')
776 else if (ISALPHA (c))
777 c = TOUPPER (c) - 'A' + 10;
782 /* Check for overflow. */
783 if (ui64 > cutoff || (ui64 == cutoff && c > cutlim))
792 /* Check if anything actually happened. */
796 /* Store in ENDPTR the address of one character
797 past the last character we converted. */
801 if (G_UNLIKELY (overflow))
810 /* We must handle a special case here: the base is 0 or 16 and the
811 first two characters are '0' and 'x', but the rest are no
812 hexadecimal digits. This is no error case. We return 0 and
813 ENDPTR points to the `x`. */
816 if (save - nptr >= 2 && TOUPPER (save[-1]) == 'X'
820 /* There was no number to convert. */
828 * @nptr: the string to convert to a numeric value.
829 * @endptr: if non-%NULL, it returns the character after
830 * the last character used in the conversion.
831 * @base: to be used for the conversion, 2..36 or 0
833 * Converts a string to a #guint64 value.
834 * This function behaves like the standard strtoull() function
835 * does in the C locale. It does this without actually
836 * changing the current locale, since that would not be
839 * This function is typically used when reading configuration
840 * files or other non-user input that should be locale independent.
841 * To handle input from the user you should normally use the
842 * locale-sensitive system strtoull() function.
844 * If the correct value would cause overflow, %G_MAXUINT64
845 * is returned, and %ERANGE is stored in %errno. If the base is
846 * outside the valid range, zero is returned, and %EINVAL is stored
847 * in %errno. If the string conversion fails, zero is returned, and
848 * @endptr returns @nptr (if @endptr is non-%NULL).
850 * Return value: the #guint64 value or zero on error.
855 g_ascii_strtoull (const gchar *nptr,
862 result = g_parse_long_long (nptr, (const gchar **) endptr, base, &negative);
864 /* Return the result of the appropriate sign. */
865 return negative ? -result : result;
870 * @nptr: the string to convert to a numeric value.
871 * @endptr: if non-%NULL, it returns the character after
872 * the last character used in the conversion.
873 * @base: to be used for the conversion, 2..36 or 0
875 * Converts a string to a #gint64 value.
876 * This function behaves like the standard strtoll() function
877 * does in the C locale. It does this without actually
878 * changing the current locale, since that would not be
881 * This function is typically used when reading configuration
882 * files or other non-user input that should be locale independent.
883 * To handle input from the user you should normally use the
884 * locale-sensitive system strtoll() function.
886 * If the correct value would cause overflow, %G_MAXINT64 or %G_MININT64
887 * is returned, and %ERANGE is stored in %errno. If the base is
888 * outside the valid range, zero is returned, and %EINVAL is stored
889 * in %errno. If the string conversion fails, zero is returned, and
890 * @endptr returns @nptr (if @endptr is non-%NULL).
892 * Return value: the #gint64 value or zero on error.
897 g_ascii_strtoll (const gchar *nptr,
904 result = g_parse_long_long (nptr, (const gchar **) endptr, base, &negative);
906 if (negative && result > (guint64) G_MININT64)
911 else if (!negative && result > (guint64) G_MAXINT64)
917 return - (gint64) result;
919 return (gint64) result;
924 * @errnum: the system error number. See the standard C %errno
927 * Returns a string corresponding to the given error code, e.g.
928 * "no such process". You should use this function in preference to
929 * strerror(), because it returns a string in UTF-8 encoding, and since
930 * not all platforms support the strerror() function.
932 * Returns: a UTF-8 string describing the error code. If the error code
933 * is unknown, it returns "unknown error (<code>)". The string
934 * can only be used until the next call to g_strerror()
936 G_CONST_RETURN gchar*
937 g_strerror (gint errnum)
939 static GStaticPrivate msg_private = G_STATIC_PRIVATE_INIT;
941 int saved_errno = errno;
944 const char *msg_locale;
946 msg_locale = strerror (errnum);
947 if (g_get_charset (NULL))
954 gchar *msg_utf8 = g_locale_to_utf8 (msg_locale, -1, NULL, NULL, NULL);
957 /* Stick in the quark table so that we can return a static result
959 GQuark msg_quark = g_quark_from_string (msg_utf8);
962 msg_utf8 = (gchar *) g_quark_to_string (msg_quark);
971 case E2BIG: return "argument list too long";
974 case EACCES: return "permission denied";
977 case EADDRINUSE: return "address already in use";
980 case EADDRNOTAVAIL: return "can't assign requested address";
983 case EADV: return "advertise error";
986 case EAFNOSUPPORT: return "address family not supported by protocol family";
989 case EAGAIN: return "try again";
992 case EALIGN: return "EALIGN";
995 case EALREADY: return "operation already in progress";
998 case EBADE: return "bad exchange descriptor";
1001 case EBADF: return "bad file number";
1004 case EBADFD: return "file descriptor in bad state";
1007 case EBADMSG: return "not a data message";
1010 case EBADR: return "bad request descriptor";
1013 case EBADRPC: return "RPC structure is bad";
1016 case EBADRQC: return "bad request code";
1019 case EBADSLT: return "invalid slot";
1022 case EBFONT: return "bad font file format";
1025 case EBUSY: return "mount device busy";
1028 case ECHILD: return "no children";
1031 case ECHRNG: return "channel number out of range";
1034 case ECOMM: return "communication error on send";
1037 case ECONNABORTED: return "software caused connection abort";
1040 case ECONNREFUSED: return "connection refused";
1043 case ECONNRESET: return "connection reset by peer";
1045 #if defined(EDEADLK) && (!defined(EWOULDBLOCK) || (EDEADLK != EWOULDBLOCK))
1046 case EDEADLK: return "resource deadlock avoided";
1048 #if defined(EDEADLOCK) && (!defined(EDEADLK) || (EDEADLOCK != EDEADLK))
1049 case EDEADLOCK: return "resource deadlock avoided";
1052 case EDESTADDRREQ: return "destination address required";
1055 case EDIRTY: return "mounting a dirty fs w/o force";
1058 case EDOM: return "math argument out of range";
1061 case EDOTDOT: return "cross mount point";
1064 case EDQUOT: return "disk quota exceeded";
1067 case EDUPPKG: return "duplicate package name";
1070 case EEXIST: return "file already exists";
1073 case EFAULT: return "bad address in system call argument";
1076 case EFBIG: return "file too large";
1079 case EHOSTDOWN: return "host is down";
1082 case EHOSTUNREACH: return "host is unreachable";
1085 case EIDRM: return "identifier removed";
1088 case EINIT: return "initialization error";
1091 case EINPROGRESS: return "operation now in progress";
1094 case EINTR: return "interrupted system call";
1097 case EINVAL: return "invalid argument";
1100 case EIO: return "I/O error";
1103 case EISCONN: return "socket is already connected";
1106 case EISDIR: return "is a directory";
1109 case EISNAM: return "is a name file";
1112 case ELBIN: return "ELBIN";
1115 case EL2HLT: return "level 2 halted";
1118 case EL2NSYNC: return "level 2 not synchronized";
1121 case EL3HLT: return "level 3 halted";
1124 case EL3RST: return "level 3 reset";
1127 case ELIBACC: return "can not access a needed shared library";
1130 case ELIBBAD: return "accessing a corrupted shared library";
1133 case ELIBEXEC: return "can not exec a shared library directly";
1136 case ELIBMAX: return "attempting to link in more shared libraries than system limit";
1139 case ELIBSCN: return ".lib section in a.out corrupted";
1142 case ELNRNG: return "link number out of range";
1145 case ELOOP: return "too many levels of symbolic links";
1148 case EMFILE: return "too many open files";
1151 case EMLINK: return "too many links";
1154 case EMSGSIZE: return "message too long";
1157 case EMULTIHOP: return "multihop attempted";
1160 case ENAMETOOLONG: return "file name too long";
1163 case ENAVAIL: return "not available";
1166 case ENET: return "ENET";
1169 case ENETDOWN: return "network is down";
1172 case ENETRESET: return "network dropped connection on reset";
1175 case ENETUNREACH: return "network is unreachable";
1178 case ENFILE: return "file table overflow";
1181 case ENOANO: return "anode table overflow";
1183 #if defined(ENOBUFS) && (!defined(ENOSR) || (ENOBUFS != ENOSR))
1184 case ENOBUFS: return "no buffer space available";
1187 case ENOCSI: return "no CSI structure available";
1190 case ENODATA: return "no data available";
1193 case ENODEV: return "no such device";
1196 case ENOENT: return "no such file or directory";
1199 case ENOEXEC: return "exec format error";
1202 case ENOLCK: return "no locks available";
1205 case ENOLINK: return "link has be severed";
1208 case ENOMEM: return "not enough memory";
1211 case ENOMSG: return "no message of desired type";
1214 case ENONET: return "machine is not on the network";
1217 case ENOPKG: return "package not installed";
1220 case ENOPROTOOPT: return "bad proocol option";
1223 case ENOSPC: return "no space left on device";
1226 case ENOSR: return "out of stream resources";
1229 case ENOSTR: return "not a stream device";
1232 case ENOSYM: return "unresolved symbol name";
1235 case ENOSYS: return "function not implemented";
1238 case ENOTBLK: return "block device required";
1241 case ENOTCONN: return "socket is not connected";
1244 case ENOTDIR: return "not a directory";
1247 case ENOTEMPTY: return "directory not empty";
1250 case ENOTNAM: return "not a name file";
1253 case ENOTSOCK: return "socket operation on non-socket";
1256 case ENOTTY: return "inappropriate device for ioctl";
1259 case ENOTUNIQ: return "name not unique on network";
1262 case ENXIO: return "no such device or address";
1265 case EOPNOTSUPP: return "operation not supported on socket";
1268 case EPERM: return "not owner";
1271 case EPFNOSUPPORT: return "protocol family not supported";
1274 case EPIPE: return "broken pipe";
1277 case EPROCLIM: return "too many processes";
1280 case EPROCUNAVAIL: return "bad procedure for program";
1282 #ifdef EPROGMISMATCH
1283 case EPROGMISMATCH: return "program version wrong";
1286 case EPROGUNAVAIL: return "RPC program not available";
1289 case EPROTO: return "protocol error";
1291 #ifdef EPROTONOSUPPORT
1292 case EPROTONOSUPPORT: return "protocol not suppored";
1295 case EPROTOTYPE: return "protocol wrong type for socket";
1298 case ERANGE: return "math result unrepresentable";
1300 #if defined(EREFUSED) && (!defined(ECONNREFUSED) || (EREFUSED != ECONNREFUSED))
1301 case EREFUSED: return "EREFUSED";
1304 case EREMCHG: return "remote address changed";
1307 case EREMDEV: return "remote device";
1310 case EREMOTE: return "pathname hit remote file system";
1313 case EREMOTEIO: return "remote i/o error";
1315 #ifdef EREMOTERELEASE
1316 case EREMOTERELEASE: return "EREMOTERELEASE";
1319 case EROFS: return "read-only file system";
1322 case ERPCMISMATCH: return "RPC version is wrong";
1325 case ERREMOTE: return "object is remote";
1328 case ESHUTDOWN: return "can't send afer socket shutdown";
1330 #ifdef ESOCKTNOSUPPORT
1331 case ESOCKTNOSUPPORT: return "socket type not supported";
1334 case ESPIPE: return "invalid seek";
1337 case ESRCH: return "no such process";
1340 case ESRMNT: return "srmount error";
1343 case ESTALE: return "stale remote file handle";
1346 case ESUCCESS: return "Error 0";
1349 case ETIME: return "timer expired";
1352 case ETIMEDOUT: return "connection timed out";
1355 case ETOOMANYREFS: return "too many references: can't splice";
1358 case ETXTBSY: return "text file or pseudo-device busy";
1361 case EUCLEAN: return "structure needs cleaning";
1364 case EUNATCH: return "protocol driver not attached";
1367 case EUSERS: return "too many users";
1370 case EVERSION: return "version mismatch";
1372 #if defined(EWOULDBLOCK) && (!defined(EAGAIN) || (EWOULDBLOCK != EAGAIN))
1373 case EWOULDBLOCK: return "operation would block";
1376 case EXDEV: return "cross-domain link";
1379 case EXFULL: return "message tables full";
1382 #else /* NO_SYS_ERRLIST */
1383 extern int sys_nerr;
1384 extern char *sys_errlist[];
1386 if ((errnum > 0) && (errnum <= sys_nerr))
1387 return sys_errlist [errnum];
1388 #endif /* NO_SYS_ERRLIST */
1390 msg = g_static_private_get (&msg_private);
1393 msg = g_new (gchar, 64);
1394 g_static_private_set (&msg_private, msg, g_free);
1397 _g_sprintf (msg, "unknown error (%d)", errnum);
1399 errno = saved_errno;
1405 * @signum: the signal number. See the <literal>signal</literal>
1408 * Returns a string describing the given signal, e.g. "Segmentation fault".
1409 * You should use this function in preference to strsignal(), because it
1410 * returns a string in UTF-8 encoding, and since not all platforms support
1411 * the strsignal() function.
1413 * Returns: a UTF-8 string describing the signal. If the signal is unknown,
1414 * it returns "unknown signal (<signum>)". The string can only be
1415 * used until the next call to g_strsignal()
1417 G_CONST_RETURN gchar*
1418 g_strsignal (gint signum)
1420 static GStaticPrivate msg_private = G_STATIC_PRIVATE_INIT;
1423 #ifdef HAVE_STRSIGNAL
1424 const char *msg_locale;
1426 #if defined(G_OS_BEOS) || defined(G_WITH_CYGWIN)
1427 extern const char *strsignal(int);
1429 /* this is declared differently (const) in string.h on BeOS */
1430 extern char *strsignal (int sig);
1431 #endif /* !G_OS_BEOS && !G_WITH_CYGWIN */
1432 msg_locale = strsignal (signum);
1433 if (g_get_charset (NULL))
1437 gchar *msg_utf8 = g_locale_to_utf8 (msg_locale, -1, NULL, NULL, NULL);
1440 /* Stick in the quark table so that we can return a static result
1442 GQuark msg_quark = g_quark_from_string (msg_utf8);
1445 return g_quark_to_string (msg_quark);
1448 #elif NO_SYS_SIGLIST
1452 case SIGHUP: return "Hangup";
1455 case SIGINT: return "Interrupt";
1458 case SIGQUIT: return "Quit";
1461 case SIGILL: return "Illegal instruction";
1464 case SIGTRAP: return "Trace/breakpoint trap";
1467 case SIGABRT: return "IOT trap/Abort";
1470 case SIGBUS: return "Bus error";
1473 case SIGFPE: return "Floating point exception";
1476 case SIGKILL: return "Killed";
1479 case SIGUSR1: return "User defined signal 1";
1482 case SIGSEGV: return "Segmentation fault";
1485 case SIGUSR2: return "User defined signal 2";
1488 case SIGPIPE: return "Broken pipe";
1491 case SIGALRM: return "Alarm clock";
1494 case SIGTERM: return "Terminated";
1497 case SIGSTKFLT: return "Stack fault";
1500 case SIGCHLD: return "Child exited";
1503 case SIGCONT: return "Continued";
1506 case SIGSTOP: return "Stopped (signal)";
1509 case SIGTSTP: return "Stopped";
1512 case SIGTTIN: return "Stopped (tty input)";
1515 case SIGTTOU: return "Stopped (tty output)";
1518 case SIGURG: return "Urgent condition";
1521 case SIGXCPU: return "CPU time limit exceeded";
1524 case SIGXFSZ: return "File size limit exceeded";
1527 case SIGVTALRM: return "Virtual time alarm";
1530 case SIGPROF: return "Profile signal";
1533 case SIGWINCH: return "Window size changed";
1536 case SIGIO: return "Possible I/O";
1539 case SIGPWR: return "Power failure";
1542 case SIGUNUSED: return "Unused signal";
1545 #else /* NO_SYS_SIGLIST */
1547 #ifdef NO_SYS_SIGLIST_DECL
1548 extern char *sys_siglist[]; /*(see Tue Jan 19 00:44:24 1999 in changelog)*/
1551 return (char*) /* this function should return const --josh */ sys_siglist [signum];
1552 #endif /* NO_SYS_SIGLIST */
1554 msg = g_static_private_get (&msg_private);
1557 msg = g_new (gchar, 64);
1558 g_static_private_set (&msg_private, msg, g_free);
1561 _g_sprintf (msg, "unknown signal (%d)", signum);
1566 /* Functions g_strlcpy and g_strlcat were originally developed by
1567 * Todd C. Miller <Todd.Miller@courtesan.com> to simplify writing secure code.
1568 * See ftp://ftp.openbsd.org/pub/OpenBSD/src/lib/libc/string/strlcpy.3
1569 * for more information.
1573 /* Use the native ones, if available; they might be implemented in assembly */
1575 g_strlcpy (gchar *dest,
1579 g_return_val_if_fail (dest != NULL, 0);
1580 g_return_val_if_fail (src != NULL, 0);
1582 return strlcpy (dest, src, dest_size);
1586 g_strlcat (gchar *dest,
1590 g_return_val_if_fail (dest != NULL, 0);
1591 g_return_val_if_fail (src != NULL, 0);
1593 return strlcat (dest, src, dest_size);
1596 #else /* ! HAVE_STRLCPY */
1599 * @dest: destination buffer
1600 * @src: source buffer
1601 * @dest_size: length of @dest in bytes
1603 * Portability wrapper that calls strlcpy() on systems which have it,
1604 * and emulates strlcpy() otherwise. Copies @src to @dest; @dest is
1605 * guaranteed to be nul-terminated; @src must be nul-terminated;
1606 * @dest_size is the buffer size, not the number of chars to copy.
1608 * At most dest_size - 1 characters will be copied. Always nul-terminates
1609 * (unless dest_size == 0). This function does <emphasis>not</emphasis>
1610 * allocate memory. Unlike strncpy(), this function doesn't pad dest (so
1611 * it's often faster). It returns the size of the attempted result,
1612 * strlen (src), so if @retval >= @dest_size, truncation occurred.
1614 * <note><para>Caveat: strlcpy() is supposedly more secure than
1615 * strcpy() or strncpy(), but if you really want to avoid screwups,
1616 * g_strdup() is an even better idea.</para></note>
1618 * Returns: length of @src
1621 g_strlcpy (gchar *dest,
1625 register gchar *d = dest;
1626 register const gchar *s = src;
1627 register gsize n = dest_size;
1629 g_return_val_if_fail (dest != NULL, 0);
1630 g_return_val_if_fail (src != NULL, 0);
1632 /* Copy as many bytes as will fit */
1633 if (n != 0 && --n != 0)
1636 register gchar c = *s++;
1644 /* If not enough room in dest, add NUL and traverse rest of src */
1653 return s - src - 1; /* count does not include NUL */
1658 * @dest: destination buffer, already containing one nul-terminated string
1659 * @src: source buffer
1660 * @dest_size: length of @dest buffer in bytes (not length of existing string
1663 * Portability wrapper that calls strlcat() on systems which have it,
1664 * and emulates it otherwise. Appends nul-terminated @src string to @dest,
1665 * guaranteeing nul-termination for @dest. The total size of @dest won't
1666 * exceed @dest_size.
1668 * At most dest_size - 1 characters will be copied.
1669 * Unlike strncat, dest_size is the full size of dest, not the space left over.
1670 * This function does NOT allocate memory.
1671 * This always NUL terminates (unless siz == 0 or there were no NUL characters
1672 * in the dest_size characters of dest to start with).
1674 * <note><para>Caveat: this is supposedly a more secure alternative to
1675 * strcat() or strncat(), but for real security g_strconcat() is harder
1676 * to mess up.</para></note>
1678 * Returns: size of attempted result, which is MIN (dest_size, strlen
1679 * (original dest)) + strlen (src), so if retval >= dest_size,
1680 * truncation occurred.
1683 g_strlcat (gchar *dest,
1687 register gchar *d = dest;
1688 register const gchar *s = src;
1689 register gsize bytes_left = dest_size;
1690 gsize dlength; /* Logically, MIN (strlen (d), dest_size) */
1692 g_return_val_if_fail (dest != NULL, 0);
1693 g_return_val_if_fail (src != NULL, 0);
1695 /* Find the end of dst and adjust bytes left but don't go past end */
1696 while (*d != 0 && bytes_left-- != 0)
1699 bytes_left = dest_size - dlength;
1701 if (bytes_left == 0)
1702 return dlength + strlen (s);
1706 if (bytes_left != 1)
1715 return dlength + (s - src); /* count does not include NUL */
1717 #endif /* ! HAVE_STRLCPY */
1722 * @len: length of @str in bytes, or -1 if @str is nul-terminated.
1724 * Converts all upper case ASCII letters to lower case ASCII letters.
1726 * Return value: a newly-allocated string, with all the upper case
1727 * characters in @str converted to lower case, with
1728 * semantics that exactly match g_ascii_tolower(). (Note
1729 * that this is unlike the old g_strdown(), which modified
1730 * the string in place.)
1733 g_ascii_strdown (const gchar *str,
1738 g_return_val_if_fail (str != NULL, NULL);
1743 result = g_strndup (str, len);
1744 for (s = result; *s; s++)
1745 *s = g_ascii_tolower (*s);
1753 * @len: length of @str in bytes, or -1 if @str is nul-terminated.
1755 * Converts all lower case ASCII letters to upper case ASCII letters.
1757 * Return value: a newly allocated string, with all the lower case
1758 * characters in @str converted to upper case, with
1759 * semantics that exactly match g_ascii_toupper(). (Note
1760 * that this is unlike the old g_strup(), which modified
1761 * the string in place.)
1764 g_ascii_strup (const gchar *str,
1769 g_return_val_if_fail (str != NULL, NULL);
1774 result = g_strndup (str, len);
1775 for (s = result; *s; s++)
1776 *s = g_ascii_toupper (*s);
1783 * @string: the string to convert.
1785 * Converts a string to lower case.
1787 * Return value: the string
1789 * Deprecated:2.2: This function is totally broken for the reasons discussed
1790 * in the g_strncasecmp() docs - use g_ascii_strdown() or g_utf8_strdown()
1794 g_strdown (gchar *string)
1798 g_return_val_if_fail (string != NULL, NULL);
1800 s = (guchar *) string;
1809 return (gchar *) string;
1814 * @string: the string to convert.
1816 * Converts a string to upper case.
1818 * Return value: the string
1820 * Deprecated:2.2: This function is totally broken for the reasons discussed
1821 * in the g_strncasecmp() docs - use g_ascii_strup() or g_utf8_strup() instead.
1824 g_strup (gchar *string)
1828 g_return_val_if_fail (string != NULL, NULL);
1830 s = (guchar *) string;
1839 return (gchar *) string;
1844 * @string: the string to reverse
1846 * Reverses all of the bytes in a string. For example,
1847 * <literal>g_strreverse ("abcdef")</literal> will result
1850 * Note that g_strreverse() doesn't work on UTF-8 strings
1851 * containing multibyte characters. For that purpose, use
1852 * g_utf8_strreverse().
1854 * Returns: the same pointer passed in as @string
1857 g_strreverse (gchar *string)
1859 g_return_val_if_fail (string != NULL, NULL);
1863 register gchar *h, *t;
1866 t = string + strlen (string) - 1;
1885 * @c: any character.
1887 * Convert a character to ASCII lower case.
1889 * Unlike the standard C library tolower() function, this only
1890 * recognizes standard ASCII letters and ignores the locale, returning
1891 * all non-ASCII characters unchanged, even if they are lower case
1892 * letters in a particular character set. Also unlike the standard
1893 * library function, this takes and returns a char, not an int, so
1894 * don't call it on %EOF but no need to worry about casting to #guchar
1895 * before passing a possibly non-ASCII character in.
1897 * Return value: the result of converting @c to lower case.
1898 * If @c is not an ASCII upper case letter,
1899 * @c is returned unchanged.
1902 g_ascii_tolower (gchar c)
1904 return g_ascii_isupper (c) ? c - 'A' + 'a' : c;
1909 * @c: any character.
1911 * Convert a character to ASCII upper case.
1913 * Unlike the standard C library toupper() function, this only
1914 * recognizes standard ASCII letters and ignores the locale, returning
1915 * all non-ASCII characters unchanged, even if they are upper case
1916 * letters in a particular character set. Also unlike the standard
1917 * library function, this takes and returns a char, not an int, so
1918 * don't call it on %EOF but no need to worry about casting to #guchar
1919 * before passing a possibly non-ASCII character in.
1921 * Return value: the result of converting @c to upper case.
1922 * If @c is not an ASCII lower case letter,
1923 * @c is returned unchanged.
1926 g_ascii_toupper (gchar c)
1928 return g_ascii_islower (c) ? c - 'a' + 'A' : c;
1932 * g_ascii_digit_value:
1933 * @c: an ASCII character.
1935 * Determines the numeric value of a character as a decimal
1936 * digit. Differs from g_unichar_digit_value() because it takes
1937 * a char, so there's no worry about sign extension if characters
1940 * Return value: If @c is a decimal digit (according to
1941 * g_ascii_isdigit()), its numeric value. Otherwise, -1.
1944 g_ascii_digit_value (gchar c)
1946 if (g_ascii_isdigit (c))
1952 * g_ascii_xdigit_value:
1953 * @c: an ASCII character.
1955 * Determines the numeric value of a character as a hexidecimal
1956 * digit. Differs from g_unichar_xdigit_value() because it takes
1957 * a char, so there's no worry about sign extension if characters
1960 * Return value: If @c is a hex digit (according to
1961 * g_ascii_isxdigit()), its numeric value. Otherwise, -1.
1964 g_ascii_xdigit_value (gchar c)
1966 if (c >= 'A' && c <= 'F')
1967 return c - 'A' + 10;
1968 if (c >= 'a' && c <= 'f')
1969 return c - 'a' + 10;
1970 return g_ascii_digit_value (c);
1974 * g_ascii_strcasecmp:
1975 * @s1: string to compare with @s2.
1976 * @s2: string to compare with @s1.
1978 * Compare two strings, ignoring the case of ASCII characters.
1980 * Unlike the BSD strcasecmp() function, this only recognizes standard
1981 * ASCII letters and ignores the locale, treating all non-ASCII
1982 * bytes as if they are not letters.
1984 * This function should be used only on strings that are known to be
1985 * in encodings where the bytes corresponding to ASCII letters always
1986 * represent themselves. This includes UTF-8 and the ISO-8859-*
1987 * charsets, but not for instance double-byte encodings like the
1988 * Windows Codepage 932, where the trailing bytes of double-byte
1989 * characters include all ASCII letters. If you compare two CP932
1990 * strings using this function, you will get false matches.
1992 * Return value: 0 if the strings match, a negative value if @s1 < @s2,
1993 * or a positive value if @s1 > @s2.
1996 g_ascii_strcasecmp (const gchar *s1,
2001 g_return_val_if_fail (s1 != NULL, 0);
2002 g_return_val_if_fail (s2 != NULL, 0);
2006 c1 = (gint)(guchar) TOLOWER (*s1);
2007 c2 = (gint)(guchar) TOLOWER (*s2);
2013 return (((gint)(guchar) *s1) - ((gint)(guchar) *s2));
2017 * g_ascii_strncasecmp:
2018 * @s1: string to compare with @s2.
2019 * @s2: string to compare with @s1.
2020 * @n: number of characters to compare.
2022 * Compare @s1 and @s2, ignoring the case of ASCII characters and any
2023 * characters after the first @n in each string.
2025 * Unlike the BSD strcasecmp() function, this only recognizes standard
2026 * ASCII letters and ignores the locale, treating all non-ASCII
2027 * characters as if they are not letters.
2029 * The same warning as in g_ascii_strcasecmp() applies: Use this
2030 * function only on strings known to be in encodings where bytes
2031 * corresponding to ASCII letters always represent themselves.
2033 * Return value: 0 if the strings match, a negative value if @s1 < @s2,
2034 * or a positive value if @s1 > @s2.
2037 g_ascii_strncasecmp (const gchar *s1,
2043 g_return_val_if_fail (s1 != NULL, 0);
2044 g_return_val_if_fail (s2 != NULL, 0);
2046 while (n && *s1 && *s2)
2049 c1 = (gint)(guchar) TOLOWER (*s1);
2050 c2 = (gint)(guchar) TOLOWER (*s2);
2057 return (((gint) (guchar) *s1) - ((gint) (guchar) *s2));
2065 * @s2: a string to compare with @s1.
2067 * A case-insensitive string comparison, corresponding to the standard
2068 * strcasecmp() function on platforms which support it.
2070 * Return value: 0 if the strings match, a negative value if @s1 < @s2,
2071 * or a positive value if @s1 > @s2.
2073 * Deprecated:2.2: See g_strncasecmp() for a discussion of why this function
2074 * is deprecated and how to replace it.
2077 g_strcasecmp (const gchar *s1,
2080 #ifdef HAVE_STRCASECMP
2081 g_return_val_if_fail (s1 != NULL, 0);
2082 g_return_val_if_fail (s2 != NULL, 0);
2084 return strcasecmp (s1, s2);
2088 g_return_val_if_fail (s1 != NULL, 0);
2089 g_return_val_if_fail (s2 != NULL, 0);
2093 /* According to A. Cox, some platforms have islower's that
2094 * don't work right on non-uppercase
2096 c1 = isupper ((guchar)*s1) ? tolower ((guchar)*s1) : *s1;
2097 c2 = isupper ((guchar)*s2) ? tolower ((guchar)*s2) : *s2;
2103 return (((gint)(guchar) *s1) - ((gint)(guchar) *s2));
2110 * @s2: a string to compare with @s1.
2111 * @n: the maximum number of characters to compare.
2113 * A case-insensitive string comparison, corresponding to the standard
2114 * strncasecmp() function on platforms which support it.
2115 * It is similar to g_strcasecmp() except it only compares the first @n
2116 * characters of the strings.
2118 * Return value: 0 if the strings match, a negative value if @s1 < @s2,
2119 * or a positive value if @s1 > @s2.
2121 * Deprecated:2.2: The problem with g_strncasecmp() is that it does the
2122 * comparison by calling toupper()/tolower(). These functions are
2123 * locale-specific and operate on single bytes. However, it is impossible
2124 * to handle things correctly from an I18N standpoint by operating on
2125 * bytes, since characters may be multibyte. Thus g_strncasecmp() is
2126 * broken if your string is guaranteed to be ASCII, since it's
2127 * locale-sensitive, and it's broken if your string is localized, since
2128 * it doesn't work on many encodings at all, including UTF-8, EUC-JP,
2131 * There are therefore two replacement functions: g_ascii_strncasecmp(),
2132 * which only works on ASCII and is not locale-sensitive, and
2133 * g_utf8_casefold(), which is good for case-insensitive sorting of UTF-8.
2136 g_strncasecmp (const gchar *s1,
2140 #ifdef HAVE_STRNCASECMP
2141 return strncasecmp (s1, s2, n);
2145 g_return_val_if_fail (s1 != NULL, 0);
2146 g_return_val_if_fail (s2 != NULL, 0);
2148 while (n && *s1 && *s2)
2151 /* According to A. Cox, some platforms have islower's that
2152 * don't work right on non-uppercase
2154 c1 = isupper ((guchar)*s1) ? tolower ((guchar)*s1) : *s1;
2155 c2 = isupper ((guchar)*s2) ? tolower ((guchar)*s2) : *s2;
2162 return (((gint) (guchar) *s1) - ((gint) (guchar) *s2));
2169 g_strdelimit (gchar *string,
2170 const gchar *delimiters,
2175 g_return_val_if_fail (string != NULL, NULL);
2178 delimiters = G_STR_DELIMITERS;
2180 for (c = string; *c; c++)
2182 if (strchr (delimiters, *c))
2190 g_strcanon (gchar *string,
2191 const gchar *valid_chars,
2196 g_return_val_if_fail (string != NULL, NULL);
2197 g_return_val_if_fail (valid_chars != NULL, NULL);
2199 for (c = string; *c; c++)
2201 if (!strchr (valid_chars, *c))
2209 g_strcompress (const gchar *source)
2211 const gchar *p = source, *octal;
2212 gchar *dest = g_malloc (strlen (source) + 1);
2223 g_warning ("g_strcompress: trailing \\");
2225 case '0': case '1': case '2': case '3': case '4':
2226 case '5': case '6': case '7':
2229 while ((p < octal + 3) && (*p >= '0') && (*p <= '7'))
2231 *q = (*q * 8) + (*p - '0');
2252 default: /* Also handles \" and \\ */
2268 g_strescape (const gchar *source,
2269 const gchar *exceptions)
2276 g_return_val_if_fail (source != NULL, NULL);
2278 p = (guchar *) source;
2279 /* Each source byte needs maximally four destination chars (\777) */
2280 q = dest = g_malloc (strlen (source) * 4 + 1);
2282 memset (excmap, 0, 256);
2285 guchar *e = (guchar *) exceptions;
2331 if ((*p < ' ') || (*p >= 0177))
2334 *q++ = '0' + (((*p) >> 6) & 07);
2335 *q++ = '0' + (((*p) >> 3) & 07);
2336 *q++ = '0' + ((*p) & 07);
2350 g_strchug (gchar *string)
2354 g_return_val_if_fail (string != NULL, NULL);
2356 for (start = (guchar*) string; *start && g_ascii_isspace (*start); start++)
2359 g_memmove (string, start, strlen ((gchar *) start) + 1);
2365 g_strchomp (gchar *string)
2369 g_return_val_if_fail (string != NULL, NULL);
2371 len = strlen (string);
2374 if (g_ascii_isspace ((guchar) string[len]))
2385 * @string: a string to split.
2386 * @delimiter: a string which specifies the places at which to split the string.
2387 * The delimiter is not included in any of the resulting strings, unless
2388 * @max_tokens is reached.
2389 * @max_tokens: the maximum number of pieces to split @string into. If this is
2390 * less than 1, the string is split completely.
2392 * Splits a string into a maximum of @max_tokens pieces, using the given
2393 * @delimiter. If @max_tokens is reached, the remainder of @string is appended
2394 * to the last token.
2396 * As a special case, the result of splitting the empty string "" is an empty
2397 * vector, not a vector containing a single string. The reason for this
2398 * special case is that being able to represent a empty vector is typically
2399 * more useful than consistent handling of empty elements. If you do need
2400 * to represent empty elements, you'll need to check for the empty string
2401 * before calling g_strsplit().
2403 * Return value: a newly-allocated %NULL-terminated array of strings. Use
2404 * g_strfreev() to free it.
2407 g_strsplit (const gchar *string,
2408 const gchar *delimiter,
2411 GSList *string_list = NULL, *slist;
2412 gchar **str_array, *s;
2414 const gchar *remainder;
2416 g_return_val_if_fail (string != NULL, NULL);
2417 g_return_val_if_fail (delimiter != NULL, NULL);
2418 g_return_val_if_fail (delimiter[0] != '\0', NULL);
2421 max_tokens = G_MAXINT;
2424 s = strstr (remainder, delimiter);
2427 gsize delimiter_len = strlen (delimiter);
2429 while (--max_tokens && s)
2433 len = s - remainder;
2434 string_list = g_slist_prepend (string_list,
2435 g_strndup (remainder, len));
2437 remainder = s + delimiter_len;
2438 s = strstr (remainder, delimiter);
2444 string_list = g_slist_prepend (string_list, g_strdup (remainder));
2447 str_array = g_new (gchar*, n + 1);
2449 str_array[n--] = NULL;
2450 for (slist = string_list; slist; slist = slist->next)
2451 str_array[n--] = slist->data;
2453 g_slist_free (string_list);
2460 * @string: The string to be tokenized
2461 * @delimiters: A nul-terminated string containing bytes that are used
2462 * to split the string.
2463 * @max_tokens: The maximum number of tokens to split @string into.
2464 * If this is less than 1, the string is split completely
2466 * Splits @string into a number of tokens not containing any of the characters
2467 * in @delimiter. A token is the (possibly empty) longest string that does not
2468 * contain any of the characters in @delimiters. If @max_tokens is reached, the
2469 * remainder is appended to the last token.
2471 * For example the result of g_strsplit_set ("abc:def/ghi", ":/", -1) is a
2472 * %NULL-terminated vector containing the three strings "abc", "def",
2475 * The result if g_strsplit_set (":def/ghi:", ":/", -1) is a %NULL-terminated
2476 * vector containing the four strings "", "def", "ghi", and "".
2478 * As a special case, the result of splitting the empty string "" is an empty
2479 * vector, not a vector containing a single string. The reason for this
2480 * special case is that being able to represent a empty vector is typically
2481 * more useful than consistent handling of empty elements. If you do need
2482 * to represent empty elements, you'll need to check for the empty string
2483 * before calling g_strsplit_set().
2485 * Note that this function works on bytes not characters, so it can't be used
2486 * to delimit UTF-8 strings for anything but ASCII characters.
2488 * Return value: a newly-allocated %NULL-terminated array of strings. Use
2489 * g_strfreev() to free it.
2494 g_strsplit_set (const gchar *string,
2495 const gchar *delimiters,
2498 gboolean delim_table[256];
2499 GSList *tokens, *list;
2502 const gchar *current;
2506 g_return_val_if_fail (string != NULL, NULL);
2507 g_return_val_if_fail (delimiters != NULL, NULL);
2510 max_tokens = G_MAXINT;
2512 if (*string == '\0')
2514 result = g_new (char *, 1);
2519 memset (delim_table, FALSE, sizeof (delim_table));
2520 for (s = delimiters; *s != '\0'; ++s)
2521 delim_table[*(guchar *)s] = TRUE;
2526 s = current = string;
2529 if (delim_table[*(guchar *)s] && n_tokens + 1 < max_tokens)
2531 token = g_strndup (current, s - current);
2532 tokens = g_slist_prepend (tokens, token);
2541 token = g_strndup (current, s - current);
2542 tokens = g_slist_prepend (tokens, token);
2545 result = g_new (gchar *, n_tokens + 1);
2547 result[n_tokens] = NULL;
2548 for (list = tokens; list != NULL; list = list->next)
2549 result[--n_tokens] = list->data;
2551 g_slist_free (tokens);
2558 * @str_array: a %NULL-terminated array of strings to free.
2560 * Frees a %NULL-terminated array of strings, and the array itself.
2561 * If called on a %NULL value, g_strfreev() simply returns.
2564 g_strfreev (gchar **str_array)
2570 for (i = 0; str_array[i] != NULL; i++)
2571 g_free (str_array[i]);
2579 * @str_array: %NULL-terminated array of strings.
2581 * Copies %NULL-terminated array of strings. The copy is a deep copy;
2582 * the new array should be freed by first freeing each string, then
2583 * the array itself. g_strfreev() does this for you. If called
2584 * on a %NULL value, g_strdupv() simply returns %NULL.
2586 * Return value: a new %NULL-terminated array of strings.
2589 g_strdupv (gchar **str_array)
2597 while (str_array[i])
2600 retval = g_new (gchar*, i + 1);
2603 while (str_array[i])
2605 retval[i] = g_strdup (str_array[i]);
2618 * @separator: a string to insert between each of the strings, or %NULL
2619 * @str_array: a %NULL-terminated array of strings to join
2621 * Joins a number of strings together to form one long string, with the
2622 * optional @separator inserted between each of them. The returned string
2623 * should be freed with g_free().
2625 * Returns: a newly-allocated string containing all of the strings joined
2626 * together, with @separator between them
2629 g_strjoinv (const gchar *separator,
2635 g_return_val_if_fail (str_array != NULL, NULL);
2637 if (separator == NULL)
2644 gsize separator_len;
2646 separator_len = strlen (separator);
2647 /* First part, getting length */
2648 len = 1 + strlen (str_array[0]);
2649 for (i = 1; str_array[i] != NULL; i++)
2650 len += strlen (str_array[i]);
2651 len += separator_len * (i - 1);
2653 /* Second part, building string */
2654 string = g_new (gchar, len);
2655 ptr = g_stpcpy (string, *str_array);
2656 for (i = 1; str_array[i] != NULL; i++)
2658 ptr = g_stpcpy (ptr, separator);
2659 ptr = g_stpcpy (ptr, str_array[i]);
2663 string = g_strdup ("");
2670 * @separator: a string to insert between each of the strings, or %NULL
2671 * @Varargs: a %NULL-terminated list of strings to join
2673 * Joins a number of strings together to form one long string, with the
2674 * optional @separator inserted between each of them. The returned string
2675 * should be freed with g_free().
2677 * Returns: a newly-allocated string containing all of the strings joined
2678 * together, with @separator between them
2681 g_strjoin (const gchar *separator,
2687 gsize separator_len;
2690 if (separator == NULL)
2693 separator_len = strlen (separator);
2695 va_start (args, separator);
2697 s = va_arg (args, gchar*);
2701 /* First part, getting length */
2702 len = 1 + strlen (s);
2704 s = va_arg (args, gchar*);
2707 len += separator_len + strlen (s);
2708 s = va_arg (args, gchar*);
2712 /* Second part, building string */
2713 string = g_new (gchar, len);
2715 va_start (args, separator);
2717 s = va_arg (args, gchar*);
2718 ptr = g_stpcpy (string, s);
2720 s = va_arg (args, gchar*);
2723 ptr = g_stpcpy (ptr, separator);
2724 ptr = g_stpcpy (ptr, s);
2725 s = va_arg (args, gchar*);
2729 string = g_strdup ("");
2739 * @haystack: a string.
2740 * @haystack_len: the maximum length of @haystack. Note that -1 is
2741 * a valid length, if @haystack is nul-terminated, meaning it will
2742 * search through the whole string.
2743 * @needle: the string to search for.
2745 * Searches the string @haystack for the first occurrence
2746 * of the string @needle, limiting the length of the search
2749 * Return value: a pointer to the found occurrence, or
2750 * %NULL if not found.
2753 g_strstr_len (const gchar *haystack,
2754 gssize haystack_len,
2755 const gchar *needle)
2757 g_return_val_if_fail (haystack != NULL, NULL);
2758 g_return_val_if_fail (needle != NULL, NULL);
2760 if (haystack_len < 0)
2761 return strstr (haystack, needle);
2764 const gchar *p = haystack;
2765 gsize needle_len = strlen (needle);
2769 if (needle_len == 0)
2770 return (gchar *)haystack;
2772 if (haystack_len < needle_len)
2775 end = haystack + haystack_len - needle_len;
2777 while (p <= end && *p)
2779 for (i = 0; i < needle_len; i++)
2780 if (p[i] != needle[i])
2795 * @haystack: a nul-terminated string.
2796 * @needle: the nul-terminated string to search for.
2798 * Searches the string @haystack for the last occurrence
2799 * of the string @needle.
2801 * Return value: a pointer to the found occurrence, or
2802 * %NULL if not found.
2805 g_strrstr (const gchar *haystack,
2806 const gchar *needle)
2813 g_return_val_if_fail (haystack != NULL, NULL);
2814 g_return_val_if_fail (needle != NULL, NULL);
2816 needle_len = strlen (needle);
2817 haystack_len = strlen (haystack);
2819 if (needle_len == 0)
2820 return (gchar *)haystack;
2822 if (haystack_len < needle_len)
2825 p = haystack + haystack_len - needle_len;
2827 while (p >= haystack)
2829 for (i = 0; i < needle_len; i++)
2830 if (p[i] != needle[i])
2844 * @haystack: a nul-terminated string.
2845 * @haystack_len: the maximum length of @haystack.
2846 * @needle: the nul-terminated string to search for.
2848 * Searches the string @haystack for the last occurrence
2849 * of the string @needle, limiting the length of the search
2852 * Return value: a pointer to the found occurrence, or
2853 * %NULL if not found.
2856 g_strrstr_len (const gchar *haystack,
2857 gssize haystack_len,
2858 const gchar *needle)
2860 g_return_val_if_fail (haystack != NULL, NULL);
2861 g_return_val_if_fail (needle != NULL, NULL);
2863 if (haystack_len < 0)
2864 return g_strrstr (haystack, needle);
2867 gsize needle_len = strlen (needle);
2868 const gchar *haystack_max = haystack + haystack_len;
2869 const gchar *p = haystack;
2872 while (p < haystack_max && *p)
2875 if (p < haystack + needle_len)
2880 while (p >= haystack)
2882 for (i = 0; i < needle_len; i++)
2883 if (p[i] != needle[i])
2899 * @str: a nul-terminated string.
2900 * @suffix: the nul-terminated suffix to look for.
2902 * Looks whether the string @str ends with @suffix.
2904 * Return value: %TRUE if @str end with @suffix, %FALSE otherwise.
2909 g_str_has_suffix (const gchar *str,
2910 const gchar *suffix)
2915 g_return_val_if_fail (str != NULL, FALSE);
2916 g_return_val_if_fail (suffix != NULL, FALSE);
2918 str_len = strlen (str);
2919 suffix_len = strlen (suffix);
2921 if (str_len < suffix_len)
2924 return strcmp (str + str_len - suffix_len, suffix) == 0;
2929 * @str: a nul-terminated string.
2930 * @prefix: the nul-terminated prefix to look for.
2932 * Looks whether the string @str begins with @prefix.
2934 * Return value: %TRUE if @str begins with @prefix, %FALSE otherwise.
2939 g_str_has_prefix (const gchar *str,
2940 const gchar *prefix)
2945 g_return_val_if_fail (str != NULL, FALSE);
2946 g_return_val_if_fail (prefix != NULL, FALSE);
2948 str_len = strlen (str);
2949 prefix_len = strlen (prefix);
2951 if (str_len < prefix_len)
2954 return strncmp (str, prefix, prefix_len) == 0;
2961 * @msgval: another string
2963 * An auxiliary function for gettext() support (see Q_()).
2965 * Return value: @msgval, unless @msgval is identical to @msgid and contains
2966 * a '|' character, in which case a pointer to the substring of msgid after
2967 * the first '|' character is returned.
2971 G_CONST_RETURN gchar *
2972 g_strip_context (const gchar *msgid,
2973 const gchar *msgval)
2975 if (msgval == msgid)
2977 const char *c = strchr (msgid, '|');
2988 * @str_array: a %NULL-terminated array of strings.
2990 * Returns the length of the given %NULL-terminated
2991 * string array @str_array.
2993 * Return value: length of @str_array.
2998 g_strv_length (gchar **str_array)
3002 g_return_val_if_fail (str_array != NULL, 0);
3004 while (str_array[i])
3013 * @domain: the translation domain to use, or %NULL to use
3014 * the domain set with textdomain()
3015 * @msgctxtid: a combined message context and message id, separated
3016 * by a \004 character
3017 * @msgidoffset: the offset of the message id in @msgctxid
3019 * This function is a variant of g_dgettext() which supports
3020 * a disambiguating message context. GNU gettext uses the
3021 * '\004' character to separate the message context and
3022 * message id in @msgctxtid.
3023 * If 0 is passed as @msgidoffset, this function will fall back to
3024 * trying to use the deprecated convention of using "|" as a separation
3027 * This uses g_dgettext() internally. See that functions for differences
3028 * with dgettext() proper.
3030 * Applications should normally not use this function directly,
3031 * but use the C_() macro for translations with context.
3033 * Returns: The translated string
3037 G_CONST_RETURN gchar *
3038 g_dpgettext (const gchar *domain,
3039 const gchar *msgctxtid,
3042 const gchar *translation;
3045 translation = g_dgettext (domain, msgctxtid);
3047 if (translation == msgctxtid)
3049 if (msgidoffset > 0)
3050 return msgctxtid + msgidoffset;
3052 sep = strchr (msgctxtid, '|');
3056 /* try with '\004' instead of '|', in case
3057 * xgettext -kQ_:1g was used
3059 gchar *tmp = g_alloca (strlen (msgctxtid) + 1);
3060 strcpy (tmp, msgctxtid);
3061 tmp[sep - msgctxtid] = '\004';
3063 translation = g_dgettext (domain, tmp);
3065 if (translation == tmp)
3073 /* This function is taken from gettext.h
3074 * GNU gettext uses '\004' to separate context and msgid in .mo files.
3078 * @domain: the translation domain to use, or %NULL to use
3079 * the domain set with textdomain()
3080 * @context: the message context
3081 * @msgid: the message
3083 * This function is a variant of g_dgettext() which supports
3084 * a disambiguating message context. GNU gettext uses the
3085 * '\004' character to separate the message context and
3086 * message id in @msgctxtid.
3088 * This uses g_dgettext() internally. See that functions for differences
3089 * with dgettext() proper.
3091 * This function differs from C_() in that it is not a macro and
3092 * thus you may use non-string-literals as context and msgid arguments.
3094 * Returns: The translated string
3098 G_CONST_RETURN char *
3099 g_dpgettext2 (const char *domain,
3100 const char *msgctxt,
3103 size_t msgctxt_len = strlen (msgctxt) + 1;
3104 size_t msgid_len = strlen (msgid) + 1;
3105 const char *translation;
3108 msg_ctxt_id = g_alloca (msgctxt_len + msgid_len);
3110 memcpy (msg_ctxt_id, msgctxt, msgctxt_len - 1);
3111 msg_ctxt_id[msgctxt_len - 1] = '\004';
3112 memcpy (msg_ctxt_id + msgctxt_len, msgid, msgid_len);
3114 translation = g_dgettext (domain, msg_ctxt_id);
3116 if (translation == msg_ctxt_id)
3118 /* try the old way of doing message contexts, too */
3119 msg_ctxt_id[msgctxt_len - 1] = '|';
3120 translation = g_dgettext (domain, msg_ctxt_id);
3122 if (translation == msg_ctxt_id)
3130 _g_dgettext_should_translate (void)
3132 static gsize translate = 0;
3134 SHOULD_TRANSLATE = 1,
3135 SHOULD_NOT_TRANSLATE = 2
3138 if (G_UNLIKELY (g_once_init_enter (&translate)))
3140 gboolean should_translate = TRUE;
3142 const char *default_domain = textdomain (NULL);
3143 const char *translator_comment = gettext ("");
3145 const char *translate_locale = setlocale (LC_MESSAGES, NULL);
3147 const char *translate_locale = g_win32_getlocale ();
3149 /* We should NOT translate only if all the following hold:
3150 * - user has called textdomain() and set textdomain to non-default
3151 * - default domain has no translations
3152 * - locale does not start with "en_" and is not "C"
3155 * - If text domain is still the default domain, maybe user calls
3156 * it later. Continue with old behavior of translating.
3157 * - If locale starts with "en_", we can continue using the
3158 * translations even if the app doesn't have translations for
3159 * this locale. That is, en_UK and en_CA for example.
3160 * - If locale is "C", maybe user calls setlocale(LC_ALL,"") later.
3161 * Continue with old behavior of translating.
3163 if (0 != strcmp (default_domain, "messages") &&
3164 '\0' == *translator_comment &&
3165 0 != strncmp (translate_locale, "en_", 3) &&
3166 0 != strcmp (translate_locale, "C"))
3167 should_translate = FALSE;
3169 g_once_init_leave (&translate,
3172 SHOULD_NOT_TRANSLATE);
3175 return translate == SHOULD_TRANSLATE;
3180 * @domain: the translation domain to use, or %NULL to use
3181 * the domain set with textdomain()
3182 * @msgid: message to translate
3184 * This function is a wrapper of dgettext() which does not translate
3185 * the message if the default domain as set with textdomain() has no
3186 * translations for the current locale.
3188 * The advantage of using this function over dgettext() proper is that
3189 * libraries using this function (like GTK+) will not use translations
3190 * if the application using the library does not have translations for
3191 * the current locale. This results in a consistent English-only
3192 * interface instead of one having partial translations. For this
3193 * feature to work, the call to textdomain() and setlocale() should
3194 * precede any g_dgettext() invocations. For GTK+, it means calling
3195 * textdomain() before gtk_init or its variants.
3197 * This function disables translations if and only if upon its first
3198 * call all the following conditions hold:
3200 * <listitem>@domain is not %NULL</listitem>
3201 * <listitem>textdomain() has been called to set a default text domain</listitem>
3202 * <listitem>there is no translations available for the default text domain
3203 * and the current locale</listitem>
3204 * <listitem>current locale is not "C" or any English locales (those
3205 * starting with "en_")</listitem>
3208 * Note that this behavior may not be desired for example if an application
3209 * has its untranslated messages in a language other than English. In those
3210 * cases the application should call textdomain() after initializing GTK+.
3212 * Applications should normally not use this function directly,
3213 * but use the _() macro for translations.
3215 * Returns: The translated string
3219 G_CONST_RETURN gchar *
3220 g_dgettext (const gchar *domain,
3223 if (domain && G_UNLIKELY (!_g_dgettext_should_translate ()))
3226 return dgettext (domain, msgid);
3231 * @domain: (allow-none): the translation domain to use, or %NULL to use
3232 * the domain set with textdomain()
3233 * @msgid: message to translate
3234 * @category: a locale category
3236 * This is a variant of g_dgettext() that allows specifying a locale
3237 * category instead of always using %LC_MESSAGES. See g_dgettext() for
3238 * more information about how this functions differs from calling
3239 * dcgettext() directly.
3241 * Returns: the translated string for the given locale category
3245 G_CONST_RETURN gchar *
3246 g_dcgettext (const gchar *domain,
3250 if (domain && G_UNLIKELY (!_g_dgettext_should_translate ()))
3253 return dcgettext (domain, msgid, category);
3258 * @domain: the translation domain to use, or %NULL to use
3259 * the domain set with textdomain()
3260 * @msgid: message to translate
3261 * @msgid_plural: plural form of the message
3262 * @n: the quantity for which translation is needed
3264 * This function is a wrapper of dngettext() which does not translate
3265 * the message if the default domain as set with textdomain() has no
3266 * translations for the current locale.
3268 * See g_dgettext() for details of how this differs from dngettext()
3271 * Returns: The translated string
3275 G_CONST_RETURN gchar *
3276 g_dngettext (const gchar *domain,
3278 const gchar *msgid_plural,
3281 if (domain && G_UNLIKELY (!_g_dgettext_should_translate ()))
3282 return n == 1 ? msgid : msgid_plural;
3284 return dngettext (domain, msgid, msgid_plural, n);