blob: fe06f065b0023bcadd527fb74be089d4af03229f [file] [log] [blame]
Edward O'Callaghan2bf62722009-08-05 04:02:56 +00001/* ===-- clzsi2.c - Implement __clzsi2 -------------------------------------===
2 *
Chandler Carruth7a739a02019-01-19 10:56:40 +00003 * Part of the LLVM Project, under the Apache License v2.0 with LLVM Exceptions.
4 * See https://llvm.org/LICENSE.txt for license information.
5 * SPDX-License-Identifier: Apache-2.0 WITH LLVM-exception
Edward O'Callaghan2bf62722009-08-05 04:02:56 +00006 *
7 * ===----------------------------------------------------------------------===
8 *
9 * This file implements __clzsi2 for the compiler_rt library.
10 *
11 * ===----------------------------------------------------------------------===
12 */
Daniel Dunbarb3a69012009-06-26 16:47:03 +000013
14#include "int_lib.h"
15
Edward O'Callaghan2bf62722009-08-05 04:02:56 +000016/* Returns: the number of leading 0-bits */
Daniel Dunbarb3a69012009-06-26 16:47:03 +000017
Edward O'Callaghan2bf62722009-08-05 04:02:56 +000018/* Precondition: a != 0 */
Daniel Dunbarb3a69012009-06-26 16:47:03 +000019
Anton Korobeynikov1c5f89b2011-04-19 17:52:09 +000020COMPILER_RT_ABI si_int
Daniel Dunbarb3a69012009-06-26 16:47:03 +000021__clzsi2(si_int a)
22{
23 su_int x = (su_int)a;
Edward O'Callaghan2bf62722009-08-05 04:02:56 +000024 si_int t = ((x & 0xFFFF0000) == 0) << 4; /* if (x is small) t = 16 else 0 */
25 x >>= 16 - t; /* x = [0 - 0xFFFF] */
26 su_int r = t; /* r = [0, 16] */
27 /* return r + clz(x) */
Daniel Dunbarb3a69012009-06-26 16:47:03 +000028 t = ((x & 0xFF00) == 0) << 3;
Edward O'Callaghan2bf62722009-08-05 04:02:56 +000029 x >>= 8 - t; /* x = [0 - 0xFF] */
30 r += t; /* r = [0, 8, 16, 24] */
31 /* return r + clz(x) */
Daniel Dunbarb3a69012009-06-26 16:47:03 +000032 t = ((x & 0xF0) == 0) << 2;
Edward O'Callaghan2bf62722009-08-05 04:02:56 +000033 x >>= 4 - t; /* x = [0 - 0xF] */
34 r += t; /* r = [0, 4, 8, 12, 16, 20, 24, 28] */
35 /* return r + clz(x) */
Daniel Dunbarb3a69012009-06-26 16:47:03 +000036 t = ((x & 0xC) == 0) << 1;
Edward O'Callaghan2bf62722009-08-05 04:02:56 +000037 x >>= 2 - t; /* x = [0 - 3] */
38 r += t; /* r = [0 - 30] and is even */
39 /* return r + clz(x) */
40/* switch (x)
41 * {
42 * case 0:
43 * return r + 2;
44 * case 1:
45 * return r + 1;
46 * case 2:
47 * case 3:
48 * return r;
49 * }
50 */
Daniel Dunbarb3a69012009-06-26 16:47:03 +000051 return r + ((2 - x) & -((x & 2) == 0));
52}