lib_umul32.c 3.4 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293
  1. /****************************************************************************
  2. * libs/libc/misc/lib_umul32.c
  3. *
  4. * Copyright (C) 2016 Gregory Nutt. All rights reserved.
  5. * Author: Gregory Nutt <gnutt@nuttx.org>
  6. *
  7. * Redistribution and use in source and binary forms, with or without
  8. * modification, are permitted provided that the following conditions
  9. * are met:
  10. *
  11. * 1. Redistributions of source code must retain the above copyright
  12. * notice, this list of conditions and the following disclaimer.
  13. * 2. Redistributions in binary form must reproduce the above copyright
  14. * notice, this list of conditions and the following disclaimer in
  15. * the documentation and/or other materials provided with the
  16. * distribution.
  17. * 3. Neither the name NuttX nor the names of its contributors may be
  18. * used to endorse or promote products derived from this software
  19. * without specific prior written permission.
  20. *
  21. * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS
  22. * "AS IS" AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT
  23. * LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS
  24. * FOR A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE
  25. * COPYRIGHT OWNER OR CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT,
  26. * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING,
  27. * BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS
  28. * OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED
  29. * AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
  30. * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN
  31. * ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
  32. * POSSIBILITY OF SUCH DAMAGE.
  33. *
  34. ****************************************************************************/
  35. /****************************************************************************
  36. * Included Files
  37. ****************************************************************************/
  38. #include <nuttx/lib/math32.h>
  39. /****************************************************************************
  40. * Public Functions
  41. ****************************************************************************/
  42. /****************************************************************************
  43. * Name: umul32
  44. *
  45. * Description:
  46. * Multiply two 32-bit values, factor1 and factor2, and return the
  47. * full 64-bit product.
  48. *
  49. * Input Parameters:
  50. * factor1 and factor2 - The values to be multiplied
  51. * product - The location to return the product of the two values.
  52. *
  53. ****************************************************************************/
  54. void umul32(uint32_t factor1, uint32_t factor2, FAR struct uint64_s *product)
  55. {
  56. struct uint64_s part2;
  57. uint32_t ms1;
  58. uint32_t ls1;
  59. uint32_t ms2;
  60. uint32_t ls2;
  61. uint32_t tmp;
  62. /* factor1 = ms1 << 16 + ls1
  63. * factor2 = ms2 << 16 + ls2
  64. */
  65. ms1 = factor1 >> 16;
  66. ls1 = factor1 & 0x0000ffff;
  67. ms2 = factor2 >> 16;
  68. ls2 = factor2 & 0x0000ffff;
  69. /* factor1 * factor2 = (ms1 * ms2 << 32) +
  70. * ls1 * (ms2 << 16) + ls2 * (ms1 << 16) +
  71. * ls1 * ls2
  72. * part1 = (ms1 * ms2 << 32) + ls1 * ls2
  73. * part2 = ls1 * (ms2 << 16) + ls2 * (ms1 << 16)
  74. * factor1 * factor2 = part1 + part2
  75. */
  76. product->ms = ms1 * ms2;
  77. product->ls = ls1 * ls2;
  78. tmp = ls1 * ms2 + ls2 * ms1;
  79. part2.ms = tmp >> 16;
  80. part2.ls = tmp << 16;
  81. uadd64(product, &part2, product);
  82. }