diff options
| author |   Andreas Hüttel <dilfridge@gentoo.org> | 2014-11-28 23:22:00 +0000 |
|---|---|---|
| committer | Andreas Hüttel <dilfridge@gentoo.org> | 2014-11-28 23:22:00 +0000 |
| commit | c3ff32d92eaa6732d2e4ed7c45f4bb22a46a6493 (patch) | |
| tree | 2ffdf3a4e38831b1f4b8aed4cb4d632355fd76d1 /dev-lang/perl | |
| parent | Version bump. (diff) | |
| download | historical-c3ff32d92eaa6732d2e4ed7c45f4bb22a46a6493.tar.gz historical-c3ff32d92eaa6732d2e4ed7c45f4bb22a46a6493.tar.bz2 historical-c3ff32d92eaa6732d2e4ed7c45f4bb22a46a6493.zip | |
Remove unused patches (well, actually, all of them... :)
Package-Manager: portage-2.2.14/cvs/Linux x86_64
Manifest-Sign-Key: 0xEBE6A336BE19039C!
Diffstat (limited to 'dev-lang/perl')
40 files changed, 43 insertions, 2576 deletions
diff --git a/dev-lang/perl/ChangeLog b/dev-lang/perl/ChangeLog index 43dba18d4b6a..1a1a557032d0 100644 --- a/dev-lang/perl/ChangeLog +++ b/dev-lang/perl/ChangeLog @@ -1,6 +1,33 @@ # ChangeLog for dev-lang/perl # Copyright 1999-2014 Gentoo Foundation; Distributed under the GPL v2 -# $Header: /var/cvsroot/gentoo-x86/dev-lang/perl/ChangeLog,v 1.456 2014/11/08 22:43:08 dilfridge Exp $ +# $Header: /var/cvsroot/gentoo-x86/dev-lang/perl/ChangeLog,v 1.457 2014/11/28 23:21:51 dilfridge Exp $ + + 28 Nov 2014; Andreas K. Huettel <dilfridge@gentoo.org> + -files/perl-5.8.7-MakeMaker-RUNPATH.patch, + -files/perl-5.8.8-CAN-2005-0448-rmtree-2.patch, + -files/perl-5.8.8-CVE-2008-1927.patch, + -files/perl-5.8.8-USE_MM_LD_RUN_PATH.patch, + -files/perl-5.8.8-asm-page-h-compile-failure.patch, + -files/perl-5.8.8-ccld-cflags.patch, -files/perl-5.8.8-cplusplus.patch, + -files/perl-5.8.8-darwin-cc-ld.patch, + -files/perl-5.8.8-dragonfly-clean.patch, -files/perl-5.8.8-fbsdhints.patch, + -files/perl-5.8.8-fix_file_path_chdir.patch, + -files/perl-5.8.8-gcc42-command-line.patch, -files/perl-5.8.8-lib32.patch, + -files/perl-5.8.8-lib64.patch, -files/perl-5.8.8-libnet-hostname.patch, + -files/perl-5.8.8-links.patch, -files/perl-5.8.8-makedepend-syntax.patch, + -files/perl-5.8.8-perlcc.patch, -files/perl-5.8.8-reorder-INC.patch, + -files/perl-5.8.8-solaris-relocation.patch, + -files/perl-5.8.8-solaris11.patch, -files/perl-5.8.8-usr-local.patch, + -files/perl-5.8.8-utf8-boundary.patch, + -files/perl-5.10.1-cleanup-paths.patch, -files/perl-5.10.1-hpux.patch, + -files/perl-5.12.3-aix-soname.patch, -files/perl-5.12.3-interix.patch, + -files/perl-5.12.3-mint.patch, -files/perl-5.12.5-rehash-5.12.5.patch, + -files/perl-5.14.1-cleanup-paths.patch, + -files/perl-fix_h2ph_include_quote.patch, -files/perl-h2ph-ansi-header.patch, + -files/perl-hppa-pa7200-configure.patch, -files/perl-noksh.patch, + -files/perl-perldoc-emptydirs.patch, -files/perl-picdl.patch, + -files/perl-prelink-lpthread.patch, -files/perl-regexp-nossp.patch: + Remove unused patches (well, actually, all of them... :) 08 Nov 2014; Andreas K. Huettel <dilfridge@gentoo.org> -files/eblits/src_configure-v50160001.eblit, diff --git a/dev-lang/perl/Manifest b/dev-lang/perl/Manifest index 7d0bbc53356c..910bc43b5193 100644 --- a/dev-lang/perl/Manifest +++ b/dev-lang/perl/Manifest @@ -9,68 +9,30 @@ AUX eblits/src_configure-v50180002.eblit 4692 SHA256 6c2f3aaffe6ffad57fc7ea4decc AUX eblits/src_install-v50160001.eblit 2122 SHA256 64a8d7bcfd7757e8f15c28f4457240390f5f0ffff3c8c72c3e01a2612b668cec SHA512 ecea3ae0006fa2b009c15cf7ceca989058738e2e893b053dc0bf904ce17443b7d21ed033f09997535fd86da608d1c95d1b93a55268c06cf164d7894a71616e2c WHIRLPOOL a9c5531a799a3054ff3fd9add4e81e818f6f4d01d4826728274a15d98cee2a20188dee906f565ce4b413813068db4ac347ef7b717cd4b9526f54ba208c309491 AUX eblits/src_prepare-v50160001.eblit 2114 SHA256 dc803c75ffa7194149d7891c90cbdcd56e634afa6d0988db52242c27a6e1df3e SHA512 e6a32a3fd4b1b35ea146aefb67df74517304237d3fede12feaf52a1eed5880c2c15ad3b6bf2eb5bd153c60df5d6e9da583408d469d9014299dd4704e9a65d3db WHIRLPOOL b93e03c60c76a34da9d783bd88b2e0ec6c34c9a3a291973ad856180f4ed7b88ccbdd57fb95227c809c27a8a7537c67bf5ed573f5d7eba35b147ba26242438313 AUX eblits/src_test-v50160001.eblit 503 SHA256 35a8a1a6f89e351e4587c82ef3c30699f8a37d78570e28510c5e02bc9e352198 SHA512 09c6f1b253119d0ad7f7d698c37d9d1979a67a2866c72677177c47d9e7c413a7588e2e531bb1e9790ce49add618b768a7fa271e05171a3ce73fa4433034f91f7 WHIRLPOOL 9aae83a23fc6246d26729ad940a7a13bb89e3b2223581e34000f8a93470455bc8ca5b71ae47bf5e6809544793fe21f7207beca3681990c849838497f32f08b51 -AUX perl-5.10.1-cleanup-paths.patch 2368 SHA256 90738b47513eed34789ab506a023ca88be841a9a64127d201c4eebe85b63f443 SHA512 47246aa49f8baeab315bf06e64bddce98778fc9fcceddc0dd974604e1d6cb00a3a48bc08243a3edd2ccedf452bafd522e31e4469e672470c996da16efea85c4a WHIRLPOOL 9abc97d16322927f2e8b71d13f78edaca9e0b3838e2cd695fa2773ce6f7c3d6ce0d30bb81e34824294545df8a444772339f279ae2a556db2add9547b9cd7d065 -AUX perl-5.10.1-hpux.patch 1042 SHA256 3288b1b8a3d09d078c6c8453ebde7fdea15b0c39be016141c7278502a91dc26f SHA512 dbb3fadf45463c4aa2fc7333167369f8dd6506e4d45a39f7fa0c651ded185b866b289abaf38555ca559ab93b80ec4d666959cdfb76380a965a6b65bea5cb3df5 WHIRLPOOL c128d8baa440b0fc4ed0454b3b54f02a2525ae383b12daa6f5794d051a17637827219429650cdb2cb62f5972cc27818bae301b3d5f6aa5f11de90a5e77ca635d -AUX perl-5.12.3-aix-soname.patch 2190 SHA256 ad3722c4535268e75208fcd569f4a9aee9672c2bae5017317a72a62948a89f98 SHA512 91543e9481ea143f2957f14497cd25ef6e3ef5d347d9eb3a2ddaaa4209fb866a12288d0685d6a32e452ddf32878872b2207ae1abe5a49400ad16ad466e8d5031 WHIRLPOOL 69c6b53010c60597011927437db15fd7756bec1b2f01a76442b02b21a46be6b75163423e9d666f23f995c0965607edc981fd28570b145d901e5028774fdb61c1 -AUX perl-5.12.3-interix.patch 690 SHA256 e2ae4b8067b3e98db1bf63b71e0f5f703c82b25883be03592bf1d74396409e14 SHA512 ae306dc130b5e3e4c4354fcd7be09581972d927e3c6dd2bcc08e5db92b1443b2bcb473ef646952175fa169203ef5312604521bcbfc06fdd46d73c350f0bc4f38 WHIRLPOOL 04dfa0c275f3f40f3f5045c6683b38e84ec5e1c7c66a9a934a91d4392c546b93fd3704f7b5e500c67ccdf6c2d6af0c4a3766f7c6017175fe1b0608348da16a02 -AUX perl-5.12.3-mint.patch 9700 SHA256 181ba1b71a1bcc2d74e2047a710965caf1ff8e29d395c018211d2dc75a6bc0e3 SHA512 ab8c8f1359c14b23c3fc66f131a8b7240257d7a12d8756b456982557a363165a0392b012d50cf980a6d711e705ac444822fcf964ee191d157aa5d5219b0aa94f WHIRLPOOL 7ee69fe3516c3187b73a4deac092703414e73b3b916479b28319f7fb9b357bd4034cc4928de44c4f1c3c7ce533f6117e8bfab31a7b1f3219abe8decf57ccdb6c -AUX perl-5.12.5-rehash-5.12.5.patch 5535 SHA256 ac073dda4da957538f4204ed0b92d9895fa675e82fa1cd69fde5391089afd9fc SHA512 2ec63c9deb9bf7e4fdf005208b06c03159aa992f4855d62b11a1e64ea9fffdf4d083a3c70bfc6fbb0e4e39d3eea772ed25ddd0a17a7b2133d6f5d1d2cfaa051c WHIRLPOOL 810bbdc3db2e964b71617a7506c371384429d0d732386623877218765f3be6e48e7d73786d234c1aadb76e1fffb63169bbacefb0cd94d751b7acdd293faaa169 -AUX perl-5.14.1-cleanup-paths.patch 2375 SHA256 e8f55b3f863a3502f7bebe3d059f822680378ebf83f58ddd51df19294e82a60e SHA512 0dcdba3b2bcbdc3110a59cef260b68e9f93ee47c5b9e6dd07b1f26b4606f3a4b678d5512051f7feea769283c98dd35c0d12e0510c621dd62eeda0da4b06ac81a WHIRLPOOL aae9147be2aae74df7719794feee0ab9883d6e2bcf5f26eeb9efa06cb1a4d75f6bb68dc52800b1b41a6406f52a3a1b59eb4b2205f7b2d07940cc82590d677660 -AUX perl-5.8.7-MakeMaker-RUNPATH.patch 859 SHA256 3d327c525e0cf57899eca48d417fa4363f40da9b0d6b70b61e951521749047ab SHA512 6d7d612c205d19a6b76ab245927a470aa20ef5871fc6f5933c935a3d148bf4fca29ec899869e989b4e7654d7372ab4ba62d2c9b035eb8a089adf10f6fb4d64b4 WHIRLPOOL fc18bd262a27ed7bb1084d34666a074c65aa225c7fe8c7c13fb20dc74b2d89486f691d7d8429d4a31bc24f111fb279bd606808fd5b03aa7f8944986745530db1 -AUX perl-5.8.8-CAN-2005-0448-rmtree-2.patch 8187 SHA256 def78de69a0ef27204dfc1f5f39fcd4da1b38327f446e4dca1d37b9890b338e4 SHA512 6d3ce0cfa07221a35b320d4345a12dac2023fa4d42153e8caf964877398a1357309016e4d3d85ae6413c39034408176429d30228fb131a21d2677ccde030dc2f WHIRLPOOL 9749b52d426d0bb45b5a1710dfb2847b3a3864d6b1d494ec7bccf53f20a10323b23201f5f00d43f886eef688352d4bf6b83c1a7045a447619a65fe1cd425a340 -AUX perl-5.8.8-CVE-2008-1927.patch 8129 SHA256 614ebf7a0885fb5f7203627a3051f4df8fee2988d6bfec5a3d8fe70d97f9e45b SHA512 0d117eaa19d64d0f6e2a494bf53bd120a0926ece6660affa14e27036329c64b4b907c673c32b715cc70db31cfb45d920e1ea2de65dc64c0c717b979235b50170 WHIRLPOOL e76d8e638229c075b0b010ae71a109372b2775560b37427a712aa7d35e05ce845ffe0621f872873f7c289a77154c69a8870b2d85617c963e71d0433fe540268c -AUX perl-5.8.8-USE_MM_LD_RUN_PATH.patch 4963 SHA256 49527cd4272ba177b39562363bf34ec6c7b6e709ee6ac770b7fccc302d18b459 SHA512 f03c343ec11d6ac03352d4c90c93e36542187d6dee3a847826920c78219e67871c611fe33ee869ac4a864e1569eda249ec47794a6b0649376af364a8302171f0 WHIRLPOOL d8553d77fdd3ec70b69c4e23fd765aa46021658bee4b4a8d5b65e71dc2ba987fb0aecb092b28eb4105a578fdc8ade25e47bee016315ec5ad0bca91d3e07e0f3c -AUX perl-5.8.8-asm-page-h-compile-failure.patch 384 SHA256 b6be7b879d07a0f5a80ec775ce122d84a126a860471ccd86e4f32cbc2c90f704 SHA512 816f2b0e7be3dd0690148560579db97977432e61f5d11b606605b7e8eca3a4207e07486a5801c85cd55f489c470fe0a139798c7a78fcbb7af28476c783e0ffad WHIRLPOOL 5829a70fab015515572eb0be71f01dd7d2fbb233ec55e878e9a85bcb71b47a094a830c84f665745cbe31c16b83643ce103420cd06b63ef14548e59a0dc65ca8b -AUX perl-5.8.8-ccld-cflags.patch 1103 SHA256 c154c64b6566914ff6c77afdb298c6f18d24f030fe9b121d55cb2b687cd385ed SHA512 996a333acd560a37faa7b0cc6e0baf7908925db5587fba976b8119044220d47bd36f16cc8c29cd4435030e688718129bdeb611fb07ed7ce2465e70b42368eb8b WHIRLPOOL 4b0e379f0851f00fc015ec8cea84e2083b9d349050a34d0f227dc15ec919988749f04b5361323e6047b47a4d6d5abe6f80379a77e1c6b3834633aa9340d9f80a -AUX perl-5.8.8-cplusplus.patch 854 SHA256 ea1368e609b0d992b6cd5f92c327768d8c61ca2096826f26af2576263efb8a89 SHA512 b984551cab20a93fd08589138d6eb8ff1aed11eea002806ee426ed84510ef925ccb64dd4851962a157a4b909805895ba97b265a7663b66a5fe2736e7702a4a40 WHIRLPOOL 398a6df1049bccbb6619e3ed04125a6aed06fe5a1a26a48c5a68cf889a35db6b02a2dd76462b56e1fd91369478f5e85e2c97baeb7b9dd66ff1834ebac504a67f -AUX perl-5.8.8-darwin-cc-ld.patch 546 SHA256 c4cb8915fd8117badf53fb9fab03821a0b31a58fb9a273f33e129b4fd5362570 SHA512 c71b0edac5443dc5f92bd9bee3364555b2e3a6e42e786f0f7ada0e1cb0f59fefc5ee2bbcee44bca3bb381f022d4aee7954cbc0545740b7b989499ef8ee7d16a6 WHIRLPOOL 63a79e6a363cae6f39255dfdff9f7eefe0274834ae7c7d28269e928ba9c101ab60449fe51583027361a1fb66d92a3cd4df80409cd72736d7785bc17a9ec98419 -AUX perl-5.8.8-dragonfly-clean.patch 5211 SHA256 08b22fe26695f6f7f7d21ca2628954eded91205b64450e24d0b295eb75952b6c SHA512 6c23a81f70276cb2cede65eec9202962681db6f626d2c3787ca40028a64417c2c5026bc4f6117ce5966c4733f8d8660af262b62c2c223662b903f119f2b9c916 WHIRLPOOL 51352eb13a3566b182ec0e2c130fcfe55baf53f46c855828f54bebfed861e8c0834ba50ae2458e08c377c6870f2cac4795ed2f5628f377814bd9e8a79ac720d9 -AUX perl-5.8.8-fbsdhints.patch 1984 SHA256 98ff829c9544e7edb329974b883f98b1391a5bb0e071edbb5e96feeba2c066c8 SHA512 c54468a4c8cb8950f796b2a51c036b7ca36c6ef4a542d4934170b27bda3399809cc71220766adf0e74e739170da82a4c1d995c86ed76becc8e1ffbf4b636e135 WHIRLPOOL fbf98d22ee127439e6a6ad2526055e2227b8c268c7d4bf92c170d8613f696e7fa095556063981679e0a2bdf7bfdc0d46a3840845d9d46bdb2f7fa5d4c43b0de4 -AUX perl-5.8.8-fix_file_path_chdir.patch 2195 SHA256 192883bb78ce487cc27e0158d7fb17837c45ae7a88091eb7bbf228888dff95c1 SHA512 b275aacec455964082691acb4c82f5c59e7aa71322354e623384de3e73ed1b322405521b434484c88f9ba489a8364ae6dfbdf6b41ee7a32218b171ef4da60d90 WHIRLPOOL ce869a168dd4abee7bd8e02659c06ecce524d706e313258fd3760c97c40f14205d5f4ce109a900b43593b14004eb6e37519576ba9f2e0de51cd50f1d5c294284 -AUX perl-5.8.8-gcc42-command-line.patch 497 SHA256 946d02284221bc3615e1f03afda1735e6da0296b03315e2a644bd784ad6f76d1 SHA512 f8416031cf8ec05bb96f7044de0cdc624b0bb0d0a066cb85511f7ace9812a709505f1bc7df9c4a97bdc6700151b0564e6f9e33f1378c67aa5307529bc2cd8cf3 WHIRLPOOL 3bf1846037ad879b4f9033ffe3ff623c45c75ef88157f260992c424d5eec035746a85bc93aeb74d57f9e40459e396f72c1d450f64214583b4a171cf4306d318d -AUX perl-5.8.8-lib32.patch 2880 SHA256 90f9dd366ac931ac8baef61b1c8cdab4c80009554919c212b169fd37268ddf23 SHA512 7252f9a592d0d07e18f876e291a0177dd73218a4bcce7a06aefb7c785e56a9771aed548f2229cd2b5fad9736559d2b5469d9befc67bd37fac895213169719329 WHIRLPOOL 1b77a3e43bfad0738d0de1265bbb2b426fd6c1bbfcb61bb4a098b032ff0d71c8e27e776edf6cd7dac907da0da9fc67752ff5f095eab30065a13808bd3a7776e5 -AUX perl-5.8.8-lib64.patch 2880 SHA256 d2005cd1d57852a87f6060627c88eaab56534bcc8f922567e250ea79d2f6552d SHA512 9e1799541bf7a91c1d3ed0f556726c50798b1156cc9a45d56e86716e4074e3464b3f48dd6bb4ba16f81e7488e3cb9c205a92aabf1be5e85e2526c9b88e9b18de WHIRLPOOL 66cc945ca051845b8947f22337551e352f0af60972b07667ce0e974736743659463257f01a5b75f185f60f5147cd142e6363df9d3a1dad93bee64a220b1cefe3 -AUX perl-5.8.8-libnet-hostname.patch 664 SHA256 486d779faa86ae275e8800d83bd67329634b2782de6908512b6bf8380d389a96 SHA512 3208887564d7734f32583b0af33747820a55ef1fb5034c4d5eef15a12edfd5384290d3b1375409d47571c536ca6ce6204cd8b07952c8c950ca170974badbe820 WHIRLPOOL e67f806dc68a56a7987d4468f862429902b2c88c9096f43a13af3476bb1a06d08802d1096bde7cdac2316ee9d0e8b23b90be689cc998baee304ab30b81c8c1df -AUX perl-5.8.8-links.patch 2925 SHA256 aeecee505f05ab0d7336142119f7a3e6d061b8fd2c7bbf9bd88cfb0421323bea SHA512 736dba3e3d21ecf2e6aa2c8e7a4c524da4975025fff5006298fc3685984f61de4329ce59de391ebc7f3650c867df2ff1ce92c01134c4731e6b099eccf51f1b2f WHIRLPOOL 5f70c1a9c0fafc7cf4f4f69f1918c52f561af1fbf08541fac35a8433b31a2f4198d497cbbda7851066402c9505ed4d8d882dfe254de4c8621a74a1a75d5d0612 -AUX perl-5.8.8-makedepend-syntax.patch 341 SHA256 f4ff3678b992774552d9ebc9ca7f3da1ae0144077eb52365e96ddbd0ba9c2606 SHA512 655646a9f349a84286de13eb8048253ac007d876b1d4d1a4be6c8949e155872fc7f52896aa354528118df0a89f2332186f19c473de9b89e8b8d63071a18dd478 WHIRLPOOL 392a80a0af0a79823b7599c9e68c51b57ec2fb67af09d11eaf07c3b6f77e5242c61a857cf35718c0c00bb965e280f9b9162e10a56cbaa68368d1fd912be7702c -AUX perl-5.8.8-perlcc.patch 559 SHA256 7c212d320ec34cf8d0d5443ce5fad5c94a9fa9075462d54ddd8cc5716a2f2aa9 SHA512 bd1b578b45304203bd2be0703e179cd229b17020be86520ec079b5045c233c469aa4f7653620ac501be6a32bfb0a5d0eebd665b27a2d77aca08f5713e26ecca3 WHIRLPOOL ae0cd9f42fe47185d9d8ab2c747bdfe9530d50c7af6cd7ab6c08540cd7ac2433374396f440fa9423d09e2286bac5a6276f5d6896f57781ce4fb665fa06d22cc7 -AUX perl-5.8.8-reorder-INC.patch 3046 SHA256 136ca6c6cfaa3467f6a164f26b34ff06cc55823ca5723118764589cc15d37aed SHA512 f4795edbb738c26b5c63268a3392e93842a1cb06868293bfa16016c2b4e5b78a2029a1d0d6a64bf6f6e76e67565832eff9e37214296b03fdd2ad9cced3e935f9 WHIRLPOOL 6ee2367f5d7b4f344dd3099c8c7869788ea408cd3f6986ef22d8fec73a1489de509a715e6ef1b4f0128315c0f27e106e01b08f74f266ce5adebfadede1711243 -AUX perl-5.8.8-solaris-relocation.patch 526 SHA256 0bf483a1dd8f8572917bf1bd36f45c78d34b818ff0d0177d5f09ca4ab648dea5 SHA512 4436baf03973e8b795ce3e1b1dfd62cfbb59a874a311bc0bb0b8098c8d335f70987ef184cf0d798d837ca567553c7208541c1bf8211d60740c04bf71ec5653b9 WHIRLPOOL 0746481bd285df0b221adc883d8c62b86a422a0d0146358f38ee8adffdf5c5fc20f0dbe54ea9308fee66af890e3c92ebee970ab231df3ff55a5b30a7f3b526bd -AUX perl-5.8.8-solaris11.patch 301 SHA256 300b48858b019797aac8154036aeb537a4058baf265597682a8aadac805991e1 SHA512 c0fd6ae3f312892e7cbfea41271db6d9e84c3aaa4e485743a62a6d0d281aefcc544fd3ed9d0a9f4ebb66a8cef9f3e38526a9a571a7acef2f5b4224441f0f8fcd WHIRLPOOL c841961b1d1375e938f23fe0a689b7f9bf0364e3b98210165989f4b4e30ab821d519c0db1149d67e86c9c870d9263ff869f59c34034a9bdbd215fa610e2f6fc8 -AUX perl-5.8.8-usr-local.patch 775 SHA256 c9cf8a318bb4b13088201ae8044fbab857918e23f517e2e8d2ee2b425940cb6e SHA512 8d17288a9ed9a4b3c7c5c3cdcecd989cc596fd8451e64268bdb36ba8a72780ba8bcfa537b30bc8b15fa0ab3be15117d1f9e331f00db9745fe3650391bce58a1a WHIRLPOOL e60a36a0873e0100c7094f69a181cb409f9a55dc5d4d8859cb3b9ca983e1c242ef47e2446950f3bedab725f558c43b9ba0fa529ffc635e540fd4a30da3cffd68 -AUX perl-5.8.8-utf8-boundary.patch 1866 SHA256 62848b35ed88c7d3a1a836903707b467e421321810e18792da41b28f9e7124a1 SHA512 12a1771259e81dff10553ce58ce8398f704b4dc70bf7c8584e971e33bc950a504a8ca60b521eba6f22262f3b3f0147ba00a266f13a412839f032af0b69a87810 WHIRLPOOL a73dd3f56ad31c6ccdef9cdae0af84c5dc6dca2167668c8d7bf12212f492c04913bf9cf6e14b58a90a58cb25ec15b75a361447af030a4daf49ad77ae939a4faf -AUX perl-fix_h2ph_include_quote.patch 2462 SHA256 bfe3ebd7e119ebf5e11dc00e55773732f483e740e153dff267dd5ca12affc432 SHA512 8e709d95513fe248ed2d4a0483e4ecf9011c5dd5c77f95009c00c4d26aec25c93ad62939f522bd79020b7e72c94fd8daad327592502369a8b5d27ae0ceed1329 WHIRLPOOL b78e7486e2389209f546f562cb2073c36250a7401b8cfd094ebde336860cfe206f91053d4af94e4b981889511ac282ac1119d9638606a565e47241bbfe606cf2 -AUX perl-h2ph-ansi-header.patch 446 SHA256 dc28a8ccba56e0aa5e01b0ecf68a163ebfb9460917d201f1f6d9a1efef06c788 SHA512 4859af132e2ff7b6c840c61201458fc3bfaee518993f42fdaddccae2cf07a94808183a7c8cffb9deab7e9f15c8241ff4afc3fc8c8817db84b5577831709ab385 WHIRLPOOL 2af68cd9ee1f8c0e3b90418a25a67960f92b7a775efa6eba771c27fd39dbd3b3537e7bf0077293a107e9dbf1678f377d782da73bbe97b90f623e4dee45fb1061 -AUX perl-hppa-pa7200-configure.patch 446 SHA256 4fe6a010dbdc39325f4003e7ccd02cb7996b4a99b64ab0fa8b12d6fe67f87a31 SHA512 5a1bdf849694ea8faf8fc3e7b29d1c908203fb389fa37e5fdeae1a610798031db4549254a90b7a050d0831265a45d605a59bfa14192f1924be7193610931e1e3 WHIRLPOOL be47a74d31258dc2dd524fe26d75edef1eaabc7119e965696ed26e72b9048191b374f21379e6d9b24ad64bdea133e22efa46438536049b5ce6822565c951e8af -AUX perl-noksh.patch 611 SHA256 0861f7f54c184e99a0ffeebeab9420d969d2002f921bc3fb14841a1e24be1f5e SHA512 42f121522a9ad327c65649489fc975ab0e84ca37851ea3b905582c32bf54627d2bf3fffc7450811b9e9b8a7349c4e7547e37c0b4a38a417e6a6d7fa4e687f17e WHIRLPOOL abcd5c1eb9c0be25ecb742d4103b17b8c71f826373b3dbc6572a129a68042895c6c3a546c88206887c99fe848493344194b81c322d4229f0ee6e926c59ba7b75 -AUX perl-perldoc-emptydirs.patch 489 SHA256 e8c52d67793f0a5ae0aee52a3b9db2b348a1303b57069d6f82c4bb499f45ee2f SHA512 9d55750fceb9dbb774a5e7772898d6d97c8b54bbdba6cb0b8d26bab8c1085de344d963efe464ed8a4d0092cec91b12e6a0bae3a92200442c24c08f7cd4df3f20 WHIRLPOOL 76305e28c3696a388a40ba988184e097f56dba071cfbab9ab0bcfaaa2c6a90f5c51c0ea809dd1d995050caf9085875ca562960e09852b243b4bcff40733a85c7 -AUX perl-picdl.patch 250 SHA256 fdbe94e869457b7e62bdc76b82a13ecd6e500c223d609b1767285190efd63cfa SHA512 0493c583b3e7e324f91906ae9280145601642dba6c1c400f3d5df4e054e6aefa023d6c1823ee8cdbb7169fe5e1a932c091326e949e49ea252ccb409dd6a7fbe3 WHIRLPOOL 2fd61e6cbb9b0db012922a2dc8047b5962804b0e0ca41110915f8014f165009671f14619fdd955c95c811b29dc26d6fc49a736d5a20e668e099b7495c28b34d5 -AUX perl-prelink-lpthread.patch 476 SHA256 289d0bdd08105e7fdf1c2d683d76a0cdcd009998f3ecd84f3a75cf79ab84e7a0 SHA512 7a46c4f4c2577d08ca0db27103adca0f0db00010080e499e1231f3785505a8c99b590160bba650a2ef95246f3acfdedcb4003f297f23c1599399b938196c51e2 WHIRLPOOL 8fef3e142467c5be840faed23e38013c9b541844326bcb9972245938bf34a123cdee1fbbae8a3a2c1a90eae6fdf2cb079deb2a0b8bbcd98616c1962a3d5daeff -AUX perl-regexp-nossp.patch 460 SHA256 e2d923711bb856b3c7f790dbc1cd1f468d647c1e50a3ff8a18745023c73b3e36 SHA512 78162aaf02125dcb7fa302edf2c34a1defa836a6e7635f843781b200d50e8bd4d519d1926ae4ff98cd9e3aaa6624b73901b3b6e54cb8ff3522557bd51fed630a WHIRLPOOL 1e205551058916f8495b37a4b1c6d28eba42a72874b2977f678bd5e9756e6d6ade5fdb7d666ef68570b91be906262353f01015dbf3a726f1f5d1564b945e72b6 DIST perl-5.18.2-patches-2.tar.bz2 17153 SHA256 2d203611d9df9d63ed972a37db4927e5d04e80f1abd9724519ac9fc6600d7dbb SHA512 9efacaa44447dc605e69dd68886b41a263726158e98cdb9293678a77311eb197fbc86591db6209ad4614e8a8491758fa24f10c189e5a75dc8ec8c9a1335cafbc WHIRLPOOL 4d69c24e773b51a62e4a223a6846698b207a4ee71f16e58692634a750f25372e602c6902d3ec9859ec21fbf32acdef12817eb1ff285cdba37c404636ced16332 DIST perl-5.18.2.tar.bz2 14058513 SHA256 06a0cd490be36d829606aa41d8c9c4c72ae70542f8d4f23ec554335b3d9e2746 SHA512 7129f56b33724a49498af22977e9e995791c8de736b204124e21d170f1a7419e7b8c6dbc57d76216e4aebcb4b42e61c4075f96ebf06a13523287966222527535 WHIRLPOOL 2acee8f9d7ee5b9f265c6cee625d67efb9ddad7164787faa8cb50707cc53914fb78420e1450e85180fb093804ae84cb301dd274aa4412f4b899aacf1f15bd0cb DIST perl-5.20.1-patches-1.tar.xz 13704 SHA256 56fb83302de7a662b5c437ef060f74dc74f1b8e13c183222182d62537e13607d SHA512 46e51a3ae72591d595ed659002f33d111fa7346fe5c51fdabd4e55c789411150ee7eccac209f6203c64cef0fc3cbf31201c9a1e9ba361f1c5bb75192e6938590 WHIRLPOOL 8ccc43f7138a3c9a52204fe36d88a04fb1b39e05cb4fde6c2bd0a1e31cda47034a5d3dc5ea48fbbbf592e1c922436526c69cb9e8aaf5a74193aa30e7e1626a81 DIST perl-5.20.1.tar.bz2 13676155 SHA256 ede5ded37e7fb6139b04728cfca826f17076f9888dbfd100a56834dbeb04657c SHA512 b070b66800d86357df9fc4b2323d0bd97cc5ba6f92a26991d4c41ba58c94386bde91f9c2bff19920647375116e8642360eda8e6cc753cc451c110c3bf9576787 WHIRLPOOL 359e13613826c7c76844bbb32be453aad4103d382a99cb8df0f25c6ec3e68a16962b891c72478d2803adc4573aff161405ddf3274dfe1c23236037ac23e7fc3a EBUILD perl-5.18.2-r2.ebuild 4420 SHA256 0a3b8a311f46b1a479086ed69927926b2cc19bfb934d72db0f3ee8520d073063 SHA512 40ebcd9b995760d8ae4d4338260060e373a2b21ea707f3d70f48211264f495e847319594d3934aad4c799eaa12fd3e23fa607ee2e9bcec2483d84b431ddc1ca6 WHIRLPOOL c3646cca5909ead59a79172ddd4c0bfecaf94abec4f2b4345e32d9b87ab3e3cb5c001e4c95e939a6844a6a3f4a80a202cf76698609918125b6bab29a00b643ce EBUILD perl-5.20.1-r2.ebuild 4229 SHA256 930699e89290ef11ae08e5ef4fb3d748c18bf459a442568b447614b461ae9f6a SHA512 05f81ac4e234fbe313e4cd10f130197afd071bb79bc03a2be922a76627424455232db657650e51c96d714231f675822727032930101ffd729086ee251e54aee9 WHIRLPOOL 2fb6d9d143fcf7b1d4267e2fbcdfa1ad47d5ee620f51ab85efa8aa1879ca2aabf1257f5215ca9738d0b0b91d3f39ea6c27d9534c751abd6b6acb1cb966b53403 -MISC ChangeLog 84698 SHA256 2ccd4b325be6ca4edbc18cb525709167ea004c930d936f54027b6213f46b5413 SHA512 4b73f2725b8737e78f6239e5c26f2dd9e4e29da4c46091931a9e1a22967ae48d98f49beba7b7828f71198f53bb2ec3fda2f113ccdb52edbef4b4d7a0a7b91277 WHIRLPOOL 5578af0f2c256e6e68b9536d8928640936b15dadd723142ac35193e0dbfb9f1931638a68bf726cc035af0b44152be2448a2f090eaebfaaea557ab75d74b98ba9 +MISC ChangeLog 86290 SHA256 6238cb578158d35aed25a1aa77024d471e0f1df607ddce307f131eaef83f5cd7 SHA512 39a12634d2f7c9ebf5467a18a8969d7e9caa4922dda327274eb8ca608edd532639f55078d0b11ebd44c61998835072177178aef442c09cf96a4a86a5986a8c95 WHIRLPOOL 68ad2deabd0c048682883e7f33e7bd2a74e9bb7054a1ff63473b3676023547ab50684d8379a3edff4e0fb8d57497adeccdf6331955830404bc1adc2dc851e986 MISC metadata.xml 257 SHA256 94d99e58fcedfe7951797e5cbd70790c21b87c1e07a7003f650632bb0a4f2300 SHA512 caf80fd9d8931ab6d476afc21fcc840894cdb4cf548d196958321a0ba09ab83ff98de3f8b5f01701f8101fd0ec0fcfc35ae6e572aa8ef499b106c3ac8cabb769 WHIRLPOOL 7793b51d68b2c56ff1d6029be61fc41007af60c7143e8d82d87891e2863c1978c92d2bc13a0266e4506b69c0012a8555d27ce05061e4ce8c656b32e937badeae -----BEGIN PGP SIGNATURE----- Version: GnuPG v2.0 -iQJ8BAEBCABmBQJUXpx9XxSAAAAAAC4AKGlzc3Vlci1mcHJAbm90YXRpb25zLm9w +iQJ8BAEBCABmBQJUeQOVXxSAAAAAAC4AKGlzc3Vlci1mcHJAbm90YXRpb25zLm9w ZW5wZ3AuZmlmdGhob3JzZW1hbi5uZXQwNzlCRDk4QzA4RENBRkYzQUEwRjQzMDlF -QkU2QTMzNkJFMTkwMzlDAAoJEOvmoza+GQOctbcP/Rvb4uangWpxXUZv/f8DUttr -xyWQ4UOgTb1OnVPujEIwJE1U1vq0FDJOGnpPz3HnT32k8CZQLE6mfFwQbMamb6tE -yhYanos/puT/hVEw0C8d6DcwSB0r2It8/ecNixGbN0Zx6ZyHniakIvK0oh6TptKk -xNDO0Qkx8um3x9JTK2490WzsWtlirDMmw5N6jcWV60F76sA74EwRTZnRv5nDiy2+ -iayeFLcN0akG2WBxmTM8bDAfWu/frvMkshDDuSVOqQY6ruc1bRxnnbgxnWhky5J8 -s5BHmlglCNcvmd5/aQIEWGHy3LuSac5BAB78noc89UeLhgkhXksIvDZbu6wmZ9I7 -0Bmrwc9PRn1hdhKFWC577TJlO0QpYJRKcqeQM5pGjDvPxq4fl35+BkdAJ2YpCxhk -2rBllF0ERmswNxhuKtKH7//UryIXy3+Nbf4iH5WRuUY2fNB9T21CZ3T3GJIVFfIR -pwR5NLO1beC5h7YD4sTFlODtFG4PnIE5QDX5N8Bhkz4x2ZypccnQTbBdXRLFcDzt -3nKQ7beb0hc1OyF4p6AT2BLlfyJ5vpQNl0Vr/1QsCW2B7wvAfygrC9BM+sq+/mx5 -Eqluk/9omHkIMYpUpCpae9oMzeTneMkG0C/44s18JsBuxdLCiDfVnHuuI4C0D8lg -9745xdBisZamg9xyMp8d -=g21L +QkU2QTMzNkJFMTkwMzlDAAoJEOvmoza+GQOcDTgQAJArhwR9Ig6MuwI8rcR0XsIW ++OR91FqUiJ8hginuvyO0FcOgBUAARPPLXBvRpltGV3od4cPdtG07H6bIz+KUgbU9 +vtY09bJ5HT00lcdtud2RD449uQxoC2x0bSReymXj47aCRiEQd3N2yeQGcAVyleoI +VGcxvseIIa/kZV/4tygUPC++1hC+u0v1K3Y4mr997dP8tArHD7gU9z7d1ThmXyFd +0gY50i5MrWSoLkKalvrOQTgV/Lx+gjpYg5qqgcFFYYzzRkLRuOlksqKwSaaHZETS +dP8xU00nL92SQHbrWuyhzqkQ726HZPhDZMLiUuOpd+wrzKoMywJ/TOmxAaYmXLOL +0xQQqFvaHgdaI85ZRW4T9gU4Y49Nna3sL+txKWLebQLnJUAsU3LSzwRId+nXOvOf +JpdK0C13i8t4GteACg1D50njH4wa1aIm/2d7oxMMw4VE4t45Iph3IXbBzui4blSl +l8SKyPDc83ztFWVcErw8jBwtjmuzyWqHzaewAgroyRUDnLIK/BW52PTO/m1sSsH/ ++crlssNy6xmxdSs4rSPsIUIGljk0xEPIspwj9Ogun8qr1476nVVRpT9tlfxVqNVT ++i/yDCH3kA5jwIkdzbZFGReYaQOGAxo4bgKwf6wTxnZGErtf1YEkkU9Lu5A53R8q +iDNHMiV/YF6T2NoEbScs +=wCCG -----END PGP SIGNATURE----- diff --git a/dev-lang/perl/files/perl-5.10.1-cleanup-paths.patch b/dev-lang/perl/files/perl-5.10.1-cleanup-paths.patch deleted file mode 100644 index 3fc60af15197..000000000000 --- a/dev-lang/perl/files/perl-5.10.1-cleanup-paths.patch +++ /dev/null @@ -1,100 +0,0 @@ -cut the crap of inventing paths, or adding search paths that we don't use - ---- Configure -+++ Configure -@@ -102,28 +102,6 @@ - fi - fi - --: Proper PATH setting --paths='/bin /usr/bin /usr/local/bin /usr/ucb /usr/local /usr/lbin' --paths="$paths /opt/bin /opt/local/bin /opt/local /opt/lbin" --paths="$paths /usr/5bin /etc /usr/gnu/bin /usr/new /usr/new/bin /usr/nbin" --paths="$paths /opt/gnu/bin /opt/new /opt/new/bin /opt/nbin" --paths="$paths /sys5.3/bin /sys5.3/usr/bin /bsd4.3/bin /bsd4.3/usr/ucb" --paths="$paths /bsd4.3/usr/bin /usr/bsd /bsd43/bin /opt/ansic/bin /usr/ccs/bin" --paths="$paths /etc /usr/lib /usr/ucblib /lib /usr/ccs/lib" --paths="$paths /sbin /usr/sbin /usr/libexec" --paths="$paths /system/gnu_library/bin" -- --for p in $paths --do -- case "$p_$PATH$p_" in -- *$p_$p$p_*) ;; -- *) test -d $p && PATH=$PATH$p_$p ;; -- esac --done -- --PATH=.$p_$PATH --export PATH -- - : shall we be using ksh? - inksh='' - needksh='' -@@ -8282,66 +8260,6 @@ - ;; - esac - --# How will the perl executable find the installed shared $libperl? --# Add $xxx to ccdlflags. --# If we can't figure out a command-line option, use $shrpenv to --# set env LD_RUN_PATH. The main perl makefile uses this. --shrpdir=$archlibexp/CORE --xxx='' --tmp_shrpenv='' --if "$useshrplib"; then -- case "$osname" in -- aix) -- # We'll set it in Makefile.SH... -- ;; -- solaris) -- xxx="-R $shrpdir" -- ;; -- freebsd|netbsd|openbsd|interix|dragonfly) -- xxx="-Wl,-R$shrpdir" -- ;; -- bsdos|linux|irix*|dec_osf|gnu*) -- xxx="-Wl,-rpath,$shrpdir" -- ;; -- next) -- # next doesn't like the default... -- ;; -- beos) -- # beos doesn't like the default, either. -- ;; -- haiku) -- # Haiku doesn't like the default, either. -- ;; -- hpux*) -- # hpux doesn't like the default, either. -- tmp_shrpenv="env LDOPTS=\"+s +b${shrpdir}\"" -- ;; -- cygwin) -- # cygwin needs only ldlibpth -- ;; -- *) -- tmp_shrpenv="env LD_RUN_PATH=$shrpdir" -- ;; -- esac -- case "$xxx" in -- '') ;; -- *) -- # Only add $xxx if it isn't already in ccdlflags. -- case " $ccdlflags " in -- *" $xxx "*) ;; -- *) ccdlflags="$ccdlflags $xxx" -- cat <<EOM >&4 -- --Adding $xxx to the flags --passed to $ld so that the perl executable will find the --installed shared $libperl. -- --EOM -- ;; -- esac -- ;; -- esac --fi - # Fix ccdlflags in AIX for building external extensions. - # (For building Perl itself bare -bE:perl.exp is needed, - # Makefile.SH takes care of this.) diff --git a/dev-lang/perl/files/perl-5.10.1-hpux.patch b/dev-lang/perl/files/perl-5.10.1-hpux.patch deleted file mode 100644 index ca4ee5256d5e..000000000000 --- a/dev-lang/perl/files/perl-5.10.1-hpux.patch +++ /dev/null @@ -1,40 +0,0 @@ -# do not assume '.' being in PATH on hpux, -# use 'gcc' as linker, link with '-lm'. - ---- hints/hpux.sh -+++ hints/hpux.sh -@@ -190,7 +190,7 @@ - $define|true|[Yy]) - echo '#include <stdio.h>\nint main(){long l;printf("%d\\n",sizeof(l));}'>try.c - $cc -o try $ccflags $ldflags try.c -- if [ "`try`" = "8" ]; then -+ if [ "`./try`" = "8" ]; then - case "$use64bitall" in - $define|true|[Yy]) ;; - *) cat <<EOM >&4 -@@ -338,7 +338,7 @@ - } /* main */ - EOF - $cc -o try $ccflags $ldflags try.c -- maxdsiz=`try` -+ maxdsiz=`./try` - rm -f try try.c core - if [ $maxdsiz -le 64 ]; then - # 64 Mb is probably not enough to optimize toke.c -@@ -363,11 +363,12 @@ - "") optimize="-g -O" ;; - *O[3456789]*) optimize=`echo "$optimize" | sed -e 's/O[3-9]/O2/'` ;; - esac -- #ld="$cc" -- ld=/usr/bin/ld -+ ld="$cc" -+ #ld=/usr/bin/ld - cccdlflags='-fPIC' -- #lddlflags='-shared' -- lddlflags='-b' -+ lddlflags='-shared' -+ #lddlflags='-b' -+ libs='-lm' - case "$optimize" in - *-g*-O*|*-O*-g*) - # gcc without gas will not accept -g diff --git a/dev-lang/perl/files/perl-5.12.3-aix-soname.patch b/dev-lang/perl/files/perl-5.12.3-aix-soname.patch deleted file mode 100644 index 70fe5fa559f8..000000000000 --- a/dev-lang/perl/files/perl-5.12.3-aix-soname.patch +++ /dev/null @@ -1,70 +0,0 @@ -1) Match "powerpc-ibm-aix5.3.0.0-gcc" as gcc too. - -2) Creating shared library on aix with full soname support, following -http://lists.gnu.org/archive/html/libtool/2011-01/msg00023.html -http://lists.gnu.org/archive/html/libtool/2011-02/msg00000.html - -Once there is an agreement on that, this patch basically is designed -for upstream perl to be applied when their soname would change anyway. -However, there is 'strip' being used, and I don't know yet what to -use instead in cross-aix setups with recent binutils. - ---- Makefile.SH -+++ Makefile.SH -@@ -92,12 +92,12 @@ - ;; - aix*) - case "$cc" in -- gcc*) -- shrpldflags="-shared -Wl,-H512 -Wl,-T512 -Wl,-bhalt:4 -Wl,-bM:SRE -Wl,-bE:perl.exp" -+ *gcc*) -+ shrpldflags="-shared -Wl,-H512 -Wl,-T512 -Wl,-bhalt:4 -Wl,-bE:perl.exp" - case "$osvers" in -- 3*) shrpldflags="$shrpldflags -e _nostart" -+ 3*) shrpldflags="$shrpldflags -Wl,-bM:SRE -e _nostart" - ;; -- *) shrpldflags="$shrpldflags -Wl,-bnoentry" -+ *) shrpldflags="$shrpldflags -Wl,-G -Wl,-bernotok -Wl,-bnoentry" - ;; - esac - shrpldflags="$shrpldflags $ldflags $perllibs $cryptlib" -@@ -105,11 +105,11 @@ - linklibperl_nonshr='-lperl_nonshr' - ;; - *) -- shrpldflags="-H512 -T512 -bhalt:4 -bM:SRE -bE:perl.exp" -+ shrpldflags="-H512 -T512 -bhalt:4 -bE:perl.exp" - case "$osvers" in -- 3*) shrpldflags="$shrpldflags -e _nostart" -+ 3*) shrpldflags="$shrpldflags -bM:SRE -e _nostart" - ;; -- *) shrpldflags="$shrpldflags -b noentry" -+ *) shrpldflags="$shrpldflags -G -bernotok -b noentry" - ;; - esac - shrpldflags="$shrpldflags $ldflags $perllibs $cryptlib" -@@ -763,11 +763,19 @@ - !NO!SUBS! - case "$osname" in - aix) -- $spitshell >>$Makefile <<'!NO!SUBS!' -- rm -f libperl$(OBJ_EXT) -- mv $@ libperl$(OBJ_EXT) -- $(AR) qv $(LIBPERL) libperl$(OBJ_EXT) --!NO!SUBS! -+ bits=32 -+ if test X"$use64bitall" = Xdefine; then bits=64; fi -+ $spitshell >>$Makefile <<!GROK!THIS! -+ rm -f shr.imp shr.o -+ mv \$@ shr.o -+ strip -e shr.o -+ ( echo '#! libperl.so.${revision}.${patchlevel}(shr.o)' \\ -+ ; echo '# ${bits}' \\ -+ ; grep -v '^#!' perl.exp \\ -+ ) > shr.imp -+ \$(AR) qv \$@ shr.imp shr.o -+ rm -f shr.imp shr.o -+!GROK!THIS! - ;; - esac - ;; diff --git a/dev-lang/perl/files/perl-5.12.3-interix.patch b/dev-lang/perl/files/perl-5.12.3-interix.patch deleted file mode 100644 index 5e875b2523cb..000000000000 --- a/dev-lang/perl/files/perl-5.12.3-interix.patch +++ /dev/null @@ -1,21 +0,0 @@ -reported: http://www.xray.mpe.mpg.de/mailing-lists/perl5-porters/2011-04/msg01014.html - -diff -ru perl-5.12.3.orig/hints/interix.sh perl-5.12.3/hints/interix.sh ---- perl-5.12.3.orig/hints/interix.sh 2011-04-27 08:34:00 +0200 -+++ perl-5.12.3/hints/interix.sh 2011-04-27 08:53:46 +0200 -@@ -6,14 +6,13 @@ - cc='gcc' - cccdlflags="-DPIC $cccdlflags" - ccdlflags='-Wl,-E' --ccflags="-D_ALL_SOURCE $ccflags" --d_poll="$undef" - ld='gcc' - lddlflags="-shared $lddlflags" - rpathflag='-Wl,-R' - sharpbang='#!' - usemymalloc='false' - usenm='false' -+firstmakefile=GNUmakefile - - # This script UU/usethreads.cbu will get 'called-back' by Configure - # after it has prompted the user for whether to use threads. diff --git a/dev-lang/perl/files/perl-5.12.3-mint.patch b/dev-lang/perl/files/perl-5.12.3-mint.patch deleted file mode 100644 index 4c6c10820b9f..000000000000 --- a/dev-lang/perl/files/perl-5.12.3-mint.patch +++ /dev/null @@ -1,321 +0,0 @@ -http://rt.perl.org/rt3/Ticket/Display.html?id=89502 - ---- perl-5.12.3/Configure 2011-02-21 09:18:09.000000000 +0000 -+++ perl-5.12.3/Configure 2011-02-21 09:38:49.000000000 +0000 -@@ -1275,6 +1275,9 @@ - elif test -n "$DJGPP"; then - : DOS DJGPP - _exe=".exe" -+elif test -f "/kern/cookiejar"; then -+: MiNT -+ _exe="" - elif test -d c:/. -o -n "$is_os2" ; then - : OS/2 or cygwin - _exe=".exe" -@@ -1402,7 +1405,7 @@ - xcat=/bin/cat - test -f $xcat$_exe || xcat=/usr/bin/cat - if test ! -f $xcat$_exe; then -- for p in `echo $PATH | sed -e "s/$p_/ /g"` $paths; do -+ for p in `echo $PATH | sed -e 's/$p_/ /g'` $paths; do - if test -f $p/cat$_exe; then - xcat=$p/cat - break ---- perl-5.12.3/ext/DynaLoader/dl_dld.xs 2010-11-21 21:40:55.000000000 +0000 -+++ perl-5.12.3/ext/DynaLoader/dl_dld.xs 2011-02-21 09:38:51.000000000 +0000 -@@ -116,6 +116,18 @@ - goto haverror; - } - -+ DLDEBUG(1,PerlIO_printf(Perl_debug_log, "dld_link(libm.a)\n")); -+ if (dlderr = dld_link("/usr/lib/libm.a")) { -+ SaveError(aTHX_ "dld_link(libm.a): %s", dld_strerror(dlderr)); -+ goto haverror; -+ } -+ -+ DLDEBUG(1,PerlIO_printf(Perl_debug_log, "dld_link(libc.a)\n")); -+ if (dlderr = dld_link("/usr/lib/libc.a")) { -+ SaveError(aTHX_ "dld_link(libc.a): %s", dld_strerror(dlderr)); -+ goto haverror; -+ } -+ - max = AvFILL(dl_resolve_using); - for (x = 0; x <= max; x++) { - char *sym = SvPVX(*av_fetch(dl_resolve_using, x, 0)); ---- perl-5.12.3/malloc.c 2011-01-09 20:20:57.000000000 +0000 -+++ perl-5.12.3/malloc.c 2011-02-21 09:38:51.000000000 +0000 -@@ -264,7 +264,7 @@ - #define MIN_BUC_POW2 (sizeof(void*) > 4 ? 3 : 2) /* Allow for 4-byte arena. */ - #define MIN_BUCKET (MIN_BUC_POW2 * BUCKETS_PER_POW2) - --#if !(defined(I286) || defined(atarist)) -+#if !defined(I286) - /* take 2k unless the block is bigger than that */ - # define LOG_OF_MIN_ARENA 11 - #else -@@ -551,8 +551,8 @@ - */ - #define u_short unsigned short - --/* 286 and atarist like big chunks, which gives too much overhead. */ --#if (defined(RCHECK) || defined(I286) || defined(atarist)) && defined(PACK_MALLOC) -+/* 286 like big chunks, which gives too much overhead. */ -+#if (defined(RCHECK) || defined(I286)) && defined(PACK_MALLOC) - # undef PACK_MALLOC - #endif - -@@ -1734,16 +1734,14 @@ - /* Second, check alignment. */ - slack = 0; - --#if !defined(atarist) /* on the atari we dont have to worry about this */ --# ifndef I286 /* The sbrk(0) call on the I286 always returns the next segment */ -+#ifndef I286 /* The sbrk(0) call on the I286 always returns the next segment */ - /* WANTED_ALIGNMENT may be more than NEEDED_ALIGNMENT, but this may - improve performance of memory access. */ - if (PTR2UV(cp) & (WANTED_ALIGNMENT - 1)) { /* Not aligned. */ - slack = WANTED_ALIGNMENT - (PTR2UV(cp) & (WANTED_ALIGNMENT - 1)); - add += slack; - } --# endif --#endif /* !atarist */ -+#endif - - if (add) { - DEBUG_m(PerlIO_printf(Perl_debug_log, ---- perl-5.12.3/miniperlmain.c 2011-01-09 20:20:57.000000000 +0000 -+++ perl-5.12.3/miniperlmain.c 2011-02-21 09:38:49.000000000 +0000 -@@ -45,7 +45,7 @@ - #if defined (atarist) - /* The Atari operating system doesn't have a dynamic stack. The - stack size is determined from this value. */ --long _stksize = 64 * 1024; -+long _stksize = 256 * 1024; - #endif - - #if defined(PERL_GLOBAL_STRUCT_PRIVATE) ---- perl-5.12.3/os2/perlrexx.c 2010-11-21 21:40:56.000000000 +0000 -+++ perl-5.12.3/os2/perlrexx.c 2011-02-21 09:42:49.000000000 +0000 -@@ -38,7 +38,7 @@ - #if defined (atarist) - /* The Atari operating system doesn't have a dynamic stack. The - stack size is determined from this value. */ --long _stksize = 64 * 1024; -+long _stksize = 256 * 1024; - #endif - - /* Register any extra external extensions */ ---- perl-5.12.3/perl.c 2011-02-21 09:17:19.000000000 +0000 -+++ perl-5.12.3/perl.c 2011-02-21 09:38:50.000000000 +0000 -@@ -3272,10 +3272,6 @@ - "\n\nOS/2 port Copyright (c) 1990, 1991, Raymond Chen, Kai Uwe Rommel\n" - "Version 5 port Copyright (c) 1994-2002, Andreas Kaiser, Ilya Zakharevich\n"); - #endif --#ifdef atarist -- PerlIO_printf(PerlIO_stdout(), -- "atariST series port, ++jrb bammi@cadence.com\n"); --#endif - #ifdef __BEOS__ - PerlIO_printf(PerlIO_stdout(), - "BeOS port Copyright Tom Spindler, 1997-1999\n"); ---- perl-5.12.3/perl.h 2011-01-09 20:20:57.000000000 +0000 -+++ perl-5.12.3/perl.h 2011-02-21 09:38:50.000000000 +0000 -@@ -497,7 +497,7 @@ - */ - - /* define this once if either system, instead of cluttering up the src */ --#if defined(MSDOS) || defined(atarist) || defined(WIN32) || defined(NETWARE) -+#if defined(MSDOS) || defined(WIN32) || defined(NETWARE) - #define DOSISH 1 - #endif - ---- perl-5.12.3/perlio.c 2009-04-14 23:47:25.000000000 +0000 -+++ perl-5.12.3/perlio.c 2010-03-23 18:36:15.000000000 +0000 -@@ -135,17 +135,6 @@ - * This used to be contents of do_binmode in doio.c - */ - #ifdef DOSISH --# if defined(atarist) -- PERL_UNUSED_ARG(iotype); -- if (!fflush(fp)) { -- if (mode & O_BINARY) -- ((FILE *) fp)->_flag |= _IOBIN; -- else -- ((FILE *) fp)->_flag &= ~_IOBIN; -- return 1; -- } -- return 0; --# else - dTHX; - PERL_UNUSED_ARG(iotype); - #ifdef NETWARE -@@ -153,7 +142,7 @@ - #else - if (PerlLIO_setmode(fileno(fp), mode) != -1) { - #endif --# if defined(WIN32) && defined(__BORLANDC__) -+# if defined(WIN32) && defined(__BORLANDC__) - /* - * The translation mode of the stream is maintained independent - of -@@ -169,12 +158,11 @@ - fp->flags |= _F_BIN; - else - fp->flags &= ~_F_BIN; --# endif -+# endif - return 1; - } - else - return 0; --# endif - #else - # if defined(USEMYBINMODE) - dTHX; ---- perl-5.12.3/pp_sys.c 2011-01-09 20:20:58.000000000 +0000 -+++ perl-5.12.3/pp_sys.c 2011-02-21 09:38:50.000000000 +0000 -@@ -3308,14 +3308,6 @@ - RETPUSHNO; - } - --#if defined(atarist) /* this will work with atariST. Configure will -- make guesses for other systems. */ --# define FILE_base(f) ((f)->_base) --# define FILE_ptr(f) ((f)->_ptr) --# define FILE_cnt(f) ((f)->_cnt) --# define FILE_bufsiz(f) ((f)->_cnt + ((f)->_ptr - (f)->_base)) --#endif -- - PP(pp_fttext) - { - dVAR; -@@ -5567,30 +5559,6 @@ - case 8: - retval = syscall(a[0],a[1],a[2],a[3],a[4],a[5],a[6],a[7]); - break; --#ifdef atarist -- case 9: -- retval = syscall(a[0],a[1],a[2],a[3],a[4],a[5],a[6],a[7],a[8]); -- break; -- case 10: -- retval = syscall(a[0],a[1],a[2],a[3],a[4],a[5],a[6],a[7],a[8],a[9]); -- break; -- case 11: -- retval = syscall(a[0],a[1],a[2],a[3],a[4],a[5],a[6],a[7],a[8],a[9], -- a[10]); -- break; -- case 12: -- retval = syscall(a[0],a[1],a[2],a[3],a[4],a[5],a[6],a[7],a[8],a[9], -- a[10],a[11]); -- break; -- case 13: -- retval = syscall(a[0],a[1],a[2],a[3],a[4],a[5],a[6],a[7],a[8],a[9], -- a[10],a[11],a[12]); -- break; -- case 14: -- retval = syscall(a[0],a[1],a[2],a[3],a[4],a[5],a[6],a[7],a[8],a[9], -- a[10],a[11],a[12],a[13]); -- break; --#endif /* atarist */ - } - SP = ORIGMARK; - PUSHi(retval); ---- perl-5.12.3/util.c 2011-01-09 20:20:58.000000000 +0000 -+++ perl-5.12.3/util.c 2011-02-21 09:38:51.000000000 +0000 -@@ -2545,7 +2545,7 @@ - return PerlIO_fdopen(p[This], mode); - } - #else --#if defined(atarist) || defined(EPOC) -+#if defined(EPOC) - FILE *popen(); - PerlIO * - Perl_my_popen(pTHX_ const char *cmd, const char *mode) -@@ -2994,7 +2994,7 @@ - } - #endif - --#if defined(atarist) || defined(OS2) || defined(EPOC) -+#if defined(OS2) || defined(EPOC) - int pclose(); - #ifdef HAS_FORK - int /* Cannot prototype with I32 -@@ -3111,7 +3111,7 @@ - I32 len = 0; - int retval; - char *bufend; --#if defined(DOSISH) && !defined(OS2) && !defined(atarist) -+#if defined(DOSISH) && !defined(OS2) - # define SEARCH_EXTS ".bat", ".cmd", NULL - # define MAX_EXT_LEN 4 - #endif -@@ -3234,28 +3234,25 @@ - - bufend = s + strlen(s); - while (s < bufend) { --#if defined(atarist) || defined(DOSISH) -+#if defined(DOSISH) - for (len = 0; *s --# ifdef atarist -- && *s != ',' --# endif - && *s != ';'; len++, s++) { - if (len < sizeof tmpbuf) - tmpbuf[len] = *s; - } - if (len < sizeof tmpbuf) - tmpbuf[len] = '\0'; --#else /* ! (atarist || DOSISH) */ -+#else /* ! (DOSISH) */ - s = delimcpy(tmpbuf, tmpbuf + sizeof tmpbuf, s, bufend, - ':', - &len); --#endif /* ! (atarist || DOSISH) */ -+#endif /* ! (DOSISH) */ - if (s < bufend) - s++; - if (len + 1 + strlen(scriptname) + MAX_EXT_LEN >= sizeof tmpbuf) - continue; /* don't search dir with too-long name */ - if (len --# if defined(atarist) || defined(DOSISH) -+# if defined(DOSISH) - && tmpbuf[len - 1] != '/' - && tmpbuf[len - 1] != '\\' - # endif ---- perl-5.12.3/hints/freemint.sh 2011-01-09 20:20:58.000000000 +0000 -+++ perl-5.12.3/hints/freemint.sh 2011-02-21 09:38:51.000000000 +0000 -@@ -0,0 +1,34 @@ -+# hints/freemint.sh -+# -+# talk to guido@freemint.de if you want to change this file. -+# Please read the README.mint file. -+# -+# misc stuff -+ -+archname="m68k-freemint" -+ -+cccdlflags=' '; # avoid -fPIC -+ccdlflags="-Wl,-whole-archive -lgcc -lpthread -Wl,-no-whole-archive" -+ -+# libs -+libpth="$prefix/lib /usr/local/lib /usr/lib" -+glibpth="$libpth" -+xlibpth="$libpth" -+ -+ccflags="$ccflags -D_GNU_SOURCE" -+libswanted='m dld' -+dl_src='dl_dld.xs' -+dlext='o' -+lddlflags='-r' -+ldflags='-static' -+so='none' -+useshrplib='false' -+ -+#sbrk() returns -1 (failure) somewhere in lib/unicore/mktables at -+#around 14M, so we need to use system malloc() as our sbrk() -+malloc_cflags='ccflags="-DUSE_PERL_SBRK -DPERL_SBRK_VIA_MALLOC $ccflags"' -+ -+# Locales aren't feeling well. We crash if -Ox used. -+locale_cflags='optimize="-O0"' -+LC_ALL=C; export LC_ALL; -+LANG=C; export LANG; diff --git a/dev-lang/perl/files/perl-5.12.5-rehash-5.12.5.patch b/dev-lang/perl/files/perl-5.12.5-rehash-5.12.5.patch deleted file mode 100644 index c43183bfea3b..000000000000 --- a/dev-lang/perl/files/perl-5.12.5-rehash-5.12.5.patch +++ /dev/null @@ -1,164 +0,0 @@ -From f2a571dae7d70f7e3b59022834d8003ecd2df884 Mon Sep 17 00:00:00 2001 -From: Yves Orton <demerphq@gmail.com> -Date: Tue, 12 Feb 2013 10:53:05 +0100 -Subject: [PATCH] Prevent premature hsplit() calls, and only trigger REHASH - after hsplit() - -Triggering a hsplit due to long chain length allows an attacker -to create a carefully chosen set of keys which can cause the hash -to use 2 * (2**32) * sizeof(void *) bytes ram. AKA a DOS via memory -exhaustion. Doing so also takes non trivial time. - -Eliminating this check, and only inspecting chain length after a -normal hsplit() (triggered when keys>buckets) prevents the attack -entirely, and makes such attacks relatively benign. - -(cherry picked from commit f1220d61455253b170e81427c9d0357831ca0fac) ---- - ext/Hash-Util-FieldHash/t/10_hash.t | 18 ++++++++++++++++-- - hv.c | 26 ++++++-------------------- - t/op/hash.t | 20 +++++++++++++++++--- - 3 files changed, 39 insertions(+), 25 deletions(-) - -diff --git a/ext/Hash-Util-FieldHash/t/10_hash.t b/ext/Hash-Util-FieldHash/t/10_hash.t -index 2cfb4e8..d58f053 100644 ---- a/ext/Hash-Util-FieldHash/t/10_hash.t -+++ b/ext/Hash-Util-FieldHash/t/10_hash.t -@@ -38,15 +38,29 @@ use constant START => "a"; - - # some initial hash data - fieldhash my %h2; --%h2 = map {$_ => 1} 'a'..'cc'; -+my $counter= "a"; -+$h2{$counter++}++ while $counter ne 'cd'; - - ok (!Internals::HvREHASH(%h2), - "starting with pre-populated non-pathological hash (rehash flag if off)"); - - my @keys = get_keys(\%h2); -+my $buckets= buckets(\%h2); - $h2{$_}++ for @keys; -+$h2{$counter++}++ while buckets(\%h2) == $buckets; # force a split - ok (Internals::HvREHASH(%h2), -- scalar(@keys) . " colliding into the same bucket keys are triggering rehash"); -+ scalar(@keys) . " colliding into the same bucket keys are triggering rehash after split"); -+ -+# returns the number of buckets in a hash -+sub buckets { -+ my $hr = shift; -+ my $keys_buckets= scalar(%$hr); -+ if ($keys_buckets=~m!/([0-9]+)\z!) { -+ return 0+$1; -+ } else { -+ return 8; -+ } -+} - - sub get_keys { - my $hr = shift; -diff --git a/hv.c b/hv.c -index 89c6456..8659678 100644 ---- a/hv.c -+++ b/hv.c -@@ -35,7 +35,8 @@ holds the key and hash value. - #define PERL_HASH_INTERNAL_ACCESS - #include "perl.h" - --#define HV_MAX_LENGTH_BEFORE_SPLIT 14 -+#define HV_MAX_LENGTH_BEFORE_REHASH 14 -+#define SHOULD_DO_HSPLIT(xhv) ((xhv)->xhv_keys > (xhv)->xhv_max) /* HvTOTALKEYS(hv) > HvMAX(hv) */ - - static const char S_strtab_error[] - = "Cannot modify shared string table in hv_%s"; -@@ -818,23 +819,8 @@ Perl_hv_common(pTHX_ HV *hv, SV *keysv, const char *key, STRLEN klen, - xhv->xhv_keys++; /* HvTOTALKEYS(hv)++ */ - if (!counter) { /* initial entry? */ - xhv->xhv_fill++; /* HvFILL(hv)++ */ -- } else if (xhv->xhv_keys > (IV)xhv->xhv_max) { -+ } else if ( SHOULD_DO_HSPLIT(xhv) ) { - hsplit(hv); -- } else if(!HvREHASH(hv)) { -- U32 n_links = 1; -- -- while ((counter = HeNEXT(counter))) -- n_links++; -- -- if (n_links > HV_MAX_LENGTH_BEFORE_SPLIT) { -- /* Use only the old HvKEYS(hv) > HvMAX(hv) condition to limit -- bucket splits on a rehashed hash, as we're not going to -- split it again, and if someone is lucky (evil) enough to -- get all the keys in one list they could exhaust our memory -- as we repeatedly double the number of buckets on every -- entry. Linear search feels a less worse thing to do. */ -- hsplit(hv); -- } - } - } - -@@ -1180,7 +1166,7 @@ S_hsplit(pTHX_ HV *hv) - - - /* Pick your policy for "hashing isn't working" here: */ -- if (longest_chain <= HV_MAX_LENGTH_BEFORE_SPLIT /* split worked? */ -+ if (longest_chain <= HV_MAX_LENGTH_BEFORE_REHASH /* split worked? */ - || HvREHASH(hv)) { - return; - } -@@ -2551,8 +2537,8 @@ S_share_hek_flags(pTHX_ const char *str, I32 len, register U32 hash, int flags) - xhv->xhv_keys++; /* HvTOTALKEYS(hv)++ */ - if (!next) { /* initial entry? */ - xhv->xhv_fill++; /* HvFILL(hv)++ */ -- } else if (xhv->xhv_keys > (IV)xhv->xhv_max /* HvKEYS(hv) > HvMAX(hv) */) { -- hsplit(PL_strtab); -+ } else if ( SHOULD_DO_HSPLIT(xhv) ) { -+ hsplit(PL_strtab); - } - } - -diff --git a/t/op/hash.t b/t/op/hash.t -index 9bde518..45eb782 100644 ---- a/t/op/hash.t -+++ b/t/op/hash.t -@@ -39,22 +39,36 @@ use constant THRESHOLD => 14; - use constant START => "a"; - - # some initial hash data --my %h2 = map {$_ => 1} 'a'..'cc'; -+my %h2; -+my $counter= "a"; -+$h2{$counter++}++ while $counter ne 'cd'; - - ok (!Internals::HvREHASH(%h2), - "starting with pre-populated non-pathological hash (rehash flag if off)"); - - my @keys = get_keys(\%h2); -+my $buckets= buckets(\%h2); - $h2{$_}++ for @keys; -+$h2{$counter++}++ while buckets(\%h2) == $buckets; # force a split - ok (Internals::HvREHASH(%h2), -- scalar(@keys) . " colliding into the same bucket keys are triggering rehash"); -+ scalar(@keys) . " colliding into the same bucket keys are triggering rehash after split"); -+ -+# returns the number of buckets in a hash -+sub buckets { -+ my $hr = shift; -+ my $keys_buckets= scalar(%$hr); -+ if ($keys_buckets=~m!/([0-9]+)\z!) { -+ return 0+$1; -+ } else { -+ return 8; -+ } -+} - - sub get_keys { - my $hr = shift; - - # the minimum of bits required to mount the attack on a hash - my $min_bits = log(THRESHOLD)/log(2); -- - # if the hash has already been populated with a significant amount - # of entries the number of mask bits can be higher - my $keys = scalar keys %$hr; --- -1.8.1.3 - diff --git a/dev-lang/perl/files/perl-5.14.1-cleanup-paths.patch b/dev-lang/perl/files/perl-5.14.1-cleanup-paths.patch deleted file mode 100644 index c199041fc059..000000000000 --- a/dev-lang/perl/files/perl-5.14.1-cleanup-paths.patch +++ /dev/null @@ -1,100 +0,0 @@ -cut the crap of inventing paths, or adding search paths that we don't use - ---- Configure -+++ Configure -@@ -105,28 +105,6 @@ - fi - fi - --: Proper PATH setting --paths='/bin /usr/bin /usr/local/bin /usr/ucb /usr/local /usr/lbin' --paths="$paths /opt/bin /opt/local/bin /opt/local /opt/lbin" --paths="$paths /usr/5bin /etc /usr/gnu/bin /usr/new /usr/new/bin /usr/nbin" --paths="$paths /opt/gnu/bin /opt/new /opt/new/bin /opt/nbin" --paths="$paths /sys5.3/bin /sys5.3/usr/bin /bsd4.3/bin /bsd4.3/usr/ucb" --paths="$paths /bsd4.3/usr/bin /usr/bsd /bsd43/bin /opt/ansic/bin /usr/ccs/bin" --paths="$paths /etc /usr/lib /usr/ucblib /lib /usr/ccs/lib" --paths="$paths /sbin /usr/sbin /usr/libexec" --paths="$paths /system/gnu_library/bin" -- --for p in $paths --do -- case "$p_$PATH$p_" in -- *$p_$p$p_*) ;; -- *) test -d $p && PATH=$PATH$p_$p ;; -- esac --done -- --PATH=.$p_$PATH --export PATH -- - : shall we be using ksh? - inksh='' - needksh='' -@@ -8287,66 +8265,6 @@ - ;; - esac - --# How will the perl executable find the installed shared $libperl? --# Add $xxx to ccdlflags. --# If we can't figure out a command-line option, use $shrpenv to --# set env LD_RUN_PATH. The main perl makefile uses this. --shrpdir=$archlibexp/CORE --xxx='' --tmp_shrpenv='' --if "$useshrplib"; then -- case "$osname" in -- aix) -- # We'll set it in Makefile.SH... -- ;; -- solaris) -- xxx="-R $shrpdir" -- ;; -- freebsd|mirbsd|netbsd|openbsd|interix|dragonfly) -- xxx="-Wl,-R$shrpdir" -- ;; -- bsdos|linux|irix*|dec_osf|gnu*) -- xxx="-Wl,-rpath,$shrpdir" -- ;; -- next) -- # next doesn't like the default... -- ;; -- beos) -- # beos doesn't like the default, either. -- ;; -- haiku) -- # Haiku doesn't like the default, either. -- ;; -- hpux*) -- # hpux doesn't like the default, either. -- tmp_shrpenv="env LDOPTS=\"+s +b${shrpdir}\"" -- ;; -- cygwin) -- # cygwin needs only ldlibpth -- ;; -- *) -- tmp_shrpenv="env LD_RUN_PATH=$shrpdir" -- ;; -- esac -- case "$xxx" in -- '') ;; -- *) -- # Only add $xxx if it isn't already in ccdlflags. -- case " $ccdlflags " in -- *" $xxx "*) ;; -- *) ccdlflags="$ccdlflags $xxx" -- cat <<EOM >&4 -- --Adding $xxx to the flags --passed to $ld so that the perl executable will find the --installed shared $libperl. -- --EOM -- ;; -- esac -- ;; -- esac --fi - # Fix ccdlflags in AIX for building external extensions. - # (For building Perl itself bare -bE:perl.exp is needed, - # Makefile.SH takes care of this.) diff --git a/dev-lang/perl/files/perl-5.8.7-MakeMaker-RUNPATH.patch b/dev-lang/perl/files/perl-5.8.7-MakeMaker-RUNPATH.patch deleted file mode 100644 index c442defa5d68..000000000000 --- a/dev-lang/perl/files/perl-5.8.7-MakeMaker-RUNPATH.patch +++ /dev/null @@ -1,21 +0,0 @@ -Bug #105054. - -We do not want the build root in the linked perl module's RUNPATH, so strip -paths containing PORTAGE_TMPDIR if its set. - ---- perl-5.8.7/lib/ExtUtils/MM_Unix.pm 2005-09-10 14:06:59.000000000 +0200 -+++ perl-5.8.7.az/lib/ExtUtils/MM_Unix.pm 2005-09-10 15:25:52.000000000 +0200 -@@ -1915,6 +1915,13 @@ - # LD_RUN_PATH now computed by ExtUtils::Liblist - ($self->{EXTRALIBS}, $self->{BSLOADLIBS}, - $self->{LDLOADLIBS}, $self->{LD_RUN_PATH}) = @libs; -+ # We do not want the build root in RPATH -+ if (exists $ENV{PORTAGE_TMPDIR}) { -+ # If we have PORTAGE_TMPDIR set, strip that, as just testing for -+ # /usr and /opt might not be sufficient -+ $self->{LD_RUN_PATH} = join ':', grep !/^\Q$ENV{PORTAGE_TMPDIR}/, -+ split /:/, $self->{LD_RUN_PATH}; -+ } - last; - } - } diff --git a/dev-lang/perl/files/perl-5.8.8-CAN-2005-0448-rmtree-2.patch b/dev-lang/perl/files/perl-5.8.8-CAN-2005-0448-rmtree-2.patch deleted file mode 100644 index d29fc2522168..000000000000 --- a/dev-lang/perl/files/perl-5.8.8-CAN-2005-0448-rmtree-2.patch +++ /dev/null @@ -1,280 +0,0 @@ -SECURITY [CAN-2005-0448]: - -Rewrite File::Path::rmtree to avoid race condition which allows an -attacker with write permission on directories in the tree being -removed to make files setuid or to remove arbitrary files (see -http://bugs.debian.org/286905 and http://bugs.debian.org/286922). - -Revised for 5.8.8-7etch6 to avoid failure when rmtree removes the -current directory. - -diff --git a/lib/File/Path.pm b/lib/File/Path.pm -index 2e41ff3..fd32b96 100644 ---- a/lib/File/Path.pm -+++ b/lib/File/Path.pm -@@ -72,33 +72,17 @@ or C<unlink> to remove it, or that it's skipping it. - - =item * - --a boolean value, which if TRUE will cause C<rmtree> to --skip any files to which you do not have delete access --(if running under VMS) or write access (if running --under another OS). This will change in the future when --a criterion for 'delete permission' under OSs other --than VMS is settled. (defaults to FALSE) -+a boolean value, which if FALSE (the default for non-root users) will -+cause C<rmtree> to adjust the mode of directories (if required) prior -+to attempting to remove the contents. Note that on interruption or -+failure of C<rmtree>, directories may be left with more permissive -+modes for the owner. - - =back - - It returns the number of files successfully deleted. Symlinks are - simply deleted and not followed. - --B<NOTE:> There are race conditions internal to the implementation of --C<rmtree> making it unsafe to use on directory trees which may be --altered or moved while C<rmtree> is running, and in particular on any --directory trees with any path components or subdirectories potentially --writable by untrusted users. -- --Additionally, if the third parameter is not TRUE and C<rmtree> is --interrupted, it may leave files and directories with permissions altered --to allow deletion (and older versions of this module would even set --files and directories to world-read/writable!) -- --Note also that the occurrence of errors in C<rmtree> can be determined I<only> --by trapping diagnostic messages using C<$SIG{__WARN__}>; it is not apparent --from the return value. -- - =head1 DIAGNOSTICS - - =over 4 -@@ -172,111 +156,127 @@ sub mkpath { - @created; - } - --sub rmtree { -- my($roots, $verbose, $safe) = @_; -- my(@files); -- my($count) = 0; -- $verbose ||= 0; -- $safe ||= 0; -+sub _rmtree; -+sub _rmtree -+{ -+ my ($path, $prefix, $up, $up_dev, $up_ino, $verbose, $safe) = @_; -+ my $up_name = $up eq '..' ? 'parent' : 'initial'; -+ -+ my ($dev, $ino) = lstat $path or return 0; -+ unless (-d _) -+ { -+ print "unlink $prefix$path\n" if $verbose; -+ unless (unlink $path) -+ { -+ carp "Can't remove file $prefix$path ($!)"; -+ return 0; -+ } - -- if ( defined($roots) && length($roots) ) { -- $roots = [$roots] unless ref $roots; -+ return 1; - } -- else { -- carp "No root path(s) specified\n"; -- return 0; -+ -+ unless (chdir $path) -+ { -+ carp "Can't chdir to $prefix$path ($!)"; -+ return 0; - } - -- my($root); -- foreach $root (@{$roots}) { -- if ($Is_MacOS) { -- $root = ":$root" if $root !~ /:/; -- $root =~ s#([^:])\z#$1:#; -- } else { -- $root =~ s#/\z##; -- } -- (undef, undef, my $rp) = lstat $root or next; -- $rp &= 07777; # don't forget setuid, setgid, sticky bits -- if ( -d _ ) { -- # notabene: 0700 is for making readable in the first place, -- # it's also intended to change it to writable in case we have -- # to recurse in which case we are better than rm -rf for -- # subtrees with strange permissions -- chmod($rp | 0700, ($Is_VMS ? VMS::Filespec::fileify($root) : $root)) -- or carp "Can't make directory $root read+writeable: $!" -- unless $safe; -- -- if (opendir my $d, $root) { -- no strict 'refs'; -- if (!defined ${"\cTAINT"} or ${"\cTAINT"}) { -- # Blindly untaint dir names -- @files = map { /^(.*)$/s ; $1 } readdir $d; -- } else { -- @files = readdir $d; -- } -- closedir $d; -- } -- else { -- carp "Can't read $root: $!"; -- @files = (); -- } -+ # avoid a race condition where a directory may be replaced by a -+ # symlink between the lstat and the chdir -+ my ($new_dev, $new_ino, $perm) = stat '.'; -+ unless ("$new_dev:$new_ino" eq "$dev:$ino") -+ { -+ croak "Directory $prefix$path changed before chdir, aborting"; -+ } - -- # Deleting large numbers of files from VMS Files-11 filesystems -- # is faster if done in reverse ASCIIbetical order -- @files = reverse @files if $Is_VMS; -- ($root = VMS::Filespec::unixify($root)) =~ s#\.dir\z## if $Is_VMS; -- if ($Is_MacOS) { -- @files = map("$root$_", @files); -- } else { -- @files = map("$root/$_", grep $_!~/^\.{1,2}\z/s,@files); -- } -- $count += rmtree(\@files,$verbose,$safe); -- if ($safe && -- ($Is_VMS ? !&VMS::Filespec::candelete($root) : !-w $root)) { -- print "skipped $root\n" if $verbose; -- next; -- } -- chmod $rp | 0700, $root -- or carp "Can't make directory $root writeable: $!" -- if $force_writeable; -- print "rmdir $root\n" if $verbose; -- if (rmdir $root) { -- ++$count; -- } -- else { -- carp "Can't remove directory $root: $!"; -- chmod($rp, ($Is_VMS ? VMS::Filespec::fileify($root) : $root)) -- or carp("and can't restore permissions to " -- . sprintf("0%o",$rp) . "\n"); -- } -- } -- else { -- if ($safe && -- ($Is_VMS ? !&VMS::Filespec::candelete($root) -- : !(-l $root || -w $root))) -- { -- print "skipped $root\n" if $verbose; -- next; -- } -- chmod $rp | 0600, $root -- or carp "Can't make file $root writeable: $!" -- if $force_writeable; -- print "unlink $root\n" if $verbose; -- # delete all versions under VMS -- for (;;) { -- unless (unlink $root) { -- carp "Can't unlink file $root: $!"; -- if ($force_writeable) { -- chmod $rp, $root -- or carp("and can't restore permissions to " -- . sprintf("0%o",$rp) . "\n"); -- } -- last; -- } -- ++$count; -- last unless $Is_VMS && lstat $root; -- } -+ $perm &= 07777; -+ my $nperm = $perm | 0700; -+ unless ($safe or $nperm == $perm or chmod $nperm, '.') -+ { -+ carp "Can't make directory $prefix$path read+writeable ($!)"; -+ $nperm = $perm; -+ } -+ -+ my $count = 0; -+ if (opendir my $dir, '.') -+ { -+ my $entry; -+ while (defined ($entry = readdir $dir)) -+ { -+ next if $entry =~ /^\.\.?$/; -+ $entry =~ /^(.*)$/s; $entry = $1; # untaint -+ $count += _rmtree $entry, "$prefix$path/", '..', $dev, $ino, -+ $verbose, $safe; - } -+ -+ closedir $dir; -+ } -+ -+ # restore directory permissions if required (in case the rmdir -+ # below fails) now, while we're still in the directory and may do -+ # so without a race via '.' -+ unless ($nperm == $perm or chmod $perm, '.') -+ { -+ carp "Can't restore permissions on directory $prefix$path ($!)"; -+ } -+ -+ # don't leave the caller in an unexpected directory -+ unless (chdir $up) -+ { -+ croak "Can't return to $up_name directory from $prefix$path ($!)"; -+ } -+ -+ # ensure that a chdir .. didn't take us somewhere other than -+ # where we expected (see CVE-2002-0435) -+ unless (($new_dev, $new_ino) = stat '.' -+ and "$new_dev:$new_ino" eq "$up_dev:$up_ino") -+ { -+ croak "\u$up_name directory changed since entering $prefix$path"; -+ } -+ -+ print "rmdir $prefix$path\n" if $verbose; -+ if (rmdir $path) -+ { -+ $count++; -+ } -+ else -+ { -+ carp "Can't remove directory $prefix$path ($!)"; -+ } -+ -+ return $count; -+} -+ -+sub rmtree -+{ -+ my ($p, $verbose, $safe) = @_; -+ $p = [] unless defined $p and length $p; -+ $p = [ $p ] unless ref $p; -+ my @paths = grep defined && length, @$p; -+ -+ # default to "unsafe" for non-root (will chmod dirs) -+ $safe = $> ? 0 : 1 unless defined $safe; -+ -+ unless (@paths) -+ { -+ carp "No root path(s) specified"; -+ return; -+ } -+ -+ opendir my $oldpwd, '.' or do { -+ carp "Can't fetch initial working directory"; -+ return; -+ }; -+ -+ my ($dev, $ino) = stat '.' or do { -+ carp "Can't stat initial working directory"; -+ return; -+ }; -+ -+ my $count = 0; -+ for my $path (@paths) -+ { -+ $count += _rmtree $path, '', $oldpwd, $dev, $ino, $verbose, $safe; - } - - $count; diff --git a/dev-lang/perl/files/perl-5.8.8-CVE-2008-1927.patch b/dev-lang/perl/files/perl-5.8.8-CVE-2008-1927.patch deleted file mode 100644 index 470005804f57..000000000000 --- a/dev-lang/perl/files/perl-5.8.8-CVE-2008-1927.patch +++ /dev/null @@ -1,256 +0,0 @@ -Fix a double free / segfault with utf8 regexps -Debian #454792 -[rt.cpan.org #48156] -[rt.cpan.org #40641] -upstream change 29204 - -UTF8_ALLOW_DEFAULT definition in utf8.h picked from upstream change 27688 - -diff --git a/embed.fnc b/embed.fnc -index edfbc0e..26524c7 100644 ---- a/embed.fnc -+++ b/embed.fnc -@@ -1168,6 +1168,7 @@ Es |void |reguni |NN const struct RExC_state_t *state|UV uv|NN char *s|NN STRLE - Es |regnode*|regclass |NN struct RExC_state_t *state - ERs |I32 |regcurly |NN const char * - Es |regnode*|reg_node |NN struct RExC_state_t *state|U8 op -+Es |UV |reg_recode |const char value|NULLOK SV **encp - Es |regnode*|regpiece |NN struct RExC_state_t *state|NN I32 *flagp - Es |void |reginsert |NN struct RExC_state_t *state|U8 op|NN regnode *opnd - Es |void |regoptail |NN struct RExC_state_t *state|NN regnode *p|NN regnode *val -diff --git a/embed.h b/embed.h -index 2b38fd5..372b04f 100644 ---- a/embed.h -+++ b/embed.h -@@ -1234,6 +1234,7 @@ - #define regclass S_regclass - #define regcurly S_regcurly - #define reg_node S_reg_node -+#define reg_recode S_reg_recode - #define regpiece S_regpiece - #define reginsert S_reginsert - #define regoptail S_regoptail -@@ -3277,6 +3278,7 @@ - #define regclass(a) S_regclass(aTHX_ a) - #define regcurly(a) S_regcurly(aTHX_ a) - #define reg_node(a,b) S_reg_node(aTHX_ a,b) -+#define reg_recode(a,b) S_reg_recode(aTHX_ a,b) - #define regpiece(a,b) S_regpiece(aTHX_ a,b) - #define reginsert(a,b,c) S_reginsert(aTHX_ a,b,c) - #define regoptail(a,b,c) S_regoptail(aTHX_ a,b,c) -diff --git a/pod/perldiag.pod b/pod/perldiag.pod -index 9b3134c..7d95216 100644 ---- a/pod/perldiag.pod -+++ b/pod/perldiag.pod -@@ -1900,6 +1900,15 @@ recognized by Perl or by a user-supplied handler. See L<attributes>. - (W printf) Perl does not understand the given format conversion. See - L<perlfunc/sprintf>. - -+=item Invalid escape in the specified encoding in regex; marked by <-- HERE in m/%s/ -+ -+(W regexp) The numeric escape (for example C<\xHH>) of value < 256 -+didn't correspond to a single character through the conversion -+from the encoding specified by the encoding pragma. -+The escape was replaced with REPLACEMENT CHARACTER (U+FFFD) instead. -+The <-- HERE shows in the regular expression about where the -+escape was discovered. -+ - =item Invalid [] range "%s" in regex; marked by <-- HERE in m/%s/ - - (F) The range specified in a character class had a minimum character -diff --git a/proto.h b/proto.h -index 6d185dd..ef6c0cf 100644 ---- a/proto.h -+++ b/proto.h -@@ -1748,6 +1748,7 @@ STATIC I32 S_regcurly(pTHX_ const char *) - __attribute__warn_unused_result__; - - STATIC regnode* S_reg_node(pTHX_ struct RExC_state_t *state, U8 op); -+STATIC UV S_reg_recode(pTHX_ const char value, SV **encp); - STATIC regnode* S_regpiece(pTHX_ struct RExC_state_t *state, I32 *flagp); - STATIC void S_reginsert(pTHX_ struct RExC_state_t *state, U8 op, regnode *opnd); - STATIC void S_regoptail(pTHX_ struct RExC_state_t *state, regnode *p, regnode *val); -diff --git a/regcomp.c b/regcomp.c -index 928cf39..98d48dd 100644 ---- a/regcomp.c -+++ b/regcomp.c -@@ -2791,6 +2791,39 @@ S_regpiece(pTHX_ RExC_state_t *pRExC_state, I32 *flagp) - } - - /* -+ * reg_recode -+ * -+ * It returns the code point in utf8 for the value in *encp. -+ * value: a code value in the source encoding -+ * encp: a pointer to an Encode object -+ * -+ * If the result from Encode is not a single character, -+ * it returns U+FFFD (Replacement character) and sets *encp to NULL. -+ */ -+STATIC UV -+S_reg_recode(pTHX_ const char value, SV **encp) -+{ -+ STRLEN numlen = 1; -+ SV * const sv = sv_2mortal(newSVpvn(&value, numlen)); -+ const char * const s = encp && *encp ? sv_recode_to_utf8(sv, *encp) -+ : SvPVX(sv); -+ const STRLEN newlen = SvCUR(sv); -+ UV uv = UNICODE_REPLACEMENT; -+ -+ if (newlen) -+ uv = SvUTF8(sv) -+ ? utf8n_to_uvchr((U8*)s, newlen, &numlen, UTF8_ALLOW_DEFAULT) -+ : *(U8*)s; -+ -+ if (!newlen || numlen != newlen) { -+ uv = UNICODE_REPLACEMENT; -+ if (encp) -+ *encp = NULL; -+ } -+ return uv; -+} -+ -+/* - - regatom - the lowest level - * - * Optimization: gobbles an entire sequence of ordinary characters so that -@@ -3182,6 +3215,8 @@ tryagain: - ender = grok_hex(p, &numlen, &flags, NULL); - p += numlen; - } -+ if (PL_encoding && ender < 0x100) -+ goto recode_encoding; - break; - case 'c': - p++; -@@ -3201,6 +3236,17 @@ tryagain: - --p; - goto loopdone; - } -+ if (PL_encoding && ender < 0x100) -+ goto recode_encoding; -+ break; -+ recode_encoding: -+ { -+ SV* enc = PL_encoding; -+ ender = reg_recode((const char)(U8)ender, &enc); -+ if (!enc && SIZE_ONLY && ckWARN(WARN_REGEXP)) -+ vWARN(p, "Invalid escape in the specified encoding"); -+ RExC_utf8 = 1; -+ } - break; - case '\0': - if (p >= RExC_end) -@@ -3331,32 +3377,6 @@ tryagain: - break; - } - -- /* If the encoding pragma is in effect recode the text of -- * any EXACT-kind nodes. */ -- if (PL_encoding && PL_regkind[(U8)OP(ret)] == EXACT) { -- STRLEN oldlen = STR_LEN(ret); -- SV *sv = sv_2mortal(newSVpvn(STRING(ret), oldlen)); -- -- if (RExC_utf8) -- SvUTF8_on(sv); -- if (sv_utf8_downgrade(sv, TRUE)) { -- const char * const s = sv_recode_to_utf8(sv, PL_encoding); -- const STRLEN newlen = SvCUR(sv); -- -- if (SvUTF8(sv)) -- RExC_utf8 = 1; -- if (!SIZE_ONLY) { -- DEBUG_r(PerlIO_printf(Perl_debug_log, "recode %*s to %*s\n", -- (int)oldlen, STRING(ret), -- (int)newlen, s)); -- Copy(s, STRING(ret), newlen, char); -- STR_LEN(ret) += newlen - oldlen; -- RExC_emit += STR_SZ(newlen) - STR_SZ(oldlen); -- } else -- RExC_size += STR_SZ(newlen) - STR_SZ(oldlen); -- } -- } -- - return(ret); - } - -@@ -3734,6 +3754,8 @@ S_regclass(pTHX_ RExC_state_t *pRExC_state) - value = grok_hex(RExC_parse, &numlen, &flags, NULL); - RExC_parse += numlen; - } -+ if (PL_encoding && value < 0x100) -+ goto recode_encoding; - break; - case 'c': - value = UCHARAT(RExC_parse++); -@@ -3741,13 +3763,24 @@ S_regclass(pTHX_ RExC_state_t *pRExC_state) - break; - case '0': case '1': case '2': case '3': case '4': - case '5': case '6': case '7': case '8': case '9': -- { -- I32 flags = 0; -- numlen = 3; -- value = grok_oct(--RExC_parse, &numlen, &flags, NULL); -- RExC_parse += numlen; -- break; -- } -+ { -+ I32 flags = 0; -+ numlen = 3; -+ value = grok_oct(--RExC_parse, &numlen, &flags, NULL); -+ RExC_parse += numlen; -+ if (PL_encoding && value < 0x100) -+ goto recode_encoding; -+ break; -+ } -+ recode_encoding: -+ { -+ SV* enc = PL_encoding; -+ value = reg_recode((const char)(U8)value, &enc); -+ if (!enc && SIZE_ONLY && ckWARN(WARN_REGEXP)) -+ vWARN(RExC_parse, -+ "Invalid escape in the specified encoding"); -+ break; -+ } - default: - if (!SIZE_ONLY && isALPHA(value) && ckWARN(WARN_REGEXP)) - vWARN2(RExC_parse, -diff --git a/t/uni/tr_utf8.t b/t/uni/tr_utf8.t -index 606a84a..354156a 100755 ---- a/t/uni/tr_utf8.t -+++ b/t/uni/tr_utf8.t -@@ -31,7 +31,7 @@ BEGIN { - } - - use strict; --use Test::More tests => 7; -+use Test::More tests => 8; - - use encoding 'utf8'; - -@@ -67,4 +67,12 @@ is($str, $hiragana, "s/// # hiragana -> katakana"); - $line =~ tr/bcdeghijklmnprstvwxyz$02578/בצדעגהיײקלמנפּרסטװשכיזשױתײחא/; - is($line, "aבצדעfגהיײקלמנoפqּרסuטװשכיזש1ױ34ת6ײח9", "[perl #16843]"); - } -+ -+{ -+ # [perl #40641] -+ my $str = qq/Gebääääääääääääääääääääude/; -+ my $reg = qr/Gebääääääääääääääääääääude/; -+ ok($str =~ /$reg/, "[perl #40641]"); -+} -+ - __END__ -diff --git a/utf8.h b/utf8.h -index 6d63897..3800866 100644 ---- a/utf8.h -+++ b/utf8.h -@@ -198,6 +198,8 @@ encoded character. - UTF8_ALLOW_SURROGATE|UTF8_ALLOW_FFFF) - #define UTF8_ALLOW_ANY 0x00FF - #define UTF8_CHECK_ONLY 0x0200 -+#define UTF8_ALLOW_DEFAULT (ckWARN(WARN_UTF8) ? 0 : \ -+ UTF8_ALLOW_ANYUV) - - #define UNICODE_SURROGATE_FIRST 0xD800 - #define UNICODE_SURROGATE_LAST 0xDFFF diff --git a/dev-lang/perl/files/perl-5.8.8-USE_MM_LD_RUN_PATH.patch b/dev-lang/perl/files/perl-5.8.8-USE_MM_LD_RUN_PATH.patch deleted file mode 100644 index edcfc6a41b53..000000000000 --- a/dev-lang/perl/files/perl-5.8.8-USE_MM_LD_RUN_PATH.patch +++ /dev/null @@ -1,111 +0,0 @@ -diff -Naurp perl-5.8.8-orig/lib/ExtUtils/Liblist.pm perl-5.8.8/lib/ExtUtils/Liblist.pm ---- perl-5.8.8-orig/lib/ExtUtils/Liblist.pm 2003-04-07 14:58:17.000000000 -0400 -+++ perl-5.8.8/lib/ExtUtils/Liblist.pm 2006-02-07 09:57:04.000000000 -0500 -@@ -87,6 +87,11 @@ libraries. LD_RUN_PATH is a colon separ - in LDLOADLIBS. It is passed as an environment variable to the process - that links the shared library. - -+The Red Hat extension: This generation of LD_RUN_PATH is disabled by default. -+To use the generated LD_RUN_PATH for all links, set the USE_MM_LD_RUN_PATH -+MakeMaker object attribute / argument, (or set the $USE_MM_LD_RUN_PATH -+environment variable). -+ - =head2 BSLOADLIBS - - List of those libraries that are needed but can be linked in -diff -Naurp perl-5.8.8-orig/lib/ExtUtils/MM_Unix.pm perl-5.8.8/lib/ExtUtils/MM_Unix.pm ---- perl-5.8.8-orig/lib/ExtUtils/MM_Unix.pm 2005-05-21 05:42:56.000000000 -0400 -+++ perl-5.8.8/lib/ExtUtils/MM_Unix.pm 2006-02-07 09:56:08.000000000 -0500 -@@ -941,7 +941,7 @@ $(INST_DYNAMIC): $(OBJECT) $(MYEXTLIB) $ - } - - my $ld_run_path_shell = ""; -- if ($self->{LD_RUN_PATH} ne "") { -+ if (($self->{LD_RUN_PATH} ne "") && ($self->{USE_MM_LD_RUN_PATH})) { - $ld_run_path_shell = 'LD_RUN_PATH="$(LD_RUN_PATH)" '; - } - -diff -Naurp perl-5.8.8-orig/lib/ExtUtils/MakeMaker.pm perl-5.8.8/lib/ExtUtils/MakeMaker.pm ---- perl-5.8.8-orig/lib/ExtUtils/MakeMaker.pm 2005-10-21 10:11:04.000000000 -0400 -+++ perl-5.8.8/lib/ExtUtils/MakeMaker.pm 2006-02-07 09:55:03.000000000 -0500 -@@ -233,7 +233,7 @@ sub full_setup { - PERL_SRC PERM_RW PERM_RWX - PL_FILES PM PM_FILTER PMLIBDIRS POLLUTE PPM_INSTALL_EXEC - PPM_INSTALL_SCRIPT PREREQ_FATAL PREREQ_PM PREREQ_PRINT PRINT_PREREQ -- SIGN SKIP TYPEMAPS VERSION VERSION_FROM XS XSOPT XSPROTOARG -+ SKIP TYPEMAPS USE_MM_LD_RUN_PATH VERSION VERSION_FROM XS XSOPT XSPROTOARG - XS_VERSION clean depend dist dynamic_lib linkext macro realclean - tool_autosplit - -@@ -371,6 +371,26 @@ sub new { - exit 0; - } - -+ # USE_MM_LD_RUN_PATH - borrowed from RedHat to disable automatic RPATH generation -+ if ( ( ! $self->{USE_MM_LD_RUN_PATH} ) -+ &&( ("@ARGV" =~ /\bUSE_MM_LD_RUN_PATH(=([01]))?\b/) -+ ||( exists( $ENV{USE_MM_LD_RUN_PATH} ) -+ &&( $ENV{USE_MM_LD_RUN_PATH} =~ /([01])?$/ ) -+ ) -+ ) -+ ) -+ { -+ my $v = $1; -+ if( $v ) -+ { -+ $v = ($v=~/=([01])$/)[0]; -+ }else -+ { -+ $v = 1; -+ }; -+ $self->{USE_MM_LD_RUN_PATH}=$v; -+ }; -+ - print STDOUT "MakeMaker (v$VERSION)\n" if $Verbose; - if (-f "MANIFEST" && ! -f "Makefile"){ - check_manifest(); -@@ -2057,6 +2077,44 @@ precedence. A typemap in the current di - precedence, even if it isn't listed in TYPEMAPS. The default system - typemap has lowest precedence. - -+=item USE_MM_LD_RUN_PATH -+ -+boolean -+This feature is borrowed from Red Hat to deal with RPATH issues. -+Please see bug 81745 - http://bugs.gentoo.org/81745 - for more -+information. -+ -+The Red Hat perl MakeMaker distribution differs from the standard -+upstream release in that it disables use of the MakeMaker generated -+LD_RUN_PATH by default, UNLESS this attribute is specified , or the -+USE_MM_LD_RUN_PATH environment variable is set during the MakeMaker run. -+ -+The upstream MakeMaker will set the ld(1) environment variable LD_RUN_PATH -+to the concatenation of every -L ld(1) option directory in which a -l ld(1) -+option library is found, which is used as the ld(1) -rpath option if none -+is specified. This means that, if your application builds shared libraries -+and your MakeMaker application links to them, that the absolute paths of the -+libraries in the build tree will be inserted into the RPATH header of all -+MakeMaker generated binaries, and that such binaries will be unable to link -+to these libraries if they do not still reside in the build tree directories -+(unlikely) or in the system library directories (/lib or /usr/lib), regardless -+of any LD_LIBRARY_PATH setting. So if you specified -L../mylib -lmylib , and -+your 'libmylib.so' gets installed into /some_directory_other_than_usr_lib, -+your MakeMaker application will be unable to link to it, even if LD_LIBRARY_PATH -+is set to include /some_directory_other_than_usr_lib, because RPATH overrides -+LD_LIBRARY_PATH. -+ -+So for Red Hat MakeMaker builds LD_RUN_PATH is NOT generated by default for -+every link. You can still use explicit -rpath ld options or the LD_RUN_PATH -+environment variable during the build to generate an RPATH for the binaries. -+ -+You can set the USE_MM_LD_RUN_PATH attribute to 1 on the MakeMaker command -+line or in the WriteMakefile arguments to enable generation of LD_RUN_PATH -+for every link command. -+ -+USE_MM_LD_RUN_PATH will default to 1 (LD_RUN_PATH will be used) IF the -+$USE_MM_LD_RUN_PATH environment variable is set during a MakeMaker run. -+ - =item VENDORPREFIX - - Like PERLPREFIX, but only for the vendor install locations. diff --git a/dev-lang/perl/files/perl-5.8.8-asm-page-h-compile-failure.patch b/dev-lang/perl/files/perl-5.8.8-asm-page-h-compile-failure.patch deleted file mode 100644 index 325caafc8a44..000000000000 --- a/dev-lang/perl/files/perl-5.8.8-asm-page-h-compile-failure.patch +++ /dev/null @@ -1,12 +0,0 @@ ---- perl-5.8.8/ext/IPC/SysV/SysV.xs.no_asm_page_h 2001-06-30 14:46:07.000000000 -0400 -+++ perl-5.8.8/ext/IPC/SysV/SysV.xs 2006-06-02 17:37:22.000000000 -0400 -@@ -3,9 +3,6 @@ - #include "XSUB.h" - - #include <sys/types.h> --#ifdef __linux__ --# include <asm/page.h> --#endif - #if defined(HAS_MSG) || defined(HAS_SEM) || defined(HAS_SHM) - #ifndef HAS_SEM - # include <sys/ipc.h> diff --git a/dev-lang/perl/files/perl-5.8.8-ccld-cflags.patch b/dev-lang/perl/files/perl-5.8.8-ccld-cflags.patch deleted file mode 100644 index 85f66fe2c99c..000000000000 --- a/dev-lang/perl/files/perl-5.8.8-ccld-cflags.patch +++ /dev/null @@ -1,33 +0,0 @@ ---- Configure.orig 2009-11-04 11:09:08.934965499 +0100 -+++ Configure 2009-11-04 11:13:19.055305854 +0100 -@@ -7617,7 +7617,7 @@ - cat <<EOM - You appear to have ELF support. I'll use $cc to build dynamic libraries. - EOM -- dflt="$cc" -+ dflt="$cc $optimize" - else - echo "I'll use ld to build dynamic libraries." - dflt='ld' ---- Makefile.SH.orig 2009-11-04 15:34:22.643322823 +0100 -+++ Makefile.SH 2009-11-04 15:34:30.110147884 +0100 -@@ -201,7 +201,7 @@ - LD = $ld - - LDFLAGS = $ldflags --CLDFLAGS = $ldflags -+CLDFLAGS = \$(OPTIMIZE) $ldflags - - mallocsrc = $mallocsrc - mallocobj = $mallocobj ---- x2p/Makefile.SH.orig 2009-11-04 15:54:14.146759212 +0100 -+++ x2p/Makefile.SH 2009-11-04 15:54:19.963253154 +0100 -@@ -107,7 +107,7 @@ - $(REALPERL) -I../lib ../utils/perlcc -I .. -L .. $(plextract) -v -log ../compilelog; - - a2p$(EXE_EXT): $(obj) a2p$(OBJ_EXT) -- $(CC) -o a2p $(LDFLAGS) $(obj) a2p$(OBJ_EXT) $(libs) -+ $(CC) -o a2p $(OPTIMIZE) $(LDFLAGS) $(obj) a2p$(OBJ_EXT) $(libs) - - # I now supply a2p.c with the kits, so the following section is - # used only if you force byacc to run by saying diff --git a/dev-lang/perl/files/perl-5.8.8-cplusplus.patch b/dev-lang/perl/files/perl-5.8.8-cplusplus.patch deleted file mode 100644 index 064bda422dd9..000000000000 --- a/dev-lang/perl/files/perl-5.8.8-cplusplus.patch +++ /dev/null @@ -1,22 +0,0 @@ ---- perl.h.orig 2006-03-29 08:53:46.000000000 -0500 -+++ perl.h 2006-03-29 08:54:19.000000000 -0500 -@@ -159,7 +159,7 @@ struct perl_thread; - #endif - - #ifndef PERL_UNUSED_DECL --# ifdef HASATTRIBUTE_UNUSED -+# if defined(HASATTRIBUTE_UNUSED) && !defined(__cplusplus) - # define PERL_UNUSED_DECL __attribute__unused__ - # else - # define PERL_UNUSED_DECL ---- XSUB.h.orig 2006-03-29 08:54:24.000000000 -0500 -+++ XSUB.h 2006-03-29 08:54:48.000000000 -0500 -@@ -91,7 +91,7 @@ handled automatically by C<xsubpp>. - #if defined(__CYGWIN__) && defined(USE_DYNAMIC_LOADING) - # define XS(name) __declspec(dllexport) void name(pTHX_ CV* cv) - #else --# ifdef HASATTRIBUTE_UNUSED -+# if defined(HASATTRIBUTE_UNUSED) && !defined(__cplusplus) - # define XS(name) void name(pTHX_ CV* cv __attribute__unused__) - # else - # define XS(name) void name(pTHX_ CV* cv) diff --git a/dev-lang/perl/files/perl-5.8.8-darwin-cc-ld.patch b/dev-lang/perl/files/perl-5.8.8-darwin-cc-ld.patch deleted file mode 100644 index b96eea8b39a1..000000000000 --- a/dev-lang/perl/files/perl-5.8.8-darwin-cc-ld.patch +++ /dev/null @@ -1,22 +0,0 @@ -Use $CC to link (and check for broken compilers), such that we don't get -linked modules of a different bitness. -http://bugs.gentoo.org/show_bug.cgi?id=297751 - ---- hints/darwin.sh -+++ hints/darwin.sh -@@ -128,13 +128,13 @@ - ccflags="${ccflags} ${cppflags}" - - # Known optimizer problems. --case "`cc -v 2>&1`" in -+case "`${cc:-gcc} -v 2>&1`" in - *"3.1 20020105"*) toke_cflags='optimize=""' ;; - esac - - # Shared library extension is .dylib. - # Bundle extension is .bundle. --ld='cc'; -+ld="${cc:-gcc}"; - so='dylib'; - dlext='bundle'; - usedl='define'; diff --git a/dev-lang/perl/files/perl-5.8.8-dragonfly-clean.patch b/dev-lang/perl/files/perl-5.8.8-dragonfly-clean.patch deleted file mode 100644 index 52f32bf5e265..000000000000 --- a/dev-lang/perl/files/perl-5.8.8-dragonfly-clean.patch +++ /dev/null @@ -1,170 +0,0 @@ -Index: perl-5.8.8/Configure -=================================================================== ---- perl-5.8.8.orig/Configure 2006-01-08 14:51:03 +0000 -+++ perl-5.8.8/Configure 2006-02-14 13:41:41 +0000 -@@ -3130,6 +3130,8 @@ - dgux) osname=dgux - osvers="$3" - ;; -+ dragonfly) osname=dragonfly -+ osvers="$3" ;; - dynixptx*) osname=dynixptx - osvers=`echo "$4"|sed 's/^v//'` - ;; -@@ -7889,7 +7891,7 @@ - solaris) - xxx="-R $shrpdir" - ;; -- freebsd|netbsd|openbsd|interix) -+ freebsd|netbsd|openbsd|dragonfly|interix) - xxx="-Wl,-R$shrpdir" - ;; - bsdos|linux|irix*|dec_osf|gnu*) -Index: perl-5.8.8/Makefile.SH -=================================================================== ---- perl-5.8.8.orig/Makefile.SH 2006-01-24 12:49:44 +0000 -+++ perl-5.8.8/Makefile.SH 2006-02-14 13:46:57 +0000 -@@ -73,7 +73,7 @@ - sunos*) - linklibperl="-lperl" - ;; -- netbsd*|freebsd[234]*|openbsd*) -+ netbsd*|freebsd[234]*|openbsd*|dragonfly*) - linklibperl="-L. -lperl" - ;; - interix*) -@@ -990,6 +990,10 @@ - n_dummy $(nonxs_ext): miniperl$(EXE_EXT) preplibrary $(DYNALOADER) FORCE - @$(LDLIBPTH) sh ext/util/make_ext nonxs $@ MAKE=$(MAKE) LIBPERL_A=$(LIBPERL) - -+.PHONY: printconfig -+printconfig: -+ @eval `$(LDLIBPTH) ./perl -Ilib -V:$(CONFIGVAR)`; echo $$$(CONFIGVAR) -+ - .PHONY: clean _tidy _mopup _cleaner1 _cleaner2 \ - realclean _realcleaner clobber _clobber \ - distclean veryclean _verycleaner -Index: perl-5.8.8/hints/dragonfly.sh -=================================================================== ---- perl-5.8.8.orig/hints/dragonfly.sh 1970-01-01 00:00:00 +0000 -+++ perl-5.8.8/hints/dragonfly.sh 2006-02-14 13:15:04 +0000 -@@ -0,0 +1,118 @@ -+# hints/dragonfly.sh -+# -+# This file is mostly copied from hints/freebsd.sh with the OS version -+# information taken out and only the FreeBSD-4 information intact. -+# Please check with Todd Willey <xtoddx@gmail.com> before making -+# modifications to this file. -+ -+case "$osvers" in -+*) usevfork='true' -+ case "$usemymalloc" in -+ "") usemymalloc='n' -+ ;; -+ esac -+ libswanted=`echo $libswanted | sed 's/ malloc / /'` -+ ;; -+esac -+ -+# Dynamic Loading flags have not changed much, so they are separated -+# out here to avoid duplicating them everywhere. -+case "$osvers" in -+*) -+ objformat=`/usr/bin/objformat` -+ if [ x$objformat = xelf ]; then -+ libpth="/usr/lib /usr/local/lib" -+ glibpth="/usr/lib /usr/local/lib" -+ ldflags="-Wl,-E " -+ lddlflags="-shared " -+ else -+ if [ -e /usr/lib/aout ]; then -+ libpth="/usr/lib/aout /usr/local/lib /usr/lib" -+ glibpth="/usr/lib/aout /usr/local/lib /usr/lib" -+ fi -+ lddlflags='-Bshareable' -+ fi -+ cccdlflags='-DPIC -fPIC' -+ ;; -+esac -+ -+case "$osvers" in -+*) -+ ccflags="${ccflags} -DHAS_FPSETMASK -DHAS_FLOATINGPOINT_H" -+ if /usr/bin/file -L /usr/lib/libc.so | /usr/bin/grep -vq "not stripped" ; then -+ usenm=false -+ fi -+ ;; -+esac -+ -+cat <<'EOM' >&4 -+ -+Some users have reported that Configure halts when testing for -+the O_NONBLOCK symbol with a syntax error. This is apparently a -+sh error. Rerunning Configure with ksh apparently fixes the -+problem. Try -+ ksh Configure [your options] -+ -+EOM -+ -+# From: Anton Berezin <tobez@plab.ku.dk> -+# To: perl5-porters@perl.org -+# Subject: [PATCH 5.005_54] Configure - hints/freebsd.sh signal handler type -+# Date: 30 Nov 1998 19:46:24 +0100 -+# Message-ID: <864srhhvcv.fsf@lion.plab.ku.dk> -+ -+signal_t='void' -+d_voidsig='define' -+ -+# This script UU/usethreads.cbu will get 'called-back' by Configure -+# after it has prompted the user for whether to use threads. -+cat > UU/usethreads.cbu <<'EOCBU' -+case "$usethreads" in -+$define|true|[yY]*) -+ lc_r=`/sbin/ldconfig -r|grep ':-lc_r'|awk '{print $NF}'|sed -n '$p'` -+ case "$osvers" in -+ *) -+ if [ ! -r "$lc_r" ]; then -+ cat <<EOM >&4 -+POSIX threads should be supported by FreeBSD $osvers -- -+but your system is missing the shared libc_r. -+(/sbin/ldconfig -r doesn't find any). -+ -+Consider using the latest STABLE release. -+EOM -+ exit 1 -+ fi -+ case "$osvers" in -+ *) ldflags="-pthread $ldflags" -+ ;; -+ esac -+ # Both in 4.x and 5.x gethostbyaddr_r exists but -+ # it is "Temporary function, not threadsafe"... -+ # Presumably earlier it didn't even exist. -+ d_gethostbyaddr_r="undef" -+ d_gethostbyaddr_r_proto="0" -+ ;; -+ -+ esac -+ -+ set `echo X "$libswanted "| sed -e 's/ c / c_r /'` -+ shift -+ libswanted="$*" -+ # Configure will probably pick the wrong libc to use for nm scan. -+ # The safest quick-fix is just to not use nm at all... -+ usenm=false -+ -+ unset lc_r -+ -+ # Even with the malloc mutexes the Perl malloc does not -+ # seem to be threadsafe in FreeBSD? -+ case "$usemymalloc" in -+ '') usemymalloc=n ;; -+ esac -+esac -+EOCBU -+ -+# malloc wrap works -+case "$usemallocwrap" in -+'') usemallocwrap='define' ;; -+esac - diff --git a/dev-lang/perl/files/perl-5.8.8-fbsdhints.patch b/dev-lang/perl/files/perl-5.8.8-fbsdhints.patch deleted file mode 100644 index 7dc1a65b9e6e..000000000000 --- a/dev-lang/perl/files/perl-5.8.8-fbsdhints.patch +++ /dev/null @@ -1,57 +0,0 @@ -Index: perl-5.8.8/hints/freebsd.sh -=================================================================== ---- perl-5.8.8.orig/hints/freebsd.sh -+++ perl-5.8.8/hints/freebsd.sh -@@ -88,6 +88,8 @@ case "$osvers" in - esac - libswanted=`echo $libswanted | sed 's/ malloc / /'` - libswanted=`echo $libswanted | sed 's/ bind / /'` -+ libswanted=`echo $libswanted | sed 's/ dl / /'` -+ libswanted=`echo $libswanted | sed 's/ c / /'` - # iconv gone in Perl 5.8.1, but if someone compiles 5.8.0 or earlier. - libswanted=`echo $libswanted | sed 's/ iconv / /'` - d_setregid='define' -@@ -102,6 +104,10 @@ case "$osvers" in - ;; - esac - libswanted=`echo $libswanted | sed 's/ malloc / /'` -+ libswanted=`echo $libswanted | sed 's/ bind / /'` -+ libswanted=`echo $libswanted | sed 's/ dl / /'` -+ libswanted=`echo $libswanted | sed 's/ iconv / /'` -+ libswanted=`echo $libswanted | sed 's/ c / /'` - ;; - esac - -@@ -116,17 +122,17 @@ case "$osvers" in - - *) - objformat=`/usr/bin/objformat` -- if [ x$objformat = xelf ]; then -- libpth="/usr/lib /usr/local/lib" -- glibpth="/usr/lib /usr/local/lib" -- ldflags="-Wl,-E " -- lddlflags="-shared " -- else -+ if [ x$objformat = xaout ]; then - if [ -e /usr/lib/aout ]; then - libpth="/usr/lib/aout /usr/local/lib /usr/lib" - glibpth="/usr/lib/aout /usr/local/lib /usr/lib" - fi - lddlflags='-Bshareable' -+ else -+ libpth="/usr/lib /usr/local/lib" -+ glibpth="/usr/lib /usr/local/lib" -+ ldflags="-Wl,-E" -+ lddlflags="-shared " - fi - cccdlflags='-DPIC -fPIC' - ;; -@@ -137,7 +143,7 @@ case "$osvers" in - - *) - ccflags="${ccflags} -DHAS_FPSETMASK -DHAS_FLOATINGPOINT_H" -- if /usr/bin/file -L /usr/lib/libc.so | /usr/bin/grep -vq "not stripped" ; then -+ if /usr/bin/file -L /usr/lib/libc.so | grep -vq "not stripped" ; then - usenm=false - fi - ;; diff --git a/dev-lang/perl/files/perl-5.8.8-fix_file_path_chdir.patch b/dev-lang/perl/files/perl-5.8.8-fix_file_path_chdir.patch deleted file mode 100644 index c75aa89369a8..000000000000 --- a/dev-lang/perl/files/perl-5.8.8-fix_file_path_chdir.patch +++ /dev/null @@ -1,72 +0,0 @@ -ExtUtils/Command.pm (among other things) expects to be able to destroy -a strangely-permissioned testdir. This is a backport of the chdir/chmod -work performed in File::Path released in Perl 5.10.0. - ---- perl-5.8.7.orig/lib/File/Path.pm 2008-12-05 13:23:32.000000000 -0800 -+++ perl-5.8.7/lib/File/Path.pm 2008-12-05 13:33:13.000000000 -0800 -@@ -162,7 +162,7 @@ - { - my ($path, $prefix, $up, $up_dev, $up_ino, $verbose, $safe) = @_; - -- my ($dev, $ino) = lstat $path or return 0; -+ my ($dev, $ino, $perm) = lstat $path or return 0; - unless (-d _) - { - print "unlink $prefix$path\n" if $verbose; -@@ -175,15 +175,25 @@ - return 1; - } - -- unless (chdir $path) -- { -+ if (!chdir($path)) { -+ # see if we can escalate privileges to get in -+ # (e.g. funny protection mask such as -w- instead of rwx) -+ $perm &= 07777; -+ my $nperm = $perm | 0700; -+ if (!($safe or $nperm == $perm or chmod($nperm, $path))) { -+ carp "cannot make $prefix$path read-write-exec"; -+ return 0; -+ } -+ elsif (!chdir($path)) { - carp "Can't chdir to $prefix$path ($!)"; - return 0; -+ } - } - - # avoid a race condition where a directory may be replaced by a - # symlink between the lstat and the chdir -- my ($new_dev, $new_ino, $perm) = stat '.'; -+ my ($new_dev, $new_ino); -+ ($new_dev, $new_ino, $perm) = stat '.'; - unless ("$new_dev:$new_ino" eq "$dev:$ino") - { - croak "Directory $prefix$path changed before chdir, aborting"; ---- perl-5.8.8.orig/lib/ExtUtils/t/Command.t -+++ perl-5.8.8/lib/ExtUtils/t/Command.t -@@ -23,7 +23,7 @@ - } - - BEGIN { -- use Test::More tests => 38; -+ use Test::More tests => 39; - use File::Spec; - } - -@@ -148,7 +148,7 @@ - $^O eq 'NetWare' || $^O eq 'dos' || $^O eq 'cygwin' || - $^O eq 'MacOS' - ) { -- skip( "different file permission semantics on $^O", 4); -+ skip( "different file permission semantics on $^O", 5); - } - - @ARGV = ('testdir'); -@@ -178,6 +178,7 @@ - - @ARGV = ('testdir'); - rm_rf; -+ ok( ! -e 'testdir', 'rm_rf can delete a read-only dir' ); - } - - diff --git a/dev-lang/perl/files/perl-5.8.8-gcc42-command-line.patch b/dev-lang/perl/files/perl-5.8.8-gcc42-command-line.patch deleted file mode 100644 index 6904136c782f..000000000000 --- a/dev-lang/perl/files/perl-5.8.8-gcc42-command-line.patch +++ /dev/null @@ -1,11 +0,0 @@ -diff -Naur perl-5.8.8-orig/makedepend.SH perl-5.8.8/makedepend.SH ---- perl-5.8.8-orig/makedepend.SH 2006-10-01 20:05:40.000000000 -0600 -+++ perl-5.8.8/makedepend.SH 2006-10-01 20:07:03.000000000 -0600 -@@ -167,6 +167,7 @@ - -e '/^#.*<builtin>/d' \ - -e '/^#.*<built-in>/d' \ - -e '/^#.*<command line>/d' \ -+ -e '/^#.*<command-line>/d' \ - -e '/^#.*"-"/d' \ - -e '/: file path prefix .* never used$/d' \ - -e 's#\.[0-9][0-9]*\.c#'"$file.c#" \ diff --git a/dev-lang/perl/files/perl-5.8.8-lib32.patch b/dev-lang/perl/files/perl-5.8.8-lib32.patch deleted file mode 100644 index 88d5049ba614..000000000000 --- a/dev-lang/perl/files/perl-5.8.8-lib32.patch +++ /dev/null @@ -1,76 +0,0 @@ ---- a/Configure -+++ b/Configure -@@ -1255,12 +1255,12 @@ libnames='' - : change the next line if compiling for Xenix/286 on Xenix/386 - xlibpth='/usr/lib/386 /lib/386' - : Possible local library directories to search. --loclibpth="/usr/local/lib /opt/local/lib /usr/gnu/lib" --loclibpth="$loclibpth /opt/gnu/lib /usr/GNU/lib /opt/GNU/lib" -+loclibpth="/usr/local/lib32 /opt/local/lib32 /usr/gnu/lib32" -+loclibpth="$loclibpth /opt/gnu/lib32 /usr/GNU/lib32 /opt/GNU/lib32" - - : general looking path for locating libraries --glibpth="/lib /usr/lib $xlibpth" --glibpth="$glibpth /usr/ccs/lib /usr/ucblib /usr/local/lib" -+glibpth="/lib32 /usr/lib32 $xlibpth" -+glibpth="$glibpth /usr/ccs/lib32 /usr/ucblib /usr/local/lib32" - test -f /usr/shlib/libc.so && glibpth="/usr/shlib $glibpth" - test -f /shlib/libc.so && glibpth="/shlib $glibpth" - -@@ -5945,8 +5945,8 @@ fi - : Reproduce behavior of 5.005 and earlier, maybe drop that in 5.7. - case "$installstyle" in - '') case "$prefix" in -- *perl*) dflt='lib';; -- *) dflt='lib/perl5' ;; -+ *perl*) dflt='lib32';; -+ *) dflt='lib32/perl5' ;; - esac - ;; - *) dflt="$installstyle" ;; -@@ -5962,8 +5962,8 @@ installstyle=$dflt - : /opt/perl/lib/perl5... would be redundant. - : The default "style" setting is made in installstyle.U - case "$installstyle" in --*lib/perl5*) set dflt privlib lib/$package/$version ;; --*) set dflt privlib lib/$version ;; -+*lib32/perl5*) set dflt privlib lib32/$package/$version ;; -+*) set dflt privlib lib32/$version ;; - esac - eval $prefixit - $cat <<EOM -@@ -6465,8 +6465,8 @@ siteprefixexp="$ansexp" - prog=`echo $package | $sed 's/-*[0-9.]*$//'` - case "$sitelib" in - '') case "$installstyle" in -- *lib/perl5*) dflt=$siteprefix/lib/$package/site_$prog/$version ;; -- *) dflt=$siteprefix/lib/site_$prog/$version ;; -+ *lib32/perl5*) dflt=$siteprefix/lib32/$package/site_$prog/$version ;; -+ *) dflt=$siteprefix/lib32/site_$prog/$version ;; - esac - ;; - *) dflt="$sitelib" -@@ -6592,8 +6592,8 @@ case "$vendorprefix" in - '') - prog=`echo $package | $sed 's/-*[0-9.]*$//'` - case "$installstyle" in -- *lib/perl5*) dflt=$vendorprefix/lib/$package/vendor_$prog/$version ;; -- *) dflt=$vendorprefix/lib/vendor_$prog/$version ;; -+ *lib32/perl5*) dflt=$vendorprefix/lib32/$package/vendor_$prog/$version ;; -+ *) dflt=$vendorprefix/lib32/vendor_$prog/$version ;; - esac - ;; - *) dflt="$vendorlib" -@@ -10550,9 +10550,9 @@ else - else - for net in net socket - do -- if test -f /usr/lib/lib$net$_a; then -- ( ($nm $nm_opt /usr/lib/lib$net$_a | eval $nm_extract) || \ -- $ar t /usr/lib/lib$net$_a) 2>/dev/null >> libc.list -+ if test -f /usr/lib32/lib$net$_a; then -+ ( ($nm $nm_opt /usr/lib32/lib$net$_a | eval $nm_extract) || \ -+ $ar t /usr/lib32/lib$net$_a) 2>/dev/null >> libc.list - if $contains socket libc.list >/dev/null 2>&1; then - d_socket="$define" - socketlib="-l$net" diff --git a/dev-lang/perl/files/perl-5.8.8-lib64.patch b/dev-lang/perl/files/perl-5.8.8-lib64.patch deleted file mode 100644 index 4cc3aeeea36b..000000000000 --- a/dev-lang/perl/files/perl-5.8.8-lib64.patch +++ /dev/null @@ -1,76 +0,0 @@ ---- a/Configure -+++ b/Configure -@@ -1255,12 +1255,12 @@ libnames='' - : change the next line if compiling for Xenix/286 on Xenix/386 - xlibpth='/usr/lib/386 /lib/386' - : Possible local library directories to search. --loclibpth="/usr/local/lib /opt/local/lib /usr/gnu/lib" --loclibpth="$loclibpth /opt/gnu/lib /usr/GNU/lib /opt/GNU/lib" -+loclibpth="/usr/local/lib64 /opt/local/lib64 /usr/gnu/lib64" -+loclibpth="$loclibpth /opt/gnu/lib64 /usr/GNU/lib64 /opt/GNU/lib64" - - : general looking path for locating libraries --glibpth="/lib /usr/lib $xlibpth" --glibpth="$glibpth /usr/ccs/lib /usr/ucblib /usr/local/lib" -+glibpth="/lib64 /usr/lib64 $xlibpth" -+glibpth="$glibpth /usr/ccs/lib64 /usr/ucblib /usr/local/lib64" - test -f /usr/shlib/libc.so && glibpth="/usr/shlib $glibpth" - test -f /shlib/libc.so && glibpth="/shlib $glibpth" - -@@ -5945,8 +5945,8 @@ fi - : Reproduce behavior of 5.005 and earlier, maybe drop that in 5.7. - case "$installstyle" in - '') case "$prefix" in -- *perl*) dflt='lib';; -- *) dflt='lib/perl5' ;; -+ *perl*) dflt='lib64';; -+ *) dflt='lib64/perl5' ;; - esac - ;; - *) dflt="$installstyle" ;; -@@ -5962,8 +5962,8 @@ installstyle=$dflt - : /opt/perl/lib/perl5... would be redundant. - : The default "style" setting is made in installstyle.U - case "$installstyle" in --*lib/perl5*) set dflt privlib lib/$package/$version ;; --*) set dflt privlib lib/$version ;; -+*lib64/perl5*) set dflt privlib lib64/$package/$version ;; -+*) set dflt privlib lib64/$version ;; - esac - eval $prefixit - $cat <<EOM -@@ -6465,8 +6465,8 @@ siteprefixexp="$ansexp" - prog=`echo $package | $sed 's/-*[0-9.]*$//'` - case "$sitelib" in - '') case "$installstyle" in -- *lib/perl5*) dflt=$siteprefix/lib/$package/site_$prog/$version ;; -- *) dflt=$siteprefix/lib/site_$prog/$version ;; -+ *lib64/perl5*) dflt=$siteprefix/lib64/$package/site_$prog/$version ;; -+ *) dflt=$siteprefix/lib64/site_$prog/$version ;; - esac - ;; - *) dflt="$sitelib" -@@ -6592,8 +6592,8 @@ case "$vendorprefix" in - '') - prog=`echo $package | $sed 's/-*[0-9.]*$//'` - case "$installstyle" in -- *lib/perl5*) dflt=$vendorprefix/lib/$package/vendor_$prog/$version ;; -- *) dflt=$vendorprefix/lib/vendor_$prog/$version ;; -+ *lib64/perl5*) dflt=$vendorprefix/lib64/$package/vendor_$prog/$version ;; -+ *) dflt=$vendorprefix/lib64/vendor_$prog/$version ;; - esac - ;; - *) dflt="$vendorlib" -@@ -10550,9 +10550,9 @@ else - else - for net in net socket - do -- if test -f /usr/lib/lib$net$_a; then -- ( ($nm $nm_opt /usr/lib/lib$net$_a | eval $nm_extract) || \ -- $ar t /usr/lib/lib$net$_a) 2>/dev/null >> libc.list -+ if test -f /usr/lib64/lib$net$_a; then -+ ( ($nm $nm_opt /usr/lib64/lib$net$_a | eval $nm_extract) || \ -+ $ar t /usr/lib64/lib$net$_a) 2>/dev/null >> libc.list - if $contains socket libc.list >/dev/null 2>&1; then - d_socket="$define" - socketlib="-l$net" diff --git a/dev-lang/perl/files/perl-5.8.8-libnet-hostname.patch b/dev-lang/perl/files/perl-5.8.8-libnet-hostname.patch deleted file mode 100644 index 60440e287977..000000000000 --- a/dev-lang/perl/files/perl-5.8.8-libnet-hostname.patch +++ /dev/null @@ -1,25 +0,0 @@ -commit adeb94125ab7de8d20c129a905a5159972ad9fd1 -Author: Ricardo SIGNES <rjbs@cpan.org> -Date: Mon Oct 22 05:01:09 2007 -0400 - - hostname.t busted - Message-ID: <20071022130109.GA16748@knight> - - p4raw-id: //depot/perl@32180 - -diff --git a/lib/Net/t/hostname.t b/lib/Net/t/hostname.t -index 758d304..4013d74 100644 ---- a/lib/Net/t/hostname.t -+++ b/lib/Net/t/hostname.t -@@ -26,7 +26,10 @@ print "1..5\n"; - $domain = domainname(); - - if(defined $domain && $domain ne "") { -- print "ok 1\n"; -+ print "ok 1 - defined, non-empty domainname\n"; -+} -+elsif (not defined $domain) { -+ print "ok 1 # SKIP domain not fully defined\n"; - } - else { - print "not ok 1\n"; diff --git a/dev-lang/perl/files/perl-5.8.8-links.patch b/dev-lang/perl/files/perl-5.8.8-links.patch deleted file mode 100644 index 22e74b3a68be..000000000000 --- a/dev-lang/perl/files/perl-5.8.8-links.patch +++ /dev/null @@ -1,86 +0,0 @@ ---- lib/CPAN/FirstTime.pm.orig 2006-02-06 07:50:13.000000000 -0500 -+++ lib/CPAN/FirstTime.pm 2006-02-06 07:50:28.000000000 -0500 -@@ -292,7 +292,7 @@ by ENTER. - my(@path) = split /$Config{'path_sep'}/, $ENV{'PATH'}; - local $^W = $old_warn; - my $progname; -- for $progname (qw/gzip tar unzip make lynx wget ncftpget ncftp ftp gpg/){ -+ for $progname (qw/gzip tar unzip make links lynx wget ncftpget ncftp ftp gpg/){ - if ($^O eq 'MacOS') { - $CPAN::Config->{$progname} = 'not_here'; - next; ---- lib/CPAN.pm.orig 2006-02-06 07:54:43.000000000 -0500 -+++ lib/CPAN.pm 2006-02-06 07:52:59.000000000 -0500 -@@ -2604,7 +2604,7 @@ sub hosthard { - - $self->debug("localizing funkyftpwise[$url]") if $CPAN::DEBUG; - my($f,$funkyftp); -- for $f ('lynx','ncftpget','ncftp','wget') { -+ for $f ('links','lynx','ncftpget','ncftp','wget') { - next unless exists $CPAN::Config->{$f}; - $funkyftp = $CPAN::Config->{$f}; - next unless defined $funkyftp; -@@ -2613,7 +2613,7 @@ sub hosthard { - ($asl_ungz = $aslocal) =~ s/\.gz//; - $asl_gz = "$asl_ungz.gz"; - my($src_switch) = ""; -- if ($f eq "lynx"){ -+ if (($f eq "lynx")||($f eq "links")){ - $src_switch = " -source"; - } elsif ($f eq "ncftp"){ - $src_switch = " -c"; -@@ -2637,10 +2637,14 @@ Trying with "$funkyftp$src_switch" to ge - my($wstatus); - if (($wstatus = system($system)) == 0 - && -- ($f eq "lynx" ? -+ (($f eq "lynx" ? - -s $asl_ungz # lynx returns 0 when it fails somewhere - : 1 -- ) -+ )|| -+ ($f eq "links" ? -+ -s $asl_ungz # links returns 0 when it fails somewhere -+ : 1 -+ )) - ) { - if (-s $aslocal) { - # Looks good -@@ -2695,7 +2699,7 @@ returned status $estatus (wstat $wstatus - }); - } - return if $CPAN::Signal; -- } # lynx,ncftpget,ncftp -+ } # links,lynx,ncftpget,ncftp - } # host - } - -@@ -6022,7 +6026,7 @@ stalled. - - The CPAN module is designed to automate the make and install of perl - modules and extensions. It includes some primitive searching capabilities and --knows how to use Net::FTP or LWP (or lynx or an external ftp client) -+knows how to use Net::FTP or LWP (or lynx or links or an external ftp client) - to fetch the raw data from the net. - - Modules are fetched from one or more of the mirrored CPAN -@@ -6975,16 +6979,18 @@ or - - =back - --=head2 Configuring lynx or ncftp for going through a firewall -+=head2 Configuring links or lynx or ncftp for going through a firewall - - If you can go through your firewall with e.g. lynx, presumably with a - command such as - - /usr/local/bin/lynx -pscott:tiger -+ /usr/local/bin/links -pscott:tiger - - then you would configure CPAN.pm with the command - - o conf lynx "/usr/local/bin/lynx -pscott:tiger" -+ o conf links "/usr/local/bin/links -pscott:tiger" - - That's all. Similarly for ncftp or ftp, you would configure something - like diff --git a/dev-lang/perl/files/perl-5.8.8-makedepend-syntax.patch b/dev-lang/perl/files/perl-5.8.8-makedepend-syntax.patch deleted file mode 100644 index 147d49937b5c..000000000000 --- a/dev-lang/perl/files/perl-5.8.8-makedepend-syntax.patch +++ /dev/null @@ -1,11 +0,0 @@ ---- perl-5.8.8/makedepend.SH -+++ perl-5.8.8/makedepend.SH -@@ -128,7 +128,7 @@ - *.y) filebase=`basename $file .y` ;; - esac - case "$file" in -- */*) finc="-I`echo $file | sed 's#/[^/]*$##`" ;; -+ */*) finc="-I`echo $file | sed 's#/[^/]*$##'`" ;; - *) finc= ;; - esac - $echo "Finding dependencies for $filebase$_o." diff --git a/dev-lang/perl/files/perl-5.8.8-perlcc.patch b/dev-lang/perl/files/perl-5.8.8-perlcc.patch deleted file mode 100644 index 5c4b7787cf51..000000000000 --- a/dev-lang/perl/files/perl-5.8.8-perlcc.patch +++ /dev/null @@ -1,11 +0,0 @@ ---- perl-5.8.8/ext/B/B/C.pm.orig 2007-06-07 21:12:04.000000000 +0300 -+++ perl-5.8.8/ext/B/B/C.pm 2007-06-07 21:12:21.000000000 +0300 -@@ -647,7 +647,7 @@ - return $sym if defined $sym; - my $val= $sv->NVX; - $val .= '.00' if $val =~ /^-?\d+$/; -- $xpvnvsect->add(sprintf("0, 0, 0, %d, %s", $sv->IVX, $val)); -+ $xpvnvsect->add(sprintf("0, 0, 0, %d, %s", $sv->NVX, $val)); - $svsect->add(sprintf("&xpvnv_list[%d], %lu, 0x%x", - $xpvnvsect->index, $sv->REFCNT , $sv->FLAGS)); - return savesym($sv, sprintf("&sv_list[%d]", $svsect->index)); diff --git a/dev-lang/perl/files/perl-5.8.8-reorder-INC.patch b/dev-lang/perl/files/perl-5.8.8-reorder-INC.patch deleted file mode 100644 index 11c56929cf1a..000000000000 --- a/dev-lang/perl/files/perl-5.8.8-reorder-INC.patch +++ /dev/null @@ -1,93 +0,0 @@ ---- perl.c.orig 2006-01-24 09:57:33.000000000 -0500 -+++ perl.c 2006-01-24 10:03:15.000000000 -0500 -@@ -4777,9 +4777,9 @@ S_init_perllib(pTHX) - incpush(APPLLIB_EXP, TRUE, TRUE, TRUE); - #endif - --#ifdef ARCHLIB_EXP -- incpush(ARCHLIB_EXP, FALSE, FALSE, TRUE); --#endif -+ /* for configuration where /usr is mounted ro (CPAN::Config, Net::Config) */ -+ incpush("/etc/perl", FALSE, FALSE, TRUE); -+ - #ifdef MACOS_TRADITIONAL - { - Stat_t tmpstatbuf; -@@ -4806,51 +4806,58 @@ S_init_perllib(pTHX) - #endif - #if defined(WIN32) - incpush(PRIVLIB_EXP, TRUE, FALSE, TRUE); --#else -- incpush(PRIVLIB_EXP, FALSE, FALSE, TRUE); - #endif - --#ifdef SITEARCH_EXP -- /* sitearch is always relative to sitelib on Windows for -+#ifdef PERL_VENDORARCH_EXP -+ /* vendorarch is always relative to vendorlib on Windows for - * DLL-based path intuition to work correctly */ - # if !defined(WIN32) -- incpush(SITEARCH_EXP, FALSE, FALSE, TRUE); -+ incpush(PERL_VENDORARCH_EXP, FALSE, FALSE, TRUE); - # endif - #endif - --#ifdef SITELIB_EXP -+#ifdef PERL_VENDORLIB_EXP - # if defined(WIN32) -- /* this picks up sitearch as well */ -- incpush(SITELIB_EXP, TRUE, FALSE, TRUE); -+ incpush(PERL_VENDORLIB_EXP, TRUE, FALSE, TRUE); /* this picks up vendorarch as well */ - # else -- incpush(SITELIB_EXP, FALSE, FALSE, TRUE); -+ incpush(PERL_VENDORLIB_EXP, FALSE, FALSE, TRUE); - # endif - #endif - --#ifdef SITELIB_STEM /* Search for version-specific dirs below here */ -- incpush(SITELIB_STEM, FALSE, TRUE, TRUE); -+#ifdef PERL_VENDORLIB_STEM /* Search for version-specific dirs below here */ -+ incpush(PERL_VENDORLIB_STEM, FALSE, TRUE, TRUE); - #endif - --#ifdef PERL_VENDORARCH_EXP -- /* vendorarch is always relative to vendorlib on Windows for -+#ifdef SITEARCH_EXP -+ /* sitearch is always relative to sitelib on Windows for - * DLL-based path intuition to work correctly */ - # if !defined(WIN32) -- incpush(PERL_VENDORARCH_EXP, FALSE, FALSE, TRUE); -+ incpush(SITEARCH_EXP, FALSE, FALSE, TRUE); - # endif - #endif - --#ifdef PERL_VENDORLIB_EXP -+#ifdef SITELIB_EXP - # if defined(WIN32) -- incpush(PERL_VENDORLIB_EXP, TRUE, FALSE, TRUE); /* this picks up vendorarch as well */ -+ /* this picks up sitearch as well */ -+ incpush(SITELIB_EXP, TRUE, FALSE, TRUE); - # else -- incpush(PERL_VENDORLIB_EXP, FALSE, FALSE, TRUE); -+ incpush(SITELIB_EXP, FALSE, FALSE, TRUE); - # endif - #endif - --#ifdef PERL_VENDORLIB_STEM /* Search for version-specific dirs below here */ -- incpush(PERL_VENDORLIB_STEM, FALSE, TRUE, TRUE); -+#ifdef SITELIB_STEM /* Search for version-specific dirs below here */ -+ incpush(SITELIB_STEM, FALSE, TRUE, TRUE); - #endif - -+ incpush(ARCHLIB_EXP, FALSE, FALSE, TRUE); -+ incpush(PRIVLIB_EXP, FALSE, FALSE, TRUE); -+ -+ /* Non-versioned site directory for local modules and for -+ compatability with the previous packages' site dirs */ -+ -+ incpush("/usr/local/lib/site_perl", TRUE, FALSE, TRUE); -+ -+ - #ifdef PERL_OTHERLIBDIRS - incpush(PERL_OTHERLIBDIRS, TRUE, TRUE, TRUE); - #endif diff --git a/dev-lang/perl/files/perl-5.8.8-solaris-relocation.patch b/dev-lang/perl/files/perl-5.8.8-solaris-relocation.patch deleted file mode 100644 index f2df825c8f26..000000000000 --- a/dev-lang/perl/files/perl-5.8.8-solaris-relocation.patch +++ /dev/null @@ -1,21 +0,0 @@ -http://sourceware.org/ml/binutils/2005-12/msg00008.html ---- hints/solaris_2.sh -+++ hints/solaris_2.sh -@@ -289,7 +289,7 @@ - - END - ccdlflags="$ccdlflags -Wl,-E" -- lddlflags="$lddlflags -Wl,-E -G" -+ lddlflags="$lddlflags -shared" - fi - fi - -@@ -555,7 +555,7 @@ - : #ccflags="$ccflags -Wa,`getconf XBS5_LP64_OFF64_CFLAGS 2>/dev/null`" - fi - ldflags="$ldflags -m64" -- lddlflags="$lddlflags -G -m64" -+ lddlflags="$lddlflags -m64" - ;; - *) - ccflags="$ccflags `getconf XBS5_LP64_OFF64_CFLAGS 2>/dev/null`" diff --git a/dev-lang/perl/files/perl-5.8.8-solaris11.patch b/dev-lang/perl/files/perl-5.8.8-solaris11.patch deleted file mode 100644 index 6ba72e0d7ab7..000000000000 --- a/dev-lang/perl/files/perl-5.8.8-solaris11.patch +++ /dev/null @@ -1,14 +0,0 @@ -Thanks to the nice OpenSolaris guys, I finally figured out that on -OpenSolaris 11, the header dependencies have changed. - ---- perl.h -+++ perl.h -@@ -1192,6 +1192,8 @@ - */ - - #if defined(I_SYSMODE) && !defined(PERL_MICRO) -+#include <sys/stat.h> -+#include <sys/vnode.h> - #include <sys/mode.h> - #endif - diff --git a/dev-lang/perl/files/perl-5.8.8-usr-local.patch b/dev-lang/perl/files/perl-5.8.8-usr-local.patch deleted file mode 100644 index c44b78675a22..000000000000 --- a/dev-lang/perl/files/perl-5.8.8-usr-local.patch +++ /dev/null @@ -1,25 +0,0 @@ -# remove /usr/local paths from all stuff thats used -# in Configure script, locincpth, loclibpth and glibpth are sedded -# afterwards not to conflict with the lib32 and lib64 patches - -diff -rubB perl-5.8.8.orig/Configure perl-5.8.8/Configure ---- perl-5.8.8.orig/Configure Tue Jan 15 10:41:29 2008 -+++ perl-5.8.8/Configure Tue Jan 15 10:44:59 2008 -@@ -4424,7 +4422,7 @@ - : Set private lib path - case "$plibpth" in - '') if ./mips; then -- plibpth="$incpath/usr/lib /usr/local/lib /usr/ccs/lib" -+ plibpth="$incpath/usr/lib /usr/ccs/lib" - fi;; - esac - case "$libpth" in -@@ -19144,7 +19142,7 @@ - case "$ranlib" in - :) ranlib='';; - '') -- ranlib=`./loc ranlib X /usr/bin /bin /usr/local/bin` -+ ranlib=`./loc ranlib X /usr/bin /bin` - $test -f $ranlib || ranlib='' - ;; - esac diff --git a/dev-lang/perl/files/perl-5.8.8-utf8-boundary.patch b/dev-lang/perl/files/perl-5.8.8-utf8-boundary.patch deleted file mode 100644 index d0efa3f1c54b..000000000000 --- a/dev-lang/perl/files/perl-5.8.8-utf8-boundary.patch +++ /dev/null @@ -1,57 +0,0 @@ ---- regcomp.c 2006-01-08 12:59:27.000000000 -0800 -+++ regcomp.c 2007-10-05 12:07:55.000000000 -0700 -@@ -135,7 +135,8 @@ - I32 extralen; - I32 seen_zerolen; - I32 seen_evals; -- I32 utf8; -+ I32 utf8; /* pattern is utf8 or not */ -+ I32 orig_utf8; /* pattern was originally utf8 */ - #if ADD_TO_REGEXEC - char *starttry; /* -Dr: where regtry was called. */ - #define RExC_starttry (pRExC_state->starttry) -@@ -161,6 +162,7 @@ - #define RExC_seen_zerolen (pRExC_state->seen_zerolen) - #define RExC_seen_evals (pRExC_state->seen_evals) - #define RExC_utf8 (pRExC_state->utf8) -+#define RExC_orig_utf8 (pRExC_state->orig_utf8) - - #define ISMULT1(c) ((c) == '*' || (c) == '+' || (c) == '?') - #define ISMULT2(s) ((*s) == '*' || (*s) == '+' || (*s) == '?' || \ -@@ -1749,15 +1751,17 @@ - if (exp == NULL) - FAIL("NULL regexp argument"); - -- RExC_utf8 = pm->op_pmdynflags & PMdf_CMP_UTF8; -+ RExC_orig_utf8 = RExC_utf8 = pm->op_pmdynflags & PMdf_CMP_UTF8; - -- RExC_precomp = exp; - DEBUG_r({ - if (!PL_colorset) reginitcolors(); - PerlIO_printf(Perl_debug_log, "%sCompiling REx%s `%s%*s%s'\n", - PL_colors[4],PL_colors[5],PL_colors[0], -- (int)(xend - exp), RExC_precomp, PL_colors[1]); -+ (int)(xend - exp), exp, PL_colors[1]); - }); -+ -+redo_first_pass: -+ RExC_precomp = exp; - RExC_flags = pm->op_pmflags; - RExC_sawback = 0; - -@@ -1783,6 +1787,17 @@ - RExC_precomp = Nullch; - return(NULL); - } -+ if (RExC_utf8 && !RExC_orig_utf8) { -+ STRLEN len = xend-exp; -+ DEBUG_r(PerlIO_printf(Perl_debug_log, -+ "UTF8 mismatch! Converting to utf8 for resizing and compile\n")); -+ exp = (char*)Perl_bytes_to_utf8(aTHX_ (U8*)exp, &len); -+ xend = exp + len; -+ RExC_orig_utf8 = RExC_utf8; -+ SAVEFREEPV(exp); -+ goto redo_first_pass; -+ } -+ - diff --git a/dev-lang/perl/files/perl-fix_h2ph_include_quote.patch b/dev-lang/perl/files/perl-fix_h2ph_include_quote.patch deleted file mode 100644 index a71fbe6e293b..000000000000 --- a/dev-lang/perl/files/perl-fix_h2ph_include_quote.patch +++ /dev/null @@ -1,61 +0,0 @@ -Subject: Fix h2ph with double-quote-delimited #include directives. - -Allow the quote mark delimiter also for those #include directives chased with "h2ph -a". - -Debian bug #479762. - -Also add the directory prefix of the current file when the quote syntax is -used; 'require' will only look in @INC, not the current directory. - -Upstream change 33835. ---- a/utils/h2ph.PL -+++ b/utils/h2ph.PL -@@ -85,7 +85,7 @@ sub reindent($) { - } - - my ($t, $tab, %curargs, $new, $eval_index, $dir, $name, $args, $outfile); --my ($incl, $incl_type, $next); -+my ($incl, $incl_type, $incl_quote, $next); - while (defined (my $file = next_file())) { - if (-l $file and -d $file) { - link_if_possible($file) if ($opt_l); -@@ -186,9 +186,10 @@ while (defined (my $file = next_file())) { - print OUT $t,"unless(defined(\&$name)) {\n sub $name () {\t",$new,";}\n}\n"; - } - } -- } elsif (/^(include|import|include_next)\s*[<\"](.*)[>\"]/) { -+ } elsif (/^(include|import|include_next)\s*([<\"])(.*)[>\"]/) { - $incl_type = $1; -- $incl = $2; -+ $incl_quote = $2; -+ $incl = $3; - if (($incl_type eq 'include_next') || - ($opt_e && exists($bad_file{$incl}))) { - $incl =~ s/\.h$/.ph/; -@@ -221,6 +222,10 @@ while (defined (my $file = next_file())) { - "warn(\$\@) if \$\@;\n"); - } else { - $incl =~ s/\.h$/.ph/; -+ # copy the prefix in the quote syntax (#include "x.h") case -+ if ($incl !~ m|/| && $incl_quote eq q{"} && $file =~ m|^(.*)/|) { -+ $incl = "$1/$incl"; -+ } - print OUT $t,"require '$incl';\n"; - } - } elsif (/^ifdef\s+(\w+)/) { -@@ -724,8 +729,13 @@ sub queue_includes_from - $line .= <HEADER>; - } - -- if ($line =~ /^#\s*include\s+<(.*?)>/) { -- push(@ARGV, $1) unless $Is_converted{$1}; -+ if ($line =~ /^#\s*include\s+([<"])(.*?)[>"]/) { -+ my ($delimiter, $new_file) = ($1, $2); -+ # copy the prefix in the quote syntax (#include "x.h") case -+ if ($delimiter eq q{"} && $file =~ m|^(.*)/|) { -+ $new_file = "$1/$new_file"; -+ } -+ push(@ARGV, $new_file) unless $Is_converted{$new_file}; - } - } - close HEADER; diff --git a/dev-lang/perl/files/perl-h2ph-ansi-header.patch b/dev-lang/perl/files/perl-h2ph-ansi-header.patch deleted file mode 100644 index c7f0d7246f03..000000000000 --- a/dev-lang/perl/files/perl-h2ph-ansi-header.patch +++ /dev/null @@ -1,11 +0,0 @@ ---- perl-5.8.0-RC2/utils/h2ph_patched.pix 2002-06-24 12:52:31.000000000 +0200 -+++ perl-5.8.0-RC2/utils/h2ph_patched 2002-06-24 12:54:32.000000000 +0200 -@@ -39,6 +39,8 @@ - my ($t, $tab, %curargs, $new, $eval_index, $dir, $name, $args, $outfile); - my ($incl, $next); - while (defined (my $file = next_file())) { -+ next if $file eq 'machine/ansi.h'; -+ - if (-l $file and -d $file) { - link_if_possible($file) if ($opt_l); - next; diff --git a/dev-lang/perl/files/perl-hppa-pa7200-configure.patch b/dev-lang/perl/files/perl-hppa-pa7200-configure.patch deleted file mode 100644 index 396209af112b..000000000000 --- a/dev-lang/perl/files/perl-hppa-pa7200-configure.patch +++ /dev/null @@ -1,11 +0,0 @@ ---- Configure.orig 2006-06-02 13:14:22.000000000 -0500 -+++ Configure 2006-06-02 13:07:03.000000000 -0500 -@@ -2967,7 +2967,7 @@ - : Try to determine whether config.sh was made on this system - case "$config_sh" in - '') --myuname=`$uname -a 2>/dev/null` -+myuname=`$uname -a | $sed -e "s/'//" 2>/dev/null` - $test -z "$myuname" && myuname=`hostname 2>/dev/null` - # tr '[A-Z]' '[a-z]' would not work in EBCDIC - # because the A-Z/a-z are not consecutive. diff --git a/dev-lang/perl/files/perl-noksh.patch b/dev-lang/perl/files/perl-noksh.patch deleted file mode 100644 index 4c33b3e71b33..000000000000 --- a/dev-lang/perl/files/perl-noksh.patch +++ /dev/null @@ -1,16 +0,0 @@ -diff -burN perl-5.8.4.orig/Configure perl-5.8.4/Configure ---- perl-5.8.4.orig/Configure 2004-04-01 05:48:18.000000000 -0800 -+++ perl-5.8.4/Configure 2004-06-09 12:02:54.694172368 -0700 -@@ -164,6 +164,12 @@ - ;; - esac - -+# 2004.06.09 rac -+# having $newsh persist as ksh here is bad news if ksh doesn't really -+# exist. this causes us to toss away a perfectly good working test in -+# bash in favour of more exotic external options. see bug 42665. -+test -x "${newsh}" || unset newsh -+ - : if needed set CDPATH to a harmless value that is not chatty - : avoid bash 2.02 problems with empty CDPATH. - case "$CDPATH" in diff --git a/dev-lang/perl/files/perl-perldoc-emptydirs.patch b/dev-lang/perl/files/perl-perldoc-emptydirs.patch deleted file mode 100644 index 650248c509e8..000000000000 --- a/dev-lang/perl/files/perl-perldoc-emptydirs.patch +++ /dev/null @@ -1,10 +0,0 @@ ---- lib/Pod/Perldoc.pm.orig 2003-10-22 13:02:15.000000000 -0700 -+++ lib/Pod/Perldoc.pm 2003-10-22 13:02:36.000000000 -0700 -@@ -1513,6 +1513,7 @@ - $self->{'target'} = (splitdir $s)[-1]; # XXX: why not use File::Basename? - for ($i=0; $i<@dirs; $i++) { - $dir = $dirs[$i]; -+ next unless -d $dir; - ($dir = VMS::Filespec::unixpath($dir)) =~ s!/\z!! if IS_VMS; - if ( (! $self->opt_m && ( $ret = $self->check_file($dir,"$s.pod"))) - or ( $ret = $self->check_file($dir,"$s.pm")) diff --git a/dev-lang/perl/files/perl-picdl.patch b/dev-lang/perl/files/perl-picdl.patch deleted file mode 100644 index f69a6800cf48..000000000000 --- a/dev-lang/perl/files/perl-picdl.patch +++ /dev/null @@ -1,13 +0,0 @@ ---- Makefile.SH.orig 2003-11-29 01:16:15.000000000 -0800 -+++ Makefile.SH 2003-11-29 01:16:52.000000000 -0800 -@@ -129,8 +129,8 @@ - - ;; - --*) pldlflags='' -- static_target='static' -+*) pldlflags="$cccdlflags" -+ static_target='static_pic' - ;; - esac - diff --git a/dev-lang/perl/files/perl-prelink-lpthread.patch b/dev-lang/perl/files/perl-prelink-lpthread.patch deleted file mode 100644 index d38497e0aebe..000000000000 --- a/dev-lang/perl/files/perl-prelink-lpthread.patch +++ /dev/null @@ -1,11 +0,0 @@ ---- hints/linux.sh.orig 2003-02-14 18:11:50.000000000 -0800 -+++ hints/linux.sh 2003-02-14 18:12:01.000000000 -0800 -@@ -43,7 +43,7 @@ - # 'kaffe' has a /usr/lib/libnet.so which is not at all relevent for perl. - set `echo X "$libswanted "| sed -e 's/ bsd / /' -e 's/ net / /'` - shift --libswanted="$*" -+libswanted="pthread $*" - - # If you have glibc, then report the version for ./myconfig bug reporting. - # (Configure doesn't need to know the specific version since it just uses diff --git a/dev-lang/perl/files/perl-regexp-nossp.patch b/dev-lang/perl/files/perl-regexp-nossp.patch deleted file mode 100644 index d0357cd50629..000000000000 --- a/dev-lang/perl/files/perl-regexp-nossp.patch +++ /dev/null @@ -1,11 +0,0 @@ ---- cflags.SH.orig 2005-07-03 23:39:10.000000000 -0400 -+++ cflags.SH 2005-07-03 23:39:47.000000000 -0400 -@@ -165,6 +165,8 @@ - esac - - : Can we perhaps use $ansi2knr here -+ [ "x$file" = xregcomp ] && export ccflags="${ccflags} -fno-stack-protector" -+ [ "x$file" = xregexec ] && export ccflags="${ccflags} -fno-stack-protector" - echo "$cc -c -DPERL_CORE $ccflags $optimize $warn" - eval "$also "'"$cc -DPERL_CORE -c $ccflags $optimize $warn"' - |