fixed.c 1.8 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081
  1. /*
  2. * libmad - MPEG audio decoder library
  3. * Copyright (C) 2000-2004 Underbit Technologies, Inc.
  4. *
  5. * This program is free software; you can redistribute it and/or modify
  6. * it under the terms of the GNU General Public License as published by
  7. * the Free Software Foundation; either version 2 of the License, or
  8. * (at your option) any later version.
  9. *
  10. * This program is distributed in the hope that it will be useful,
  11. * but WITHOUT ANY WARRANTY; without even the implied warranty of
  12. * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
  13. * GNU General Public License for more details.
  14. *
  15. * You should have received a copy of the GNU General Public License
  16. * along with this program; if not, write to the Free Software
  17. * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
  18. *
  19. * $Id: fixed.c,v 1.13 2004/01/23 09:41:32 rob Exp $
  20. */
  21. # ifdef HAVE_CONFIG_H
  22. # include "config.h"
  23. # endif
  24. # include "global.h"
  25. # include "fixed.h"
  26. /*
  27. * NAME: fixed->abs()
  28. * DESCRIPTION: return absolute value of a fixed-point number
  29. */
  30. mad_fixed_t mad_f_abs(mad_fixed_t x)
  31. {
  32. return x < 0 ? -x : x;
  33. }
  34. /*
  35. * NAME: fixed->div()
  36. * DESCRIPTION: perform division using fixed-point math
  37. */
  38. mad_fixed_t mad_f_div(mad_fixed_t x, mad_fixed_t y)
  39. {
  40. mad_fixed_t q, r;
  41. unsigned int bits;
  42. q = mad_f_abs(x / y);
  43. if (x < 0) {
  44. x = -x;
  45. y = -y;
  46. }
  47. r = x % y;
  48. if (y < 0) {
  49. x = -x;
  50. y = -y;
  51. }
  52. if (q > mad_f_intpart(MAD_F_MAX) &&
  53. !(q == -mad_f_intpart(MAD_F_MIN) && r == 0 && (x < 0) != (y < 0)))
  54. return 0;
  55. for (bits = MAD_F_FRACBITS; bits && r; --bits) {
  56. q <<= 1, r <<= 1;
  57. if (r >= y)
  58. r -= y, ++q;
  59. }
  60. /* round */
  61. if (2 * r >= y)
  62. ++q;
  63. /* fix sign */
  64. if ((x < 0) != (y < 0))
  65. q = -q;
  66. return q << bits;
  67. }