INTEGRATION: CWS mhu12 (1.1.2); FILE ADDED

2006/04/11 16:55:17 mhu 1.1.2.1: #125511# #i23172# #i57754# shared rtl_arena + rtl_cache implementation internals.

1 files changed, 251 insertions, 0 deletions

diff --git a/sal/rtl/source/alloc_impl.h b/sal/rtl/source/alloc_impl.h
new file mode 100644
index 000000000000..af7f5966983f
--- /dev/null
+++ b/sal/rtl/source/alloc_impl.h
@@ -0,0 +1,251 @@
+/*************************************************************************
+ *
+ *  OpenOffice.org - a multi-platform office productivity suite
+ *
+ *  $RCSfile: alloc_impl.h,v $
+ *
+ *  $Revision: 1.2 $
+ *
+ *  last change: $Author: rt $ $Date: 2006-05-02 12:12:39 $
+ *
+ *  The Contents of this file are made available subject to
+ *  the terms of GNU Lesser General Public License Version 2.1.
+ *
+ *
+ *    GNU Lesser General Public License Version 2.1
+ *    =============================================
+ *    Copyright 2005 by Sun Microsystems, Inc.
+ *    901 San Antonio Road, Palo Alto, CA 94303, USA
+ *
+ *    This library is free software; you can redistribute it and/or
+ *    modify it under the terms of the GNU Lesser General Public
+ *    License version 2.1, as published by the Free Software Foundation.
+ *
+ *    This library is distributed in the hope that it will be useful,
+ *    but WITHOUT ANY WARRANTY; without even the implied warranty of
+ *    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
+ *    Lesser General Public License for more details.
+ *
+ *    You should have received a copy of the GNU Lesser General Public
+ *    License along with this library; if not, write to the Free Software
+ *    Foundation, Inc., 59 Temple Place, Suite 330, Boston,
+ *    MA  02111-1307  USA
+ *
+ ************************************************************************/
+
+#ifndef INCLUDED_RTL_ALLOC_IMPL_H
+#define INCLUDED_RTL_ALLOC_IMPL_H
+
+#ifndef _SAL_TYPES_H_
+#include "sal/types.h"
+#endif
+
+#ifdef __cplusplus
+extern "C" {
+#endif
+
+
+/** Alignment macros
+ */
+#if SAL_TYPES_ALIGNMENT4 > 1
+#define RTL_MEMORY_ALIGNMENT_4 SAL_TYPES_ALIGNMENT4
+#else
+#define RTL_MEMORY_ALIGNMENT_4 sizeof(int)
+#endif /* SAL_TYPES_ALIGNMENT4 */
+
+#if SAL_TYPES_ALIGNMENT8 > 1
+#define RTL_MEMORY_ALIGNMENT_8 SAL_TYPES_ALIGNMENT8
+#else
+#define RTL_MEMORY_ALIGNMENT_8 sizeof(void*)
+#endif /* SAL_TYPES_ALIGNMENT8 */
+
+#if 0  /* @@@ */
+#define RTL_MEMORY_ALIGNMENT_1 8
+#define RTL_MEMORY_ALIGNMENT_2 (sizeof(void*) * 2)
+#endif /* @@@ */
+
+#define RTL_MEMORY_ALIGN(value, align) (((value) + ((align) - 1)) & ~((align) - 1))
+
+#define RTL_MEMORY_ISP2(value) (((value) & ((value) - 1)) == 0)
+#define RTL_MEMORY_P2ALIGN(value, align) ((value) & -(sal_IntPtr)(align))
+
+#define RTL_MEMORY_P2ROUNDUP(value, align) \
+    (-(-(sal_IntPtr)(value) & -(sal_IntPtr)(align)))
+#define RTL_MEMORY_P2END(value, align) \
+    (-(~(sal_IntPtr)(value) & -(sal_IntPtr)(align)))
+
+
+/** Function inlining macros
+ *  (compiler dependent)
+ */
+#ifndef RTL_MEMORY_INLINE
+#if defined(__GNUC__)
+#define RTL_MEMORY_INLINE __inline__
+#elif defined(_MSC_VER)
+#define RTL_MEMORY_INLINE __inline
+#else
+#define RTL_MEMORY_INLINE
+#endif /* __GNUC__ || _MSC_VER */
+#endif /* RTL_MEMORY_INLINE */
+
+
+/** printf() format specifier(s)
+ *  (from C90 <sys/int_fmtio.h>)
+ */
+#ifndef PRIu64
+#if defined(_MSC_VER)
+#define PRIu64 "I64u"
+#else  /* !_MSC_VER */
+#define PRIu64 "llu"
+#endif /* !_MSC_VER */
+#endif /* PRIu64 */
+
+
+/** highbit(): log2() + 1
+ *  (complexity O(1))
+ */
+static RTL_MEMORY_INLINE int
+highbit(sal_Size n)
+{
+  register int k = 1;
+
+  if (n == 0)
+    return (0);
+#if SAL_TYPES_SIZEOFLONG == 8
+  if (n & 0xffffffff00000000ul)
+    k |= 32, n >>= 32;
+#endif
+  if (n & 0xffff0000)
+    k |= 16, n >>= 16;
+  if (n & 0xff00)
+    k |= 8, n >>= 8;
+  if (n & 0xf0)
+    k |= 4, n >>= 4;
+  if (n & 0x0c)
+    k |= 2, n >>= 2;
+  if (n & 0x02)
+    k++;
+
+  return (k);
+}
+
+#if defined(__SUNPRO_C) || defined(__SUNPRO_CC)
+#pragma inline(highbit)
+#endif /* __SUNPRO_C */
+
+
+/** lowbit(): find first bit set
+ *  (complexity O(1))
+ */
+static RTL_MEMORY_INLINE int
+lowbit(sal_Size n)
+{
+  register int k = 1;
+
+  if (n == 0)
+    return (0);
+#if SAL_TYPES_SIZEOFLONG == 8
+  if (!(n & 0xffffffff))
+    k |= 32, n >>= 32;
+#endif
+  if (!(n & 0xffff))
+    k |= 16, n >>= 16;
+  if (!(n & 0xff))
+    k |= 8, n >>= 8;
+  if (!(n & 0xf))
+    k |= 4, n >>= 4;
+  if (!(n & 0x3))
+    k |= 2, n >>= 2;
+  if (!(n & 0x1))
+    k++;
+  return (k);
+}
+
+#if defined(__SUNPRO_C) || defined(__SUNPRO_CC)
+#pragma inline(lowbit)
+#endif /* __SUNPRO_C */
+
+
+/** Queue manipulation macros
+ *  (doubly linked circular list)
+ *  (complexity O(1))
+ */
+#define QUEUE_STARTED_NAMED(entry, name) \
+  (((entry)->m_##name##next == (entry)) && ((entry)->m_##name##prev == (entry)))
+
+#define QUEUE_START_NAMED(entry, name) \
+{ \
+  (entry)->m_##name##next = (entry); \
+  (entry)->m_##name##prev = (entry); \
+}
+
+#define QUEUE_REMOVE_NAMED(entry, name) \
+{ \
+  (entry)->m_##name##prev->m_##name##next = (entry)->m_##name##next; \
+  (entry)->m_##name##next->m_##name##prev = (entry)->m_##name##prev; \
+  QUEUE_START_NAMED(entry, name); \
+}
+
+#define QUEUE_INSERT_HEAD_NAMED(head, entry, name) \
+{ \
+  (entry)->m_##name##prev = (head); \
+  (entry)->m_##name##next = (head)->m_##name##next; \
+  (head)->m_##name##next = (entry); \
+  (entry)->m_##name##next->m_##name##prev = (entry); \
+}
+
+#define QUEUE_INSERT_TAIL_NAMED(head, entry, name) \
+{ \
+  (entry)->m_##name##next = (head); \
+  (entry)->m_##name##prev = (head)->m_##name##prev; \
+  (head)->m_##name##prev = (entry); \
+  (entry)->m_##name##prev->m_##name##next = (entry); \
+}
+
+
+/** rtl_memory_lock_type
+ *  (platform dependent)
+ */
+#if defined(SAL_UNX)
+
+#include <unistd.h>
+#include <pthread.h>
+
+typedef pthread_mutex_t rtl_memory_lock_type;
+
+#define RTL_MEMORY_LOCK_INIT(lock)    pthread_mutex_init((lock), NULL)
+#define RTL_MEMORY_LOCK_DESTROY(lock) pthread_mutex_destroy((lock))
+
+#define RTL_MEMORY_LOCK_ACQUIRE(lock) pthread_mutex_lock((lock))
+#define RTL_MEMORY_LOCK_RELEASE(lock) pthread_mutex_unlock((lock))
+
+#elif defined(SAL_W32)
+
+#define WIN32_LEAN_AND_MEAN
+#include <windows.h>
+
+typedef CRITICAL_SECTION rtl_memory_lock_type;
+
+#define RTL_MEMORY_LOCK_INIT(lock)    InitializeCriticalSection((lock))
+#define RTL_MEMORY_LOCK_DESTROY(lock) DeleteCriticalSection((lock))
+
+#define RTL_MEMORY_LOCK_ACQUIRE(lock) EnterCriticalSection((lock))
+#define RTL_MEMORY_LOCK_RELEASE(lock) LeaveCriticalSection((lock))
+
+#else
+#error Unknown platform
+#endif /* SAL_UNX | SAL_W32 */
+
+
+/** Cache creation flags.
+ *  @internal
+ */
+#define RTL_CACHE_FLAG_NOMAGAZINE   (1 << 13) /* w/o magazine layer */
+#define RTL_CACHE_FLAG_QUANTUMCACHE (2 << 13) /* used as arena quantum cache */
+
+
+#ifdef __cplusplus
+}
+#endif
+
+#endif /* INCLUDED_RTL_ALLOC_IMPL_H */