sal/rtl/alloc_impl.hxx

   1 /* -*- Mode: C++; tab-width: 4; indent-tabs-mode: nil; c-basic-offset: 4 -*- */
   2 /*
   3  * This file is part of the LibreOffice project.
   4  *
   5  * This Source Code Form is subject to the terms of the Mozilla Public
   6  * License, v. 2.0. If a copy of the MPL was not distributed with this
   7  * file, You can obtain one at http://mozilla.org/MPL/2.0/.
   8  *
   9  * This file incorporates work covered by the following license notice:
  10  *
  11  *   Licensed to the Apache Software Foundation (ASF) under one or more
  12  *   contributor license agreements. See the NOTICE file distributed
  13  *   with this work for additional information regarding copyright
  14  *   ownership. The ASF licenses this file to you under the Apache
  15  *   License, Version 2.0 (the "License"); you may not use this file
  16  *   except in compliance with the License. You may obtain a copy of
  17  *   the License at http://www.apache.org/licenses/LICENSE-2.0 .
  18  */
  19
  20 #ifndef INCLUDED_SAL_RTL_ALLOC_IMPL_HXX
  21 #define INCLUDED_SAL_RTL_ALLOC_IMPL_HXX
  22
  23 #include <sal/types.h>
  24
  25 /** Alignment macros
  26  */
  27 #if SAL_TYPES_ALIGNMENT4 > 1
  28 #define RTL_MEMORY_ALIGNMENT_4 SAL_TYPES_ALIGNMENT4
  29 #else
  30 #define RTL_MEMORY_ALIGNMENT_4 sizeof(int)
  31 #endif /* SAL_TYPES_ALIGNMENT4 */
  32
  33 #if SAL_TYPES_ALIGNMENT8 > 1
  34 #define RTL_MEMORY_ALIGNMENT_8 SAL_TYPES_ALIGNMENT8
  35 #else
  36 #define RTL_MEMORY_ALIGNMENT_8 sizeof(void*)
  37 #endif /* SAL_TYPES_ALIGNMENT8 */
  38
  39 #if 0  /* @@@ */
  40 #define RTL_MEMORY_ALIGNMENT_1 8
  41 #define RTL_MEMORY_ALIGNMENT_2 (sizeof(void*) * 2)
  42 #endif /* @@@ */
  43
  44 #define RTL_MEMORY_ALIGN(value, align) (((value) + ((align) - 1)) & ~((align) - 1))
  45
  46 #define RTL_MEMORY_ISP2(value) (((value) & ((value) - 1)) == 0)
  47 #define RTL_MEMORY_P2ALIGN(value, align) ((value) & -static_cast<sal_IntPtr>(align))
  48
  49 #define RTL_MEMORY_P2ROUNDUP(value, align) \
  50     (-(-static_cast<sal_IntPtr>(value) & -static_cast<sal_IntPtr>(align)))
  51 #define RTL_MEMORY_P2END(value, align) \
  52     (-(~static_cast<sal_IntPtr>(value) & -static_cast<sal_IntPtr>(align)))
  53
  54 /** highbit(): log2() + 1
  55     (complexity O(1))
  56 */
  57 static inline unsigned int highbit(sal_Size n)
  58 {
  59   unsigned int k = 1;
  60
  61   if (n == 0)
  62     return 0;
  63   if constexpr (sizeof(n) >= 8)
  64   {
  65     if (n & 0xffffffff00000000)
  66     {
  67       k |= 32;
  68       n >>= 32;
  69     }
  70   }
  71   if (n & 0xffff0000)
  72   {
  73     k |= 16;
  74     n >>= 16;
  75   }
  76   if (n & 0xff00)
  77   {
  78     k |= 8;
  79     n >>= 8;
  80   }
  81   if (n & 0xf0)
  82   {
  83     k |= 4;
  84     n >>= 4;
  85   }
  86   if (n & 0x0c)
  87   {
  88     k |= 2;
  89     n >>= 2;
  90   }
  91   if (n & 0x02)
  92     k++;
  93
  94   return k;
  95 }
  96
  97 /** find first bit set
  98     (complexity O(1))
  99 */
 100 static inline unsigned int lowbit(sal_Size n)
 101 {
 102   unsigned int k = 1;
 103
 104   if (n == 0)
 105     return 0;
 106
 107   if constexpr (sizeof(n) >= 8)
 108   {
 109     if (!(n & 0xffffffff))
 110     {
 111       k |= 32;
 112       n >>= 32;
 113     }
 114   }
 115
 116   if (!(n & 0xffff))
 117   {
 118     k |= 16;
 119     n >>= 16;
 120   }
 121
 122   if (!(n & 0xff))
 123   {
 124     k |= 8;
 125     n >>= 8;
 126   }
 127
 128   if (!(n & 0xf))
 129   {
 130     k |= 4;
 131     n >>= 4;
 132   }
 133
 134   if (!(n & 0x3))
 135   {
 136     k |= 2;
 137     n >>= 2;
 138   }
 139
 140   if (!(n & 0x1))
 141     k++;
 142
 143   return k;
 144 }
 145
 146 /** Queue manipulation macros
 147     (doubly linked circular list)
 148     (complexity O(1))
 149 */
 150 #define QUEUE_STARTED_NAMED(entry, name) \
 151   (((entry)->m_##name##next == (entry)) && ((entry)->m_##name##prev == (entry)))
 152
 153 #define QUEUE_START_NAMED(entry, name) \
 154 { \
 155   (entry)->m_##name##next = (entry); \
 156   (entry)->m_##name##prev = (entry); \
 157 }
 158
 159 #define QUEUE_REMOVE_NAMED(entry, name) \
 160 { \
 161   (entry)->m_##name##prev->m_##name##next = (entry)->m_##name##next; \
 162   (entry)->m_##name##next->m_##name##prev = (entry)->m_##name##prev; \
 163   QUEUE_START_NAMED(entry, name); \
 164 }
 165
 166 #define QUEUE_INSERT_HEAD_NAMED(head, entry, name) \
 167 { \
 168   (entry)->m_##name##prev = (head); \
 169   (entry)->m_##name##next = (head)->m_##name##next; \
 170   (head)->m_##name##next = (entry); \
 171   (entry)->m_##name##next->m_##name##prev = (entry); \
 172 }
 173
 174 #define QUEUE_INSERT_TAIL_NAMED(head, entry, name) \
 175 { \
 176   (entry)->m_##name##next = (head); \
 177   (entry)->m_##name##prev = (head)->m_##name##prev; \
 178   (head)->m_##name##prev = (entry); \
 179   (entry)->m_##name##prev->m_##name##next = (entry); \
 180 }
 181
 182 #if defined(SAL_UNX)
 183
 184 #include <unistd.h>
 185 #include <pthread.h>
 186
 187 typedef pthread_mutex_t rtl_memory_lock_type;
 188
 189 #define RTL_MEMORY_LOCK_INIT(lock)    pthread_mutex_init((lock), nullptr)
 190 #define RTL_MEMORY_LOCK_DESTROY(lock) pthread_mutex_destroy((lock))
 191
 192 #define RTL_MEMORY_LOCK_ACQUIRE(lock) pthread_mutex_lock((lock))
 193 #define RTL_MEMORY_LOCK_RELEASE(lock) pthread_mutex_unlock((lock))
 194
 195 #elif defined(_WIN32)
 196
 197 #define WIN32_LEAN_AND_MEAN
 198 #include <windows.h>
 199
 200 typedef CRITICAL_SECTION rtl_memory_lock_type;
 201
 202 #define RTL_MEMORY_LOCK_INIT(lock)    InitializeCriticalSection((lock))
 203 #define RTL_MEMORY_LOCK_DESTROY(lock) DeleteCriticalSection((lock))
 204
 205 #define RTL_MEMORY_LOCK_ACQUIRE(lock) EnterCriticalSection((lock))
 206 #define RTL_MEMORY_LOCK_RELEASE(lock) LeaveCriticalSection((lock))
 207
 208 #else
 209 #error Unknown platform
 210 #endif /* SAL_UNX | _WIN32 */
 211
 212 /** Cache creation flags.
 213     @internal
 214 */
 215 #define RTL_CACHE_FLAG_NOMAGAZINE   (1 << 13) /* w/o magazine layer */
 216
 217 #endif // INCLUDED_SAL_RTL_ALLOC_IMPL_HXX
 218
 219 /* vim:set shiftwidth=4 softtabstop=4 expandtab: */