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 | |
46 | int64_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 | |