str_ucase.c

Go to the documentation of this file.

/* ucase$ function */

#include "fb.h"
#include <ctype.h>

FBCALL FBSTRING *fb_StrUcase2( FBSTRING *src, int mode )
{
        FBSTRING        *dst;
        ssize_t i, len = 0;
        int c;
        char            *s, *d;

        if( src == NULL )
                return &__fb_ctx.null_desc;

        FB_STRLOCK();

        if( src->data ) {
                len = FB_STRSIZE( src );

                /* alloc temp string */
                dst = fb_hStrAllocTemp_NoLock( NULL, len );
        } else {
                dst = NULL;
        }

        if( dst ) {
                s = src->data;
                d = dst->data;

                if( mode == 1 ) {
                        for( i = 0; i < len; i++ ) {
                                c = *s++;
                                if( (c >= 97) && (c <= 122) )
                                        c -= 97 - 65;
                                *d++ = c;
                        }
                } else {
                        for( i = 0; i < len; i++ ) {
                                c = *s++;
                                if( islower( c ) )
                                        c = toupper( c );
                                *d++ = c;
                        }
                }

                /* null char */
                *d = '\0';
        } else {
                dst = &__fb_ctx.null_desc;
        }

        /* del if temp */
        fb_hStrDelTemp_NoLock( src );

        FB_STRUNLOCK();

        return dst;
}