Add Socket Libraries.

[mirror_edk2.git] / StdLib / LibC / String / strsep.c

diff --git a/StdLib/LibC/String/strsep.c b/StdLib/LibC/String/strsep.c
new file mode 100644 (file)
index 0000000..234b0ca
--- /dev/null
+++ b/StdLib/LibC/String/strsep.c
@@ -0,0 +1,82 @@
+/*-\r
+ * Copyright (c) 1990, 1993\r
+ *  The Regents of the University of California.  All rights reserved.\r
+ *\r
+ * Redistribution and use in source and binary forms, with or without\r
+ * modification, are permitted provided that the following conditions\r
+ * are met:\r
+ * 1. Redistributions of source code must retain the above copyright\r
+ *    notice, this list of conditions and the following disclaimer.\r
+ * 2. Redistributions in binary form must reproduce the above copyright\r
+ *    notice, this list of conditions and the following disclaimer in the\r
+ *    documentation and/or other materials provided with the distribution.\r
+ * 3. All advertising materials mentioning features or use of this software\r
+ *    must display the following acknowledgement:\r
+ *  This product includes software developed by the University of\r
+ *  California, Berkeley and its contributors.\r
+ * 4. Neither the name of the University nor the names of its contributors\r
+ *    may be used to endorse or promote products derived from this software\r
+ *    without specific prior written permission.\r
+ *\r
+ * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND\r
+ * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE\r
+ * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE\r
+ * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE\r
+ * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL\r
+ * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS\r
+ * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)\r
+ * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT\r
+ * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY\r
+ * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF\r
+ * SUCH DAMAGE.\r
+ */\r
+#include  <LibConfig.h>\r
+\r
+#include <sys/cdefs.h>\r
+#include <string.h>\r
+#include <stdio.h>\r
+\r
+#if defined(LIBC_SCCS) && !defined(lint)\r
+static char sccsid[] = "@(#)strsep.c  8.1 (Berkeley) 6/4/93";\r
+#endif /* LIBC_SCCS and not lint */\r
+\r
+/*\r
+ * Get next token from string *stringp, where tokens are possibly-empty\r
+ * strings separated by characters from delim.\r
+ *\r
+ * Writes NULs into the string at *stringp to end tokens.\r
+ * delim need not remain constant from call to call.\r
+ * On return, *stringp points past the last NUL written (if there might\r
+ * be further tokens), or is NULL (if there are definitely no more tokens).\r
+ *\r
+ * If *stringp is NULL, strsep returns NULL.\r
+ */\r
+char *\r
+strsep(\r
+  register char **stringp,\r
+  register const char *delim\r
+  )\r
+{\r
+  register char *s;\r
+  register const char *spanp;\r
+  register int c, sc;\r
+  char *tok;\r
+\r
+  if ((s = *stringp) == NULL)\r
+    return (NULL);\r
+  for (tok = s;;) {\r
+    c = *s++;\r
+    spanp = delim;\r
+    do {\r
+      if ((sc = *spanp++) == c) {\r
+        if (c == 0)\r
+          s = NULL;\r
+        else\r
+          s[-1] = 0;\r
+        *stringp = s;\r
+        return (tok);\r
+      }\r
+    } while (sc != 0);\r
+  }\r
+  /* NOTREACHED */\r
+}\r