patches/gmp/4.2.2/100-mpf_set_str.c.patch
author "Yann E. MORIN" <yann.morin.1998@anciens.enib.fr>
Fri Oct 31 18:27:27 2008 +0000 (2008-10-31)
changeset 1022 7b3e8b8d392e
permissions -rw-r--r--
Transform LAN_MIRROR into plain MIRROR:
- it does not have to be in the LAN
- offer mirror preference over upstream
- if selected, the mirror will be scanned before upstream servers
- if not selected, upstream servers will be scanned before the mirror
- I've set up such an internet-accessible mirror
- uClibc snapshot available
- MPFR releases available (the MPFR site is down from time to time)
- update all samples to use my mirror as a failover

/trunk/scripts/functions | 45 16 29 0 +++++--------
/trunk/samples/x86_64-unknown-linux-gnu/crosstool.config | 8 7 1 0 ++
/trunk/samples/sh4-unknown-linux-gnu/crosstool.config | 8 7 1 0 ++
/trunk/samples/armeb-unknown-linux-uclibc/crosstool.config | 8 7 1 0 ++
/trunk/samples/arm-unknown-elf/crosstool.config | 8 7 1 0 ++
/trunk/samples/arm-unknown-linux-gnueabi/crosstool.config | 8 7 1 0 ++
/trunk/samples/ia64-unknown-linux-gnu/crosstool.config | 8 7 1 0 ++
/trunk/samples/x86_64-unknown-linux-uclibc/crosstool.config | 8 7 1 0 ++
/trunk/samples/armeb-unknown-linux-gnueabi/crosstool.config | 8 7 1 0 ++
/trunk/samples/powerpc-e500v2-linux-gnuspe/crosstool.config | 8 7 1 0 ++
/trunk/samples/i686-nptl-linux-gnu/crosstool.config | 8 7 1 0 ++
/trunk/samples/powerpc-unknown-linux-gnu/crosstool.config | 8 7 1 0 ++
/trunk/samples/arm-unknown-linux-gnu/crosstool.config | 8 7 1 0 ++
/trunk/samples/mips-unknown-linux-uclibc/crosstool.config | 8 7 1 0 ++
/trunk/samples/arm-unknown-linux-uclibcgnueabi/crosstool.config | 8 7 1 0 ++
/trunk/samples/armeb-unknown-linux-gnu/crosstool.config | 8 7 1 0 ++
/trunk/samples/powerpc-unknown_nofpu-linux-gnu/crosstool.config | 8 7 1 0 ++
/trunk/samples/powerpc-unknown-linux-uclibc/crosstool.config | 8 7 1 0 ++
/trunk/samples/arm-unknown-linux-uclibc/crosstool.config | 8 7 1 0 ++
/trunk/samples/i586-geode-linux-uclibc/crosstool.config | 8 7 1 0 ++
/trunk/samples/powerpc-405-linux-gnu/crosstool.config | 8 7 1 0 ++
/trunk/samples/armeb-unknown-linux-uclibcgnueabi/crosstool.config | 8 7 1 0 ++
/trunk/samples/mipsel-unknown-linux-gnu/crosstool.config | 8 7 1 0 ++
/trunk/samples/arm-unknown-eabi/crosstool.config | 8 7 1 0 ++
/trunk/samples/alphaev56-unknown-linux-gnu/crosstool.config | 8 7 1 0 ++
/trunk/samples/powerpc-860-linux-gnu/crosstool.config | 8 7 1 0 ++
/trunk/config/global/download.in | 42 25 17 0 +++++++-----
27 files changed, 216 insertions(+), 71 deletions(-)
yann@466
     1
Original patch from http://gmplib.org/patches/mpf_set_str.c.diff
yann@466
     2
Re-diffed to match crosstool-NG conventions.
yann@466
     3
yann@466
     4
diff -dur gmp-4.2.2.orig/mpf/set_str.c gmp-4.2.2/mpf/set_str.c
yann@466
     5
--- gmp-4.2.2.orig/mpf/set_str.c	2007-08-30 20:31:40.000000000 +0200
yann@466
     6
+++ gmp-4.2.2/mpf/set_str.c	2008-01-28 23:05:29.000000000 +0100
yann@466
     7
@@ -271,8 +271,29 @@
yann@466
     8
       }
yann@466
     9
 
yann@466
    10
     if (expptr != 0)
yann@466
    11
-      /* FIXME: Should do some error checking here.  */
yann@466
    12
-      exp_in_base = strtol (expptr, (char **) 0, exp_base);
yann@466
    13
+      {
yann@466
    14
+	/* Scan and convert the exponent, in base exp_base.  */
yann@466
    15
+	long dig, neg = -(long) ('-' == expptr[0]);
yann@466
    16
+	expptr -= neg;			/* conditional increment */
yann@466
    17
+	c = (unsigned char) *expptr++;
yann@466
    18
+	dig = digit_value[c];
yann@466
    19
+	if (dig >= exp_base)
yann@466
    20
+	  {
yann@466
    21
+	    TMP_FREE;
yann@466
    22
+	    return -1;
yann@466
    23
+	  }
yann@466
    24
+	exp_in_base = dig;
yann@466
    25
+	c = (unsigned char) *expptr++;
yann@466
    26
+	dig = digit_value[c];
yann@466
    27
+	while (dig < exp_base)
yann@466
    28
+	  {
yann@466
    29
+	    exp_in_base = exp_in_base * exp_base;
yann@466
    30
+	    exp_in_base += dig;
yann@466
    31
+	    c = (unsigned char) *expptr++;
yann@466
    32
+	    dig = digit_value[c];
yann@466
    33
+	  }
yann@466
    34
+	exp_in_base = (exp_in_base ^ neg) - neg; /* conditional negation */
yann@466
    35
+      }
yann@466
    36
     else
yann@466
    37
       exp_in_base = 0;
yann@466
    38
     if (dotpos != 0)