str_oct_lng.c

Go to the documentation of this file.

/* oct$ routine for long long's */

#include "fb.h"

FBCALL FBSTRING *fb_OCTEx_l ( unsigned long long num, int digits )
{
        FBSTRING *s;
        int i;
        unsigned long long num2;

        if( digits <= 0 ) {
                /* Only use the minimum amount of digits needed; need to count
                   the important 3-bit (base 8) chunks in the number.
                   And if it's zero, use 1 digit for 1 zero. */
                digits = 0;
                num2 = num;
                while( num2 ) {
                        digits += 1;
                        num2 >>= 3;
                }
                if( digits == 0 )
                        digits = 1;
        }

        s = fb_hStrAllocTemp( NULL, digits );
        if( s == NULL )
                return &__fb_ctx.null_desc;

        i = digits - 1;
        while( i >= 0 ) {
                s->data[i] = '0' + (num & 7); /* '0'..'7' */
                num >>= 3;
                i -= 1;
        }

        s->data[digits] = '\0';
        return s;
}

FBCALL FBSTRING *fb_OCT_l ( unsigned long long num )
{
        return fb_OCTEx_l( num, 0 );
}