From 7ed80b02b95c67bf1730b3dc52f650a4233d42a0 Mon Sep 17 00:00:00 2001
From: Matteo Croce <rootkit85@yahoo.it>
Date: Sat, 5 Jul 2008 18:44:23 +0000
Subject: [PATCH] perl: finally fix the uudmap.h bug (closes #3709)

SVN-Revision: 11668
---
 lang/perl/patches/100-static_uudmap.patch | 78 ++++++++---------------
 1 file changed, 28 insertions(+), 50 deletions(-)

diff --git a/lang/perl/patches/100-static_uudmap.patch b/lang/perl/patches/100-static_uudmap.patch
index 66b51c43d..49f922d4a 100644
--- a/lang/perl/patches/100-static_uudmap.patch
+++ b/lang/perl/patches/100-static_uudmap.patch
@@ -1,6 +1,18 @@
---- a/Makefile.micro	2007-12-18 11:47:07.000000000 +0100
-+++ b/Makefile.micro	2008-06-30 04:16:09.139721328 +0200
-@@ -173,13 +173,7 @@
+diff -urN perl-5.10.0.orig/generate_uudmap perl-5.10.0/generate_uudmap
+--- perl-5.10.0.orig/generate_uudmap	1970-01-01 01:00:00.000000000 +0100
++++ perl-5.10.0/generate_uudmap	2008-07-05 20:23:22.122800470 +0200
+@@ -0,0 +1,7 @@
++#!/bin/bash
++echo \{
++for i in {0..31}; do echo -n ' 0,'; done
++echo
++for i in {0..63}; do echo -n " $i,"; done
++echo
++echo \}
+diff -urN perl-5.10.0.orig/Makefile.micro perl-5.10.0/Makefile.micro
+--- perl-5.10.0.orig/Makefile.micro	2007-12-18 11:47:07.000000000 +0100
++++ perl-5.10.0/Makefile.micro	2008-07-05 20:38:56.428673229 +0200
+@@ -173,13 +173,8 @@
  uxsutils$(_O):	$(HE) xsutils.c
  	$(CC) $(CCFLAGS) -o $@ $(CFLAGS) xsutils.c
  
@@ -13,62 +25,28 @@
 -generate_uudmap$(_X): generate_uudmap$(_O)
 -	$(LD) -o generate_uudmap $(LDFLAGS) generate_uudmap$(_O) $(LIBS)
 +uudmap.h:
-+	cp uudmap.h-premade uudmap.h
++	chmod a+x generate_uudmap
++	$(RUN) ./generate_uudmap >uudmap.h
  
  # That's it, folks!
---- a/Makefile.SH	2007-12-18 11:47:07.000000000 +0100
-+++ b/Makefile.SH	2008-06-30 04:05:27.362846396 +0200
-@@ -357,7 +357,7 @@
- h2 = embed.h form.h gv.h handy.h hv.h keywords.h mg.h op.h opcode.h
- h3 = pad.h patchlevel.h perl.h perlapi.h perly.h pp.h proto.h regcomp.h
- h4 = regexp.h scope.h sv.h unixish.h util.h iperlsys.h thread.h
--h5 = utf8.h warnings.h
-+h5 = utf8.h uudmap.h warnings.h
- h = $(h1) $(h2) $(h3) $(h4) $(h5)
- 
- c1 = av.c scope.c op.c doop.c doio.c dump.c gv.c hv.c mg.c reentr.c mro.c perl.c
-@@ -478,11 +478,8 @@
+diff -urN perl-5.10.0.orig/Makefile.SH perl-5.10.0/Makefile.SH
+--- perl-5.10.0.orig/Makefile.SH	2007-12-18 11:47:07.000000000 +0100
++++ perl-5.10.0/Makefile.SH	2008-07-05 20:32:48.699799105 +0200
+@@ -478,11 +478,13 @@
  
  globals\$(OBJ_EXT): uudmap.h
  
 -uudmap.h: generate_uudmap\$(EXE_EXT)
 -	\$(RUN) ./generate_uudmap\$(EXE_EXT) >uudmap.h
--
++uudmap.h: generate_uudmap
++	\$(RUN) ./generate_uudmap >uudmap.h
+ 
 -generate_uudmap\$(EXE_EXT): generate_uudmap\$(OBJ_EXT)
 -	\$(CC) -o generate_uudmap \$(LDFLAGS) generate_uudmap\$(OBJ_EXT) \$(libs)
-+uudmap.h:
-+	cp uudmap.h-premade uudmap.h
++generate_uudmap:
++	cp ../generate_uudmap .
++	chmod a+x generate_uudmap
++	touch generate_uudmap
  
  !GROK!THIS!
  $spitshell >>Makefile <<'!NO!SUBS!'
---- a/MANIFEST	2007-12-18 11:47:07.000000000 +0100
-+++ b/MANIFEST	2008-06-30 04:04:34.302847693 +0200
-@@ -3968,6 +3968,7 @@
- utils/xsubpp.PL			External subroutine preprocessor
- uts/sprintf_wrap.c		sprintf wrapper for UTS
- uts/strtol_wrap.c		strtol wrapper for UTS
-+uudmap.h			The uuencode decoding map
- uupacktool.pl			Pack/unpack files to the .packed format
- vmesMakefile			VM/ESA Makefile
- vmesvmesa.c			VM/ESA-specific C code for Perl core
---- a/uudmap.h-premade	1970-01-01 01:00:00.000000000 +0100
-+++ b/uudmap.h-premade	2008-04-20 13:09:00.880250784 +0200
-@@ -0,0 +1,18 @@
-+{
-+    0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 
-+    0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 
-+    0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14, 15, 
-+    16, 17, 18, 19, 20, 21, 22, 23, 24, 25, 26, 27, 28, 29, 30, 31, 
-+    32, 33, 34, 35, 36, 37, 38, 39, 40, 41, 42, 43, 44, 45, 46, 47, 
-+    48, 49, 50, 51, 52, 53, 54, 55, 56, 57, 58, 59, 60, 61, 62, 63, 
-+    0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 
-+    0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 
-+    0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 
-+    0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 
-+    0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 
-+    0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 
-+    0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 
-+    0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 
-+    0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 
-+    0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0
-+}
-- 
2.30.2