REORG Delete everything that's not innduct or build system or changed for innduct

[innduct.git] / lib / strtok.c

diff --git a/lib/strtok.c b/lib/strtok.c
deleted file mode 100644 (file)
index 98470fe..0000000
--- a/lib/strtok.c
+++ /dev/null
@@ -1,87 +0,0 @@
-/*  $Id: strtok.c 6118 2003-01-13 06:44:24Z rra $
-**
-**  This file has been modified to get it to compile more easily
-**  on pre-4.4BSD systems.  Rich $alz, June 1991.
-*/
-
-#include "config.h"
-#include "clibrary.h"
-
-
-/*
- * Copyright (c) 1988 Regents of the University of California.
- * All rights reserved.
- *
- * Redistribution and use in source and binary forms are permitted
- * provided that: (1) source distributions retain this entire copyright
- * notice and comment, and (2) distributions including binaries display
- * the following acknowledgement:  ``This product includes software
- * developed by the University of California, Berkeley and its contributors''
- * in the documentation or other materials provided with the distribution
- * and in all advertising materials mentioning features or use of this
- * software. Neither the name of the University nor the names of its
- * contributors may be used to endorse or promote products derived
- * from this software without specific prior written permission.
- * THIS SOFTWARE IS PROVIDED ``AS IS'' AND WITHOUT ANY EXPRESS OR
- * IMPLIED WARRANTIES, INCLUDING, WITHOUT LIMITATION, THE IMPLIED
- * WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE.
- */
-
-#if 0
-#if defined(LIBC_SCCS) && !defined(lint)
-static char sccsid[] = "@(#)strtok.c   5.7 (Berkeley) 6/1/90";
-#endif /* LIBC_SCCS and not lint */
-
-#include <stddef.h>
-#include <string.h>
-#endif
-
-char *
-strtok(s, delim)
-       char *s, *delim;
-{
-       char *spanp;
-       int c, sc;
-       char *tok;
-       static char *last;
-
-
-       if (s == NULL && (s = last) == NULL)
-               return (NULL);
-
-       /*
-        * Skip (span) leading delimiters (s += strspn(s, delim), sort of).
-        */
-cont:
-       c = *s++;
-       for (spanp = delim; (sc = *spanp++) != 0;) {
-               if (c == sc)
-                       goto cont;
-       }
-
-       if (c == 0) {           /* no non-delimiter characters */
-               last = NULL;
-               return (NULL);
-       }
-       tok = s - 1;
-
-       /*
-        * Scan token (scan for delimiters: s += strcspn(s, delim), sort of).
-        * Note that delim must have one NUL; we stop if we see that, too.
-        */
-       for (;;) {
-               c = *s++;
-               spanp = delim;
-               do {
-                       if ((sc = *spanp++) == c) {
-                               if (c == 0)
-                                       s = NULL;
-                               else
-                                       s[-1] = 0;
-                               last = s;
-                               return (tok);
-                       }
-               } while (sc != 0);
-       }
-       /* NOTREACHED */
-}