xref: /dragonfly/lib/libutil/dehumanize_number.c (revision d316f7c9)
1748eeed1SSascha Wildner /*	$NetBSD: dehumanize_number.c,v 1.3 2008/04/28 20:22:59 martin Exp $	*/
2748eeed1SSascha Wildner 
3748eeed1SSascha Wildner /*
4748eeed1SSascha Wildner  * Copyright (c) 2005, 2006 The NetBSD Foundation, Inc.
5748eeed1SSascha Wildner  * All rights reserved.
6748eeed1SSascha Wildner  *
7748eeed1SSascha Wildner  * This code is derived from software contributed to The NetBSD Foundation
8748eeed1SSascha Wildner  * by Julio M. Merino Vidal, developed as part of Google's Summer of Code
9748eeed1SSascha Wildner  * 2005 program.
10748eeed1SSascha Wildner  *
11748eeed1SSascha Wildner  * Redistribution and use in source and binary forms, with or without
12748eeed1SSascha Wildner  * modification, are permitted provided that the following conditions
13748eeed1SSascha Wildner  * are met:
14748eeed1SSascha Wildner  * 1. Redistributions of source code must retain the above copyright
15748eeed1SSascha Wildner  *    notice, this list of conditions and the following disclaimer.
16748eeed1SSascha Wildner  * 2. Redistributions in binary form must reproduce the above copyright
17748eeed1SSascha Wildner  *    notice, this list of conditions and the following disclaimer in the
18748eeed1SSascha Wildner  *    documentation and/or other materials provided with the distribution.
19748eeed1SSascha Wildner  *
20748eeed1SSascha Wildner  * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS
21748eeed1SSascha Wildner  * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
22748eeed1SSascha Wildner  * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
23748eeed1SSascha Wildner  * PURPOSE ARE DISCLAIMED.  IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS
24748eeed1SSascha Wildner  * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
25748eeed1SSascha Wildner  * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
26748eeed1SSascha Wildner  * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
27748eeed1SSascha Wildner  * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
28748eeed1SSascha Wildner  * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
29748eeed1SSascha Wildner  * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
30748eeed1SSascha Wildner  * POSSIBILITY OF SUCH DAMAGE.
31748eeed1SSascha Wildner  */
32748eeed1SSascha Wildner 
33748eeed1SSascha Wildner #include <inttypes.h>
34748eeed1SSascha Wildner #include <ctype.h>
35748eeed1SSascha Wildner #include <stdlib.h>
36748eeed1SSascha Wildner #include <string.h>
37748eeed1SSascha Wildner #include <errno.h>
38748eeed1SSascha Wildner #include <limits.h>
39*d316f7c9SJohn Marino #include <libutil.h>
4056d0bc30SSascha Wildner 
41748eeed1SSascha Wildner /*
42748eeed1SSascha Wildner  * Converts the number given in 'str', which may be given in a humanized
43748eeed1SSascha Wildner  * form (as described in humanize_number(3), but with some limitations),
44748eeed1SSascha Wildner  * to an int64_t without units.
45748eeed1SSascha Wildner  * In case of success, 0 is returned and *size holds the value.
46748eeed1SSascha Wildner  * Otherwise, -1 is returned and *size is untouched.
47748eeed1SSascha Wildner  *
48748eeed1SSascha Wildner  * TODO: Internationalization, SI units.
49748eeed1SSascha Wildner  */
50748eeed1SSascha Wildner int
dehumanize_number(const char * str,int64_t * size)51748eeed1SSascha Wildner dehumanize_number(const char *str, int64_t *size)
52748eeed1SSascha Wildner {
53748eeed1SSascha Wildner 	char *ep, unit;
54748eeed1SSascha Wildner 	const char *delimit;
55748eeed1SSascha Wildner 	long multiplier;
56748eeed1SSascha Wildner 	long long tmp, tmp2;
57748eeed1SSascha Wildner 	size_t len;
58748eeed1SSascha Wildner 
59748eeed1SSascha Wildner 	len = strlen(str);
60748eeed1SSascha Wildner 	if (len == 0) {
61748eeed1SSascha Wildner 		errno = EINVAL;
62748eeed1SSascha Wildner 		return -1;
63748eeed1SSascha Wildner 	}
64748eeed1SSascha Wildner 
65748eeed1SSascha Wildner 	multiplier = 1;
66748eeed1SSascha Wildner 
67748eeed1SSascha Wildner 	unit = str[len - 1];
68748eeed1SSascha Wildner 	if (isalpha((unsigned char)unit)) {
69748eeed1SSascha Wildner 		switch (tolower((unsigned char)unit)) {
700c0fa2f4SSascha Wildner 		case 'e':
710c0fa2f4SSascha Wildner 			multiplier *= 1024;
720c0fa2f4SSascha Wildner 			/* FALLTHROUGH */
730c0fa2f4SSascha Wildner 		case 'p':
740c0fa2f4SSascha Wildner 			multiplier *= 1024;
750c0fa2f4SSascha Wildner 			/* FALLTHROUGH */
760c0fa2f4SSascha Wildner 		case 't':
770c0fa2f4SSascha Wildner 			multiplier *= 1024;
780c0fa2f4SSascha Wildner 			/* FALLTHROUGH */
79748eeed1SSascha Wildner 		case 'g':
800c0fa2f4SSascha Wildner 			multiplier *= 1024;
810c0fa2f4SSascha Wildner 			/* FALLTHROUGH */
820c0fa2f4SSascha Wildner 		case 'm':
830c0fa2f4SSascha Wildner 			multiplier *= 1024;
840c0fa2f4SSascha Wildner 			/* FALLTHROUGH */
850c0fa2f4SSascha Wildner 		case 'k':
860c0fa2f4SSascha Wildner 			multiplier *= 1024;
870c0fa2f4SSascha Wildner 			/* FALLTHROUGH */
880c0fa2f4SSascha Wildner 		case 'b':
89748eeed1SSascha Wildner 			break;
90748eeed1SSascha Wildner 
91748eeed1SSascha Wildner 		default:
92748eeed1SSascha Wildner 			errno = EINVAL;
93748eeed1SSascha Wildner 			return -1; /* Invalid suffix. */
94748eeed1SSascha Wildner 		}
95748eeed1SSascha Wildner 
96748eeed1SSascha Wildner 		delimit = &str[len - 1];
97748eeed1SSascha Wildner 	} else
98748eeed1SSascha Wildner 		delimit = NULL;
99748eeed1SSascha Wildner 
100748eeed1SSascha Wildner 	errno = 0;
101748eeed1SSascha Wildner 	tmp = strtoll(str, &ep, 10);
102748eeed1SSascha Wildner 	if (str[0] == '\0' || (ep != delimit && *ep != '\0'))
103748eeed1SSascha Wildner 		return -1; /* Not a number. */
104748eeed1SSascha Wildner 	else if (errno == ERANGE && (tmp == LLONG_MAX || tmp == LLONG_MIN))
105748eeed1SSascha Wildner 		return -1; /* Out of range. */
106748eeed1SSascha Wildner 
107748eeed1SSascha Wildner 	tmp2 = tmp * multiplier;
108748eeed1SSascha Wildner 	tmp2 = tmp2 / multiplier;
109748eeed1SSascha Wildner 	if (tmp != tmp2) {
110748eeed1SSascha Wildner 		errno = ERANGE;
111748eeed1SSascha Wildner 		return -1; /* Out of range. */
112748eeed1SSascha Wildner 	}
113748eeed1SSascha Wildner 	*size = tmp * multiplier;
114748eeed1SSascha Wildner 
115748eeed1SSascha Wildner 	return 0;
116748eeed1SSascha Wildner }
117