root / Whitix / branches / hybrid / lib / string.c

/*  This file is part of Whitix.
 *
 *  Whitix 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.
 *
 *  Whitix 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 Whitix; if not, write to the Free Software
 *  Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA  02110-1301  USA
 *
 */

#include <module.h>
#include <string.h>

int strncpy(char* dest,char* src,int len)
{
        while (*src != '\0' && len--)
                *dest++=*src++;

        while (len--)
                *dest++='\0';

        return 0;
}

SYMBOL_EXPORT(strncpy);

int strcpy(char* dest,char* src)
{
        while ((*dest++=*src++));
        return 0;
}

SYMBOL_EXPORT(strcpy);

int strncmp(const char* s1,const char* s2,int num)
{
        unsigned char res=0;

    while (num)
        {
                if ((res=*s1-*s2++) || !*s1++)
                        break;

                --num;
        }

        return res;
}

SYMBOL_EXPORT(strncmp);

int strnicmp(const char* s1,const char* s2,int num)
{
        unsigned char res=0;

        while (num)
        {
                char a=toupper(*s1),b=toupper(*s2);
                if ((res=a-b))
                        break;

                s1++; s2++;
                --num;
        }

        return res;
}

SYMBOL_EXPORT(strnicmp);

int strlen(char* str)
{
        int ret=0;

        while (*str++)
                ++ret;

        return ret;
}

SYMBOL_EXPORT(strlen);

char* strcat(char *str1,const char *str2)
{
        char* target=str1;
        while (*target)
                target++;
        
        const char* src=str2;
        while((*target++=*src++) != '\0');
        
        return str1;
}

SYMBOL_EXPORT(strcat);

char* strchr(char* string,int c)
{
        for (; *string; string++)
                if (*string == (char)c)
                        return (char*)string;

        return 0;
}

SYMBOL_EXPORT(strchr);

char* strrchr(char* string,int c)
{
        for (string+=strlen(string); *string; string--)
                if (*string == (char)c)
                        return (char*)string;

        return 0;
}

SYMBOL_EXPORT(strrchr);

void* memset(void* pointer,int size,char value)
{
        char* iterate=(char*)pointer;

        while (size--)
                *iterate++=value;

        return pointer;
}

SYMBOL_EXPORT(memset);

void* memsetw(void* pointer,int size,WORD value)
{
        WORD* iterate=(WORD*)pointer;

        while (size--)
                *iterate++=value;

        return pointer;
}

SYMBOL_EXPORT(memsetw);

int memcmp(const void *s1, const void *s2, int n)
{
        unsigned char* c1, *c2;
        int res=0;

        for (c1=(unsigned char*)s1, c2=(unsigned char*)s2; n; ++c1, ++c2, n--)
        {
                if ((res=*c1-*c2))
                        break;
        }

        return res;
}

SYMBOL_EXPORT(memcmp);

int toupper(char ch)
{
        if (ch>=97 && ch<=122)
                ch-=0x20;
   
        return ch;  
}