fixed.c 1.7 KB

12345678910111213141516171819202122232425262728293031323334353637383940414243444546474849505152535455565758596061626364656667686970717273747576777879
  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. # include "libmad_config.h"
  22. # include "libmad_global.h"
  23. # include "fixed.h"
  24. /*
  25. * NAME: fixed->abs()
  26. * DESCRIPTION: return absolute value of a fixed-point number
  27. */
  28. mad_fixed_t mad_f_abs(mad_fixed_t x)
  29. {
  30. return x < 0 ? -x : x;
  31. }
  32. /*
  33. * NAME: fixed->div()
  34. * DESCRIPTION: perform division using fixed-point math
  35. */
  36. mad_fixed_t mad_f_div(mad_fixed_t x, mad_fixed_t y)
  37. {
  38. mad_fixed_t q, r;
  39. unsigned int bits;
  40. q = mad_f_abs(x / y);
  41. if (x < 0) {
  42. x = -x;
  43. y = -y;
  44. }
  45. r = x % y;
  46. if (y < 0) {
  47. x = -x;
  48. y = -y;
  49. }
  50. if (q > mad_f_intpart(MAD_F_MAX) &&
  51. !(q == -mad_f_intpart(MAD_F_MIN) && r == 0 && (x < 0) != (y < 0)))
  52. return 0;
  53. for (bits = MAD_F_FRACBITS; bits && r; --bits) {
  54. q <<= 1, r <<= 1;
  55. if (r >= y)
  56. r -= y, ++q;
  57. }
  58. /* round */
  59. if (2 * r >= y)
  60. ++q;
  61. /* fix sign */
  62. if ((x < 0) != (y < 0))
  63. q = -q;
  64. return q << bits;
  65. }