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/.
34 gboolean failed = FALSE;
36 #define TEST(m,cond) G_STMT_START { failed = !(cond); \
39 g_print ("\n(%s:%d) failed for: %s\n", __FILE__, __LINE__, ( # cond )); \
41 g_print ("\n(%s:%d) failed for: %s: (%s)\n", __FILE__, __LINE__, ( # cond ), (gchar*)m); \
44 g_print ("."); fflush (stdout); \
47 #define C2P(c) ((gpointer) ((long) (c)))
48 #define P2C(p) ((gchar) ((long) (p)))
50 #define GLIB_TEST_STRING "el dorado "
51 #define GLIB_TEST_STRING_5 "el do"
63 gchar *vec[] = { "Foo", "Bar", NULL };
66 g_assert (g_strcasecmp ("FroboZZ", "frobozz") == 0);
67 g_assert (g_strcasecmp ("frobozz", "frobozz") == 0);
68 g_assert (g_strcasecmp ("frobozz", "FROBOZZ") == 0);
69 g_assert (g_strcasecmp ("FROBOZZ", "froboz") != 0);
70 g_assert (g_strcasecmp ("", "") == 0);
71 g_assert (g_strcasecmp ("!#%&/()", "!#%&/()") == 0);
72 g_assert (g_strcasecmp ("a", "b") < 0);
73 g_assert (g_strcasecmp ("a", "B") < 0);
74 g_assert (g_strcasecmp ("A", "b") < 0);
75 g_assert (g_strcasecmp ("A", "B") < 0);
76 g_assert (g_strcasecmp ("b", "a") > 0);
77 g_assert (g_strcasecmp ("b", "A") > 0);
78 g_assert (g_strcasecmp ("B", "a") > 0);
79 g_assert (g_strcasecmp ("B", "A") > 0);
81 g_assert(g_strdup(NULL) == NULL);
82 string = g_strdup(GLIB_TEST_STRING);
83 g_assert(string != NULL);
84 g_assert(strcmp(string, GLIB_TEST_STRING) == 0);
87 string = g_strconcat(GLIB_TEST_STRING, NULL);
88 g_assert(string != NULL);
89 g_assert(strcmp(string, GLIB_TEST_STRING) == 0);
92 string = g_strconcat(GLIB_TEST_STRING, GLIB_TEST_STRING,
93 GLIB_TEST_STRING, NULL);
94 g_assert(string != NULL);
95 g_assert(strcmp(string, GLIB_TEST_STRING GLIB_TEST_STRING
96 GLIB_TEST_STRING) == 0);
99 string = g_strdup_printf ("%05d %-5s", 21, "test");
100 g_assert (string != NULL);
101 g_assert (strcmp(string, "00021 test ") == 0);
105 (g_strcompress("abc\\\\\\\"\\b\\f\\n\\r\\t\\003\\177\\234\\313\\12345z"),
106 "abc\\\"\b\f\n\r\t\003\177\234\313\12345z") == 0);
107 g_assert (strcmp(g_strescape("abc\\\"\b\f\n\r\t\003\177\234\313",
109 "abc\\\\\\\"\\b\\f\\n\\r\\t\\003\\177\\234\\313") == 0);
110 g_assert (strcmp(g_strescape("abc\\\"\b\f\n\r\t\003\177\234\313",
111 "\b\f\001\002\003\004"),
112 "abc\\\\\\\"\b\f\\n\\r\\t\003\\177\\234\\313") == 0);
114 copy = g_strdupv (vec);
115 g_assert (strcmp (copy[0], "Foo") == 0);
116 g_assert (strcmp (copy[1], "Bar") == 0);
117 g_assert (copy[2] == NULL);
120 g_assert (strcmp (g_strstr_len ("FooBarFooBarFoo", 6, "Bar"),
121 "BarFooBarFoo") == 0);
122 g_assert (strcmp (g_strrstr ("FooBarFooBarFoo", "Bar"),
124 g_assert (strcmp (g_strrstr_len ("FooBarFooBarFoo", 14, "BarFoo"),
125 "BarFooBarFoo") == 0);