120 lines
4.0 KiB
C
120 lines
4.0 KiB
C
/****************************************************************************
|
|
* libs/libc/string/lib_bsdmemccpy.c
|
|
*
|
|
* Copyright (c) 1994-2009 Red Hat, Inc. All rights reserved.
|
|
*
|
|
* This copyrighted material is made available to anyone wishing to use,
|
|
* modify, copy, or redistribute it subject to the terms and conditions
|
|
* of the BSD License. This program is distributed in the hope that
|
|
* it will be useful, but WITHOUT ANY WARRANTY expressed or implied,
|
|
* including the implied warranties of MERCHANTABILITY or FITNESS FOR
|
|
* A PARTICULAR PURPOSE. A copy of this license is available at
|
|
* http://www.opensource.org/licenses. Any Red Hat trademarks that are
|
|
* incorporated in the source code or documentation are not subject to
|
|
* the BSD License and may only be used or replicated with the express
|
|
* permission of Red Hat, Inc.
|
|
*
|
|
****************************************************************************/
|
|
|
|
/****************************************************************************
|
|
* Included Files
|
|
****************************************************************************/
|
|
|
|
#include <nuttx/config.h>
|
|
#include <sys/types.h>
|
|
#include <string.h>
|
|
|
|
#include "libc.h"
|
|
|
|
/****************************************************************************
|
|
* Pre-processor Definitions
|
|
****************************************************************************/
|
|
|
|
/****************************************************************************
|
|
* Public Functions
|
|
****************************************************************************/
|
|
|
|
/****************************************************************************
|
|
* Name: memccpy
|
|
*
|
|
* Description:
|
|
* The memccpy() function copies bytes from memory area s2 into s1,
|
|
* stopping after the first occurrence of byte c (converted to an unsigned
|
|
* char) is copied, or after n bytes are copied, whichever comes first. If
|
|
* copying takes place between objects that overlap, the behavior is
|
|
* undefined.
|
|
*
|
|
* Returned Value:
|
|
* The memccpy() function returns a pointer to the byte after the copy of c
|
|
* in s1, or a null pointer if c was not found in the first n bytes of s2.
|
|
*
|
|
****************************************************************************/
|
|
|
|
#undef memccpy /* See mm/README.txt */
|
|
FAR void *memccpy(FAR void *s1, FAR const void *s2, int c, size_t n)
|
|
{
|
|
FAR void *ptr = NULL;
|
|
FAR unsigned char *pout = (FAR unsigned char *)s1;
|
|
FAR const unsigned char *pin = (FAR const unsigned char *)s2;
|
|
FAR libc_data_t *paligned_out;
|
|
FAR const libc_data_t *paligned_in;
|
|
unsigned char endchar = c & 0xff;
|
|
|
|
/* If the size is small, or either pin or pout is unaligned,
|
|
* then punt into the byte copy loop. This should be rare.
|
|
*/
|
|
|
|
if (!TOO_SMALL(n) && !UNALIGNED(pin, pout))
|
|
{
|
|
unsigned int i;
|
|
libc_data_t mask = 0;
|
|
|
|
paligned_out = (FAR libc_data_t *)pout;
|
|
paligned_in = (FAR libc_data_t *)pin;
|
|
|
|
/* The fast code reads the ASCII one word at a time and only
|
|
* performs the bytewise search on word-sized segments if they
|
|
* contain the search character, which is detected by XORing
|
|
* the word-sized segment with a word-sized block of the search
|
|
* character and then detecting for the presence of NULL in the
|
|
* result.
|
|
*/
|
|
|
|
for (i = 0; i < LITTLEBLOCKSIZE; i++)
|
|
{
|
|
mask = (mask << 8) + endchar;
|
|
}
|
|
|
|
/* Copy one libc_data_t word at a time if possible. */
|
|
|
|
while (n >= LITTLEBLOCKSIZE)
|
|
{
|
|
libc_data_t buffer = (libc_data_t)(*paligned_in);
|
|
buffer ^= mask;
|
|
if (DETECTNULL(buffer))
|
|
{
|
|
break; /* endchar is found, go byte by byte from here */
|
|
}
|
|
|
|
*paligned_out++ = *paligned_in++;
|
|
n -= LITTLEBLOCKSIZE;
|
|
}
|
|
|
|
/* Pick up any residual with a byte copier. */
|
|
|
|
pout = (FAR unsigned char *)paligned_out;
|
|
pin = (FAR unsigned char *)paligned_in;
|
|
}
|
|
|
|
while (n--)
|
|
{
|
|
if ((*pout++ = *pin++) == endchar)
|
|
{
|
|
ptr = pout;
|
|
break;
|
|
}
|
|
}
|
|
|
|
return ptr;
|
|
}
|