cos2000v2/lib/string.c

178 lines
3.5 KiB
C
Executable File

#include <string.h>
/******************************************************************************/
/* Compare 2 chaines de caractère et renvoie la premiere distance (diff) */
s8 strcmp(const u8 * src, const u8 * des)
{
register s8 result;
do {
if ((result = *src - *des++) != 0)
break;
}
while (*src++ != 0);
return result;
}
/******************************************************************************/
/* Trouve la premiere occurence d'un caractère dans une chaine */
u8 *strchr(const u8 * src, u8 achar)
{
for (; *src != achar; ++src)
if (*src == 0)
return 0;
return (u8 *) src;
}
/******************************************************************************/
/* Renvoie la taille de la chaine */
u32 strlen(const u8 * src)
{
u32 size;
for (size = 0; *(src + size) != 0; size++) ;
return size;
}
/******************************************************************************/
/* copie une chaine dans une autre */
u8 *strcpy(const u8 * src, u8 * des)
{
u8 *temp = des;
while ((*des++ = *src++) != 0) ;
return temp;
}
/******************************************************************************/
/* copie une portion limité d'une chaine asciiZ*/
u8 *strncpy(const u8 * src, u8 * des, u32 count)
{
u8 *temp = des;
while (count) {
if ((*temp = *src) != 0)
src++;
temp++;
count--;
}
return des;
}
/******************************************************************************/
/* concatene 2 chaines de caractère */
u8 *strcat(const u8 * src, u8 * des)
{
u8 *temp = des;
while (*des != 0)
des++;
while ((*des++ = *src++) != 0) ;
return temp;
}
/******************************************************************************/
/* Met en minuscule */
void strtolower(u8 * src)
{
while (*src != 0) {
if ((*src >= 'A') && (*src <= 'Z'))
*src=*src+'a'-'A';
src++;
}
}
/******************************************************************************/
/* Met en majuscule */
void strtoupper(u8 * src)
{
while (*src != 0) {
if ((*src >= 'a') && (*src <= 'z'))
*src=*src-('a'-'A');
src++;
}
}
/******************************************************************************/
/* inverse la casse */
void strinvertcase(u8 * src)
{
while (*src != 0) {
if ((*src >= 'A') && (*src <= 'Z'))
*src=*src+'a'-'A';
else if ((*src >= 'a') && (*src <= 'z'))
*src=*src-('a'-'A');
src++;
}
}
/******************************************************************************/
/* Met une majuscule et met le reste en minuscule */
void stronecase(u8 * src)
{
if ((*src >= 'a') && (*src <= 'z'))
*src=*src-('a'-'A');
while (*src != 0) {
src++;
if ((*src >= 'A') && (*src <= 'Z'))
*src=*src+'a'-'A';
}
}
/******************************************************************************/
/* Fixe la taille de la chaine */
void strsetlen(u8 * src, u8 size)
{
*(src+size)='\000';
}
/******************************************************************************/
/* Inverse la chaine */
void strinvert(u8 *src)
{
u8 *dst=src+strlen(src)-1;
while (src < dst) {
u8 char1=*dst;
u8 char2=*src;
*dst=char2;
*src=char1;
src++;
dst--;
}
}
/******************************************************************************/
/* Remplace tout les caractères rechercher par un autre */
void strreplace(u8 *src, u8 search, u8 replaced)
{
u8 *pos=strchr(src, search);
while (pos!=0)
{
*pos=replaced;
pos=strchr(src, search);
}
}