chiark - git - mdw - mLib/blob - bits.h

   1 /* -*-c-*-
   2  *
   3  * $Id: bits.h,v 1.5 2000/06/17 10:36:06 mdw Exp $
   4  *
   5  * Portable bit-level manipulation macros
   6  *
   7  * (c) 1998 Straylight/Edgeware
   8  */
   9
  10 /*----- Licensing notice --------------------------------------------------*
  11  *
  12  * This file is part of the mLib utilities library.
  13  *
  14  * mLib is free software; you can redistribute it and/or modify
  15  * it under the terms of the GNU Library General Public License as
  16  * published by the Free Software Foundation; either version 2 of the
  17  * License, or (at your option) any later version.
  18  *
  19  * mLib is distributed in the hope that it will be useful,
  20  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  21  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  22  * GNU Library General Public License for more details.
  23  *
  24  * You should have received a copy of the GNU Library General Public
  25  * License along with mLib; if not, write to the Free
  26  * Software Foundation, Inc., 59 Temple Place - Suite 330, Boston,
  27  * MA 02111-1307, USA.
  28  */
  29
  30 /*----- Revision history --------------------------------------------------*
  31  *
  32  * $Log: bits.h,v $
  33  * Revision 1.5  2000/06/17 10:36:06  mdw
  34  * Support for 24-bit types.
  35  *
  36  * Revision 1.4  1999/12/10 23:42:04  mdw
  37  * Change header file guard names.
  38  *
  39  * Revision 1.3  1999/06/20 23:31:52  mdw
  40  * More portability enhancements.
  41  *
  42  * Revision 1.2  1999/06/17 00:12:46  mdw
  43  * Improve portability for shift and rotate macros.
  44  *
  45  * Revision 1.1  1999/06/01 09:46:19  mdw
  46  * New addition: bit manipulation macros.
  47  *
  48  */
  49
  50 #ifndef MLIB_BITS_H
  51 #define MLIB_BITS_H
  52
  53 #ifdef __cplusplus
  54   extern "C" {
  55 #endif
  56
  57 /*----- Header files ------------------------------------------------------*/
  58
  59 #include <limits.h>
  60 #include <stddef.h>
  61
  62 /*----- Decide on some types ----------------------------------------------*/
  63
  64 /* --- Decide on a 32-bit type --- *
  65  *
  66  * I want a type which is capable of expressing 32-bit numbers.  Because some
  67  * implementations have 64-bit @long@s (infinitely preferable to the abortion
  68  * that is @long long@), using @unsigned long@ regardless is wasteful.  So,
  69  * if @int@ appears to be good enough, then I'll go with that.
  70  */
  71
  72 #if UINT_MAX >= 0xffffffffu
  73   typedef unsigned int uint32;
  74 #else
  75   typedef unsigned long uint32;
  76 #endif
  77
  78 /* --- Decide on a 24-bit type --- */
  79
  80 #if UINT_MAX >= 0x00ffffffu
  81   typedef unsigned int uint24;
  82 #else
  83   typedef unsigned long uint24;
  84 #endif
  85
  86 /* --- Decide on 16-bit and 8-bit types --- *
  87  *
  88  * This is more for brevity than anything else.
  89  */
  90
  91 typedef unsigned short uint16;
  92 typedef unsigned char octet;
  93
  94 /* --- WARNING! --- *
  95  *
  96  * Never lose sight of the fact that the above types may be wider than the
  97  * names suggest.  Some architectures have 32-bit @short@s for example.
  98  */
  99
 100 /*----- Macros ------------------------------------------------------------*/
 101
 102 /* --- Useful masks --- */
 103
 104 #define MASK8 0xffu
 105 #define MASK16 0xffffu
 106 #define MASK24 0xffffffu
 107 #define MASK32 0xffffffffu
 108
 109 /* --- Type coercions --- */
 110
 111 #define U8(x) ((octet)((x) & MASK8))
 112 #define U16(x) ((uint16)((x) & MASK16))
 113 #define U24(x) ((uint24)((x) & MASK24))
 114 #define U32(x) ((uint32)((x) & MASK32))
 115
 116 /* --- Safe shifting macros --- */
 117
 118 #define LSL8(v, s) U8(U8(v) << ((s) & 7u))
 119 #define LSR8(v, s) U8(U8(v) >> ((s) & 7u))
 120 #define LSL16(v, s) U16(U16(v) << ((s) & 15u))
 121 #define LSR16(v, s) U16(U16(v) >> ((s) & 15u))
 122 #define LSL24(v, s) U24(U24(v) << ((s) % 24u))
 123 #define LSR24(v, s) U24(U24(v) >> ((s) % 24u))
 124 #define LSL32(v, s) U32(U32(v) << ((s) & 31u))
 125 #define LSR32(v, s) U32(U32(v) >> ((s) & 31u))
 126
 127 /* --- Rotation macros --- */
 128
 129 #define ROL8(v, s) (LSL8((v), (s)) | (LSR8((v), 8u - (s))))
 130 #define ROR8(v, s) (LSR8((v), (s)) | (LSL8((v), 8u - (s))))
 131 #define ROL16(v, s) (LSL16((v), (s)) | (LSR16((v), 16u - (s))))
 132 #define ROR16(v, s) (LSR16((v), (s)) | (LSL16((v), 16u - (s))))
 133 #define ROL24(v, s) (LSL24((v), (s)) | (LSR24((v), 24u - (s))))
 134 #define ROR24(v, s) (LSR24((v), (s)) | (LSL24((v), 24u - (s))))
 135 #define ROL32(v, s) (LSL32((v), (s)) | (LSR32((v), 32u - (s))))
 136 #define ROR32(v, s) (LSR32((v), (s)) | (LSL32((v), 32u - (s))))
 137
 138 /* --- Storage and retrieval --- */
 139
 140 #define GETBYTE(p, o) (((octet *)(p))[o] & MASK8)
 141 #define PUTBYTE(p, o, v) (((octet *)(p))[o] = U8((v)))
 142
 143 #define LOAD8(p) (GETBYTE((p), 0))
 144 #define STORE8(p, v) (PUTBYTE((p), 0, (v)))
 145
 146 #define LOAD16_B(p)                                                     \
 147   (((uint16)GETBYTE((p), 0) << 8) |                                     \
 148    ((uint16)GETBYTE((p), 1) << 0))
 149 #define LOAD16_L(p)                                                     \
 150   (((uint16)GETBYTE((p), 0) << 0) |                                     \
 151    ((uint16)GETBYTE((p), 1) << 8))
 152 #define LOAD16(p) LOAD16_B((p))
 153
 154 #define STORE16_B(p, v)                                                 \
 155   (PUTBYTE((p), 0, (uint16)(v) >> 8),                                   \
 156    PUTBYTE((p), 1, (uint16)(v) >> 0))
 157 #define STORE16_L(p, v)                                                 \
 158   (PUTBYTE((p), 0, (uint16)(v) >> 0),                                   \
 159    PUTBYTE((p), 1, (uint16)(v) >> 8))
 160 #define STORE16(p, v) STORE16_B((p), (v))
 161
 162 #define LOAD24_B(p)                                                     \
 163   (((uint24)GETBYTE((p), 0) << 16) |                                    \
 164    ((uint24)GETBYTE((p), 1) <<  8) |                                    \
 165    ((uint24)GETBYTE((p), 2) <<  0))
 166 #define LOAD24_L(p)                                                     \
 167   (((uint24)GETBYTE((p), 0) <<  0) |                                    \
 168    ((uint24)GETBYTE((p), 1) <<  8) |                                    \
 169    ((uint24)GETBYTE((p), 2) << 16))
 170 #define LOAD24(p) LOAD24_B((p))
 171
 172 #define STORE24_B(p, v)                                                 \
 173   (PUTBYTE((p), 0, (uint24)(v) >> 16),                                  \
 174    PUTBYTE((p), 1, (uint24)(v) >>  8),                                  \
 175    PUTBYTE((p), 2, (uint24)(v) >>  0))
 176 #define STORE24_L(p, v)                                                 \
 177   (PUTBYTE((p), 0, (uint24)(v) >>  0),                                  \
 178    PUTBYTE((p), 1, (uint24)(v) >>  8),                                  \
 179    PUTBYTE((p), 2, (uint24)(v) >> 16))
 180 #define STORE24(p, v) STORE24_B((p), (v))
 181
 182 #define LOAD32_B(p)                                                     \
 183   (((uint32)GETBYTE((p), 0) << 24) |                                    \
 184    ((uint32)GETBYTE((p), 1) << 16) |                                    \
 185    ((uint32)GETBYTE((p), 2) <<  8) |                                    \
 186    ((uint32)GETBYTE((p), 3) <<  0))
 187 #define LOAD32_L(p)                                                     \
 188   (((uint32)GETBYTE((p), 0) <<  0) |                                    \
 189    ((uint32)GETBYTE((p), 1) <<  8) |                                    \
 190    ((uint32)GETBYTE((p), 2) << 16) |                                    \
 191    ((uint32)GETBYTE((p), 3) << 24))
 192 #define LOAD32(p) LOAD32_B((p))
 193
 194 #define STORE32_B(p, v)                                                 \
 195   (PUTBYTE((p), 0, (uint32)(v) >> 24),                                  \
 196    PUTBYTE((p), 1, (uint32)(v) >> 16),                                  \
 197    PUTBYTE((p), 2, (uint32)(v) >>  8),                                  \
 198    PUTBYTE((p), 3, (uint32)(v) >>  0))
 199 #define STORE32_L(p, v)                                                 \
 200   (PUTBYTE((p), 0, (uint32)(v) >>  0),                                  \
 201    PUTBYTE((p), 1, (uint32)(v) >>  8),                                  \
 202    PUTBYTE((p), 2, (uint32)(v) >> 16),                                  \
 203    PUTBYTE((p), 3, (uint32)(v) >> 24))
 204 #define STORE32(p, v) STORE32_B((p), (v))
 205
 206 /*----- That's all, folks -------------------------------------------------*/
 207
 208 #ifdef __cplusplus
 209   }
 210 #endif
 211
 212 #endif