1/*- 2 * Copyright (c) 2004 Tim J. Robbins. 3 * All rights reserved. 4 * 5 * Redistribution and use in source and binary forms, with or without 6 * modification, are permitted provided that the following conditions 7 * are met: 8 * 1. Redistributions of source code must retain the above copyright 9 * notice, this list of conditions and the following disclaimer. 10 * 2. Redistributions in binary form must reproduce the above copyright 11 * notice, this list of conditions and the following disclaimer in the 12 * documentation and/or other materials provided with the distribution. 13 * 14 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND 15 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE 16 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE 17 * ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE 18 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL 19 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS 20 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) 21 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT 22 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY 23 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF 24 * SUCH DAMAGE. 25 */ 26 27#include <sys/cdefs.h> 28__FBSDID("$FreeBSD: src/lib/libc/locale/nextwctype.c,v 1.1 2004/07/08 06:43:37 tjr Exp $"); 29 30#include "xlocale_private.h" 31 32#include <runetype.h> 33#include <wchar.h> 34#include <wctype.h> 35 36wint_t 37nextwctype_l(wint_t wc, wctype_t wct, locale_t loc) 38{ 39 size_t lim; 40 _RuneRange *rr; 41 _RuneEntry *base, *re; 42 int noinc; 43 _RuneLocale *rl = &loc->__lc_ctype->_CurrentRuneLocale; 44 45 noinc = 0; 46 if (wc < _CACHED_RUNES) { 47 wc++; 48 while (wc < _CACHED_RUNES) { 49 if (rl->__runetype[wc] & wct) 50 return (wc); 51 wc++; 52 } 53 wc--; 54 } 55 rr = &rl->__runetype_ext; 56 if (rr->__ranges != NULL && wc < rr->__ranges[0].__min) { 57 wc = rr->__ranges[0].__min; 58 noinc = 1; 59 } 60 61 /* Binary search -- see bsearch.c for explanation. */ 62 base = rr->__ranges; 63 for (lim = rr->__nranges; lim != 0; lim >>= 1) { 64 re = base + (lim >> 1); 65 if (re->__min <= wc && wc <= re->__max) 66 goto found; 67 else if (wc > re->__max) { 68 base = re + 1; 69 lim--; 70 } 71 } 72 return (-1); 73found: 74 if (!noinc) 75 wc++; 76 if (re->__min <= wc && wc <= re->__max) { 77 if (re->__types != NULL) { 78 for (; wc <= re->__max; wc++) 79 if (re->__types[wc - re->__min] & wct) 80 return (wc); 81 } else if (re->__map & wct) 82 return (wc); 83 } 84 while (++re < rr->__ranges + rr->__nranges) { 85 wc = re->__min; 86 if (re->__types != NULL) { 87 for (; wc <= re->__max; wc++) 88 if (re->__types[wc - re->__min] & wct) 89 return (wc); 90 } else if (re->__map & wct) 91 return (wc); 92 } 93 return (-1); 94} 95 96wint_t 97nextwctype(wint_t wc, wctype_t wct) 98{ 99 return nextwctype_l(wc, wct, __current_locale()); 100} 101