1/* Check two strings for equality.
2 Copyright (C) 2018-2022 Free Software Foundation, Inc.
3 This file is part of the GNU C Library.
4
5 The GNU C Library is free software; you can redistribute it and/or
6 modify it under the terms of the GNU Lesser General Public
7 License as published by the Free Software Foundation; either
8 version 2.1 of the License, or (at your option) any later version.
9
10 The GNU C Library is distributed in the hope that it will be useful,
11 but WITHOUT ANY WARRANTY; without even the implied warranty of
12 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
13 Lesser General Public License for more details.
14
15 You should have received a copy of the GNU Lesser General Public
16 License along with the GNU C Library; if not, see
17 <https://www.gnu.org/licenses/>. */
18
19#include <stdio.h>
20#include <stdlib.h>
21#include <string.h>
22#include <wchar.h>
23#include <support/check.h>
24#include <support/support.h>
25#include <support/xmemstream.h>
26
27static void
28report_length (const char *what, const CHAR *str, size_t length)
29{
30 if (str == NULL)
31 printf (" %s string: NULL\n", what);
32 else
33 printf (" %s string: %zu %s\n", what, length,
34 WIDE ? "wide characters" : "bytes");
35}
36
37static void
38report_string (const char *what, const UCHAR *blob,
39 size_t length, const char *expr)
40{
41 if (length > 0)
42 {
43 printf (" %s (evaluated from %s):\n", what, expr);
44 char *quoted = SUPPORT_QUOTE_BLOB (blob, length);
45 printf (" %s\"%s\"\n", LPREFIX, quoted);
46 free (quoted);
47
48 fputs (" ", stdout);
49 for (size_t i = 0; i < length; ++i)
50 printf (" %02X", (unsigned int) blob[i]);
51 putc ('\n', stdout);
52 }
53}
54
55static size_t
56string_length_or_zero (const CHAR *str)
57{
58 if (str == NULL)
59 return 0;
60 else
61 return STRLEN (str);
62}
63
64void
65SUPPORT_TEST_COMPARE_STRING (const CHAR *left, const CHAR *right,
66 const char *file, int line,
67 const char *left_expr, const char *right_expr)
68{
69 /* Two null pointers are accepted. */
70 if (left == NULL && right == NULL)
71 return;
72
73 size_t left_length = string_length_or_zero (left);
74 size_t right_length = string_length_or_zero (right);
75
76 if (left_length != right_length || left == NULL || right == NULL
77 || MEMCMP (left, right, left_length) != 0)
78 {
79 support_record_failure ();
80 printf ("%s:%d: error: string comparison failed\n", file, line);
81 if (left_length == right_length && right != NULL && left != NULL)
82 printf (" string length: %zu %s\n", left_length,
83 WIDE ? "wide characters" : "bytes");
84 else
85 {
86 report_length ("left", left, left_length);
87 report_length ("right", right, right_length);
88 }
89 report_string ("left", (const UCHAR *) left,
90 left_length, left_expr);
91 report_string ("right", (const UCHAR *) right,
92 right_length, right_expr);
93 }
94}
95