VirtualBox

source: kStuff/trunk/kHlp/Generic/kHlpGetEnvUZ.c@ 75

Last change on this file since 75 was 29, checked in by bird, 16 years ago

Finally got around execute the switch to the MIT license.

  • Property svn:eol-style set to native
  • Property svn:keywords set to Id Revision
File size: 3.0 KB
Line 
1/* $Id: kHlpGetEnvUZ.c 29 2009-07-01 20:30:29Z bird $ */
2/** @file
3 * kHlpEnv - kHlpGetEnvUZ.
4 */
5
6/*
7 * Copyright (c) 2006-2007 Knut St. Osmundsen <bird-kStuff-spamix@anduin.net>
8 *
9 * Permission is hereby granted, free of charge, to any person
10 * obtaining a copy of this software and associated documentation
11 * files (the "Software"), to deal in the Software without
12 * restriction, including without limitation the rights to use,
13 * copy, modify, merge, publish, distribute, sublicense, and/or sell
14 * copies of the Software, and to permit persons to whom the
15 * Software is furnished to do so, subject to the following
16 * conditions:
17 *
18 * The above copyright notice and this permission notice shall be
19 * included in all copies or substantial portions of the Software.
20 *
21 * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND,
22 * EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES
23 * OF MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND
24 * NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT
25 * HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY,
26 * WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING
27 * FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR
28 * OTHER DEALINGS IN THE SOFTWARE.
29 */
30
31/*******************************************************************************
32* Header Files *
33*******************************************************************************/
34#include <k/kHlpEnv.h>
35#include <k/kHlpString.h>
36
37
38/**
39 * Gets an environment variable and converts it to a KSIZE.
40 *
41 * @returns 0 and *pcb on success.
42 * @returns On failure see kHlpGetEnv.
43 * @param pszVar The name of the variable.
44 * @param pcb Where to put the value.
45 */
46KHLP_DECL(int) kHlpGetEnvUZ(const char *pszVar, KSIZE *pcb)
47{
48 KSIZE cb;
49 unsigned uBase;
50 char szVal[64];
51 KSIZE cchVal = sizeof(szVal);
52 const char *psz;
53 int rc;
54
55 *pcb = 0;
56 rc = kHlpGetEnv(pszVar, szVal, cchVal);
57 if (rc)
58 return rc;
59
60 /* figure out the base. */
61 uBase = 10;
62 psz = szVal;
63 if ( *psz == '0'
64 && (psz[1] == 'x' || psz[1] == 'X'))
65 {
66 uBase = 16;
67 psz += 2;
68 }
69
70 /* convert it up to the first unknown char. */
71 cb = 0;
72 for(;;)
73 {
74 const char ch = *psz;
75 unsigned uDigit;
76 if (!ch)
77 break;
78 else if (ch >= '0' && ch <= '9')
79 uDigit = ch - '0';
80 else if (ch >= 'a' && ch <= 'z')
81 uDigit = ch - 'a' + 10;
82 else if (ch >= 'A' && ch <= 'Z')
83 uDigit = ch - 'A' + 10;
84 else
85 break;
86 if (uDigit >= uBase)
87 break;
88
89 /* add the digit */
90 cb *= uBase;
91 cb += uDigit;
92
93 psz++;
94 }
95
96 /* check for unit */
97 if (*psz == 'm' || *psz == 'M')
98 cb *= 1024*1024;
99 else if (*psz == 'k' ||*psz == 'K')
100 cb *= 1024;
101 else if (*psz == 'g' || *psz == 'G')
102 cb *= 1024*1024*1024;
103
104 *pcb = cb;
105 return 0;
106}
107
108
Note: See TracBrowser for help on using the repository browser.

© 2025 Oracle Support Privacy / Do Not Sell My Info Terms of Use Trademark Policy Automated Access Etiquette