David Joseph
14 years ago
parent
489bbc058b
commit
480db1321c
@ -0,0 +1,145 @@
|
||||
/*
|
||||
* Copyright 2011 Samy Al Bahra.
|
||||
* Copyright 2011 David Joseph.
|
||||
* All rights reserved.
|
||||
*
|
||||
* Redistribution and use in source and binary forms, with or without
|
||||
* modification, are permitted provided that the following conditions
|
||||
* are met:
|
||||
* 1. Redistributions of source code must retain the above copyright
|
||||
* notice, this list of conditions and the following disclaimer.
|
||||
* 2. Redistributions in binary form must reproduce the above copyright
|
||||
* notice, this list of conditions and the following disclaimer in the
|
||||
* documentation and/or other materials provided with the distribution.
|
||||
*
|
||||
* THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND
|
||||
* ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
|
||||
* IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
|
||||
* ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
|
||||
* FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
|
||||
* DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
|
||||
* OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
|
||||
* HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
|
||||
* LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
|
||||
* OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
|
||||
* SUCH DAMAGE.
|
||||
*/
|
||||
|
||||
#include <errno.h>
|
||||
#include <inttypes.h>
|
||||
#include <pthread.h>
|
||||
#include <math.h>
|
||||
#include <stdint.h>
|
||||
#include <stdio.h>
|
||||
#include <stdlib.h>
|
||||
#include <strings.h>
|
||||
#include <unistd.h>
|
||||
#include <sys/time.h>
|
||||
|
||||
#include <ck_pr.h>
|
||||
#include <ck_barrier.h>
|
||||
|
||||
#include "../../common.h"
|
||||
|
||||
#ifndef ITERATE
|
||||
#define ITERATE 5000000
|
||||
#endif
|
||||
|
||||
#ifndef ENTRIES
|
||||
#define ENTRIES 512
|
||||
#endif
|
||||
|
||||
static struct affinity a;
|
||||
static int nthr;
|
||||
static int tid;
|
||||
static int counters[ENTRIES];
|
||||
static int barrier_wait;
|
||||
|
||||
static void *
|
||||
thread(void *allflags)
|
||||
{
|
||||
ck_barrier_dissemination_state_t state = CK_BARRIER_DISSEMINATION_STATE_INITIALIZER;
|
||||
int j, k, counter, id;
|
||||
int i = 0;
|
||||
|
||||
aff_iterate(&a);
|
||||
|
||||
id = ck_pr_faa_int(&tid, 1);
|
||||
|
||||
ck_pr_inc_int(&barrier_wait);
|
||||
while (ck_pr_load_int(&barrier_wait) != nthr)
|
||||
ck_pr_stall();
|
||||
|
||||
for (j = 0, k = 0; j < ITERATE; j++, k++) {
|
||||
i = j++ & (ENTRIES - 1);
|
||||
ck_pr_inc_int(&counters[i]);
|
||||
ck_barrier_dissemination(allflags, &state, id, nthr);
|
||||
counter = ck_pr_load_int(&counters[i]);
|
||||
if (counter != nthr * (j / ENTRIES + 1)) {
|
||||
fprintf(stderr, "FAILED [%d:%d]: %d != %d\n", i, j - 1, counter, nthr);
|
||||
exit(EXIT_FAILURE);
|
||||
}
|
||||
}
|
||||
|
||||
return (NULL);
|
||||
}
|
||||
|
||||
int
|
||||
main(int argc, char *argv[])
|
||||
{
|
||||
ck_barrier_dissemination_flags_t *allflags;
|
||||
pthread_t *threads;
|
||||
int i, size;
|
||||
|
||||
if (argc != 3) {
|
||||
fprintf(stderr, "Usage: correct <number of threads> <affinity delta>\n");
|
||||
exit(EXIT_FAILURE);
|
||||
}
|
||||
|
||||
nthr = atoi(argv[1]);
|
||||
if (nthr <= 0) {
|
||||
fprintf(stderr, "ERROR: Number of threads must be greater than 0\n");
|
||||
exit(EXIT_FAILURE);
|
||||
}
|
||||
|
||||
threads = malloc(sizeof(pthread_t) * nthr);
|
||||
if (threads == NULL) {
|
||||
fprintf(stderr, "ERROR: Could not allocate thread structures\n");
|
||||
exit(EXIT_FAILURE);
|
||||
}
|
||||
|
||||
a.delta = atoi(argv[2]);
|
||||
|
||||
allflags = malloc(sizeof(ck_barrier_dissemination_flags_t) * nthr);
|
||||
if (allflags == NULL) {
|
||||
fprintf(stderr, "ERROR: Could not allocate thread structures\n");
|
||||
exit(EXIT_FAILURE);
|
||||
}
|
||||
|
||||
size = ck_barrier_dissemination_size(nthr);
|
||||
for (i = 0; i < nthr; i++) {
|
||||
allflags[i].tflags[0] = malloc(sizeof(unsigned int) * size);
|
||||
allflags[i].tflags[1] = malloc(sizeof(unsigned int) * size);
|
||||
allflags[i].pflags[0] = malloc(sizeof(unsigned int *) * size);
|
||||
allflags[i].pflags[1] = malloc(sizeof(unsigned int *) * size);
|
||||
}
|
||||
ck_barrier_dissemination_flags_init(allflags, nthr);
|
||||
|
||||
fprintf(stderr, "Creating threads (barrier)...");
|
||||
for (i = 0; i < nthr; i++) {
|
||||
if (pthread_create(&threads[i], NULL, thread, allflags)) {
|
||||
fprintf(stderr, "ERROR: Could not create thread %d\n", i);
|
||||
exit(EXIT_FAILURE);
|
||||
}
|
||||
}
|
||||
fprintf(stderr, "done\n");
|
||||
|
||||
fprintf(stderr, "Waiting for threads to finish correctness regression...");
|
||||
for (i = 0; i < nthr; i++)
|
||||
pthread_join(threads[i], NULL);
|
||||
fprintf(stderr, "done (passed)\n");
|
||||
|
||||
|
||||
return (0);
|
||||
}
|
||||
|
||||
Loading…
Reference in new issue