rdstrnum.c 2.6 KB

1234567891011121314151617181920212223242526272829303132333435363738394041424344454647484950515253545556575859606162636465666768697071
  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. * rdstrnum.c
  35. *
  36. * This converts a NASM string to an integer, used when a string
  37. * is used in an integer constant context. This is a binary conversion,
  38. * not a conversion from a numeric constant in text form.
  39. */
  40. #include "compiler.h"
  41. #include "nasmlib.h"
  42. #include "nasm.h"
  43. int64_t readstrnum(char *str, int length, bool *warn)
  44. {
  45. int64_t charconst = 0;
  46. int i;
  47. *warn = false;
  48. str += length;
  49. if (globalbits == 64) {
  50. for (i = 0; i < length; i++) {
  51. if (charconst & UINT64_C(0xFF00000000000000))
  52. *warn = true;
  53. charconst &= ~UINT64_C(0xFF00000000000000);
  54. charconst = (charconst << 8) + (uint8_t)*--str;
  55. }
  56. } else {
  57. for (i = 0; i < length; i++) {
  58. if (charconst & UINT32_C(0xFF000000))
  59. *warn = true;
  60. charconst &= ~UINT32_C(0xFF000000);
  61. charconst = (charconst << 8) + (uint8_t)*--str;
  62. }
  63. }
  64. return charconst;
  65. }