int_arb.c 2.9 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899
  1. /* int_arb.c: Functions to read/write arbitrary-size integers
  2. Copyright (C) 2003 Sebastian Reichelt
  3. This program is free software; you can redistribute it and/or modify
  4. it under the terms of the GNU General Public License as published by
  5. the Free Software Foundation; either version 2, or (at your option)
  6. any later version.
  7. This program is distributed in the hope that it will be useful,
  8. but WITHOUT ANY WARRANTY; without even the implied warranty of
  9. MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
  10. GNU General Public License for more details.
  11. You should have received a copy of the GNU General Public License
  12. along with this program; if not, write to the Free Software Foundation,
  13. Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA. */
  14. #include "integers.h"
  15. // See integers.h for a description of these functions.
  16. IMAX ReadTI (const void *Data, SIZE Size)
  17. {
  18. #ifdef TARGET_BIG_ENDIAN
  19. #define DEFINE_INT_SIZE(TempSize) \
  20. if (Size >= TempSize) \
  21. return (ReadTI##TempSize (*((const TI##TempSize *) (((const I1 *) Data) + Size - TempSize)))); \
  22. else
  23. #else /* !TARGET_BIG_ENDIAN */
  24. #define DEFINE_INT_SIZE(TempSize) \
  25. if (Size >= TempSize) \
  26. return (ReadTI##TempSize (*((const TI##TempSize *) Data))); \
  27. else
  28. #endif /* !TARGET_BIG_ENDIAN */
  29. #include "int_def.inc"
  30. return 0;
  31. #undef DEFINE_INT_SIZE
  32. }
  33. SIMAX ReadSTI (const void *Data, SIZE Size)
  34. {
  35. #ifdef TARGET_BIG_ENDIAN
  36. #define DEFINE_INT_SIZE(TempSize) \
  37. if (Size >= TempSize) \
  38. return ((SI##TempSize) (ReadTI##TempSize (*((const TI##TempSize *) (((const I1 *) Data) + Size - TempSize))))); \
  39. else
  40. #else /* !TARGET_BIG_ENDIAN */
  41. #define DEFINE_INT_SIZE(TempSize) \
  42. if (Size >= TempSize) \
  43. return ((SI##TempSize) (ReadTI##TempSize (*((const TI##TempSize *) Data)))); \
  44. else
  45. #endif /* !TARGET_BIG_ENDIAN */
  46. #include "int_def.inc"
  47. return 0;
  48. #undef DEFINE_INT_SIZE
  49. }
  50. BOOLEAN WriteTI (void *Data, SIZE Size, SIMAX Value, BOOLEAN AllowSigned, BOOLEAN AllowUnsigned)
  51. {
  52. #ifdef TARGET_BIG_ENDIAN
  53. #define DEFINE_INT_SIZE(TempSize) \
  54. if (Size >= TempSize) \
  55. { \
  56. if ((AllowSigned && (Value == ((SI##TempSize) Value))) || (AllowUnsigned && (((IMAX) Value) == ((I##TempSize) Value)))) \
  57. { \
  58. WriteTI##TempSize (*((TI##TempSize *) (((I1 *) Data) + Size - TempSize)), Value); \
  59. return TRUE; \
  60. } \
  61. } \
  62. else
  63. #else /* !TARGET_BIG_ENDIAN */
  64. #define DEFINE_INT_SIZE(TempSize) \
  65. if (Size >= TempSize) \
  66. { \
  67. if ((AllowSigned && (Value == ((SI##TempSize) Value))) || (AllowUnsigned && (((IMAX) Value) == ((I##TempSize) Value)))) \
  68. { \
  69. WriteTI##TempSize (*((TI##TempSize *) Data), Value); \
  70. return TRUE; \
  71. } \
  72. } \
  73. else
  74. #endif /* !TARGET_BIG_ENDIAN */
  75. #include "int_def.inc"
  76. return FALSE;
  77. return FALSE;
  78. #undef DEFINE_INT_SIZE
  79. }
  80. BOOLEAN AddTI (void *Data, SIZE Size, SIMAX Value, BOOLEAN AllowSigned, BOOLEAN AllowUnsigned)
  81. {
  82. return WriteTI (Data, Size, Value + ReadSTI (Data, Size), AllowSigned, AllowUnsigned);
  83. }