1 /* 2 * Copyright (c) 1989 The Regents of the University of California. 3 * All rights reserved. 4 * 5 * Redistribution and use in source and binary forms are permitted 6 * provided that the above copyright notice and this paragraph are 7 * duplicated in all such forms and that any documentation, 8 * advertising materials, and other materials related to such 9 * distribution and use acknowledge that the software was developed 10 * by the University of California, Berkeley. The name of the 11 * University may not be used to endorse or promote products derived 12 * from this software without specific prior written permission. 13 * THIS SOFTWARE IS PROVIDED ``AS IS'' AND WITHOUT ANY EXPRESS OR 14 * IMPLIED WARRANTIES, INCLUDING, WITHOUT LIMITATION, THE IMPLIED 15 * WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE. 16 */ 17 18 #if defined(LIBC_SCCS) && !defined(lint) 19 static char sccsid[] = "@(#)strspn.c 5.6 (Berkeley) 05/17/90"; 20 #endif /* LIBC_SCCS and not lint */ 21 22 #include <sys/stdc.h> 23 #include <string.h> 24 25 /* 26 * Span the string s2 (skip characters that are in s2). 27 */ 28 size_t 29 strspn(s1, s2) 30 const char *s1; 31 register const char *s2; 32 { 33 register const char *p = s1, *spanp; 34 register char c, sc; 35 36 /* 37 * Skip any characters in s2, excluding the terminating \0. 38 */ 39 cont: 40 c = *p++; 41 for (spanp = s2; (sc = *spanp++) != 0;) 42 if (sc == c) 43 goto cont; 44 return (p - 1 - s1); 45 } 46