t2ex/bsd_source/lib/libc/src_bsd/string/strspn.c | bare source | permlink (0.03 seconds) |
1: /* $OpenBSD: strspn.c,v 1.5 2005/08/08 08:05:37 espie Exp $ */ 2: /* 3: * Copyright (c) 1989 The Regents of the University of California. 4: * All rights reserved. 5: * 6: * Redistribution and use in source and binary forms, with or without 7: * modification, are permitted provided that the following conditions 8: * are met: 9: * 1. Redistributions of source code must retain the above copyright 10: * notice, this list of conditions and the following disclaimer. 11: * 2. Redistributions in binary form must reproduce the above copyright 12: * notice, this list of conditions and the following disclaimer in the 13: * documentation and/or other materials provided with the distribution. 14: * 3. Neither the name of the University nor the names of its contributors 15: * may be used to endorse or promote products derived from this software 16: * without specific prior written permission. 17: * 18: * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND 19: * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE 20: * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE 21: * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE 22: * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL 23: * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS 24: * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) 25: * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT 26: * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY 27: * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF 28: * SUCH DAMAGE. 29: */ 30: 31: #include <string.h> 32: 33: /* 34: * Span the string s2 (skip characters that are in s2). 35: */ 36: size_t 37: strspn(const char *s1, const char *s2) 38: { 39: const char *p = s1, *spanp; 40: char c, sc; 41: 42: /* 43: * Skip any characters in s2, excluding the terminating \0. 44: */ 45: cont: 46: c = *p++; 47: for (spanp = s2; (sc = *spanp++) != 0;) 48: if (sc == c) 49: goto cont; 50: return (p - 1 - s1); 51: }