1/* ----------------------------------------------------------------------- *
2 *
3 * Copyright 1996-2016 The NASM Authors - All Rights Reserved
4 * See the file AUTHORS included with the NASM distribution for
5 * the specific copyright holders.
6 *
7 * Redistribution and use in source and binary forms, with or without
8 * modification, are permitted provided that the following
9 * conditions are met:
10 *
11 * * Redistributions of source code must retain the above copyright
12 * notice, this list of conditions and the following disclaimer.
13 * * Redistributions in binary form must reproduce the above
14 * copyright notice, this list of conditions and the following
15 * disclaimer in the documentation and/or other materials provided
16 * with the distribution.
17 *
18 * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND
19 * CONTRIBUTORS "AS IS" AND ANY EXPRESS OR IMPLIED WARRANTIES,
20 * INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES OF
21 * MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE
22 * DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER OR
23 * CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL,
24 * SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
25 * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES;
26 * LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
27 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
28 * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR
29 * OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE,
30 * EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
31 *
32 * ----------------------------------------------------------------------- */
33
34/*
35 * rdstrnum.c
36 *
37 * This converts a NASM string to an integer, used when a string
38 * is used in an integer constant context. This is a binary conversion,
39 * not a conversion from a numeric constant in text form.
40 */
41
42#include "compiler.h"
43#include "nasmlib.h"
44#include "nasm.h"
45
46int64_t readstrnum(char *str, int length, bool *warn)
47{
48 int64_t charconst = 0;
49 int i;
50
51 *warn = false;
52
53 str += length;
54 if (globalbits == 64) {
55 for (i = 0; i < length; i++) {
56 if (charconst & UINT64_C(0xFF00000000000000))
57 *warn = true;
58 charconst &= ~UINT64_C(0xFF00000000000000);
59 charconst = (charconst << 8) + (uint8_t)*--str;
60 }
61 } else {
62 for (i = 0; i < length; i++) {
63 if (charconst & UINT32_C(0xFF000000))
64 *warn = true;
65 charconst &= ~UINT32_C(0xFF000000);
66 charconst = (charconst << 8) + (uint8_t)*--str;
67 }
68 }
69 return charconst;
70}
71