summaryrefslogtreecommitdiff
path: root/trunk/tests/testscript.c
diff options
context:
space:
mode:
Diffstat (limited to 'trunk/tests/testscript.c')
-rw-r--r--trunk/tests/testscript.c260
1 files changed, 260 insertions, 0 deletions
diff --git a/trunk/tests/testscript.c b/trunk/tests/testscript.c
new file mode 100644
index 00000000..8e788f71
--- /dev/null
+++ b/trunk/tests/testscript.c
@@ -0,0 +1,260 @@
+/* -*- mode: C; c-file-style: "gnu" -*- */
+/* Pango
+ * testscript.c: Test cases for PangoScriptIter
+ *
+ * Copyright (C) 2002 Red Hat Software
+ *
+ * This library is free software; you can redistribute it and/or
+ * modify it under the terms of the GNU Library General Public
+ * License as published by the Free Software Foundation; either
+ * version 2 of the License, or (at your option) any later version.
+ *
+ * This library is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
+ * Library General Public License for more details.
+ *
+ * You should have received a copy of the GNU Library General Public
+ * License along with this library; if not, write to the
+ * Free Software Foundation, Inc., 59 Temple Place - Suite 330,
+ * Boston, MA 02111-1307, USA.
+ *
+ * The test strings here come from ICU:
+ *
+ * icu/sources/test/cintltst/cucdtst.c
+ *
+ ********************************************************************
+ * COPYRIGHT:
+ * Copyright (c) 1997-2001, International Business Machines Corporation and
+ * others. All Rights Reserved.
+ ********************************************************************
+ *
+ * Permission is hereby granted, free of charge, to any person obtaining a
+ * copy of this software and associated documentation files (the
+ * "Software"), to deal in the Software without restriction, including
+ * without limitation the rights to use, copy, modify, merge, publish,
+ * distribute, and/or sell copies of the Software, and to permit persons
+ * to whom the Software is furnished to do so, provided that the above
+ * copyright notice(s) and this permission notice appear in all copies of
+ * the Software and that both the above copyright notice(s) and this
+ * permission notice appear in supporting documentation.
+ *
+ * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS
+ * OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
+ * MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT
+ * OF THIRD PARTY RIGHTS. IN NO EVENT SHALL THE COPYRIGHT HOLDER OR
+ * HOLDERS INCLUDED IN THIS NOTICE BE LIABLE FOR ANY CLAIM, OR ANY SPECIAL
+ * INDIRECT OR CONSEQUENTIAL DAMAGES, OR ANY DAMAGES WHATSOEVER RESULTING
+ * FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN ACTION OF CONTRACT,
+ * NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF OR IN CONNECTION
+ * WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
+ *
+ * Except as contained in this notice, the name of a copyright holder
+ * shall not be used in advertising or otherwise to promote the sale, use
+ * or other dealings in this Software without prior written authorization
+ * of the copyright holder.
+ */
+
+#include <stdlib.h>
+#include <string.h>
+
+#include "pango/pango-script.h"
+#include "pango/pango-script-table.h"
+
+#undef VERBOSE
+
+#define ASSERT(stmt) G_STMT_START { \
+ if (stmt) { } \
+ else \
+ { \
+ g_warning ("%s:%d (%s): assertion '%s' failed", \
+ __FILE__, __LINE__, G_GNUC_PRETTY_FUNCTION, #stmt); \
+ exit (1); \
+ } \
+} G_STMT_END
+
+typedef struct
+{
+ const char *run_text_escaped;
+ char *run_text;
+ PangoScript run_code;
+} RunTestData;
+
+static gchar *
+unescape (const char *text)
+{
+ gboolean escaped = FALSE;
+ GString *result = g_string_new (NULL);
+ const gchar *p;
+
+ for (p = text; *p; p = g_utf8_next_char (p))
+ {
+ gunichar ch = g_utf8_get_char (p);
+
+ if (escaped)
+ {
+ if (ch == 'u' || ch == 'U')
+ {
+ int n_chars = ch == 'u' ? 4 : 8;
+ int i;
+
+ ch = 0;
+ for (i = 0; i < n_chars; i++)
+ {
+ p++;
+ ch <<= 4;
+ if (*p <= '9' && *p >= '0')
+ ch += *p - '0';
+ else if (*p <= 'F' && *p >= 'A')
+ ch += 10 + *p - 'A';
+ else if (*p <= 'f' && *p >= 'a')
+ ch += 10 + *p - 'a';
+ else
+ g_assert_not_reached ();
+ }
+ }
+ else if (ch == '\\')
+ {
+ ch = '\\';
+ }
+ else
+ {
+ g_assert_not_reached ();
+ }
+
+ escaped = FALSE;
+ }
+ else
+ {
+ if (ch == '\\')
+ {
+ escaped = TRUE;
+ continue;
+ }
+ }
+
+ g_string_append_unichar (result, ch);
+ }
+
+ return g_string_free (result, FALSE);
+}
+
+static void
+test_script_lookup (void)
+{
+ gunichar ch;
+ unsigned int i;
+ int j;
+
+ for (ch = 0; ch < G_N_ELEMENTS (pango_script_easy_table); ch++)
+ ASSERT (pango_script_for_unichar (ch) == pango_script_easy_table[ch]);
+
+ for (i = 0; i < G_N_ELEMENTS (pango_script_table); i++)
+ {
+ while (ch < pango_script_table[i].start)
+ {
+ ASSERT (pango_script_for_unichar (ch) == PANGO_SCRIPT_UNKNOWN);
+ ch++;
+ }
+
+ for (j = 0; j < pango_script_table[i].chars; j++)
+ {
+ ASSERT (pango_script_for_unichar (ch) == pango_script_table[i].script);
+ ch++;
+ }
+ }
+
+ ASSERT (pango_script_for_unichar (ch) == PANGO_SCRIPT_UNKNOWN);
+}
+
+static void
+test_script_iter (void)
+{
+ static RunTestData test_data[] = {
+ { "\\u0020\\u0946\\u0939\\u093F\\u0928\\u094D\\u0926\\u0940\\u0020", NULL, PANGO_SCRIPT_DEVANAGARI },
+ { "\\u0627\\u0644\\u0639\\u0631\\u0628\\u064A\\u0629\\u0020", NULL, PANGO_SCRIPT_ARABIC },
+ { "\\u0420\\u0443\\u0441\\u0441\\u043A\\u0438\\u0439\\u0020", NULL, PANGO_SCRIPT_CYRILLIC },
+ { "English (", NULL, PANGO_SCRIPT_LATIN },
+ { "\\u0E44\\u0E17\\u0E22", NULL, PANGO_SCRIPT_THAI },
+ { ") ", NULL, PANGO_SCRIPT_LATIN },
+ { "\\u6F22\\u5B75", NULL, PANGO_SCRIPT_HAN },
+ { "\\u3068\\u3072\\u3089\\u304C\\u306A\\u3068", NULL, PANGO_SCRIPT_HIRAGANA },
+ { "\\u30AB\\u30BF\\u30AB\\u30CA", NULL, PANGO_SCRIPT_KATAKANA },
+ { "\\U00010400\\U00010401\\U00010402\\U00010403", NULL, PANGO_SCRIPT_DESERET }
+ };
+
+ PangoScriptIter *iter;
+ GString *all = g_string_new (FALSE);
+ char *pos;
+ const char *start;
+ const char *end;
+ PangoScript script;
+ unsigned int i;
+
+ for (i = 0; i < G_N_ELEMENTS(test_data); i++)
+ {
+ test_data[i].run_text = unescape (test_data[i].run_text_escaped);
+ g_string_append (all, test_data[i].run_text);
+ }
+
+ iter = pango_script_iter_new (all->str, -1);
+
+#ifdef VERBOSE
+ g_print ("Total length: %d\n", all->len);
+#endif
+
+ pos = all->str;
+ for (i = 0; i < G_N_ELEMENTS(test_data); i++)
+ {
+ char *next_pos = pos + strlen (test_data[i].run_text);
+ gboolean result;
+
+ pango_script_iter_get_range (iter, &start, &end, &script);
+#ifdef VERBOSE
+ g_print ("Range: %d-%d: %d\n", start - all->str, end - all->str, script);
+#endif
+
+ ASSERT (start == pos);
+ ASSERT (end == next_pos);
+ ASSERT (script == test_data[i].run_code);
+
+ result = pango_script_iter_next (iter);
+ ASSERT (result == (i != G_N_ELEMENTS (test_data) - 1));
+
+ pos = next_pos;
+ }
+
+ pango_script_iter_free (iter);
+
+ /*
+ * Test an empty string.
+ */
+ iter = pango_script_iter_new (all->str, 0);
+
+ pango_script_iter_get_range (iter, &start, &end, &script);
+
+ ASSERT (start == all->str);
+ ASSERT (end == all->str);
+ ASSERT (script == PANGO_SCRIPT_COMMON);
+ ASSERT (!pango_script_iter_next (iter));
+
+ pango_script_iter_free (iter);
+
+ /* Cleanup */
+
+ for (i = 0; i < G_N_ELEMENTS (test_data); i++)
+ g_free (test_data[i].run_text);
+
+ g_string_free (all, TRUE);
+}
+
+int
+main (int argc, char **argv)
+{
+ g_setenv ("PANGO_RC_FILE", "./pangorc", TRUE);
+
+ test_script_lookup ();
+ test_script_iter ();
+
+ return 0;
+}
View Lorry Controller Status