No subject

 ## Configuring module: Perl
 [...]
 checking if perl is embeddable... no

 [...]

 build information:
 [...]
 Perl................ no (dependencies failed)


The resulting plugin file (./usr/lib/pike/7.6.112/modules/Perl.so)
is only 3.5k and doesn't link against libperl, so it's clearly
broken.

The bug is in libperl-dev: the attached autoconf test program from
src/modules/Perl/configure.in exits with a timeout after 10 seconds on
hppa. I'll clone this against perl and block accordingly.

That said, there's also a sourceful bug in pike7.6 because the build
doesn't fail on such an error but produces a broken package instead.
-- 
Niko Tyni   ntyni at debian.org

--45Z9DzgjV8m4Oswq
Content-Type: text/x-csrc; charset=us-ascii
Content-Disposition: attachment; filename="embed.c"

#include <EXTERN.h>
#include <perl.h>
#include <unistd.h>

static PerlInterpreter *my_perl;

int main(int argc, char **argv, char **env)
{
  char *args[4];
  args[0]="perl";
  args[1]="-e";
  args[2]="1";
  args[3]=0;
  alarm(10);
  
  my_perl = perl_alloc();
#ifndef DBsub
  /* perl5.6 */
  PL_perl_destruct_level=2;
#else
  /* perl5.005 */
  perl_destruct_level=2;
#endif
  perl_construct(my_perl);
  perl_parse(my_perl, NULL, 2, args, (char **)NULL);
  perl_run(my_perl);
  perl_destruct(my_perl);
  perl_free(my_perl);
  return 0;
}

--45Z9DzgjV8m4Oswq--



------------=_1235320575-8664-0
Content-Type: message/rfc822
Content-Disposition: inline
Content-Transfer-Encoding: 7bit

Received: (at 486069-done) by bugs.debian.org; 22 Feb 2009 16:33:55 +0000
X-Spam-Checker-Version: SpamAssassin 3.2.3-bugs.debian.org_2005_01_02
	(2007-08-08) on rietz.debian.org
X-Spam-Level: 
X-Spam-Bayes: score:0.0000 Tokens: new, 26; hammy, 151; neutral, 44; spammy,
	0. spammytokens: hammytokens:0.000-+--UD:diff.gz, 0.000-+--amd64,
	0.000-+--UD:orig.tar.gz, 0.000-+--hppa, 0.000-+--UD:tar.gz
X-Spam-Status: No, score=-7.2 required=4.0 tests=AWL,BAYES_00,FROMDEVELOPER
	autolearn=ham version=3.2.3-bugs.debian.org_2005_01_02
Return-path: <ntyni at cc.helsinki.fi>
Received: from emh04.mail.saunalahti.fi ([62.142.5.110])
	by rietz.debian.org with esmtp (Exim 4.63)
	(envelope-from <ntyni at cc.helsinki.fi>)
	id 1LbHH9-00022v-HH
	for 486069-done at bugs.debian.org; Sun, 22 Feb 2009 16:33:55 +0000
Received: from saunalahti-vams (vs3-12.mail.saunalahti.fi [62.142.5.96])
	by emh04-2.mail.saunalahti.fi (Postfix) with SMTP id 0832413BABC
	for <486069-done at bugs.debian.org>; Sun, 22 Feb 2009 18:33:53 +0200 (EET)
Received: from emh07.mail.saunalahti.fi ([62.142.5.117])
	by vs3-12.mail.saunalahti.fi ([62.142.5.96])
	with SMTP (gateway) id A06E42EFCB2; Sun, 22 Feb 2009 18:33:52 +0200
Received: from myy.local.invalid (a88-112-8-237.elisa-laajakaista.fi [88.112.8.237])
	by emh07.mail.saunalahti.fi (Postfix) with ESMTP id EB3F71C638D
	for <486069-done at bugs.debian.org>; Sun, 22 Feb 2009 18:33:50 +0200 (EET)
Received: from niko by myy.local.invalid with local (Exim 4.69)
	(envelope-from <ntyni at cc.helsinki.fi>)
	id 1LbHH4-0006CM-Fv
	for 486069-done at bugs.debian.org; Sun, 22 Feb 2009 18:33:50 +0200
Date: Sun, 22 Feb 2009 18:33:50 +0200
From: Niko Tyni <ntyni at debian.org>
To: 486069-done at bugs.debian.org
Subject: Re: Possible mass bug filing: embedding perl hangs on hppa without
	PERL_SYS_INIT3
Message-ID: <20090222163350.GA23815 at myy.local.invalid>
References: <20080810195938.GA7789 at rebekka> <20080813104832.GO26173 at albany.tokkee.org> <20080814110314.GA5525 at rebekka>
MIME-Version: 1.0
Content-Type: text/plain; charset=us-ascii
Content-Disposition: inline
In-Reply-To: <20080814110314.GA5525 at rebekka>
User-Agent: Mutt/1.5.18 (2008-05-17)
X-Antivirus: VAMS

On Thu, Aug 14, 2008 at 02:03:14PM +0300, Niko Tyni wrote:
> On Wed, Aug 13, 2008 at 12:48:32PM +0200, Sebastian Harl wrote:
> 
> > On Sun, Aug 10, 2008 at 10:59:38PM +0300, Niko Tyni wrote:
> > > as seen in #486069, since Perl 5.10.0, embedding Perl hangs on hppa
> > > in pthread_mutex_lock() inside perl_parse() if PERL_SYS_INIT3() hasn't
> > > been called.
> 
> > > There are currently (at least) 26 source packages in unstable that
> > > produce binary packages linking against libperl5.10 on amd64 and whose
> > > .orig.tar.gz or .diff.gz matches /perl_parse/ but not /PERL_SYS_INIT3/.
> > 
> > This sounds like a valid reason for mass bug filing to me.
> 
> Thanks, done. The bugs can be seen at
> 
>  http://bugs.debian.org/cgi-bin/pkgreport.cgi?users=debian-perl@lists.debian.org;tag=perl-sys-init3

This was never a bug in Perl itself, as the need for PERL_SYS_INIT3()
is documented properly in perlembed.pod. The real bugs have been filed,
so I'm closing this one.
-- 
Niko Tyni   ntyni at debian.org


------------=_1235320575-8664-0--