1/* Test program for mtrace.
2 Copyright (C) 2000-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 <mcheck.h>
20#include <paths.h>
21#include <search.h>
22#include <stdio.h>
23#include <stdlib.h>
24#include <string.h>
25
26
27static void print (const void *node, VISIT value, int level);
28
29/* Used for several purposes. */
30static FILE *fp;
31
32
33static int
34do_test (void)
35{
36 void *root = NULL;
37 size_t linelen = 0;
38 char *line = NULL;
39
40 /* Enable memory usage tracing. */
41 mtrace ();
42
43 /* Perform some operations which definitely will allocate some
44 memory. */
45 fp = fopen (__FILE__, "r");
46 if (fp == NULL)
47 /* Shouldn't happen since this program is executed in the source
48 directory. */
49 abort ();
50
51 while (!feof (stream: fp))
52 {
53 char **p;
54 char *copy;
55 ssize_t n = getline (lineptr: &line, n: &linelen, stream: fp);
56
57 if (n < 0)
58 break;
59
60 if (n == 0)
61 continue;
62
63 copy = strdup (s: line);
64 if (copy == NULL)
65 abort ();
66
67 p = (char **) tsearch (key: copy, rootp: &root,
68 compar: (int (*)(const void *, const void *))strcmp);
69 if (*p != copy)
70 /* This line wasn't added. */
71 free (ptr: copy);
72 }
73
74 fclose (fp);
75
76 fp = fopen (_PATH_DEVNULL, "w");
77 if (fp != NULL)
78 {
79 /* Write something through stdout. */
80 twalk (root: root, action: print);
81
82 fclose (fp);
83 }
84
85 /* Free everything. */
86 tdestroy (root: root, freefct: free);
87
88 /* Also the line buffer. */
89 free (ptr: line);
90
91 /* That's it. */
92 return 0;
93}
94
95
96static void
97print (const void *node, VISIT value, int level)
98{
99 static int cnt;
100 if (value == postorder || value == leaf)
101 fprintf (fp, "%3d: %s", ++cnt, *(const char **) node);
102}
103
104#define TEST_FUNCTION do_test ()
105#include "../test-skeleton.c"
106

source code of glibc/malloc/tst-mtrace.c