3 // Utility subroutines for the C++ library testsuite.
5 // Copyright (C) 2002, 2003, 2004, 2005 Free Software Foundation, Inc.
7 // This file is part of the GNU ISO C++ Library. This library is free
8 // software; you can redistribute it and/or modify it under the
9 // terms of the GNU General Public License as published by the
10 // Free Software Foundation; either version 2, or (at your option)
13 // This library is distributed in the hope that it will be useful,
14 // but WITHOUT ANY WARRANTY; without even the implied warranty of
15 // MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
16 // GNU General Public License for more details.
18 // You should have received a copy of the GNU General Public License along
19 // with this library; see the file COPYING. If not, write to the Free
20 // Software Foundation, 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301,
23 // As a special exception, you may use this file as part of a free software
24 // library without restriction. Specifically, if other files instantiate
25 // templates or use macros or inline functions from this file, or you compile
26 // this file and link it with other files to produce an executable, this
27 // file does not by itself cause the resulting executable to be covered by
28 // the GNU General Public License. This exception does not however
29 // invalidate any other reasons why the executable file might be covered by
30 // the GNU General Public License.
32 #include <testsuite_hooks.h>
34 #ifdef _GLIBCXX_RES_LIMITS
37 #include <sys/resource.h>
46 // If we have <sys/types.h>, <sys/ipc.h>, and <sys/sem.h>, then assume
47 // that System V semaphores are available.
48 #if defined(_GLIBCXX_HAVE_SYS_TYPES_H) \
49 && defined(_GLIBCXX_HAVE_SYS_IPC_H) \
50 && defined(_GLIBCXX_HAVE_SYS_SEM_H)
51 #define _GLIBCXX_SYSV_SEM
54 #ifdef _GLIBCXX_SYSV_SEM
55 #include <sys/types.h>
62 #ifdef _GLIBCXX_RES_LIMITS
64 set_memory_limits(float size
)
67 // Cater to the absence of rlim_t.
68 __typeof__ (r
.rlim_cur
) limit
= (__typeof__ (r
.rlim_cur
))(size
* 1048576);
70 // Heap size, seems to be common.
71 #if _GLIBCXX_HAVE_LIMIT_DATA
72 getrlimit(RLIMIT_DATA
, &r
);
74 setrlimit(RLIMIT_DATA
, &r
);
78 #if _GLIBCXX_HAVE_LIMIT_RSS
79 getrlimit(RLIMIT_RSS
, &r
);
81 setrlimit(RLIMIT_RSS
, &r
);
84 // Mapped memory (brk + mmap).
85 #if _GLIBCXX_HAVE_LIMIT_VMEM
86 getrlimit(RLIMIT_VMEM
, &r
);
88 setrlimit(RLIMIT_VMEM
, &r
);
92 // On HP-UX 11.23, a trivial C++ program that sets RLIMIT_AS to
93 // anything less than 128MB cannot "malloc" even 1K of memory.
94 // Therefore, we skip RLIMIT_AS on HP-UX.
95 #if _GLIBCXX_HAVE_LIMIT_AS && !defined(__hpux__)
96 getrlimit(RLIMIT_AS
, &r
);
98 setrlimit(RLIMIT_AS
, &r
);
104 set_memory_limits(float) { }
107 #ifdef _GLIBCXX_RES_LIMITS
109 set_file_limit(unsigned long size
)
111 #if _GLIBCXX_HAVE_LIMIT_FSIZE
113 // Cater to the absence of rlim_t.
114 __typeof__ (r
.rlim_cur
) limit
= (__typeof__ (r
.rlim_cur
))(size
);
116 getrlimit(RLIMIT_FSIZE
, &r
);
118 setrlimit(RLIMIT_FSIZE
, &r
);
124 set_file_limit(unsigned long) { }
128 verify_demangle(const char* mangled
, const char* wanted
)
131 const char* s
= abi::__cxa_demangle(mangled
, 0, 0, &status
);
137 s
= "error code = 0: success";
140 s
= "error code = -1: memory allocation failure";
143 s
= "error code = -2: invalid mangled name";
146 s
= "error code = -3: invalid arguments";
149 s
= "error code unknown - who knows what happened";
153 std::string
w(wanted
);
155 std::__throw_runtime_error(s
);
159 run_tests_wrapped_locale(const char* name
, const func_callback
& l
)
164 // Set the global locale.
165 locale loc_name
= locale(name
);
166 locale orig
= locale::global(loc_name
);
168 const char* res
= setlocale(LC_ALL
, name
);
171 string preLC_ALL
= res
;
172 const func_callback::test_type
* tests
= l
.tests();
173 for (int i
= 0; i
< l
.size(); ++i
)
175 string postLC_ALL
= setlocale(LC_ALL
, NULL
);
176 VERIFY( preLC_ALL
== postLC_ALL
);
180 string
s("LC_ALL for ");
182 __throw_runtime_error(s
.c_str());
187 run_tests_wrapped_env(const char* name
, const char* env
,
188 const func_callback
& l
)
193 #ifdef _GLIBCXX_HAVE_SETENV
194 // Set the global locale.
195 locale loc_name
= locale(name
);
196 locale orig
= locale::global(loc_name
);
198 // Set environment variable env to value in name.
199 const char* oldENV
= getenv(env
);
200 if (!setenv(env
, name
, 1))
202 const func_callback::test_type
* tests
= l
.tests();
203 for (int i
= 0; i
< l
.size(); ++i
)
205 setenv(env
, oldENV
? oldENV
: "", 1);
212 __throw_runtime_error(s
.c_str());
217 counter::size_type
counter::count
= 0;
218 unsigned int copy_constructor::count_
= 0;
219 unsigned int copy_constructor::throw_on_
= 0;
220 unsigned int assignment_operator::count_
= 0;
221 unsigned int assignment_operator::throw_on_
= 0;
222 unsigned int destructor::_M_count
= 0;
223 int copy_tracker::next_id_
= 0;
225 #ifdef _GLIBCXX_SYSV_SEM
226 // This union is not declared in system headers. Instead, it must
227 // be defined by user programs.
231 struct semid_ds
*buf
;
232 unsigned short *array
;
236 semaphore::semaphore()
238 #ifdef _GLIBCXX_SYSV_SEM
239 // Remeber the PID for the process that created the semaphore set
240 // so that only one process will destroy the set.
243 // GLIBC does not define SEM_R and SEM_A.
252 // Get a semaphore set with one semaphore.
253 sem_set_
= semget(IPC_PRIVATE
, 1, SEM_R
| SEM_A
);
255 std::__throw_runtime_error("could not obtain semaphore set");
257 // Initialize the semaphore.
260 if (semctl(sem_set_
, 0, SETVAL
, val
) == -1)
261 std::__throw_runtime_error("could not initialize semaphore");
263 // There are no semaphores on this system. We have no way to mark
264 // a test as "unsupported" at runtime, so we just exit, pretending
265 // that the test passed.
270 semaphore::~semaphore()
272 #ifdef _GLIBCXX_SYSV_SEM
274 // Destroy the semaphore set only in the process that created it.
275 if (pid_
== getpid())
276 semctl(sem_set_
, 0, IPC_RMID
, val
);
283 #ifdef _GLIBCXX_SYSV_SEM
284 struct sembuf op
[1] =
288 if (semop(sem_set_
, op
, 1) == -1)
289 std::__throw_runtime_error("could not signal semaphore");
296 #ifdef _GLIBCXX_SYSV_SEM
297 struct sembuf op
[1] =
301 if (semop(sem_set_
, op
, 1) == -1)
302 std::__throw_runtime_error("could not wait for semaphore");
305 }; // namespace __gnu_test