Re: Stacktrace for BusError: failed MODPERL-2 build on MacOSX(Apache/2.0.36 mod_perl/1.99_02-dev Perl/v5.6.1)

[R Blake]

doug,


[root@server]cat test.pl (your test script ....)

use strict;
use Socket;

my $localhost_addr = pack('C4', 127, 0, 0, 1);
my $default_localhost =
gethostbyaddr($localhost_addr, Socket::AF_INET()) || 'localhost';

print "localhost=$default_localhost\n";

[root@server]perl test.pl
Bus error

and, here's the stack trace:

**********

Date/Time: 2002-06-01 18:40:32 -0700
OS Version: 10.1.4 (Build 5Q125)
Host: server.internal.net

Command: perl
PID: 24782

Exception: EXC_BAD_ACCESS (0x0001)
Codes: KERN_PROTECTION_FAILURE (0x0002) at 0x700c92fc

Thread 0 Crashed:
#0 0x70003b08 in memmove
#1 0x00008540 in __res_vinit
#2 0x00007624 in gen_res_get
#3 0x000058f0 in net_data_create
#4 0x0000582c in __net_data_init
#5 0x00004340 in init
#6 0x00003254 in gethostbyaddr
#7 0x004658b8 in Perl_pp_ghostent
#8 0x004656e4 in Perl_pp_ghbyaddr
#9 0x003f8120 in Perl_runops_standard
#10 0x00373eb8 in S_run_body
#11 0x003739c4 in perl_run
#12 0x00001c20 in main
#13 0x00001a54 in _start
#14 0x00001884 in start

PPC Thread State:
srr0: 0x70003b08 srr1: 0x0000f030 vrsave: 0x00000000
xer: 0x00000020 lr: 0x00008540 ctr: 0x70003a00 mq: 0x00000000
r0: 0x10020035 r1: 0xbfffe650 r2: 0x700c930c r3: 0x700c92fc
r4: 0x000fe740 r5: 0x00000000 r6: 0xac1e0a02 r7: 0x00000000
r8: 0x00000000 r9: 0x000fe720 r10: 0x00000000 r11: 0x0003350c
r12: 0x70003a00 r13: 0x00000000 r14: 0x80008a98 r15: 0x8000219c
r16: 0xbfffea88 r17: 0xbfffeaa8 r18: 0x8000214c r19: 0x00000000
r20: 0x00000001 r21: 0x87859393 r22: 0xc24bc195 r23: 0x87859393
r24: 0x8000213c r25: 0x00000000 r26: 0xbffff2a0 r27: 0x00000000
r28: 0x00000000 r29: 0x00000000 r30: 0xbfffe693 r31: 0x00007f90

**********


--On Saturday, June 1, 2002 6:26 PM -0700 Doug MacEachern <[EMAIL PROTECTED]> wrote:

> On Sat, 1 Jun 2002, R Blake wrote:
>
>> # 7 0x004658b8 in Perl_pp_ghostent
>
> we call this in Apache::TestConfig::default_localhost, does the script
> below work for you or cause the same bus error?
>
> use strict;
> use Socket;
>
> my $localhost_addr = pack('C4', 127, 0, 0, 1);
> my $default_localhost =
> gethostbyaddr($localhost_addr, Socket::AF_INET()) || 'localhost';
>
> print "localhost=$default_localhost\n";
>
>




--------------------------------------
R Blake
blakers <at> mac.com
http://homepage.mac.com/blakers
--------------------------------------