binutils-gdb/gold/testsuite/tls_test_main.cc

174 lines
4.1 KiB
C++
Raw Normal View History

2007-10-07 19:10:10 +02:00
// tls_test.cc -- test TLS variables for gold, main function
// Copyright (C) 2006-2015 Free Software Foundation, Inc.
2007-10-07 19:10:10 +02:00
// Written by Ian Lance Taylor <iant@google.com>.
// This file is part of gold.
// This program is free software; you can redistribute it and/or modify
// it under the terms of the GNU General Public License as published by
// the Free Software Foundation; either version 3 of the License, or
// (at your option) any later version.
// This program is distributed in the hope that it will be useful,
// but WITHOUT ANY WARRANTY; without even the implied warranty of
// MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
// GNU General Public License for more details.
// You should have received a copy of the GNU General Public License
// along with this program; if not, write to the Free Software
// Foundation, Inc., 51 Franklin Street - Fifth Floor, Boston,
// MA 02110-1301, USA.
// This is the main function for the TLS test. See tls_test.cc for
// more information.
#include <cassert>
2007-10-08 09:24:21 +02:00
#include <cstdio>
2007-10-07 19:10:10 +02:00
#include <pthread.h>
#include <semaphore.h>
2007-10-07 19:10:10 +02:00
#include "tls_test.h"
// We make these macros so the assert() will give useful line-numbers.
#define safe_lock(semptr) \
do \
{ \
int err = sem_wait(semptr); \
assert(err == 0); \
} \
while (0)
#define safe_unlock(semptr) \
do \
{ \
int err = sem_post(semptr); \
assert(err == 0); \
} \
while (0)
struct Sem_set
2007-10-07 19:10:10 +02:00
{
sem_t sem1;
sem_t sem2;
sem_t sem3;
2007-10-07 19:10:10 +02:00
};
Sem_set sems1;
Sem_set sems2;
2007-10-07 19:10:10 +02:00
2007-10-08 09:24:21 +02:00
bool failed = false;
void
check(const char* name, bool val)
{
if (!val)
{
fprintf(stderr, "Test %s failed\n", name);
failed = true;
}
}
// The body of the thread function. This acquires the first
// semaphore, runs the tests, and then releases the second semaphore.
// Then it acquires the third semaphore, and the runs the verification
// test again.
2007-10-07 19:10:10 +02:00
void*
thread_routine(void* arg)
{
Sem_set* pms = static_cast<Sem_set*>(arg);
2007-10-07 19:10:10 +02:00
// Acquire the first semaphore.
if (pms)
safe_lock(&pms->sem1);
2007-10-07 19:10:10 +02:00
// Run the tests.
2007-10-08 09:24:21 +02:00
check("t1", t1());
check("t2", t2());
check("t3", t3());
check("t4", t4());
2007-10-07 19:10:10 +02:00
f5b(f5a());
2007-10-08 09:24:21 +02:00
check("t5", t5());
2007-10-07 19:10:10 +02:00
f6b(f6a());
2007-10-08 09:24:21 +02:00
check("t6", t6());
check("t8", t8());
check("t9", t9());
f10b(f10a());
check("t10", t10());
* common.cc (Symbol_table::allocate_commons): Remove options parameter. Change caller. (Symbol_table::do_allocate_commons): Remove options parameter. Change caller. Just call do_allocate_commons_list twice. (Symbol_table::do_allocate_commons_list): New function, broken out of do_allocate_commons. * common.h (class Allocate_commons_task): Remove options_ field. Update constructor. * symtab.cc (Symbol_table::Symbol_table): Initialize tls_commons_. (Symbol_table::add_from_object): Put TLS common symbols on tls_commons_ list. (Symbol_table::sized_finalize_symbol): Handle STT_TLS symbols which are IN_OUTPUT_DATA. * symtab.h (class Symbol_table): Add tls_commons_ field. Update allocate_commons and do_allocate_commons declarations. Declare do_allocate_commons_list. * gold.cc (queue_middle_tasks): Update creation of Allocate_commons_task to not pass options. * testsuite/Makefile.am (INCLUDES): Add -I.. . (TLS_TEST_C_FLAGS): New variable. (tls_test_c_pic.o): New target. (tls_test_shared.so): Link in tls_test_c_pic.o. (tls_test_c_pic_ie.o): New target. (tls_test_ie_shared.so): Link in tls_test_c_pic_ie.o. (tls_test_DEPENDENCIES, tls_test_LDADD): Add tls_test_c.o. (tls_test_c.o): New target. (tls_pic_test_DEPENDENCIES): Add tls_test_c_pic.o. (tls_pic_test_LDADD): Likewise. (tls_shared_gd_to_ie_test_DEPENDENCIES): Add tls_test_c_pic.o. (tls_shared_gd_to_ie_test_LDADD): Likewise. (tls_test_c_gnu2.o): New target. (tls_shared_gnu2_gd_to_ie_test_DEPENDENCIES): Add tls_test_c_gnu2.o. (tls_shared_gnu2_gd_to_ie_test_LDADD): Likewise. (tls_test_gnu2_shared.so): Link in tls_test_c_gnu2.o. (tls_test_shared_nonpic.so): Link in tls_test_c.o. * testsuite/tls_test.cc: Include "config.h". (t_last): Call t11_last. * testsuite/tls_test.h (t11, t11_last): Declare. * testsuite/tls_test_c.c: New file. * testsuite/tls_test_main.cc (thread_routine): Call t11. * configure.ac: Check for OpenMP support. * configure, config.in, Makefile.in: Rebuild. * testsuite/Makefile.in: Rebuild.
2008-04-17 09:12:00 +02:00
check("t11", t11() != 0);
check("t12", t12());
check("t_last", t_last());
2007-10-07 19:10:10 +02:00
// Release the second semaphore.
if (pms)
safe_unlock(&pms->sem2);
2007-10-07 19:10:10 +02:00
// Acquire the third semaphore.
if (pms)
safe_lock(&pms->sem3);
2007-10-07 19:10:10 +02:00
check("t_last", t_last());
2007-10-07 19:10:10 +02:00
return 0;
}
// The main function.
int
main()
{
// First, as a sanity check, run through the tests in the "main" thread.
thread_routine(0);
// Set up the semaphores. We want the first thread to start right
2007-10-07 19:10:10 +02:00
// away, tell us when it is done with the first part, and wait for
// us to release it. We want the second thread to wait to start,
// tell us when it is done with the first part, and wait for us to
// release it.
sem_init(&sems1.sem1, 0, 1);
sem_init(&sems1.sem2, 0, 0);
sem_init(&sems1.sem3, 0, 0);
2007-10-07 19:10:10 +02:00
sem_init(&sems2.sem1, 0, 0);
sem_init(&sems2.sem2, 0, 0);
sem_init(&sems2.sem3, 0, 0);
2007-10-07 19:10:10 +02:00
pthread_t thread1;
int err = pthread_create(&thread1, NULL, thread_routine, &sems1);
2007-10-07 19:10:10 +02:00
assert(err == 0);
pthread_t thread2;
err = pthread_create(&thread2, NULL, thread_routine, &sems2);
2007-10-07 19:10:10 +02:00
assert(err == 0);
// Wait for the first thread to complete the first part.
safe_lock(&sems1.sem2);
2007-10-07 19:10:10 +02:00
// Tell the second thread to start.
safe_unlock(&sems2.sem1);
2007-10-07 19:10:10 +02:00
// Wait for the second thread to complete the first part.
safe_lock(&sems2.sem2);
2007-10-07 19:10:10 +02:00
// Tell the first thread to continue and finish.
safe_unlock(&sems1.sem3);
2007-10-07 19:10:10 +02:00
// Wait for the first thread to finish.
void* thread_val;
err = pthread_join(thread1, &thread_val);
assert(err == 0);
assert(thread_val == 0);
// Tell the second thread to continue and finish.
safe_unlock(&sems2.sem3);
2007-10-07 19:10:10 +02:00
// Wait for the second thread to finish.
err = pthread_join(thread2, &thread_val);
assert(err == 0);
assert(thread_val == 0);
// All done.
2007-10-08 09:24:21 +02:00
return failed ? 1 : 0;
2007-10-07 19:10:10 +02:00
}