Files
mongo/test/thread/rw.c
Keith Bostic 45c1e2a5a3 Move test program software into the public domain, if anyone wants to
cut-and-paste from it, that's fine with us.
2012-10-26 13:22:45 +00:00

296 lines
7.2 KiB
C

/*-
* Public Domain 2008-2012 WiredTiger, Inc.
*
* This is free and unencumbered software released into the public domain.
*
* Anyone is free to copy, modify, publish, use, compile, sell, or
* distribute this software, either in source code form or as a compiled
* binary, for any purpose, commercial or non-commercial, and by any
* means.
*
* In jurisdictions that recognize copyright laws, the author or authors
* of this software dedicate any and all copyright interest in the
* software to the public domain. We make this dedication for the benefit
* of the public at large and to the detriment of our heirs and
* successors. We intend this dedication to be an overt act of
* relinquishment in perpetuity of all present and future rights to this
* software under copyright law.
*
* THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND,
* EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
* MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT.
* IN NO EVENT SHALL THE AUTHORS BE LIABLE FOR ANY CLAIM, DAMAGES OR
* OTHER LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE,
* ARISING FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR
* OTHER DEALINGS IN THE SOFTWARE.
*/
#include "thread.h"
static void print_stats(u_int);
static void *reader(void *);
static void *writer(void *);
typedef struct {
int remove; /* cursor.remove */
int update; /* cursor.update */
int reads; /* cursor.search */
} STATS;
static STATS *run_stats;
/*
* r --
* Return a 32-bit pseudo-random number.
*
* This is an implementation of George Marsaglia's multiply-with-carry pseudo-
* random number generator. Computationally fast, with reasonable randomness
* properties.
*/
static inline uint32_t
r(void)
{
static uint32_t m_w = 0, m_z = 0;
if (m_w == 0) {
struct timeval t;
(void)gettimeofday(&t, NULL);
m_w = (uint32_t)t.tv_sec;
m_z = (uint32_t)t.tv_usec;
}
m_z = 36969 * (m_z & 65535) + (m_z >> 16);
m_w = 18000 * (m_w & 65535) + (m_w >> 16);
return (m_z << 16) + (m_w & 65535);
}
int
rw_start(u_int readers, u_int writers)
{
struct timeval start, stop;
double seconds;
pthread_t *tids;
u_int i;
int ret;
void *thread_ret;
/* Create statistics and thread structures. */
if ((run_stats = calloc(
(size_t)(readers + writers), sizeof(*run_stats))) == NULL ||
(tids = calloc((size_t)(readers + writers), sizeof(*tids))) == NULL)
die("calloc", errno);
(void)gettimeofday(&start, NULL);
/* Create threads. */
for (i = 0; i < readers; ++i)
if ((ret = pthread_create(
&tids[i], NULL, reader, (void *)(uintptr_t)i)) != 0)
die("pthread_create", ret);
for (; i < readers + writers; ++i) {
if ((ret = pthread_create(
&tids[i], NULL, writer, (void *)(uintptr_t)i)) != 0)
die("pthread_create", ret);
}
/* Wait for the threads. */
for (i = 0; i < readers + writers; ++i)
(void)pthread_join(tids[i], &thread_ret);
(void)gettimeofday(&stop, NULL);
seconds = (stop.tv_sec - start.tv_sec) +
(stop.tv_usec - start.tv_usec) * 1e-6;
fprintf(stderr, "timer: %.2lf seconds (%d ops/second)\n",
seconds, (int)(((readers + writers) * nops) / seconds));
print_stats(readers + writers);
free(run_stats);
free(tids);
return (0);
}
/*
* reader_op --
* Read operation.
*/
static inline void
reader_op(WT_CURSOR *cursor)
{
WT_ITEM *key, _key;
u_int keyno;
int ret;
char keybuf[64];
key = &_key;
keyno = r() % nkeys;
if (ftype == ROW) {
key->data = keybuf;
key->size = (uint32_t)
snprintf(keybuf, sizeof(keybuf), "%017u", keyno);
cursor->set_key(cursor, key);
} else
cursor->set_key(cursor, (uint32_t)keyno);
if ((ret = cursor->search(cursor)) != 0 && ret != WT_NOTFOUND)
die("cursor.search", ret);
}
/*
* reader --
* Reader thread start function.
*/
static void *
reader(void *arg)
{
STATS *s;
WT_CURSOR *cursor;
WT_SESSION *session;
pthread_t tid;
u_int i;
int id, ret;
id = (int)(uintptr_t)arg;
tid = pthread_self();
printf(" read thread %2d starting: tid: %p\n", id, (void *)tid);
sched_yield(); /* Get all the threads created. */
s = &run_stats[id];
if (session_per_op) {
for (i = 0; i < nops; ++i, ++s->reads, sched_yield()) {
if ((ret = conn->open_session(
conn, NULL, NULL, &session)) != 0)
die("conn.open_session", ret);
if ((ret = session->open_cursor(
session, FNAME, NULL, NULL, &cursor)) != 0)
die("session.open_cursor", ret);
reader_op(cursor);
if ((ret = session->close(session, NULL)) != 0)
die("session.close", ret);
}
} else {
if ((ret = conn->open_session(
conn, NULL, NULL, &session)) != 0)
die("conn.open_session", ret);
if ((ret = session->open_cursor(
session, FNAME, NULL, NULL, &cursor)) != 0)
die("session.open_cursor", ret);
for (i = 0; i < nops; ++i, ++s->reads, sched_yield())
reader_op(cursor);
if ((ret = session->close(session, NULL)) != 0)
die("session.close", ret);
}
return (NULL);
}
/*
* writer_op --
* Write operation.
*/
static inline void
writer_op(WT_CURSOR *cursor, STATS *s)
{
WT_ITEM *key, _key, *value, _value;
u_int keyno;
int ret;
char keybuf[64], valuebuf[64];
key = &_key;
value = &_value;
keyno = r() % nkeys;
if (ftype == ROW) {
key->data = keybuf;
key->size = (uint32_t)
snprintf(keybuf, sizeof(keybuf), "%017u", keyno);
cursor->set_key(cursor, key);
} else
cursor->set_key(cursor, (uint32_t)keyno);
if (keyno % 5 == 0) {
++s->remove;
if ((ret =
cursor->remove(cursor)) != 0 && ret != WT_NOTFOUND)
die("cursor.remove", ret);
} else {
++s->update;
value->data = valuebuf;
if (ftype == FIX)
cursor->set_value(cursor, 0x10);
else {
value->size = (uint32_t)snprintf(
valuebuf, sizeof(valuebuf), "XXX %37u", keyno);
cursor->set_value(cursor, value);
}
if ((ret = cursor->update(cursor)) != 0)
die("cursor.update", ret);
}
}
/*
* writer --
* Writer thread start function.
*/
static void *
writer(void *arg)
{
STATS *s;
WT_CURSOR *cursor;
WT_SESSION *session;
pthread_t tid;
u_int i;
int id, ret;
id = (int)(uintptr_t)arg;
tid = pthread_self();
printf("write thread %2d starting: tid: %p\n", id, (void *)tid);
sched_yield(); /* Get all the threads created. */
s = &run_stats[id];
if (session_per_op) {
for (i = 0; i < nops; ++i, sched_yield()) {
if ((ret = conn->open_session(
conn, NULL, NULL, &session)) != 0)
die("conn.open_session", ret);
if ((ret = session->open_cursor(
session, FNAME, NULL, NULL, &cursor)) != 0)
die("session.open_cursor", ret);
writer_op(cursor, s);
if ((ret = session->close(session, NULL)) != 0)
die("session.close", ret);
}
} else {
if ((ret = conn->open_session(
conn, NULL, NULL, &session)) != 0)
die("conn.open_session", ret);
if ((ret = session->open_cursor(
session, FNAME, NULL, NULL, &cursor)) != 0)
die("session.open_cursor", ret);
for (i = 0; i < nops; ++i, sched_yield())
writer_op(cursor, s);
if ((ret = session->close(session, NULL)) != 0)
die("session.close", ret);
}
return (NULL);
}
/*
* print_stats --
* Display reader/writer thread stats.
*/
static void
print_stats(u_int nthreads)
{
STATS *s;
u_int id;
s = run_stats;
for (id = 0; id < nthreads; ++id, ++s)
printf("%3d: read %6d, remove %6d, update %6d\n",
id, s->reads, s->remove, s->update);
}