Okay...this should fix the s_lock() patches from David to what he
currently has... From: David Gould <dg@illustra.com>
This commit is contained in:
Marc G. Fournier
parent
1d36bdcfa6
commit
c73e186948
@ -4,7 +4,7 @@
|
|||||||
# Makefile for storage/buffer
|
# Makefile for storage/buffer
|
||||||
#
|
#
|
||||||
# IDENTIFICATION
|
# IDENTIFICATION
|
||||||
# $Header: /cvsroot/pgsql/src/backend/storage/buffer/Makefile,v 1.9 1998/05/04 15:44:39 scrappy Exp $
|
# $Header: /cvsroot/pgsql/src/backend/storage/buffer/Makefile,v 1.10 1998/05/04 16:58:37 scrappy Exp $
|
||||||
#
|
#
|
||||||
#-------------------------------------------------------------------------
|
#-------------------------------------------------------------------------
|
||||||
|
|
||||||
|
|||||||
@ -7,7 +7,7 @@
|
|||||||
*
|
*
|
||||||
*
|
*
|
||||||
* IDENTIFICATION
|
* IDENTIFICATION
|
||||||
* $Header: /cvsroot/pgsql/src/backend/storage/buffer/Attic/s_lock.c,v 1.5 1998/05/04 15:44:41 scrappy Exp $
|
* $Header: /cvsroot/pgsql/src/backend/storage/buffer/Attic/s_lock.c,v 1.6 1998/05/04 16:58:38 scrappy Exp $
|
||||||
*
|
*
|
||||||
*-------------------------------------------------------------------------
|
*-------------------------------------------------------------------------
|
||||||
*/
|
*/
|
||||||
|
|||||||
@ -7,7 +7,7 @@
|
|||||||
*
|
*
|
||||||
*
|
*
|
||||||
* IDENTIFICATION
|
* IDENTIFICATION
|
||||||
* $Header: /cvsroot/pgsql/src/include/storage/s_lock.h,v 1.31 1998/05/04 02:02:06 momjian Exp $
|
* $Header: /cvsroot/pgsql/src/include/storage/s_lock.h,v 1.32 1998/05/04 16:58:59 scrappy Exp $
|
||||||
*
|
*
|
||||||
*-------------------------------------------------------------------------
|
*-------------------------------------------------------------------------
|
||||||
*/
|
*/
|
||||||
@ -21,13 +21,13 @@
|
|||||||
*
|
*
|
||||||
* void S_UNLOCK(slock_t *lock)
|
* void S_UNLOCK(slock_t *lock)
|
||||||
*
|
*
|
||||||
* int S_LOCK_FREE(slock_t *lock)
|
* void S_LOCK_FREE(slock_t *lock)
|
||||||
* Tests if the lock is free. Returns non-zero if free, 0 if locked.
|
* Tests if the lock is free. Returns non-zero if free, 0 if locked.
|
||||||
*
|
*
|
||||||
* The S_LOCK() function (in s_lock.c) implements a primitive but
|
* The S_LOCK() macro implements a primitive but still useful random
|
||||||
* still useful random backoff to avoid hordes of busywaiting lockers
|
* backoff to avoid hordes of busywaiting lockers chewing CPU.
|
||||||
* chewing CPU.
|
|
||||||
*
|
*
|
||||||
|
* Effectively:
|
||||||
* void
|
* void
|
||||||
* S_LOCK(slock_t *lock)
|
* S_LOCK(slock_t *lock)
|
||||||
* {
|
* {
|
||||||
@ -62,7 +62,7 @@
|
|||||||
* override them.
|
* override them.
|
||||||
*
|
*
|
||||||
*/
|
*/
|
||||||
#ifndef S_LOCK_H
|
#if !defined(S_LOCK_H)
|
||||||
#define S_LOCK_H
|
#define S_LOCK_H
|
||||||
|
|
||||||
#include "storage/ipc.h"
|
#include "storage/ipc.h"
|
||||||
@ -78,16 +78,15 @@
|
|||||||
|
|
||||||
#define S_UNLOCK(lock) { __asm__("mb"); *(lock) = 0; }
|
#define S_UNLOCK(lock) { __asm__("mb"); *(lock) = 0; }
|
||||||
|
|
||||||
#endif /* defined(__alpha__) && defined(linux) */
|
#endif /* __alpha__ */
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
#else /* defined(linux) */
|
#else /* linux */
|
||||||
/***************************************************************************
|
/***************************************************************************
|
||||||
* All non Linux
|
* All non Linux
|
||||||
*/
|
*/
|
||||||
#endif
|
|
||||||
|
|
||||||
#if defined (nextstep)
|
#if defined (nextstep)
|
||||||
/*
|
/*
|
||||||
@ -118,37 +117,26 @@
|
|||||||
* assembly from his NECEWS SVR4 port, but we probably ought to retain this
|
* assembly from his NECEWS SVR4 port, but we probably ought to retain this
|
||||||
* for the R3000 chips out there.
|
* for the R3000 chips out there.
|
||||||
*/
|
*/
|
||||||
#define S_LOCK(lock) do \
|
#define TAS(lock) (!acquire_lock(lock))
|
||||||
{ \
|
|
||||||
while (!acquire_lock(lock)) \
|
|
||||||
; \
|
|
||||||
} while (0)
|
|
||||||
|
|
||||||
#define S_UNLOCK(lock) release_lock(lock)
|
#define S_UNLOCK(lock) release_lock(lock)
|
||||||
|
|
||||||
#define S_INIT_LOCK(lock) init_lock(lock)
|
#define S_INIT_LOCK(lock) init_lock(lock)
|
||||||
|
|
||||||
/* S_LOCK_FREE should return 1 if lock is free; 0 if lock is locked */
|
|
||||||
|
|
||||||
#define S_LOCK_FREE(lock) (stat_lock(lock) == UNLOCKED)
|
#define S_LOCK_FREE(lock) (stat_lock(lock) == UNLOCKED)
|
||||||
|
|
||||||
#endif /* __sgi */
|
#endif /* __sgi */
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
#if (defined(__alpha__)
|
||||||
/*
|
/*
|
||||||
* OSF/1 (Alpha AXP)
|
* OSF/1 (Alpha AXP)
|
||||||
*
|
*
|
||||||
* Note that slock_t on the Alpha AXP is msemaphore instead of char
|
* Note that slock_t on the Alpha AXP is msemaphore instead of char
|
||||||
* (see storage/ipc.h).
|
* (see storage/ipc.h).
|
||||||
*/
|
*/
|
||||||
|
#define TAS(lock) (msem_lock((lock), MSEM_IF_NOWAIT) < 0)
|
||||||
#if defined(__alpha) && !defined(linux)
|
|
||||||
|
|
||||||
#define S_LOCK(lock) do \
|
|
||||||
{ \
|
|
||||||
while (msem_lock((lock), MSEM_IF_NOWAIT) < 0) \
|
|
||||||
; \
|
|
||||||
} while (0)
|
|
||||||
|
|
||||||
#define S_UNLOCK(lock) msem_unlock((lock), 0)
|
#define S_UNLOCK(lock) msem_unlock((lock), 0)
|
||||||
|
|
||||||
@ -156,302 +144,108 @@
|
|||||||
|
|
||||||
#define S_LOCK_FREE(lock) (!(lock)->msem_state)
|
#define S_LOCK_FREE(lock) (!(lock)->msem_state)
|
||||||
|
|
||||||
#endif /* alpha */
|
#endif /* __alpha__ */
|
||||||
|
|
||||||
/*
|
|
||||||
* Solaris 2
|
|
||||||
*/
|
|
||||||
|
|
||||||
#if (defined(__i386__) || defined(__sparc__)) && defined(__sun__)
|
|
||||||
/* for xxxxx_solaris, this is defined in port/.../tas.s */
|
|
||||||
|
|
||||||
static int tas(slock_t *lock);
|
|
||||||
|
|
||||||
#define S_LOCK(lock) do \
|
|
||||||
{ \
|
|
||||||
while (tas(lock)) \
|
|
||||||
; \
|
|
||||||
} while (0)
|
|
||||||
|
|
||||||
#define S_UNLOCK(lock) (*(lock) = 0)
|
|
||||||
|
|
||||||
#define S_INIT_LOCK(lock) S_UNLOCK(lock)
|
|
||||||
|
|
||||||
#endif /* i86pc_solaris || sparc_solaris */
|
|
||||||
|
|
||||||
|
#if defined(_AIX)
|
||||||
/*
|
/*
|
||||||
* AIX (POWER)
|
* AIX (POWER)
|
||||||
*
|
*
|
||||||
* Note that slock_t on POWER/POWER2/PowerPC is int instead of char
|
* Note that slock_t on POWER/POWER2/PowerPC is int instead of char
|
||||||
* (see storage/ipc.h).
|
* (see storage/ipc.h).
|
||||||
*/
|
*/
|
||||||
|
#define TAS(lock) cs((int *) (lock), 0, 1)
|
||||||
#if defined(_AIX)
|
|
||||||
|
|
||||||
#define S_LOCK(lock) do \
|
|
||||||
{ \
|
|
||||||
while (cs((int *) (lock), 0, 1)) \
|
|
||||||
; \
|
|
||||||
} while (0)
|
|
||||||
|
|
||||||
#define S_UNLOCK(lock) (*(lock) = 0)
|
|
||||||
|
|
||||||
#define S_INIT_LOCK(lock) S_UNLOCK(lock)
|
|
||||||
|
|
||||||
#endif /* _AIX */
|
#endif /* _AIX */
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
#if defined(__hpux)
|
||||||
/*
|
/*
|
||||||
* HP-UX (PA-RISC)
|
* HP-UX (PA-RISC)
|
||||||
*
|
*
|
||||||
* Note that slock_t on PA-RISC is a structure instead of char
|
* Note that slock_t on PA-RISC is a structure instead of char
|
||||||
* (see storage/ipc.h).
|
* (see storage/ipc.h).
|
||||||
*/
|
*
|
||||||
|
|
||||||
#if defined(__hpux)
|
|
||||||
|
|
||||||
/*
|
|
||||||
* a "set" slock_t has a single word cleared. a "clear" slock_t has
|
* a "set" slock_t has a single word cleared. a "clear" slock_t has
|
||||||
* all words set to non-zero.
|
* all words set to non-zero. tas() in tas.s
|
||||||
*/
|
*/
|
||||||
static slock_t clear_lock = {-1, -1, -1, -1};
|
static slock_t clear_lock =
|
||||||
|
{-1, -1, -1, -1};
|
||||||
static int tas(slock_t *lock);
|
|
||||||
|
|
||||||
#define S_LOCK(lock) do \
|
|
||||||
{ \
|
|
||||||
while (tas(lock)) \
|
|
||||||
; \
|
|
||||||
} while (0)
|
|
||||||
|
|
||||||
#define S_UNLOCK(lock) (*(lock) = clear_lock) /* struct assignment */
|
#define S_UNLOCK(lock) (*(lock) = clear_lock) /* struct assignment */
|
||||||
|
|
||||||
#define S_INIT_LOCK(lock) S_UNLOCK(lock)
|
|
||||||
|
|
||||||
#define S_LOCK_FREE(lock) ( *(int *) (((long) (lock) + 15) & ~15) != 0)
|
#define S_LOCK_FREE(lock) ( *(int *) (((long) (lock) + 15) & ~15) != 0)
|
||||||
|
|
||||||
#endif /* __hpux */
|
#endif /* __hpux */
|
||||||
|
|
||||||
/*
|
|
||||||
* sun3
|
|
||||||
|
#endif /* else defined(linux) */
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
/****************************************************************************
|
||||||
|
* Default Definitions - override these above as needed.
|
||||||
*/
|
*/
|
||||||
|
|
||||||
#if defined(sun3)
|
#if !defined(S_LOCK)
|
||||||
|
|
||||||
static int tas(slock_t *lock);
|
#include <sys/time.h>
|
||||||
|
|
||||||
#define S_LOCK(lock) do \
|
#define S_NSPINCYCLE 16
|
||||||
{ \
|
#define S_MAX_BUSY 1000 * S_NSPINCYCLE
|
||||||
while (tas(lock)) \
|
|
||||||
; \
|
|
||||||
} while (0)
|
|
||||||
|
|
||||||
#define S_UNLOCK(lock) (*(lock) = 0)
|
extern int s_spincycle[];
|
||||||
|
extern void s_lock_stuck(slock_t *lock, char *file, int line);
|
||||||
|
|
||||||
#define S_INIT_LOCK(lock) S_UNLOCK(lock)
|
#if defined(S_LOCK_DEBUG)
|
||||||
|
|
||||||
static int
|
extern void s_lock(slock_t *lock);
|
||||||
tas_dummy()
|
|
||||||
{
|
|
||||||
asm("LLA0:");
|
|
||||||
asm(" .data");
|
|
||||||
asm(" .text");
|
|
||||||
asm("|#PROC# 04");
|
|
||||||
asm(" .globl _tas");
|
|
||||||
asm("_tas:");
|
|
||||||
asm("|#PROLOGUE# 1");
|
|
||||||
asm(" movel sp@(0x4),a0");
|
|
||||||
asm(" tas a0@");
|
|
||||||
asm(" beq LLA1");
|
|
||||||
asm(" moveq #-128,d0");
|
|
||||||
asm(" rts");
|
|
||||||
asm("LLA1:");
|
|
||||||
asm(" moveq #0,d0");
|
|
||||||
asm(" rts");
|
|
||||||
asm(" .data");
|
|
||||||
}
|
|
||||||
|
|
||||||
#endif /* sun3 */
|
#define S_LOCK(lock) s_lock(lock, __FILE__, __LINE__)
|
||||||
|
|
||||||
/*
|
#else /* S_LOCK_DEBUG */
|
||||||
* sparc machines
|
|
||||||
*/
|
|
||||||
|
|
||||||
#if defined(NEED_SPARC_TAS_ASM)
|
#define S_LOCK(lock) if (1) { \
|
||||||
|
int spins = 0; \
|
||||||
|
while (TAS(lock)) { \
|
||||||
|
struct timeval delay; \
|
||||||
|
delay.tv_sec = 0; \
|
||||||
|
delay.tv_usec = s_spincycle[spins++ % S_NSPINCYCLE]; \
|
||||||
|
(void) select(0, NULL, NULL, NULL, &delay); \
|
||||||
|
if (spins > S_MAX_BUSY) { \
|
||||||
|
/* It's been well over a minute... */ \
|
||||||
|
s_lock_stuck(lock, __FILE__, __LINE__); \
|
||||||
|
} \
|
||||||
|
} \
|
||||||
|
} else
|
||||||
|
|
||||||
/* if we're using -ansi w/ gcc, use __asm__ instead of asm */
|
#endif /* S_LOCK_DEBUG */
|
||||||
#if defined(__STRICT_ANSI__)
|
#endif /* S_LOCK */
|
||||||
#define asm(x) __asm__(x)
|
|
||||||
#endif
|
|
||||||
|
|
||||||
static int tas(slock_t *lock);
|
|
||||||
|
|
||||||
static void
|
|
||||||
tas_dummy()
|
|
||||||
{
|
|
||||||
asm(".seg \"data\"");
|
|
||||||
asm(".seg \"text\"");
|
|
||||||
asm("_tas:");
|
|
||||||
|
|
||||||
/*
|
|
||||||
* Sparc atomic test and set (sparc calls it "atomic load-store")
|
|
||||||
*/
|
|
||||||
|
|
||||||
asm("ldstub [%r8], %r8");
|
|
||||||
|
|
||||||
/*
|
|
||||||
* Did test and set actually do the set?
|
|
||||||
*/
|
|
||||||
|
|
||||||
asm("tst %r8");
|
|
||||||
|
|
||||||
asm("be,a ReturnZero");
|
|
||||||
|
|
||||||
/*
|
|
||||||
* otherwise, just return.
|
|
||||||
*/
|
|
||||||
|
|
||||||
asm("clr %r8");
|
|
||||||
asm("mov 0x1, %r8");
|
|
||||||
asm("ReturnZero:");
|
|
||||||
asm("retl");
|
|
||||||
asm("nop");
|
|
||||||
}
|
|
||||||
|
|
||||||
#define S_LOCK(addr) do \
|
|
||||||
{ \
|
|
||||||
while (tas(addr)) \
|
|
||||||
; \
|
|
||||||
} while (0)
|
|
||||||
|
|
||||||
/*
|
|
||||||
* addr should be as in the above S_LOCK routine
|
|
||||||
*/
|
|
||||||
#define S_UNLOCK(addr) (*(addr) = 0)
|
|
||||||
|
|
||||||
#define S_INIT_LOCK(addr) (*(addr) = 0)
|
|
||||||
|
|
||||||
#endif /* NEED_SPARC_TAS_ASM */
|
|
||||||
|
|
||||||
/*
|
|
||||||
* VAXen -- even multiprocessor ones
|
|
||||||
*/
|
|
||||||
|
|
||||||
#if defined(NEED_VAX_TAS_ASM)
|
|
||||||
|
|
||||||
#define S_LOCK(addr) __asm__("1: bbssi $0,(%0),1b": :"r"(addr))
|
|
||||||
#define S_UNLOCK(addr) (*(addr) = 0)
|
|
||||||
#define S_INIT_LOCK(addr) (*(addr) = 0)
|
|
||||||
|
|
||||||
#endif /* NEED_VAX_TAS_ASM */
|
|
||||||
|
|
||||||
/*
|
|
||||||
* i386 based things
|
|
||||||
*/
|
|
||||||
|
|
||||||
#if defined(NEED_I386_TAS_ASM)
|
|
||||||
|
|
||||||
#if defined(USE_UNIVEL_CC)
|
|
||||||
asm void
|
|
||||||
S_LOCK(char *lval)
|
|
||||||
{
|
|
||||||
% lab again;
|
|
||||||
/* Upon entry, %eax will contain the pointer to the lock byte */
|
|
||||||
pushl %ebx
|
|
||||||
xchgl %eax, %ebx
|
|
||||||
movb $255, %al
|
|
||||||
again:
|
|
||||||
lock
|
|
||||||
xchgb %al, (%ebx)
|
|
||||||
cmpb $0, %al
|
|
||||||
jne again
|
|
||||||
popl %ebx
|
|
||||||
}
|
|
||||||
|
|
||||||
#else
|
|
||||||
#define S_LOCK(lock) do \
|
|
||||||
{ \
|
|
||||||
slock_t _res; \
|
|
||||||
do \
|
|
||||||
{ \
|
|
||||||
__asm__("lock; xchgb %0,%1": "=q"(_res), "=m"(*lock):"0"(0x1)); \
|
|
||||||
} while (_res != 0); \
|
|
||||||
} while (0)
|
|
||||||
#endif
|
|
||||||
|
|
||||||
#define S_UNLOCK(lock) (*(lock) = 0)
|
|
||||||
|
|
||||||
#define S_INIT_LOCK(lock) S_UNLOCK(lock)
|
|
||||||
|
|
||||||
#endif /* NEED_I386_TAS_ASM */
|
|
||||||
|
|
||||||
|
|
||||||
#if defined(__alpha) && defined(linux)
|
|
||||||
|
|
||||||
void S_LOCK(slock_t *lock);
|
#if !defined(S_LOCK_FREE)
|
||||||
|
|
||||||
#define S_UNLOCK(lock) { __asm__("mb"); *(lock) = 0; }
|
|
||||||
|
|
||||||
#define S_INIT_LOCK(lock) S_UNLOCK(lock)
|
|
||||||
|
|
||||||
#endif /* defined(__alpha) && defined(linux) */
|
|
||||||
|
|
||||||
#if defined(linux) && defined(sparc)
|
|
||||||
|
|
||||||
#define S_LOCK(lock) do \
|
|
||||||
{ \
|
|
||||||
slock_t _res; \
|
|
||||||
slock_t *tmplock = lock ; \
|
|
||||||
do \
|
|
||||||
{ \
|
|
||||||
__asm__("ldstub [%1], %0" \
|
|
||||||
: "=&r"(_res), "=r"(tmplock) \
|
|
||||||
: "1"(tmplock)); \
|
|
||||||
} while (_res != 0); \
|
|
||||||
} while (0)
|
|
||||||
|
|
||||||
#define S_UNLOCK(lock) (*(lock) = 0)
|
|
||||||
|
|
||||||
#define S_INIT_LOCK(lock) S_UNLOCK(lock)
|
|
||||||
|
|
||||||
#endif /* defined(linux) && defined(sparc) */
|
|
||||||
|
|
||||||
#if defined(linux) && defined(PPC)
|
|
||||||
|
|
||||||
static int
|
|
||||||
tas_dummy()
|
|
||||||
{
|
|
||||||
__asm__(" \n\
|
|
||||||
tas: \n\
|
|
||||||
lwarx 5,0,3 \n\
|
|
||||||
cmpwi 5,0 \n\
|
|
||||||
bne fail \n\
|
|
||||||
addi 5,5,1 \n\
|
|
||||||
stwcx. 5,0,3 \n\
|
|
||||||
beq success \n\
|
|
||||||
fail: li 3,1 \n\
|
|
||||||
blr \n\
|
|
||||||
success: \n\
|
|
||||||
li 3,0 \n\
|
|
||||||
blr \n\
|
|
||||||
");
|
|
||||||
}
|
|
||||||
|
|
||||||
#define S_LOCK(lock) do \
|
|
||||||
{ \
|
|
||||||
while (tas(lock)) \
|
|
||||||
; \
|
|
||||||
} while (0)
|
|
||||||
|
|
||||||
#define S_UNLOCK(lock) (*(lock) = 0)
|
|
||||||
|
|
||||||
#define S_INIT_LOCK(lock) S_UNLOCK(lock)
|
|
||||||
|
|
||||||
#endif /* defined(linux) && defined(PPC) */
|
|
||||||
|
|
||||||
#ifndef S_LOCK_FREE /* for those who have not already defined
|
|
||||||
* it */
|
|
||||||
#define S_LOCK_FREE(lock) ((*lock) == 0)
|
#define S_LOCK_FREE(lock) ((*lock) == 0)
|
||||||
#endif
|
#endif /* S_LOCK_FREE */
|
||||||
|
|
||||||
|
#if !defined(S_UNLOCK)
|
||||||
|
#define S_UNLOCK(lock) (*(lock) = 0)
|
||||||
|
#endif /* S_UNLOCK */
|
||||||
|
|
||||||
|
#if !defined(S_INIT_LOCK)
|
||||||
|
#define S_INIT_LOCK(lock) S_UNLOCK(lock)
|
||||||
|
#endif /* S_INIT_LOCK */
|
||||||
|
|
||||||
|
#if !defined(TAS)
|
||||||
|
int tas(slock_t *lock); /* port/.../tas.s, or s_lock.c */
|
||||||
|
|
||||||
|
#define TAS(lock) tas(lock)
|
||||||
|
#endif /* TAS */
|
||||||
|
|
||||||
|
|
||||||
#endif /* HAS_TEST_AND_SET */
|
#endif /* HAS_TEST_AND_SET */
|
||||||
|
|
||||||
|
|||||||
Loading…
x
Reference in New Issue
Block a user