Blame mpn/generic/scan0.c

Packit 5c3484
/* mpn_scan0 -- Scan from a given bit position for the next clear bit.
Packit 5c3484
Packit 5c3484
Copyright 1994, 1996, 2001, 2002, 2004 Free Software Foundation, Inc.
Packit 5c3484
Packit 5c3484
This file is part of the GNU MP Library.
Packit 5c3484
Packit 5c3484
The GNU MP Library is free software; you can redistribute it and/or modify
Packit 5c3484
it under the terms of either:
Packit 5c3484
Packit 5c3484
  * the GNU Lesser General Public License as published by the Free
Packit 5c3484
    Software Foundation; either version 3 of the License, or (at your
Packit 5c3484
    option) any later version.
Packit 5c3484
Packit 5c3484
or
Packit 5c3484
Packit 5c3484
  * the GNU General Public License as published by the Free Software
Packit 5c3484
    Foundation; either version 2 of the License, or (at your option) any
Packit 5c3484
    later version.
Packit 5c3484
Packit 5c3484
or both in parallel, as here.
Packit 5c3484
Packit 5c3484
The GNU MP Library is distributed in the hope that it will be useful, but
Packit 5c3484
WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY
Packit 5c3484
or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU General Public License
Packit 5c3484
for more details.
Packit 5c3484
Packit 5c3484
You should have received copies of the GNU General Public License and the
Packit 5c3484
GNU Lesser General Public License along with the GNU MP Library.  If not,
Packit 5c3484
see https://www.gnu.org/licenses/.  */
Packit 5c3484
Packit 5c3484
#include "gmp.h"
Packit 5c3484
#include "gmp-impl.h"
Packit 5c3484
#include "longlong.h"
Packit 5c3484
Packit 5c3484
/* Argument constraints:
Packit 5c3484
   1. U must sooner or later have a limb with a clear bit.
Packit 5c3484
 */
Packit 5c3484
Packit 5c3484
mp_bitcnt_t
Packit 5c3484
mpn_scan0 (mp_srcptr up, mp_bitcnt_t starting_bit)
Packit 5c3484
{
Packit 5c3484
  mp_size_t starting_word;
Packit 5c3484
  mp_limb_t alimb;
Packit 5c3484
  int cnt;
Packit 5c3484
  mp_srcptr p;
Packit 5c3484
Packit 5c3484
  /* Start at the word implied by STARTING_BIT.  */
Packit 5c3484
  starting_word = starting_bit / GMP_NUMB_BITS;
Packit 5c3484
  p = up + starting_word;
Packit 5c3484
  alimb = *p++ ^ GMP_NUMB_MASK;
Packit 5c3484
Packit 5c3484
  /* Mask off any bits before STARTING_BIT in the first limb.  */
Packit 5c3484
  alimb &= - (mp_limb_t) 1 << (starting_bit % GMP_NUMB_BITS);
Packit 5c3484
Packit 5c3484
  while (alimb == 0)
Packit 5c3484
    alimb = *p++ ^ GMP_NUMB_MASK;
Packit 5c3484
Packit 5c3484
  count_trailing_zeros (cnt, alimb);
Packit 5c3484
  return (p - up - 1) * GMP_NUMB_BITS + cnt;
Packit 5c3484
}