tests/tst_nfkc.c

   1 /* tst_nfkc.c   Self tests for stringprep_utf8_nfkc_normalize().
   2  * Copyright (C) 2002, 2003  Simon Josefsson
   3  *
   4  * This file is part of GNU Libidn.
   5  *
   6  * GNU Libidn is free software; you can redistribute it and/or modify
   7  * it under the terms of the GNU General Public License as published by
   8  * the Free Software Foundation; either version 2 of the License, or
   9  * (at your option) any later version.
  10  *
  11  * GNU Libidn is distributed in the hope that it will be useful,
  12  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  13  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  14  * GNU General Public License for more details.
  15  *
  16  * You should have received a copy of the GNU General Public License
  17  * along with GNU Libidn; if not, write to the Free Software
  18  * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
  19  *
  20  */
  21
  22 #if HAVE_CONFIG_H
  23 # include "config.h"
  24 #endif
  25
  26 #include <stdio.h>
  27 #include <stdlib.h>
  28 #include <stdarg.h>
  29 #include <string.h>
  30
  31 #include <stringprep.h>
  32
  33 static int debug = 0;
  34 static int error_count = 0;
  35 static int break_on_error = 0;
  36
  37 static void
  38 fail (const char *format, ...)
  39 {
  40   va_list arg_ptr;
  41
  42   va_start (arg_ptr, format);
  43   vfprintf (stderr, format, arg_ptr);
  44   va_end (arg_ptr);
  45   error_count++;
  46   if (break_on_error)
  47     exit (1);
  48 }
  49
  50 static void
  51 escapeprint (char *str, int len)
  52 {
  53   int i;
  54
  55   printf ("\t ;; `");
  56   for (i = 0; i < len; i++)
  57     {
  58       str[i] = str[i] & 0xFF;
  59       if ((str[i] >= 'A' && str[i] <= 'Z') ||
  60           (str[i] >= 'a' && str[i] <= 'z') ||
  61           (str[i] >= '0' && str[i] <= '9') || str[i] == '.')
  62         printf ("%c", str[i]);
  63       else
  64         printf ("\\x%02x", str[i]);
  65     }
  66   printf ("' (length %d bytes)\n", len);
  67 }
  68
  69 static void
  70 hexprint (char *str, int len)
  71 {
  72   int i;
  73
  74   printf ("\t ;; ");
  75   for (i = 0; i < len; i++)
  76     {
  77       str[i] = str[i] & 0xFF;
  78       printf ("%02x ", str[i]);
  79       if ((i + 1) % 8 == 0)
  80         printf (" ");
  81       if ((i + 1) % 16 == 0 && i + 1 < len)
  82         printf ("\n\t ;; ");
  83     }
  84 }
  85
  86 static void
  87 binprint (char *str, int len)
  88 {
  89   int i;
  90
  91   printf ("\t ;; ");
  92   for (i = 0; i < len; i++)
  93     {
  94       str[i] = str[i] & 0xFF;
  95       printf ("%d%d%d%d%d%d%d%d ",
  96               str[i] & 0x80 ? 1 : 0,
  97               str[i] & 0x40 ? 1 : 0,
  98               str[i] & 0x20 ? 1 : 0,
  99               str[i] & 0x10 ? 1 : 0,
 100               str[i] & 0x08 ? 1 : 0,
 101               str[i] & 0x04 ? 1 : 0,
 102               str[i] & 0x02 ? 1 : 0, str[i] & 0x01 ? 1 : 0);
 103       if ((i + 1) % 3 == 0)
 104         printf (" ");
 105       if ((i + 1) % 6 == 0 && i + 1 < len)
 106         printf ("\n\t ;; ");
 107     }
 108 }
 109
 110 struct nfkc
 111 {
 112   char *in;
 113   char *out;
 114 };
 115
 116 const struct nfkc nfkc[] = {
 117   {"\xC2\xB5", "\xCE\xBC"},
 118   {"\xC2\xAA", "\x61"}
 119 };
 120
 121 int
 122 main (int argc, char *argv[])
 123 {
 124   char *out;
 125   size_t i;
 126
 127   do
 128     if (strcmp (argv[argc - 1], "-v") == 0 ||
 129         strcmp (argv[argc - 1], "--verbose") == 0)
 130       debug = 1;
 131     else if (strcmp (argv[argc - 1], "-b") == 0 ||
 132              strcmp (argv[argc - 1], "--break-on-error") == 0)
 133       break_on_error = 1;
 134     else if (strcmp (argv[argc - 1], "-h") == 0 ||
 135              strcmp (argv[argc - 1], "-?") == 0 ||
 136              strcmp (argv[argc - 1], "--help") == 0)
 137       {
 138         printf ("Usage: %s [-vbh?] [--verbose] [--break-on-error] [--help]\n",
 139                 argv[0]);
 140         return 1;
 141       }
 142   while (argc-- > 1);
 143
 144   for (i = 0; i < sizeof (nfkc) / sizeof (nfkc[0]); i++)
 145     {
 146       if (debug)
 147         printf ("NFKC entry %d\n", i);
 148
 149       out = stringprep_utf8_nfkc_normalize (nfkc[i].in, strlen (nfkc[i].in));
 150       if (out == NULL)
 151         {
 152           fail ("NFKC entry %d failed fatally\n", i);
 153           continue;
 154         }
 155
 156       if (debug)
 157         {
 158           printf ("in:\n");
 159           escapeprint (nfkc[i].in, strlen (nfkc[i].in));
 160           hexprint (nfkc[i].in, strlen (nfkc[i].in));
 161           puts ("");
 162           binprint (nfkc[i].in, strlen (nfkc[i].in));
 163           puts ("");
 164
 165           printf ("out:\n");
 166           escapeprint (out, strlen (out));
 167           hexprint (out, strlen (out));
 168           puts ("");
 169           binprint (out, strlen (out));
 170           puts ("");
 171
 172           printf ("expected out:\n");
 173           escapeprint (nfkc[i].out, strlen (nfkc[i].out));
 174           hexprint (nfkc[i].out, strlen (nfkc[i].out));
 175           puts ("");
 176           binprint (nfkc[i].out, strlen (nfkc[i].out));
 177           puts ("");
 178         }
 179
 180       if (strlen (nfkc[i].out) != strlen (out) ||
 181           memcmp (nfkc[i].out, out, strlen (out)) != 0)
 182         {
 183           fail ("NFKC entry %d failed\n", i);
 184           if (debug)
 185             printf ("ERROR\n");
 186         }
 187       else if (debug)
 188         printf ("OK\n");
 189
 190       free (out);
 191     }
 192
 193   if (debug)
 194     printf ("NFKC self tests done with %d errors\n", error_count);
 195
 196   return error_count ? 1 : 0;
 197 }