Category : C Source Code
Archive   : SNIP1292.ZIP
Filename : LTOA.C

 
Output of file : LTOA.C contained in archive : SNIP1292.ZIP
/*
** LTOA.C
**
** Converts a long integer to a string.
**
** Copyright 1988-90 by Robert B. Stout dba MicroFirm
**
** Released to public domain, 1991
**
** Parameters: 1 - number to be converted
** 2 - buffer in which to build the converted string
** 3 - number base to use for conversion
**
** Returns: A character pointer to the converted string if
** successful, a NULL pointer if the number base specified
** is out of range.
*/

#include
#include

#define BUFSIZE (sizeof(long) * 8 + 1)

char *ltoa(long N, char *str, int base)
{
register int i = 2;
long uarg;
char *tail, *head = str, buf[BUFSIZE];

if (36 < base || 2 > base)
base = 10; /* can only use 0-9, A-Z */
tail = &buf[BUFSIZE - 1]; /* last character position */
*tail-- = '\0';

if (10 == base && N < 0L)
{
*head++ = '-';
uarg = -N;
}
else uarg = N;

if (uarg)
{
for (i = 1; uarg; ++i)
{
register ldiv_t r;

r = ldiv(uarg, base);
*tail-- = (char)(r.rem + ((9L < r.rem) ?
('A' - 10L) : '0'));
uarg = r.quot;
}
}
else *tail-- = '0';

memcpy(head, ++tail, i);
return str;
}


  3 Responses to “Category : C Source Code
Archive   : SNIP1292.ZIP
Filename : LTOA.C
”

  1. Daniel says:
    January 27, 2013 at 3:59 pm

    Very nice! Thank you for this wonderful archive. I wonder why I found it only now. Long live the BBS file archives!

  2. Joshie says:
    March 18, 2014 at 4:57 pm

    This is so awesome! 😀 I’d be cool if you could download an entire archive of this at once, though.

  3. DiskingRound says:
    January 14, 2015 at 10:57 pm

    But one thing that puzzles me is the “mtswslnkmcjklsdlsbdmMICROSOFT” string. There is an article about it here. It is definitely worth a read: http://www.os2museum.com/wp/mtswslnk/