_ultoa.c

test file nucleus source

/*************************************************************************
*
*               Copyright Mentor Graphics Corporation 2002
*                         All Rights Reserved.
*
* THIS WORK CONTAINS TRADE SECRET AND PROPRIETARY INFORMATION WHICH IS
* THE PROPERTY OF MENTOR GRAPHICS CORPORATION OR ITS LICENSORS AND IS
* SUBJECT TO LICENSE TERMS.
*
*************************************************************************/

/*************************************************************************
* FILE NAME                                     VERSION
*
*       _ultoa.c                                Nucleus Common Library 1.1
*
* DESCRIPTION
*
*       This file contains the implementation of NCL__ultoa.
*
* DATA STRUCTURES
*
*       None.
*
* FUNCTIONS
*
*       NCL__ultoa
*
* DEPENDENCIES
*
*       ncl.h
*       abbr.h
*       nucleus.h
*
************************************************************************/

#define NU_NCL_SOURCE_FILE

#include "ncl\inc\ncl.h"
#include "ncl\inc\abbr.h"
#include "plus\nucleus.h"                                /* MMU Support */

/*************************************************************************
*
*   FUNCTION
*
*       NCL__ultoa
*
*   DESCRIPTION
*
*       Binary-to-ascii conversion for an unsigned long.  Returns a
*       pointer to a string built somewhere in "buf".  The convup
*       parameter should be non-zero if upper case letters are wanted
*       for the conversion.  This routine will handle bases from 8 to 16.
*
*   INPUTS
*
*       val                 Value to computer absolute value of
*       base                This routine will handle bases from 8 to 16
*       convup              Set this to nonzero for results that use
*                             uppercase letters
*
*   OUTPUTS
*
*       buff                Holds results.  Must be large enough to hold
*                             results.
*       char*               Pointer to area in buf with results
*
*************************************************************************/

char *NCL__ultoa(rulong val, rint base, rint convup, char buf[])
{
#define MAXBUF 15       /* max length of a converted value */

    rchar *p, *str;

    str = convup? "0123456789ABCDEF": "0123456789abcdef";

    p = buf+MAXBUF-1;
    *p = 0;

    do
    {
        *--p = str[val % base];
    } while (val /= base);

    return p;
}