BSD 4 development

[unix-history] / usr / src / lib / libI77uc / fmtlib.c

/*
* integer to ascii conversion
*/

#include "fio.h"

#define digit(c)        ( (c > 9) ? (c - 10 + 'a') : c + '0')

char *icvt(value,ndigit,sign) long value; int *ndigit,*sign;
{
       static char buf[MAXINTLENGTH+1];
       register int i;
       long kludge, rem, mask = 0x7fffffff;
       int one = 1;
       char c;

       if (value == 0)
       {       *sign=0;
               *ndigit=one;
               buf[MAXINTLENGTH]='0';
               return(&buf[MAXINTLENGTH]);
       }
       else if (signit)        /* signed ? */
       {
               if (value > 0) *sign = 0;
               else
               {       value = -value;
                       *sign = 1;
               }
               c = (int)(value % radix);
               value /= radix;
       }
       else                    /* unsigned */
       {       *sign = 0;
               if (value < 0)
               {       /* ALL THIS IS TO SIMULATE UNSIGNED MOD & DIV */
                       kludge = mask - (radix - one);
                       value &= mask;
                       rem = (kludge % radix) + (value % radix);
                       value = (kludge / radix) + (value / radix)
                                + (rem / radix) + one;
                       c = (int)(rem % radix);
               }
               else
               {
                       c = (int)(value % radix);
                       value /= radix;
               }
       }
       *(buf+MAXINTLENGTH) = digit(c);
       for(i=MAXINTLENGTH-one; value!=0; i--)
       {
               c = (int)(value % radix);
               *(buf+i) = digit(c);
               value /= radix;
       }
       *ndigit = MAXINTLENGTH - i;
       return(&buf[i+one]);
}