* manual/socket.texi: Document MTASC-safety properties.
[jlayton/glibc.git] / intl / tst-gettext6.c
1 /* Test that gettext() in multithreaded applications works correctly.
2    Copyright (C) 2008-2014 Free Software Foundation, Inc.
3    This file is part of the GNU C Library.
4    Contributed by Jakub Jelinek <jakub@redhat.com>, 2008.
5
6    The GNU C Library is free software; you can redistribute it and/or
7    modify it under the terms of the GNU Lesser General Public
8    License as published by the Free Software Foundation; either
9    version 2.1 of the License, or (at your option) any later version.
10
11    The GNU C Library 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 GNU
14    Lesser General Public License for more details.
15
16    You should have received a copy of the GNU Lesser General Public
17    License along with the GNU C Library; if not, see
18    <http://www.gnu.org/licenses/>.  */
19
20 #include <libintl.h>
21 #include <locale.h>
22 #include <pthread.h>
23 #include <stdio.h>
24 #include <stdlib.h>
25 #include <sys/wait.h>
26 #include <unistd.h>
27
28 pthread_barrier_t b;
29
30 static void *
31 tf (void *arg)
32 {
33   pthread_barrier_wait (&b);
34   return gettext ("Operation not permitted");
35 }
36
37 int
38 test (void)
39 {
40   pthread_t th[4];
41   unsetenv ("LANGUAGE");
42   unsetenv ("OUTPUT_CHARSET");
43   textdomain ("tstgettext6");
44   bindtextdomain ("tstgettext6", OBJPFX "domaindir");
45   setlocale (LC_ALL, "ja_JP.UTF-8");
46   pthread_barrier_init (&b, NULL, 4);
47   for (int i = 0; i < 4; i++)
48     if (pthread_create (&th[i], NULL, tf, NULL))
49       {
50         puts ("pthread_create failed");
51         return 1;
52       }
53   for (int i = 0; i < 4; i++)
54     pthread_join (th[i], NULL);
55   return 0;
56 }
57
58 int
59 main (void)
60 {
61   for (int i = 0; i < 300; i++)
62     {
63       pid_t p = fork ();
64       if (p == -1)
65         {
66           printf ("fork failed: %m\n");
67           return 1;
68         }
69       if (p == 0)
70         _exit (test ());
71       int status;
72       wait (&status);
73       if (WIFEXITED (status) && WEXITSTATUS (status) != 0)
74         {
75           printf ("child exited with %d\n", WEXITSTATUS (status));
76           return 1;
77         }
78       else if (WIFSIGNALED (status))
79         {
80           printf ("child killed by signal %d\n", WTERMSIG (status));
81           return 1;
82         }
83     }
84   return 0;
85 }