/* tinyproxy - A fast light-weight HTTP proxy
 * Copyright (C) 2002 Robert James Kaes <rjkaes@users.sourceforge.net>
 *
 * This program is free software; you can redistribute it and/or modify
 * it under the terms of the GNU General Public License as published by
 * the Free Software Foundation; either version 2 of the License, or
 * (at your option) any later version.
 *
 * This program is distributed in the hope that it will be useful,
 * but WITHOUT ANY WARRANTY; without even the implied warranty of
 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
 * GNU General Public License for more details.
 *
 * You should have received a copy of the GNU General Public License along
 * with this program; if not, write to the Free Software Foundation, Inc.,
 * 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
 */

/* The functions included here are useful for text manipulation.  They
 * replace or augment the standard C string library.  These functions
 * are either safer replacements, or they provide services not included
 * with the standard C string library.
 */

#include "main.h"

#include "text.h"

#ifndef HAVE_STRLCPY
/*
 * Function API taken from OpenBSD. Like strncpy(), but does not 0 fill the
 * buffer, and always NULL terminates the buffer. size is the size of the
 * destination buffer.
 */
size_t strlcpy (char *dst, const char *src, size_t size)
{
        size_t len = strlen (src);
        size_t ret = len;

        if (len >= size)
                len = size - 1;

        memcpy (dst, src, len);
        dst[len] = '\0';

        return ret;
}
#endif

#ifndef HAVE_STRLCAT
/*
 * Function API taken from OpenBSD. Like strncat(), but does not 0 fill the
 * buffer, and always NULL terminates the buffer. size is the length of the
 * buffer, which should be one more than the maximum resulting string
 * length.
 */
size_t strlcat (char *dst, const char *src, size_t size)
{
        size_t len1 = strlen (dst);
        size_t len2 = strlen (src);
        size_t ret = len1 + len2;

        if (len1 + len2 >= size)
                len2 = size - len1 - 1;
        if (len2 > 0) {
                memcpy (dst + len1, src, len2);
                dst[len1 + len2] = '\0';
        }

        return ret;
}
#endif

/*
 * Removes any new-line or carriage-return characters from the end of the
 * string. This function is named after the same function in Perl.
 * "length" should be the number of characters in the buffer, not including
 * the trailing NULL.
 *
 * Returns the number of characters removed from the end of the string.  A
 * negative return value indicates an error.
 */
ssize_t chomp (char *buffer, size_t length)
{
        size_t chars;

        assert (buffer != NULL);
        assert (length > 0);

        /* Make sure the arguments are valid */
        if (buffer == NULL)
                return -EFAULT;
        if (length < 1)
                return -ERANGE;

        chars = 0;

        --length;
        while (buffer[length] == '\r' || buffer[length] == '\n') {
                buffer[length] = '\0';
                chars++;

                /* Stop once we get to zero to prevent wrap-around */
                if (length-- == 0)
                        break;
        }

        return chars;
}