0,0 → 1,78 |
/**************************************************************************** |
* |
* Open Watcom Project |
* |
* Portions Copyright (c) 1983-2002 Sybase, Inc. All Rights Reserved. |
* |
* ======================================================================== |
* |
* This file contains Original Code and/or Modifications of Original |
* Code as defined in and that are subject to the Sybase Open Watcom |
* Public License version 1.0 (the 'License'). You may not use this file |
* except in compliance with the License. BY USING THIS FILE YOU AGREE TO |
* ALL TERMS AND CONDITIONS OF THE LICENSE. A copy of the License is |
* provided with the Original Code and Modifications, and is also |
* available at www.sybase.com/developer/opensource. |
* |
* The Original Code and all software distributed under the License are |
* distributed on an 'AS IS' basis, WITHOUT WARRANTY OF ANY KIND, EITHER |
* EXPRESS OR IMPLIED, AND SYBASE AND ALL CONTRIBUTORS HEREBY DISCLAIM |
* ALL SUCH WARRANTIES, INCLUDING WITHOUT LIMITATION, ANY WARRANTIES OF |
* MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE, QUIET ENJOYMENT OR |
* NON-INFRINGEMENT. Please see the License for the specific language |
* governing rights and limitations under the License. |
* |
* ======================================================================== |
* |
* Description: WHEN YOU FIGURE OUT WHAT THIS FILE DOES, PLEASE |
* DESCRIBE IT HERE! |
* |
****************************************************************************/ |
|
|
#include "variety.h" |
#include "widechar.h" |
#include <stddef.h> |
#include <string.h> |
#include "setbits.h" |
|
/* The strspn function computes the length of the initial segment of the |
string pointed to by str which consists entirely of characters from |
the string pointed to by charset. |
*/ |
|
|
_WCRTLINK size_t __F_NAME(strspn,wcsspn) ( const CHAR_TYPE *str, const CHAR_TYPE *charset ) |
{ |
#if defined(__WIDECHAR__) |
|
const CHAR_TYPE *p1; |
const CHAR_TYPE *p2; |
CHAR_TYPE tc1; |
CHAR_TYPE tc2; |
size_t len; |
|
len = 0; |
for( p1 = str; tc1 = *p1; p1++, len++ ) { |
for( p2 = charset; tc2 = *p2; p2++ ) { |
if( tc1 == tc2 ) break; |
} |
if( tc2 == NULLCHAR ) break; |
} |
return( len ); |
|
|
#else |
unsigned /*char*/ tc; |
unsigned char vector[32]; |
size_t len; |
|
__setbits( vector, charset ); |
len = 0; |
for( ; tc = (unsigned char) *str; ++str, ++len ) { |
/* quit if we find any char not in charset */ |
if( ( vector[ tc >> 3 ] & _Bits[ tc & 0x07 ] ) == 0 ) break; |
} |
return( len ); |
#endif |
} |