/* -*- Mode: c; c-basic-offset: 4; indent-tabs-mode: t; tab-width: 8; -*- */
/*
 * Copyright 2007 Chris Wilson
 * Copyright 2010-2011 Andrea Canciani
 *
 * Permission is hereby granted, free of charge, to any person
 * obtaining a copy of this software and associated documentation
 * files (the "Software"), to deal in the Software without
 * restriction, including without limitation the rights to use, copy,
 * modify, merge, publish, distribute, sublicense, and/or sell copies
 * of the Software, and to permit persons to whom the Software is
 * furnished to do so, subject to the following conditions:
 *
 * The above copyright notice and this permission notice shall be
 * included in all copies or substantial portions of the Software.
 *
 * 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 OR COPYRIGHT HOLDERS
 * 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.
 *
 * Author(s): Andrea Canciani <ranma42@gmail.com>
 *            Chris Wilson <chris@chris-wilson.co.uk>
 */

#ifndef SIMPLEOPS_ATOMIC_IMPL_NO_H
#define SIMPLEOPS_ATOMIC_IMPL_NO_H

#ifndef SIMPLEOPS_ATOMIC_IMPL_H
#error Private header used directly
#endif

#if ! SIMPLEOPS_HAVE_ATOMIC_IMPL && \
    defined(SIMPLEOPS_DISABLE_ATOMIC)

#define SIMPLEOPS_HAVE_ATOMIC_IMPL 1
#define SIMPLEOPS_HAVE_ATOMIC_IMPL_NO 1

/* Atomic integer functions */
typedef int simpleops_atomic_int_t;

static simpleops_always_inline simpleops_bool_t
simpleops_atomic_int_compare_exchange (simpleops_atomic_int_t volatile *x,
				       simpleops_atomic_int_t oldv,
				       simpleops_atomic_int_t newv)
{
    simpleops_bool_t r;

    r = *x == oldv;
    if (r)
	*x = newv;

    return r;
}

static simpleops_always_inline simpleops_atomic_int_t
simpleops_atomic_int_exchange (simpleops_atomic_int_t volatile *x,
			       simpleops_atomic_int_t newv)
{
    simpleops_atomic_int_t r;

    r = *x;
    *x = newv;

    return r;
}

static simpleops_always_inline simpleops_atomic_int_t
simpleops_atomic_int_load (simpleops_atomic_int_t const volatile *x)
{
    simpleops_atomic_int_t r;

    r = *x;

    return r;
}

static simpleops_always_inline void
simpleops_atomic_int_store (simpleops_atomic_int_t volatile *x,
			    simpleops_atomic_int_t newv)
{
    *x = newv;
}

static simpleops_always_inline simpleops_atomic_int_t
simpleops_atomic_int_fetch_add (simpleops_atomic_int_t volatile *x,
				simpleops_atomic_int_t y)
{
    simpleops_atomic_int_t r;

    r = *x;
    *x += y;

    return r;
}

/* Atomic pointer functions */
static simpleops_always_inline simpleops_bool_t
simpleops_atomic_ptr_compare_exchange (void * volatile *x,
				       void * const oldv,
				       void * const newv)
{
    simpleops_bool_t r;

    r = *x == oldv;
    if (r)
	*x = newv;

    return r;
}

static simpleops_always_inline void *
simpleops_atomic_ptr_exchange (void * volatile *x,
			       void * const newv)
{
    void *r;

    r = *x;
    *x = newv;

    return r;
}

static simpleops_always_inline void *
simpleops_atomic_ptr_load (void * const volatile *x)
{
    void *r;

    r = *x;

    return r;
}

static simpleops_always_inline void
simpleops_atomic_ptr_store (void * volatile *x,
			    void * const newv)
{
    *x = newv;
}

#endif

#endif