blob: 95666738f721c009ec08151262eb80eb952190a3 [file] [log] [blame]
Edward O'Callaghan37a6a452009-08-07 20:30:09 +00001/* ===-- popcountti2.c - Implement __popcountti2 ----------------------------===
2 *
3 * The LLVM Compiler Infrastructure
4 *
Howard Hinnant9ad441f2010-11-16 22:13:33 +00005 * This file is dual licensed under the MIT and the University of Illinois Open
6 * Source Licenses. See LICENSE.TXT for details.
Edward O'Callaghan37a6a452009-08-07 20:30:09 +00007 *
8 * ===----------------------------------------------------------------------===
9 *
10 * This file implements __popcountti2 for the compiler_rt library.
11 *
12 * ===----------------------------------------------------------------------===
13 */
Daniel Dunbarb3a69012009-06-26 16:47:03 +000014
Daniel Dunbarb3a69012009-06-26 16:47:03 +000015#include "int_lib.h"
16
Chandler Carruth7f2d7c72012-06-22 21:09:22 +000017#if __x86_64
18
Edward O'Callaghan37a6a452009-08-07 20:30:09 +000019/* Returns: count of 1 bits */
Daniel Dunbarb3a69012009-06-26 16:47:03 +000020
21si_int
22__popcountti2(ti_int a)
23{
24 tu_int x3 = (tu_int)a;
25 x3 = x3 - ((x3 >> 1) & (((tu_int)0x5555555555555555uLL << 64) |
26 0x5555555555555555uLL));
Edward O'Callaghan37a6a452009-08-07 20:30:09 +000027 /* Every 2 bits holds the sum of every pair of bits (64) */
Daniel Dunbarb3a69012009-06-26 16:47:03 +000028 x3 = ((x3 >> 2) & (((tu_int)0x3333333333333333uLL << 64) | 0x3333333333333333uLL))
29 + (x3 & (((tu_int)0x3333333333333333uLL << 64) | 0x3333333333333333uLL));
Edward O'Callaghan37a6a452009-08-07 20:30:09 +000030 /* Every 4 bits holds the sum of every 4-set of bits (3 significant bits) (32) */
Daniel Dunbarb3a69012009-06-26 16:47:03 +000031 x3 = (x3 + (x3 >> 4))
32 & (((tu_int)0x0F0F0F0F0F0F0F0FuLL << 64) | 0x0F0F0F0F0F0F0F0FuLL);
Edward O'Callaghan37a6a452009-08-07 20:30:09 +000033 /* Every 8 bits holds the sum of every 8-set of bits (4 significant bits) (16) */
Daniel Dunbarb3a69012009-06-26 16:47:03 +000034 du_int x2 = (du_int)(x3 + (x3 >> 64));
Edward O'Callaghan37a6a452009-08-07 20:30:09 +000035 /* Every 8 bits holds the sum of every 8-set of bits (5 significant bits) (8) */
Daniel Dunbarb3a69012009-06-26 16:47:03 +000036 su_int x = (su_int)(x2 + (x2 >> 32));
Edward O'Callaghan37a6a452009-08-07 20:30:09 +000037 /* Every 8 bits holds the sum of every 8-set of bits (6 significant bits) (4) */
Daniel Dunbarb3a69012009-06-26 16:47:03 +000038 x = x + (x >> 16);
Edward O'Callaghan37a6a452009-08-07 20:30:09 +000039 /* Every 8 bits holds the sum of every 8-set of bits (7 significant bits) (2) */
40 /* Upper 16 bits are garbage */
41 return (x + (x >> 8)) & 0xFF; /* (8 significant bits) */
Daniel Dunbarb3a69012009-06-26 16:47:03 +000042}
43
44#endif