166 lines
3.2 KiB
C
166 lines
3.2 KiB
C
/*
|
|
* $Id: str_dyn.c 141 2008-03-18 04:09:04Z baconevi $
|
|
*
|
|
* {License}
|
|
*/
|
|
|
|
#include <ase/cmn/str.h>
|
|
#include <ase/cmn/mem.h>
|
|
|
|
ase_str_t* ase_str_open (ase_str_t* str, ase_size_t capa, ase_mmgr_t* mmgr)
|
|
{
|
|
if (str == ASE_NULL)
|
|
{
|
|
str = (ase_str_t*)
|
|
ASE_MALLOC (mmgr, ASE_SIZEOF(ase_str_t));
|
|
if (str == ASE_NULL) return ASE_NULL;
|
|
str->__dynamic = ase_true;
|
|
}
|
|
else str->__dynamic = ase_false;
|
|
|
|
str->mmgr = mmgr;
|
|
str->buf = (ase_char_t*) ASE_MALLOC (
|
|
mmgr, ASE_SIZEOF(ase_char_t) * (capa + 1));
|
|
if (str->buf == ASE_NULL)
|
|
{
|
|
if (str->__dynamic) ASE_FREE (mmgr, str);
|
|
return ASE_NULL;
|
|
}
|
|
|
|
str->size = 0;
|
|
str->capa = capa;
|
|
str->buf[0] = ASE_T('\0');
|
|
|
|
return str;
|
|
}
|
|
|
|
void ase_str_close (ase_str_t* str)
|
|
{
|
|
ASE_FREE (str->mmgr, str->buf);
|
|
if (str->__dynamic) ASE_FREE (str->mmgr, str);
|
|
}
|
|
|
|
void ase_str_clear (ase_str_t* str)
|
|
{
|
|
str->size = 0;
|
|
str->buf[0] = ASE_T('\0');
|
|
}
|
|
|
|
void ase_str_forfeit (ase_str_t* str)
|
|
{
|
|
if (str->__dynamic) ASE_FREE (str->mmgr, str);
|
|
}
|
|
|
|
void ase_str_swap (ase_str_t* str, ase_str_t* str1)
|
|
{
|
|
ase_str_t tmp;
|
|
|
|
tmp.buf = str->buf;
|
|
tmp.size = str->size;
|
|
tmp.capa = str->capa;
|
|
tmp.mmgr = str->mmgr;
|
|
|
|
str->buf = str1->buf;
|
|
str->size = str1->size;
|
|
str->capa = str1->capa;
|
|
str->mmgr = str1->mmgr;
|
|
|
|
str1->buf = tmp.buf;
|
|
str1->size = tmp.size;
|
|
str1->capa = tmp.capa;
|
|
str1->mmgr = tmp.mmgr;
|
|
}
|
|
|
|
ase_size_t ase_str_cpy (ase_str_t* str, const ase_char_t* s)
|
|
{
|
|
/* TODO: improve it */
|
|
return ase_str_ncpy (str, s, ase_strlen(s));
|
|
}
|
|
|
|
ase_size_t ase_str_ncpy (ase_str_t* str, const ase_char_t* s, ase_size_t len)
|
|
{
|
|
ase_char_t* buf;
|
|
|
|
if (len > str->capa)
|
|
{
|
|
buf = (ase_char_t*) ASE_MALLOC (
|
|
str->mmgr, ASE_SIZEOF(ase_char_t) * (len + 1));
|
|
if (buf == ASE_NULL) return (ase_size_t)-1;
|
|
|
|
ASE_FREE (str->mmgr, str->buf);
|
|
str->capa = len;
|
|
str->buf = buf;
|
|
}
|
|
|
|
str->size = ase_strncpy (str->buf, s, len);
|
|
str->buf[str->size] = ASE_T('\0');
|
|
return str->size;
|
|
}
|
|
|
|
ase_size_t ase_str_cat (ase_str_t* str, const ase_char_t* s)
|
|
{
|
|
/* TODO: improve it */
|
|
return ase_str_ncat (str, s, ase_strlen(s));
|
|
}
|
|
|
|
ase_size_t ase_str_ncat (ase_str_t* str, const ase_char_t* s, ase_size_t len)
|
|
{
|
|
if (len > str->capa - str->size)
|
|
{
|
|
ase_char_t* tmp;
|
|
ase_size_t capa;
|
|
|
|
capa = str->size + len;
|
|
|
|
/* double the capa if necessary for concatenation */
|
|
if (capa < str->capa * 2) capa = str->capa * 2;
|
|
|
|
if (str->mmgr->realloc != ASE_NULL)
|
|
{
|
|
tmp = (ase_char_t*) ASE_REALLOC (
|
|
str->mmgr, str->buf,
|
|
ASE_SIZEOF(ase_char_t) * (capa + 1));
|
|
if (tmp == ASE_NULL) return (ase_size_t)-1;
|
|
}
|
|
else
|
|
{
|
|
tmp = (ase_char_t*) ASE_MALLOC (
|
|
str->mmgr, ASE_SIZEOF(ase_char_t)*(capa+1));
|
|
if (tmp == ASE_NULL) return (ase_size_t)-1;
|
|
if (str->buf != ASE_NULL)
|
|
{
|
|
ase_memcpy (tmp, str->buf,
|
|
ASE_SIZEOF(ase_char_t)*(str->capa+1));
|
|
ASE_FREE (str->mmgr, str->buf);
|
|
}
|
|
}
|
|
|
|
str->capa = capa;
|
|
str->buf = tmp;
|
|
}
|
|
|
|
str->size += ase_strncpy (&str->buf[str->size], s, len);
|
|
str->buf[str->size] = ASE_T('\0');
|
|
return str->size;
|
|
}
|
|
|
|
ase_size_t ase_str_ccat (ase_str_t* str, ase_char_t c)
|
|
{
|
|
return ase_str_ncat (str, &c, 1);
|
|
}
|
|
|
|
ase_size_t ase_str_nccat (ase_str_t* str, ase_char_t c, ase_size_t len)
|
|
{
|
|
while (len > 0)
|
|
{
|
|
if (ase_str_ncat (str, &c, 1) == (ase_size_t)-1)
|
|
{
|
|
return (ase_size_t)-1;
|
|
}
|
|
|
|
len--;
|
|
}
|
|
return str->size;
|
|
}
|
|
|