SDL_strtokr.c File Reference

#include "../SDL_internal.h"
#include "SDL_stdinc.h"

Include dependency graph for SDL_strtokr.c:

Go to the source code of this file.

Functions
char *	SDL_strtokr (char *s1, const char *s2, char **ptr)

Function Documentation

SDL_strtokr()

char* SDL_strtokr	(	char *	s1,
		const char *	s2,
		char **	ptr
	)

Definition at line 29 of file SDL_strtokr.c.

{
#if defined(HAVE_STRTOK_R)
    return strtok_r(s1, s2, ptr);
 
#elif defined(_MSC_VER) && defined(HAVE_STRTOK_S)
    return strtok_s(s1, s2, ptr);
 
#else /* SDL implementation */
/*
 * Adapted from _PDCLIB_strtok() of PDClib library at
 * https://github.com/DevSolar/pdclib.git
 *
 * The code was under CC0 license:
 * https://creativecommons.org/publicdomain/zero/1.0/legalcode :
 *
 *                        No Copyright
 *
 * The person who associated a work with this deed has dedicated the
 * work to the public domain by waiving all of his or her rights to
 * the work worldwide under copyright law, including all related and
 * neighboring rights, to the extent allowed by law.
 *
 * You can copy, modify, distribute and perform the work, even for
 * commercial purposes, all without asking permission. See Other
 * Information below.
 */
    const char *p = s2;
 
    if (!s2 || !ptr || (!s1 && !*ptr)) return NULL;
 
    if (s1 != NULL) {  /* new string */
        *ptr = s1;
    } else { /* old string continued */
        if (*ptr == NULL) {
        /* No old string, no new string, nothing to do */
            return NULL;
        }
        s1 = *ptr;
    }
 
    /* skip leading s2 characters */
    while (*p && *s1) {
        if (*s1 == *p) {
        /* found separator; skip and start over */
            ++s1;
            p = s2;
            continue;
        }
        ++p;
    }
 
    if (! *s1) { /* no more to parse */
        *ptr = s1;
        return NULL;
    }
 
    /* skipping non-s2 characters */
    *ptr = s1;
    while (**ptr) {
        p = s2;
        while (*p) {
            if (**ptr == *p++) {
            /* found separator; overwrite with '\0', position *ptr, return */
                *((*ptr)++) = '\0';
                return s1;
            }
        }
        ++(*ptr);
    }
 
    /* parsed to end of string */
    return s1;
#endif
}

References NULL, and ptr.