Oops, missed adding a file
authorMarc G. Fournier
Tue, 30 Dec 1997 04:03:01 +0000 (04:03 +0000)
committerMarc G. Fournier
Tue, 30 Dec 1997 04:03:01 +0000 (04:03 +0000)
From: Ryan Kirkpatrick 

src/backend/storage/buffer/s_lock.c [new file with mode: 0644]

diff --git a/src/backend/storage/buffer/s_lock.c b/src/backend/storage/buffer/s_lock.c
new file mode 100644 (file)
index 0000000..6a612a1
--- /dev/null
@@ -0,0 +1,65 @@
+/*-------------------------------------------------------------------------
+ *
+ * s_lock.c--
+ *   buffer manager interface routines
+ *
+ * Copyright (c) 1994, Regents of the University of California
+ *
+ *
+ * IDENTIFICATION
+ *   $Header: /cvsroot/pgsql/src/backend/storage/buffer/Attic/s_lock.c,v 1.1 1997/12/30 04:03:01 scrappy Exp $
+ *
+ *-------------------------------------------------------------------------
+ */
+/*
+ * S_LOCK() -- Implements the S_LOCK function for the Linux/Alpha platform.
+ *         This function is usually an inlined macro for all other platforms,
+ *         but must be a seperate function for the Linux/Alpha platform, due
+ *         to the assembly code involved.
+ */
+
+#if defined(__alpha__) && defined(linux)
+
+#include 
+#include 
+#include 
+#include 
+#include 
+#include 
+
+#include "postgres.h"
+
+/* declarations split between these three files */
+#include "storage/buf.h"
+#include "storage/buf_internals.h"
+#include "storage/bufmgr.h"
+
+#include "storage/fd.h"
+#include "storage/ipc.h"
+#include "storage/s_lock.h"
+
+void S_LOCK(slock_t* lock)
+{
+  do
+  {
+    slock_t _res;
+    do
+    {
+      __asm__("    ldq   $0, %0              \n\
+                   bne   $0, already_set     \n\
+                   ldq_l $0, %0                 \n\
+                   bne   $0, already_set     \n\
+                   or    $31, 1, $0          \n\
+                   stq_c $0, %0                 \n\
+                   beq   $0, stqc_fail       \n\
+          success: bis   $31, $31, %1        \n\
+                   mb                   \n\
+                   jmp   $31, end       \n\
+        stqc_fail: or    $31, 1, $0         \n\
+      already_set: bis   $0, $0, %1         \n\
+              end: nop      ": "=m"(*lock), "=r"(_res): :"0");
+    } while (_res != 0);
+  } while (0);
+}
+
+#endif