[Date Prev][Date Next][Thread Prev][Thread Next][Minivend by date
][Minivend by thread
]
[mv] Error with minivend 4.04 array copying working with perl 5.6.0 under BSDI 4.1???
****** message to minivend-users from Gregg Graubins <gregg@wwti.com> ******
Hi MiniVend users!
I don't suppose anyone has had this problem before [yet] since I've done
some pretty extensive searches in both the minivend list archives as well
as the perl Usenet archives. I brought up a new BSDI v4.1 system and
upgraded various apps, including perl (I compiled, tested, and installed
v5.6.0 (i386-bsdos), installed apache, and also decided to install MiniVend
(first installation ever). I'm usually someone good at RTFM'g, so, after
installing/configuring MiniVend's first catalog and starting the server
("minivend -r") but only to get a Segmentation fault, I read some more into
various documentation. Upon reading, I made absolutely sure that the
upgraded perl v5.6.0 was working properly, tested successfully 99.99%, as
shown:
>Failed Test Status Wstat Total Fail Failed List of failed
>-------------------------------------------------------------------------------
>pragma/warnings 370 1 0.27% 257
>4 tests and 77 subtests skipped.
>Failed 1/236 test scripts, 99.58% okay. 1/11886 subtests failed, 99.99% okay.
When trying to start the minivend server via the -r flag, it would spit out:
>$ ./minivend -r
>The previous Minivend server was not running and probably
>terminated with an error.
>Low traffic settings.
>Calling MiniMate....
>Segmentation fault
So, at this point, I investigated a little further (after making sure perl
was properly working). Inside the minivend startup perl script, I appended
"-d" on the first line so it would allow me to debug it's happenings. It
turned out that it was causing a "Segmentation fault" while reading some
lines in the lib/MiniMate/locale/de_DE.cfg file. I deleted various lines in
this file until it started to get past the fault. However, it's seemingly
spitting out the "valid" reason for faulting. Is anyone familiar with this
error? I'm pasting the output from the "-d" debug option for the minivend
startup script --
>webadmin:/web/local/minivend/bin $ ./minivend -r
>Default die handler restored.
>
>Loading DB routines from perl5db.pl version 1.07
>Editor support available.
>
>Enter h or `h h' for help, or `man perldebug' for more help.
>
>main::(./minivend:3): eval 'exec /usr/local/bin/perl -S $0 ${1+"$@"}'
>main::(./minivend:4): if 0; # not running under some shell
> DB<1>
> n
> main::(./minivend:105): require Exporter;
> DB<1>
> n
> main::(./minivend:118): $Global::SendMailLocation = ($Global::Windows and
> $Global::SendMailLocation) ||
>main::(./minivend:119): (-x $Global::SendMailLocation and
>$Global::SendMailLocation) ||
>main::(./minivend:120): (-x '/usr/lib/sendmail' and
>'/usr/lib/sendmail') ||
>main::(./minivend:121): (-x '/usr/sbin/sendmail' and
>'/usr/sbin/sendmail') ||
>main::(./minivend:122): '';
> DB<1>
> n
> main::(./minivend:233): if( ! $Global::Windows and $> == -1 ||
> scalar(getpwuid($>)) eq 'nobody' ) {
> DB<1>
> n
> main::(./minivend:239): my $H;
>main::(./minivend:240): sub http {
> DB<1>
> n
> main::(./minivend:513): my %Ignore = qw(
>main::(./minivend:514): mv_todo 1
>main::(./minivend:515): mv_todo.submit.x 1
>main::(./minivend:516): mv_todo.submit.y 1
>main::(./minivend:517): mv_todo.return.x 1
>main::(./minivend:518): mv_todo.return.y 1
>main::(./minivend:519): mv_todo.checkout.x 1
>main::(./minivend:520): mv_todo.checkout.y 1
>main::(./minivend:521): mv_todo.todo.x 1
>main::(./minivend:522): mv_todo.todo.y 1
>main::(./minivend:523): mv_todo.map 1
>main::(./minivend:524): mv_doit 1
>main::(./minivend:525): mv_check 1
>main::(./minivend:526): mv_click 1
>main::(./minivend:527): mv_nextpage 1
>main::(./minivend:528): mv_credit_card_number 1
>main::(./minivend:529): );
> DB<1>
> n
> main::(./minivend:761): );
> DB<1>
> n
> main::(./minivend:763): $form_action{go} = $form_action{return};
> DB<1>
> n
> main::(./minivend:1127): scan => \&do_scan,
>main::(./minivend:1128): search => \&do_search,
>main::(./minivend:1129): order => \&do_order,
>main::(./minivend:1130): obtain => \&do_order,
>main::(./minivend:1131): );
> DB<1>
> n
> main::(./minivend:2218): eval { main_loop(); };
> DB<1>
> n
> main::(./minivend:2218): eval { main_loop(); };
> DB<1>
> n
> The previous Minivend server was not running and probably
>terminated with an error.
>Default die handler restored.
>
>Loading DB routines from perl5db.pl version 1.07
>Editor support available.
>
>Enter h or `h h' for help, or `man perldebug' for more help.
>
>main::(./minivend:3): eval 'exec /usr/local/bin/perl -S $0 ${1+"$@"}'
>main::(./minivend:4): if 0; # not running under some shell
> DB<1>
> n
> main::(./minivend:105): require Exporter;
> DB<1>
> n
> main::(./minivend:118): $Global::SendMailLocation = ($Global::Windows and
> $Global::SendMailLocation) ||
>main::(./minivend:119): (-x $Global::SendMailLocation and
>$Global::SendMailLocation) ||
>main::(./minivend:120): (-x '/usr/lib/sendmail' and
>'/usr/lib/sendmail') ||
>main::(./minivend:121): (-x '/usr/sbin/sendmail' and
>'/usr/sbin/sendmail') ||
>main::(./minivend:122): '';
> DB<1>
> n
> main::(./minivend:233): if( ! $Global::Windows and $> == -1 ||
> scalar(getpwuid($>)) eq 'nobody' ) {
> DB<1>
> n
> main::(./minivend:239): my $H;
>main::(./minivend:240): sub http {
> DB<1>
> n
> main::(./minivend:513): my %Ignore = qw(
>main::(./minivend:514): mv_todo 1
>main::(./minivend:515): mv_todo.submit.x 1
>main::(./minivend:516): mv_todo.submit.y 1
>main::(./minivend:517): mv_todo.return.x 1
>main::(./minivend:518): mv_todo.return.y 1
>main::(./minivend:519): mv_todo.checkout.x 1
>main::(./minivend:520): mv_todo.checkout.y 1
>main::(./minivend:521): mv_todo.todo.x 1
>main::(./minivend:522): mv_todo.todo.y 1
>main::(./minivend:523): mv_todo.map 1
>main::(./minivend:524): mv_doit 1
>main::(./minivend:525): mv_check 1
>main::(./minivend:526): mv_click 1
>main::(./minivend:527): mv_nextpage 1
>main::(./minivend:528): mv_credit_card_number 1
>main::(./minivend:529): );
> DB<1>
> n
> main::(./minivend:761): );
> DB<1>
> n
> main::(./minivend:763): $form_action{go} = $form_action{return};
> DB<1>
> n
> main::(./minivend:1127): scan => \&do_scan,
>main::(./minivend:1128): search => \&do_search,
>main::(./minivend:1129): order => \&do_order,
>main::(./minivend:1130): obtain => \&do_order,
>main::(./minivend:1131): );
> DB<1>
> n
> main::(./minivend:2218): eval { main_loop(); };
> DB<1>
> n
> main::(./minivend:2218): eval { main_loop(); };
> DB<1>
> n
> Low traffic settings.
>Calling MiniMate....
>Bizarre copy of ARRAY in aassign at
>/usr/local/lib/perl5/5.6.0/Carp/Heavy.pm line 79, <GLOBAL> line 1103.
>
>Abort trap
>webadmin:/web/local/minivend/bin $
===
Gregg Graubins <gregg@wwti.com>
Whitewater Technologies, Inc. * Information Technology Specialists
For PGP signature, email gregg-pgp@wwti.com
-
To unsubscribe from the list, DO NOT REPLY to this message. Instead, send
email with 'UNSUBSCRIBE minivend-users' in the body to Majordomo@minivend.com.
Archive of past messages: http://www.minivend.com/minivend/minivend-list