/* string.c - common string routines */

/*
 * Copyright (c) 2014 Wind River Systems, Inc.
 *
 * Redistribution and use in source and binary forms, with or without
 * modification, are permitted provided that the following conditions are met:
 *
 * 1) Redistributions of source code must retain the above copyright notice,
 * this list of conditions and the following disclaimer.
 *
 * 2) Redistributions in binary form must reproduce the above copyright notice,
 * this list of conditions and the following disclaimer in the documentation
 * and/or other materials provided with the distribution.
 *
 * 3) Neither the name of Wind River Systems 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 BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
 * AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
 * ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT HOLDER OR CONTRIBUTORS BE
 * LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
 * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
 * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
 * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
 * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
 * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
 * POSSIBILITY OF SUCH DAMAGE.
 */

#include <string.h>

/*******************************************************************************
*
* strcpy - copy a string
*
* RETURNS: pointer to destination buffer <d>
*/

char *strcpy(char *restrict d, const char *restrict s)
{
	char *dest = d;

	while (*s != '\0') {
		*d = *s;
		d++;
		s++;
	}

	*d = '\0';

	return dest;
}

/*******************************************************************************
*
* strncpy - copy part of a string
*
* RETURNS: pointer to destination buffer <d>
*/

char *strncpy(char *restrict d, const char *restrict s, size_t n)
{
	char *dest = d;

	while ((n > 0) && *s != '\0') {
		*d = *s;
		s++;
		d++;
		n--;
	}

	while (n > 0) {
		*d = '\0';
		d++;
		n--;
	}

	return dest;
}

/*******************************************************************************
*
* strchr - string scanning operation
*
* RETURNS: pointer to 1st instance of found byte, or NULL if not found
*/

char *strchr(const char *s, int c)
{
	char tmp = (char) c;

	while ((*s != tmp) && (*s != '\0'))
		s++;

	return (*s == tmp) ? (char *) s : NULL;
}

/*******************************************************************************
*
* strlen - get string length
*
* RETURNS: number of bytes in string <s>
*/

size_t strlen(const char *s)
{
	size_t n = 0;

	while (*s != '\0') {
		s++;
		n++;
	}

	return n;
}

/*******************************************************************************
*
* strcmp - compare two strings
*
* RETURNS: negative # if <s1> < <s2>, 0 if <s1> == <s2>, else positive #
*/

int strcmp(const char *s1, const char *s2)
{
	while ((*s1 == *s2) && (*s1 != '\0')) {
		s1++;
		s2++;
	}

	return *s1 - *s2;
}

/*******************************************************************************
*
* strncmp - compare part of two strings
*
* RETURNS: negative # if <s1> < <s2>, 0 if <s1> == <s2>, else positive #
*/

int strncmp(const char *s1, const char *s2, size_t n)
{
	while ((n > 0) && (*s1 == *s2) && (*s1 != '\0')) {
		s1++;
		s2++;
		n--;
	}

	return (n == 0) ? 0 : (*s1 - *s2);
}

/*******************************************************************************
*
* memmove - copy bytes in memory with overlapping areas
*
* RETURNS: pointer to destination buffer <d>
*/

void *memmove(void *d, const void *s, size_t n)
{
	char *dest = d;
	const char *src  = s;

	if ((size_t) (d - s) < n) {
		/*
		 * The <src> buffer overlaps with the start of the <dest> buffer.
		 * Copy backwards to prevent the premature corruption of <src>.
		 */

		while (n > 0) {
			n--;
			dest[n] = src[n];
		}
	} else {
		/* It is safe to perform a forward-copy */
		while (n > 0) {
			*dest = *src;
			dest++;
			src++;
			n--;
		}
	}

	return d;
}

/*******************************************************************************
*
* memcpy - copy bytes in memory
*
* RETURNS: pointer to destination buffer <dest>
*/

void *memcpy(void *restrict d, const void *restrict s, size_t n)
{
	char *dest = d;
	const char *src = s;

	while (n > 0) {
		*dest = *src;
		dest++;
		src++;
		n--;
	}

	return d;
}

/*******************************************************************************
*
* memset - set bytes in memory
*
* RETURNS: pointer to buffer <s>
*/

void *memset(void *s, int c, size_t n)
{
	unsigned char *mem = s;
	unsigned char uc = (unsigned char) c;

	while (n > 0) {
		*mem = uc;
		mem++;
		n--;
	}

	return s;
}