toolchain/gcc/newlib/libc/machine/h8500/divsi3.c

   1
   2 #define divnorm(num, den, sign)                 \
   3 {                                               \
   4   if (num < 0)                                  \
   5     {                                           \
   6       num = -num;                               \
   7       sign = 1;                                 \
   8     }                                           \
   9   else                                          \
  10     {                                           \
  11       sign = 0;                                 \
  12     }                                           \
  13                                                 \
  14   if (den < 0)                                  \
  15     {                                           \
  16       den = - den;                              \
  17       sign = 1 - sign;                          \
  18     }                                           \
  19 }
  20
  21
  22
  23
  24
  25 unsigned long
  26 divmodsi4(int modwanted, unsigned long num, unsigned long den)
  27 {
  28   long int bit = 1;
  29   long int res = 0;
  30   long prevden;
  31   while (den < num && bit && !(den & (1L<<31)))
  32     {
  33       den <<=1;
  34       bit <<=1;
  35     }
  36   while (bit)
  37     {
  38       if (num >= den)
  39         {
  40           num -= den;
  41           res |= bit;
  42         }
  43       bit >>=1;
  44       den >>=1;
  45     }
  46   if (modwanted) return num;
  47   return res;
  48 }
  49
  50
  51 #define exitdiv(sign, res) if (sign) { res = - res;} return res;
  52
  53 long
  54 __modsi3 (long numerator, long denominator)
  55 {
  56   int sign = 0;
  57   long dividend;
  58   long modul;
  59
  60
  61   if (numerator < 0)
  62     {
  63       numerator = -numerator;
  64       sign = 1;
  65     }
  66   if (denominator < 0)
  67     {
  68       denominator = -denominator;
  69     }
  70
  71   modul =  divmodsi4 (1, numerator, denominator);
  72   if (sign)
  73     return - modul;
  74   return modul;
  75 }
  76
  77
  78 long
  79 __divsi3 (long numerator, long denominator)
  80 {
  81   int sign;
  82   long dividend;
  83   long modul;
  84   divnorm (numerator, denominator, sign);
  85
  86   dividend = divmodsi4 (0,  numerator, denominator);
  87   exitdiv (sign, dividend);
  88 }
  89
  90 long
  91 __umodsi3 (unsigned long numerator, unsigned long denominator)
  92 {
  93   long dividend;
  94   long modul;
  95
  96 modul= divmodsi4 (1,  numerator, denominator);
  97   return modul;
  98 }
  99
 100 long
 101 __udivsi3 (unsigned long numerator, unsigned long denominator)
 102 {
 103   int sign;
 104   long dividend;
 105   long modul;
 106   dividend =   divmodsi4 (0, numerator, denominator);
 107   return dividend;
 108 }
 109
 110
 111
 112
 113
 114
 115 #ifdef TEST
 116
 117
 118
 119 main ()
 120 {
 121   long int i, j, k, m;
 122   for (i = -10000; i < 10000; i += 8)
 123     {
 124       for (j = -10000; j < 10000; j += 11)
 125         {
 126           k = i / j;
 127           m = __divsi3 (i, j);
 128           if (k != m)
 129             printf ("fail %d %d %d %d\n", i, j, k, m);
 130         }
 131     }
 132 }
 133
 134 #endif