New module 'unictype/combining-class-longname'.

* lib/unictype.in.h (uc_combining_class_long_name): New declaration.
* lib/unictype/combiningclass_longname.c: New file.
* modules/unictype/combining-class-longname: New file.

diff --git a/ChangeLog b/ChangeLog
index 388980a..ff4759b 100644 (file)
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,5 +1,10 @@
 2011-03-25  Bruno Haible  <bruno@clisp.org>
 
+       New module 'unictype/combining-class-longname'.
+       * lib/unictype.in.h (uc_combining_class_long_name): New declaration.
+       * lib/unictype/combiningclass_longname.c: New file.
+       * modules/unictype/combining-class-longname: New file.
+
        Tests for module 'unictype/combining-class-name'.
        * modules/unictype/combining-class-name-tests: New file.
        * tests/unictype/test-combiningclass_name.c: New file.

diff --git a/lib/unictype.in.h b/lib/unictype.in.h
index f70d8b2..293e18f 100644 (file)
--- a/lib/unictype.in.h
+++ b/lib/unictype.in.h
@@ -268,6 +268,10 @@ extern int
 extern const char *
        uc_combining_class_name (int ccc);
 
+/* Return the long name of a canonical combining class.  */
+extern const char *
+       uc_combining_class_long_name (int ccc);
+
 /* ========================================================================= */
 
 /* Field 4 of Unicode Character Database: Bidi class.

diff --git a/lib/unictype/combiningclass_longname.c b/lib/unictype/combiningclass_longname.c
new file mode 100644 (file)
index 0000000..d328279
--- /dev/null
+++ b/lib/unictype/combiningclass_longname.c
@@ -0,0 +1,130 @@
+/* Canonical combining classes of Unicode characters.
+   Copyright (C) 2002, 2006-2007, 2011 Free Software Foundation, Inc.
+   Written by Bruno Haible <bruno@clisp.org>, 2011.
+
+   This program is free software: you can redistribute it and/or modify it
+   under the terms of the GNU Lesser General Public License as published
+   by the Free Software Foundation; either version 3 of the License, or
+   (at your option) any later version.
+
+   This program 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
+   Lesser General Public License for more details.
+
+   You should have received a copy of the GNU Lesser General Public License
+   along with this program.  If not, see <http://www.gnu.org/licenses/>.  */
+
+#include <config.h>
+
+/* Specification.  */
+#include "unictype.h"
+
+#include <stdlib.h>
+
+static const signed char u_combining_class_index_part1[10] =
+{
+   0, /* Not Reordered */
+   1, /* Overlay */
+  -1,
+  -1,
+  -1,
+  -1,
+  -1,
+   2, /* Nukta */
+   3, /* Kana Voicing */
+   4  /* Virama */
+};
+static const signed char u_combining_class_index_part2[241 - 200] =
+{
+   5, /* Attached Below Left */
+  -1,
+   6, /* Attached Below */
+  -1,
+  -1,
+  -1,
+  -1,
+  -1,
+  -1,
+  -1,
+  -1,
+  -1,
+  -1,
+  -1,
+   7, /* Attached Above */
+  -1,
+   8, /* Attached Above Right */
+  -1,
+   9, /* Below Left */
+  -1,
+  10, /* Below */
+  -1,
+  11, /* Below Right */
+  -1,
+  12, /* Left */
+  -1,
+  13, /* Right */
+  -1,
+  14, /* Above Left */
+  -1,
+  15, /* Above */
+  -1,
+  16, /* Above Right */
+  17, /* Double Below */
+  18, /* Double Above */
+  -1,
+  -1,
+  -1,
+  -1,
+  -1,
+  19  /* Iota Subscript */
+};
+
+static const char u_combining_class_long_name[20][21] =
+{
+  "Not Reordered",
+  "Overlay",
+  "Nukta",
+  "Kana Voicing",
+  "Virama",
+  "Attached Below Left",
+  "Attached Below",
+  "Attached Above",
+  "Attached Above Right",
+  "Below Left",
+  "Below",
+  "Below Right",
+  "Left",
+  "Right",
+  "Above Left",
+  "Above",
+  "Above Right",
+  "Double Below",
+  "Double Above",
+  "Iota Subscript"
+};
+
+const char *
+uc_combining_class_long_name (int ccc)
+{
+  if (ccc >= 0)
+    {
+      int index;
+
+      if (ccc < 10)
+        index = u_combining_class_index_part1[ccc];
+      else if (ccc >= 200 && ccc < 241)
+        index = u_combining_class_index_part2[ccc - 200];
+      else
+        return NULL;
+
+      if (index >= 0)
+        {
+          if (index < sizeof (u_combining_class_long_name) / sizeof (u_combining_class_long_name[0]))
+            return u_combining_class_long_name[index];
+          else
+            abort ();
+        }
+    }
+  return NULL;
+}

diff --git a/modules/unictype/combining-class-longname b/modules/unictype/combining-class-longname
new file mode 100644 (file)
index 0000000..5f76eba
--- /dev/null
+++ b/modules/unictype/combining-class-longname
@@ -0,0 +1,25 @@
+Description:
+Name of Unicode character canonical combining class.
+
+Files:
+lib/unictype/combiningclass_longname.c
+
+Depends-on:
+unictype/base
+
+configure.ac:
+gl_LIBUNISTRING_MODULE([0.9.4], [unictype/combining-class-longname])
+
+Makefile.am:
+if LIBUNISTRING_COMPILE_UNICTYPE_COMBINING_CLASS_LONGNAME
+lib_SOURCES += unictype/combiningclass_longname.c
+endif
+
+Include:
+"unictype.h"
+
+License:
+LGPL
+
+Maintainer:
+Bruno Haible