lib/bitarray.h

   1 /*
   2  *      UCW Library -- Bit Array Operations
   3  *
   4  *      (c) 2003--2004 Martin Mares <mj@ucw.cz>
   5  *
   6  *      This software may be freely distributed and used according to the terms
   7  *      of the GNU Lesser General Public License.
   8  */
   9
  10 #include <string.h>
  11
  12 typedef u32 *bitarray_t;
  13 #define BIT_ARRAY_WORDS(n) (((n)+31)/32)
  14 #define BIT_ARRAY_BYTES(n) (4*BIT_ARRAY_WORDS(n))
  15 #define BIT_ARRAY(name,size) u32 name[BIT_ARRAY_WORDS(size)]
  16
  17 static inline void
  18 bit_array_zero(bitarray_t a, uns n)
  19 {
  20   bzero(a, BIT_ARRAY_BYTES(n));
  21 }
  22
  23 static inline void
  24 bit_array_set_all(bitarray_t a, uns n)
  25 {
  26   memset(a, 255, BIT_ARRAY_BYTES(n));
  27 }
  28
  29 static inline void
  30 bit_array_set(bitarray_t a, uns i)
  31 {
  32   a[i/32] |= (1 << (i%32));
  33 }
  34
  35 static inline void
  36 bit_array_clear(bitarray_t a, uns i)
  37 {
  38   a[i/32] &= ~(1 << (i%32));
  39 }
  40
  41 static inline uns
  42 bit_array_isset(bitarray_t a, uns i)
  43 {
  44   return a[i/32] & (1 << (i%32));
  45 }
  46
  47 static inline uns
  48 bit_array_get(bitarray_t a, uns i)
  49 {
  50   return !! bit_array_isset(a, i);
  51 }
  52
  53 static inline uns
  54 bit_array_test_and_set(bitarray_t a, uns i)
  55 {
  56   uns t = bit_array_isset(a, i);
  57   bit_array_set(a, i);
  58   return t;
  59 }
  60
  61 static inline uns
  62 bit_array_test_and_clear(bitarray_t a, uns i)
  63 {
  64   uns t = bit_array_isset(a, i);
  65   bit_array_clear(a, i);
  66   return t;
  67 }
  68
  69 /* Iterate over all set bits, possibly destructively */
  70 #define BIT_ARRAY_FISH_BITS_BEGIN(var,ary,size)                                 \
  71   for (uns var##_hi=0; var##_hi < BIT_ARRAY_WORDS(size); var##_hi++)            \
  72     for (uns var##_lo=0; ary[var##_hi]; var##_lo++)                             \
  73       if (ary[var##_hi] & (1 << var##_lo))                                      \
  74         {                                                                       \
  75           uns var = 32*var##_hi + var##_lo;                                     \
  76           ary[var##_hi] &= ~(1 << var##_lo);                                    \
  77           do
  78
  79 #define BIT_ARRAY_FISH_BITS_END                                                 \
  80           while (0);                                                            \
  81         }