Exodus 7.10

/test/test_ts_errval.c
/*
* Copyright(c) 2005-2017 National Technology &Engineering Solutions
* of Sandia, LLC(NTESS).Under the terms of Contract DE - NA0003525 with
* NTESS, the U.S.Government retains certain rights in this software.
*
* Redistribution and use in source and binary forms, with or without
* modification, are permitted provided that the following conditions are
* met:
*
* * Redistributions of source code must retain the above copyright
* notice, this list of conditions and the following disclaimer.
*
* * 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.
*
* * Neither the name of NTESS nor the names of its
* contributors may be used to endorse or promote products derived
* from this software without specific prior written permission.
*
* THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS 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 COPYRIGHT
* OWNER 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 <exodusII.h>
#include <pthread.h>
#include <stdio.h>
#include <stdlib.h>
#include <string.h>
/*
* Create a separate exodus file on each thread (same file as written
* by testwt.c)
*/
#define NUM_THREADS 8
typedef struct
{
long threadid;
int exoid;
} param;
void *error_test(void *varg)
{
param * arg = (param *)varg;
int i = 0;
char name[32];
const char *routine;
const char *message;
int err_num;
/* ex_opts(EX_VERBOSE); */
sprintf(name, "Thread%ld", arg->threadid);
for (i = EX_MEMFAIL; i <= EX_INTERNAL; i++) {
ex_err(name, "Testing thread-safe exodus", i);
ex_get_err(&message, &routine, &err_num);
if (err_num != i) {
fprintf(stderr, "Thread %ld: ERROR: called error (%d) does not match stored value (%d)\n",
arg->threadid, i, err_num);
}
}
/* Netcdf error codes... (negative) */
for (i = NC_EBADID; i >= NC4_LAST_ERROR; i--) {
ex_err(name, "Testing thread-safe exodus", i);
ex_get_err(&message, &routine, &err_num);
if (err_num != i) {
fprintf(stderr, "Thread %ld: ERROR: called error (%d) does not match stored value (%d)\n",
arg->threadid, i, err_num);
}
}
return arg;
}
int main(int argc, char *argv[])
{
pthread_t threads[NUM_THREADS];
int rc;
long t;
param arg[NUM_THREADS];
printf("Running on %d threads\n", NUM_THREADS);
for (t = 0; t < NUM_THREADS; t++) {
arg[t].threadid = t;
rc = pthread_create(&threads[t], NULL, error_test, (void *)(arg + t));
if (rc) {
printf("ERROR; return code from pthread_create() is %d\n", rc);
exit(-1);
}
}
for (t = 0; t < NUM_THREADS; t++) {
pthread_join(threads[t], NULL);
}
}