1 /* $NetBSD: humanize_number.c,v 1.8 2004/07/27 01:56:24 enami Exp $ */
2 /* $DragonFly: src/lib/libutil/humanize_number.c,v 1.1 2004/11/05 17:05:26 dillon Exp $ */
5 * Copyright (c) 1997, 1998, 1999, 2002 The NetBSD Foundation, Inc.
8 * This code is derived from software contributed to The NetBSD Foundation
9 * by Jason R. Thorpe of the Numerical Aerospace Simulation Facility,
10 * NASA Ames Research Center, by Luke Mewburn and by Tomas Svensson.
12 * Redistribution and use in source and binary forms, with or without
13 * modification, are permitted provided that the following conditions
15 * 1. Redistributions of source code must retain the above copyright
16 * notice, this list of conditions and the following disclaimer.
17 * 2. Redistributions in binary form must reproduce the above copyright
18 * notice, this list of conditions and the following disclaimer in the
19 * documentation and/or other materials provided with the distribution.
20 * 3. All advertising materials mentioning features or use of this software
21 * must display the following acknowledgement:
22 * This product includes software developed by the NetBSD
23 * Foundation, Inc. and its contributors.
24 * 4. Neither the name of The NetBSD Foundation nor the names of its
25 * contributors may be used to endorse or promote products derived
26 * from this software without specific prior written permission.
28 * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS
29 * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
30 * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
31 * PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS
32 * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
33 * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
34 * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
35 * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
36 * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
37 * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
38 * POSSIBILITY OF SUCH DAMAGE.
40 * $FreeBSD: /repoman/r/ncvs/src/lib/libutil/humanize_number.c,v 1.1.2.1 2004/09/28 18:24:10 pjd Exp $
43 #include <sys/cdefs.h>
44 #include <sys/types.h>
53 humanize_number(char *buf, size_t len, int64_t bytes,
54 const char *suffix, int scale, int flags)
56 const char *prefixes, *sep;
57 int b, i, r, maxscale, s1, s2, sign;
62 assert(suffix != NULL);
65 if (flags & HN_DIVISOR_1000) {
66 /* SI for decimal multiplies */
69 prefixes = "B\0k\0M\0G\0T\0P\0E";
71 prefixes = "\0\0k\0M\0G\0T\0P\0E";
75 * XXX IEC 60027-2 recommends Ki, Mi, Gi...
79 prefixes = "B\0K\0M\0G\0T\0P\0E";
81 prefixes = "\0\0K\0M\0G\0T\0P\0E";
84 #define SCALE2PREFIX(scale) (&prefixes[(scale) << 1])
87 if (scale >= maxscale &&
88 (scale & (HN_AUTOSCALE | HN_GETSCALE)) == 0)
91 if (buf == NULL || suffix == NULL)
99 baselen = 3; /* sign, digit, prefix */
103 baselen = 2; /* digit, prefix */
105 if (flags & HN_NOSPACE)
111 baselen += strlen(suffix);
113 /* Check if enough room for `x y' + suffix + `\0' */
114 if (len < baselen + 1)
117 if (scale & (HN_AUTOSCALE | HN_GETSCALE)) {
118 /* See if there is additional columns can be used. */
119 for (max = 100, i = len - baselen; i-- > 0;)
122 for (i = 0; bytes >= max && i < maxscale; i++)
125 if (scale & HN_GETSCALE)
128 for (i = 0; i < scale && i < maxscale; i++)
131 /* If a value <= 9.9 after rounding and ... */
132 if (bytes < 995 && i > 0 && flags & HN_DECIMAL) {
133 /* baselen + \0 + .N */
134 if (len < baselen + 1 + 2)
136 b = ((int)bytes + 5) / 10;
139 r = snprintf(buf, len, "%d%s%d%s%s%s",
140 sign * s1, localeconv()->decimal_point, s2,
141 sep, SCALE2PREFIX(i), suffix);
143 r = snprintf(buf, len, "%lld%s%s%s",
145 (long long)(sign * ((bytes + 50) / 100)),
146 sep, SCALE2PREFIX(i), suffix);