407 lines
10 KiB
C
407 lines
10 KiB
C
/*
|
|
* Copyright (C) 2008-2011 Teluu Inc. (http://www.teluu.com)
|
|
* Copyright (C) 2003-2008 Benny Prijono <benny@prijono.org>
|
|
*
|
|
* 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., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
|
|
*/
|
|
|
|
#include <pj/assert.h>
|
|
#include <pj/pool.h>
|
|
|
|
PJ_IDEF(pj_str_t) pj_str(char *str)
|
|
{
|
|
pj_str_t dst;
|
|
dst.ptr = str;
|
|
dst.slen = str ? pj_ansi_strlen(str) : 0;
|
|
return dst;
|
|
}
|
|
|
|
PJ_IDEF(pj_str_t*) pj_strdup(pj_pool_t *pool,
|
|
pj_str_t *dst,
|
|
const pj_str_t *src)
|
|
{
|
|
pj_assert(src->slen >= 0);
|
|
|
|
/* Without this, destination will be corrupted */
|
|
if (dst == src)
|
|
return dst;
|
|
|
|
if (src->slen > 0) {
|
|
dst->ptr = (char*)pj_pool_alloc(pool, src->slen);
|
|
pj_memcpy(dst->ptr, src->ptr, src->slen);
|
|
}
|
|
dst->slen = (src->slen < 0)? 0: src->slen;
|
|
return dst;
|
|
}
|
|
|
|
PJ_IDEF(pj_str_t*) pj_strdup_with_null( pj_pool_t *pool,
|
|
pj_str_t *dst,
|
|
const pj_str_t *src)
|
|
{
|
|
pj_ssize_t src_slen = src->slen;
|
|
|
|
pj_assert(src->slen >= 0);
|
|
|
|
/* Check if the source's length is invalid */
|
|
if (src_slen < 0)
|
|
src_slen = 0;
|
|
|
|
dst->ptr = (char*)pj_pool_alloc(pool, src_slen+1);
|
|
if (src_slen) {
|
|
pj_memcpy(dst->ptr, src->ptr, src_slen);
|
|
}
|
|
dst->slen = src_slen;
|
|
dst->ptr[dst->slen] = '\0';
|
|
return dst;
|
|
}
|
|
|
|
PJ_IDEF(pj_str_t*) pj_strdup2(pj_pool_t *pool,
|
|
pj_str_t *dst,
|
|
const char *src)
|
|
{
|
|
dst->slen = src ? pj_ansi_strlen(src) : 0;
|
|
if (dst->slen) {
|
|
dst->ptr = (char*)pj_pool_alloc(pool, dst->slen);
|
|
pj_memcpy(dst->ptr, src, dst->slen);
|
|
} else {
|
|
dst->ptr = NULL;
|
|
}
|
|
return dst;
|
|
}
|
|
|
|
PJ_IDEF(pj_str_t*) pj_strdup2_with_null( pj_pool_t *pool,
|
|
pj_str_t *dst,
|
|
const char *src)
|
|
{
|
|
dst->slen = src ? pj_ansi_strlen(src) : 0;
|
|
dst->ptr = (char*)pj_pool_alloc(pool, dst->slen+1);
|
|
if (dst->slen) {
|
|
pj_memcpy(dst->ptr, src, dst->slen);
|
|
}
|
|
dst->ptr[dst->slen] = '\0';
|
|
return dst;
|
|
}
|
|
|
|
PJ_IDEF(pj_str_t) pj_strdup3(pj_pool_t *pool, const char *src)
|
|
{
|
|
pj_str_t temp;
|
|
pj_strdup2(pool, &temp, src);
|
|
return temp;
|
|
}
|
|
|
|
PJ_IDEF(pj_str_t*) pj_strassign( pj_str_t *dst, pj_str_t *src )
|
|
{
|
|
dst->ptr = src->ptr;
|
|
dst->slen = src->slen;
|
|
return dst;
|
|
}
|
|
|
|
PJ_IDEF(pj_str_t*) pj_strcpy(pj_str_t *dst, const pj_str_t *src)
|
|
{
|
|
pj_assert(src->slen >= 0);
|
|
|
|
dst->slen = (src->slen < 0)? 0: src->slen;
|
|
if (src->slen > 0)
|
|
pj_memcpy(dst->ptr, src->ptr, src->slen);
|
|
return dst;
|
|
}
|
|
|
|
PJ_IDEF(pj_str_t*) pj_strcpy2(pj_str_t *dst, const char *src)
|
|
{
|
|
dst->slen = src ? pj_ansi_strlen(src) : 0;
|
|
if (dst->slen > 0)
|
|
pj_memcpy(dst->ptr, src, dst->slen);
|
|
return dst;
|
|
}
|
|
|
|
PJ_IDEF(pj_str_t*) pj_strncpy( pj_str_t *dst, const pj_str_t *src,
|
|
pj_ssize_t max)
|
|
{
|
|
pj_assert(src->slen >= 0);
|
|
pj_assert(max >= 0);
|
|
|
|
if (max > src->slen) max = src->slen;
|
|
if (max > 0)
|
|
pj_memcpy(dst->ptr, src->ptr, max);
|
|
dst->slen = (max < 0)? 0: max;
|
|
return dst;
|
|
}
|
|
|
|
PJ_IDEF(pj_str_t*) pj_strncpy_with_null( pj_str_t *dst, const pj_str_t *src,
|
|
pj_ssize_t max)
|
|
{
|
|
pj_assert(src->slen >= 0);
|
|
pj_assert(max > 0);
|
|
|
|
if (max <= src->slen)
|
|
max = (max > 0)? max-1: 0;
|
|
else
|
|
max = (src->slen < 0)? 0: src->slen;
|
|
|
|
if (max > 0)
|
|
pj_memcpy(dst->ptr, src->ptr, max);
|
|
dst->ptr[max] = '\0';
|
|
dst->slen = max;
|
|
return dst;
|
|
}
|
|
|
|
|
|
PJ_IDEF(int) pj_strcmp( const pj_str_t *str1, const pj_str_t *str2)
|
|
{
|
|
pj_assert(str1->slen >= 0);
|
|
pj_assert(str2->slen >= 0);
|
|
|
|
if (str1->slen <= 0) {
|
|
return str2->slen<=0 ? 0 : -1;
|
|
} else if (str2->slen <= 0) {
|
|
return 1;
|
|
} else {
|
|
pj_size_t min = (str1->slen < str2->slen)? str1->slen : str2->slen;
|
|
int res = pj_memcmp(str1->ptr, str2->ptr, min);
|
|
if (res == 0) {
|
|
return (str1->slen < str2->slen) ? -1 :
|
|
(str1->slen == str2->slen ? 0 : 1);
|
|
} else {
|
|
return res;
|
|
}
|
|
}
|
|
}
|
|
|
|
PJ_IDEF(int) pj_strncmp( const pj_str_t *str1, const pj_str_t *str2,
|
|
pj_size_t len)
|
|
{
|
|
pj_str_t copy1, copy2;
|
|
|
|
pj_assert(str1->slen >= 0);
|
|
pj_assert(str2->slen >= 0);
|
|
|
|
if (len < (unsigned)str1->slen && str1->slen > 0) {
|
|
copy1.ptr = str1->ptr;
|
|
copy1.slen = len;
|
|
str1 = ©1;
|
|
}
|
|
|
|
if (len < (unsigned)str2->slen && str2->slen > 0) {
|
|
copy2.ptr = str2->ptr;
|
|
copy2.slen = len;
|
|
str2 = ©2;
|
|
}
|
|
|
|
return pj_strcmp(str1, str2);
|
|
}
|
|
|
|
PJ_IDEF(int) pj_strncmp2( const pj_str_t *str1, const char *str2,
|
|
pj_size_t len)
|
|
{
|
|
pj_str_t copy2;
|
|
|
|
if (str2) {
|
|
copy2.ptr = (char*)str2;
|
|
copy2.slen = pj_ansi_strlen(str2);
|
|
} else {
|
|
copy2.slen = 0;
|
|
}
|
|
|
|
return pj_strncmp(str1, ©2, len);
|
|
}
|
|
|
|
PJ_IDEF(int) pj_strcmp2( const pj_str_t *str1, const char *str2 )
|
|
{
|
|
pj_str_t copy2;
|
|
|
|
if (str2) {
|
|
copy2.ptr = (char*)str2;
|
|
copy2.slen = pj_ansi_strlen(str2);
|
|
} else {
|
|
copy2.ptr = NULL;
|
|
copy2.slen = 0;
|
|
}
|
|
|
|
return pj_strcmp(str1, ©2);
|
|
}
|
|
|
|
PJ_IDEF(int) pj_stricmp( const pj_str_t *str1, const pj_str_t *str2)
|
|
{
|
|
pj_assert(str1->slen >= 0);
|
|
pj_assert(str2->slen >= 0);
|
|
|
|
if (str1->slen <= 0) {
|
|
return str2->slen<=0 ? 0 : -1;
|
|
} else if (str2->slen <= 0) {
|
|
return 1;
|
|
} else {
|
|
pj_size_t min = (str1->slen < str2->slen)? str1->slen : str2->slen;
|
|
int res = pj_ansi_strnicmp(str1->ptr, str2->ptr, min);
|
|
if (res == 0) {
|
|
return (str1->slen < str2->slen) ? -1 :
|
|
(str1->slen == str2->slen ? 0 : 1);
|
|
} else {
|
|
return res;
|
|
}
|
|
}
|
|
}
|
|
|
|
#if defined(PJ_HAS_STRICMP_ALNUM) && PJ_HAS_STRICMP_ALNUM!=0
|
|
PJ_IDEF(int) strnicmp_alnum( const char *str1, const char *str2,
|
|
int len)
|
|
{
|
|
if (len==0)
|
|
return 0;
|
|
else {
|
|
register const pj_uint32_t *p1 = (pj_uint32_t*)str1,
|
|
*p2 = (pj_uint32_t*)str2;
|
|
while (len > 3 && (*p1 & 0x5F5F5F5F)==(*p2 & 0x5F5F5F5F))
|
|
++p1, ++p2, len-=4;
|
|
|
|
if (len > 3)
|
|
return -1;
|
|
#if defined(PJ_IS_LITTLE_ENDIAN) && PJ_IS_LITTLE_ENDIAN!=0
|
|
else if (len==3)
|
|
return ((*p1 & 0x005F5F5F)==(*p2 & 0x005F5F5F)) ? 0 : -1;
|
|
else if (len==2)
|
|
return ((*p1 & 0x00005F5F)==(*p2 & 0x00005F5F)) ? 0 : -1;
|
|
else if (len==1)
|
|
return ((*p1 & 0x0000005F)==(*p2 & 0x0000005F)) ? 0 : -1;
|
|
#else
|
|
else if (len==3)
|
|
return ((*p1 & 0x5F5F5F00)==(*p2 & 0x5F5F5F00)) ? 0 : -1;
|
|
else if (len==2)
|
|
return ((*p1 & 0x5F5F0000)==(*p2 & 0x5F5F0000)) ? 0 : -1;
|
|
else if (len==1)
|
|
return ((*p1 & 0x5F000000)==(*p2 & 0x5F000000)) ? 0 : -1;
|
|
#endif
|
|
else
|
|
return 0;
|
|
}
|
|
}
|
|
|
|
PJ_IDEF(int) pj_stricmp_alnum(const pj_str_t *str1, const pj_str_t *str2)
|
|
{
|
|
register int len = str1->slen;
|
|
|
|
if (len != str2->slen) {
|
|
return (len < str2->slen) ? -1 : 1;
|
|
} else if (len == 0) {
|
|
return 0;
|
|
} else {
|
|
register const pj_uint32_t *p1 = (pj_uint32_t*)str1->ptr,
|
|
*p2 = (pj_uint32_t*)str2->ptr;
|
|
while (len > 3 && (*p1 & 0x5F5F5F5F)==(*p2 & 0x5F5F5F5F))
|
|
++p1, ++p2, len-=4;
|
|
|
|
if (len > 3)
|
|
return -1;
|
|
#if defined(PJ_IS_LITTLE_ENDIAN) && PJ_IS_LITTLE_ENDIAN!=0
|
|
else if (len==3)
|
|
return ((*p1 & 0x005F5F5F)==(*p2 & 0x005F5F5F)) ? 0 : -1;
|
|
else if (len==2)
|
|
return ((*p1 & 0x00005F5F)==(*p2 & 0x00005F5F)) ? 0 : -1;
|
|
else if (len==1)
|
|
return ((*p1 & 0x0000005F)==(*p2 & 0x0000005F)) ? 0 : -1;
|
|
#else
|
|
else if (len==3)
|
|
return ((*p1 & 0x5F5F5F00)==(*p2 & 0x5F5F5F00)) ? 0 : -1;
|
|
else if (len==2)
|
|
return ((*p1 & 0x5F5F0000)==(*p2 & 0x5F5F0000)) ? 0 : -1;
|
|
else if (len==1)
|
|
return ((*p1 & 0x5F000000)==(*p2 & 0x5F000000)) ? 0 : -1;
|
|
#endif
|
|
else
|
|
return 0;
|
|
}
|
|
}
|
|
#endif /* PJ_HAS_STRICMP_ALNUM */
|
|
|
|
PJ_IDEF(int) pj_stricmp2( const pj_str_t *str1, const char *str2)
|
|
{
|
|
pj_str_t copy2;
|
|
|
|
if (str2) {
|
|
copy2.ptr = (char*)str2;
|
|
copy2.slen = pj_ansi_strlen(str2);
|
|
} else {
|
|
copy2.ptr = NULL;
|
|
copy2.slen = 0;
|
|
}
|
|
|
|
return pj_stricmp(str1, ©2);
|
|
}
|
|
|
|
PJ_IDEF(int) pj_strnicmp( const pj_str_t *str1, const pj_str_t *str2,
|
|
pj_size_t len)
|
|
{
|
|
pj_str_t copy1, copy2;
|
|
|
|
if (len < (unsigned)str1->slen && str1->slen > 0) {
|
|
copy1.ptr = str1->ptr;
|
|
copy1.slen = len;
|
|
str1 = ©1;
|
|
}
|
|
|
|
if (len < (unsigned)str2->slen && str2->slen > 0) {
|
|
copy2.ptr = str2->ptr;
|
|
copy2.slen = len;
|
|
str2 = ©2;
|
|
}
|
|
|
|
return pj_stricmp(str1, str2);
|
|
}
|
|
|
|
PJ_IDEF(int) pj_strnicmp2( const pj_str_t *str1, const char *str2,
|
|
pj_size_t len)
|
|
{
|
|
pj_str_t copy2;
|
|
|
|
if (str2) {
|
|
copy2.ptr = (char*)str2;
|
|
copy2.slen = pj_ansi_strlen(str2);
|
|
} else {
|
|
copy2.slen = 0;
|
|
}
|
|
|
|
return pj_strnicmp(str1, ©2, len);
|
|
}
|
|
|
|
PJ_IDEF(void) pj_strcat(pj_str_t *dst, const pj_str_t *src)
|
|
{
|
|
pj_assert(src->slen >= 0);
|
|
pj_assert(dst->slen >= 0);
|
|
|
|
if (src->slen > 0 && dst->slen >= 0) {
|
|
pj_memcpy(dst->ptr + dst->slen, src->ptr, src->slen);
|
|
dst->slen += src->slen;
|
|
}
|
|
}
|
|
|
|
PJ_IDEF(void) pj_strcat2(pj_str_t *dst, const char *str)
|
|
{
|
|
pj_size_t len = str? pj_ansi_strlen(str) : 0;
|
|
|
|
pj_assert(dst->slen >= 0);
|
|
|
|
if (len && dst->slen >= 0) {
|
|
pj_memcpy(dst->ptr + dst->slen, str, len);
|
|
dst->slen += len;
|
|
}
|
|
}
|
|
|
|
PJ_IDEF(pj_str_t*) pj_strtrim( pj_str_t *str )
|
|
{
|
|
pj_strltrim(str);
|
|
pj_strrtrim(str);
|
|
return str;
|
|
}
|
|
|