compiler/clib/strsep.c

   1 /*
   2     Copyright © 2004, The AROS Development Team. All rights reserved.
   3     $Id$
   4
   5     BSD function strsep().
   6 */
   7
   8 #include <stdio.h>
   9
  10 /*****************************************************************************
  11
  12     NAME */
  13 #include <string.h>
  14
  15         char * strsep (
  16
  17 /*  SYNOPSIS */
  18         char       ** strptr,
  19         const char * sep)
  20
  21 /*  FUNCTION
  22         Separates a string by the characters in sep.
  23
  24     INPUTS
  25         str - The string to check or NULL if the next word in
  26                 the last string is to be searched.
  27         sep - Characters which separate "words" in str.
  28
  29     RESULT
  30         The first word in str or the next one if str is NULL.
  31
  32     NOTES
  33         The function changes str !
  34
  35     EXAMPLE
  36         char buffer[64];
  37         char **bufptr
  38
  39         strcpy (buffer, "Hello, this is a test.");
  40         *bufptr = buffer
  41
  42         // First word. Returns "Hello"
  43         strtok (bufptr, " \t,.");
  44
  45         // Next word. Returns "this"
  46         strtok (bufptr, " \t,.");
  47
  48         // Next word. Returns "is"
  49         strtok (bufptr, " \t");
  50
  51         // Next word. Returns "a"
  52         strtok (bufptr, " \t");
  53
  54         // Next word. Returns "test."
  55         strtok (bufptr, " \t");
  56
  57         // Next word. Returns NULL.
  58         strtok (bufptr, " \t");
  59
  60     BUGS
  61
  62     SEE ALSO
  63
  64     INTERNALS
  65
  66 ******************************************************************************/
  67 {
  68     char * retval;
  69
  70     if (*strptr == NULL)
  71         return NULL;
  72
  73     *strptr += strspn (*strptr, sep);
  74
  75     if (**strptr == '\0')
  76     {
  77         *strptr = NULL;
  78         return NULL;
  79     }
  80     else
  81         retval = *strptr;
  82
  83     *strptr += strcspn (*strptr, sep);
  84
  85     if (**strptr != '\0')
  86         *(*strptr) ++ = '\0';
  87     else
  88         *strptr = NULL;
  89
  90     return retval;
  91 } /* strsep */