Akopia Akopia Services

[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


Search for: Match: Format: Sort by: