blob: 0eddd5674495ca480af97b5cce79fab56884c5a4 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
|
/* $NetBSD: l64a.c,v 1.12 2000/01/22 22:19:19 mycroft Exp $ */
/*
* Written by J.T. Conklin <jtc@netbsd.org>.
* Public domain.
*/
#include <sys/cdefs.h>
#if defined(LIBC_SCCS) && !defined(lint)
__RCSID("$NetBSD: l64a.c,v 1.12 2000/01/22 22:19:19 mycroft Exp $");
#endif
#include "namespace.h"
#include <assert.h>
#include <errno.h>
#include <stdlib.h>
#ifdef __weak_alias
__weak_alias(l64a,_l64a)
__weak_alias(l64a_r,_l64a_r)
#endif
char *
l64a (value)
long value;
{
static char buf[8];
(void)l64a_r(value, buf, sizeof (buf));
return buf;
}
int
l64a_r (value, buffer, buflen)
long value;
char *buffer;
int buflen;
{
char *s = buffer;
int digit;
unsigned long v = value;
_DIAGASSERT(buffer != NULL);
if (value == 0UL)
goto out;
for (; v != 0 && buflen > 1; s++, buflen--) {
digit = (int)(v & 0x3f);
if (digit < 2)
*s = digit + '.';
else if (digit < 12)
*s = digit + '0' - 2;
else if (digit < 38)
*s = digit + 'A' - 12;
else
*s = digit + 'a' - 38;
v >>= 6;
}
out:
*s = '\0';
return (v == 0UL ? 0 : -1);
}
|