[Date Prev][Date Next][Thread Prev][Thread Next][Minivend by date
][Minivend by thread
]
Problem report
#### Description of problem
#### Perl version
Summary of my perl5 (5.0 patchlevel 4 subversion 4) configuration:
Platform:
osname=linux, osvers=2.0.36, archname=i386-linux
uname='linux plucky.conectiva 2.0.36 #1 seg nov 23 22:35:27 edt 1998 i686 unknown '
hint=recommended, useposix=true, d_sigaction=define
bincompat3=y useperlio=undef d_sfio=undef
Compiler:
cc='cc', optimize='-O2', gccversion=2.7.2.3
cppflags='-Dbool=char -DHAS_BOOL -I/usr/local/include'
ccflags ='-Dbool=char -DHAS_BOOL -I/usr/local/include'
stdchar='char', d_stdstdio=define, usevfork=false
intsize=4, longsize=4, ptrsize=undef, doublesize=undef
alignbytes=4, usemymalloc=n, prototype=define
Linker and Libraries:
ld='cc', ldflags =' -L/usr/local/lib'
libpth=/usr/local/lib /lib /usr/lib
libs=-lnsl -lndbm -lgdbm -ldb -ldl -lm -lc -lposix -lcrypt
libc=, so=so
useshrplib=false, libperl=libperl.a
Dynamic Linking:
dlsrc=dl_dlopen.xs, dlext=so, d_dlsymun=undef, ccdlflags='-rdynamic'
cccdlflags='-fpic', lddlflags='-shared -L/usr/local/lib'
Characteristics of this binary (from libperl):
Locally applied patches:
MAINT_TRIAL_4 - 5.004_05 maintenance trial 4
Built under linux
Compiled at Dec 9 1998 23:54:58
@INC:
/usr/lib/perl5/i386-linux/5.00404
/usr/lib/perl5
/usr/lib/perl5/site_perl/i386-linux
/usr/lib/perl5/site_perl
.
#### OS version
Linux consul 2.0.36 #1 qui dez 10 00:28:41 EDT 1998 i686 unknown
#### Main server config
Catalog netone /home/httpd/html/catalogs/netone /cgi-bin/netone /netone
Variable MV_NO_CRYPT 1
AdminUser minivend:nevairbe
AllowGlobal _mv_admin
GlobalSub sub test_global_sub { return 'Test of global subroutine OK.' }
HouseKeeping 5
MaxServers 5
PIDcheck 300
TcpMap 7786 -
TolerateGet Yes
Variable TEST_VARIABLE Test of global variable OK.
UserTag loc hasEndTag 1
UserTag loc Interpolate 1
UserTag loc Order locale
UserTag loc Routine <<EOF
sub {
my ($locale, $message) = @_;
return $message unless $Vend::Cfg->{Locale};
my $ref;
if($locale) {
return $message
unless defined $Vend::Cfg->{Locale_repository}{$locale};
$ref = $Vend::Cfg->{Locale_repository}{$locale}
}
else {
$ref = $Vend::Cfg->{Locale};
}
return defined $ref->{$message} ? $ref->{$message} : $message;
EOF
UserTag var Interpolate 1
UserTag var PosNumber 2
UserTag var Order name global
UserTag var Routine <<EOF
sub {
$_[1] and return $Global::Variable->{shift @_};
return $Vend::Cfg->{Variable}{shift @_};
EOF
UserTag summary Order amount name currency format total reset hide
UserTag summary PosNumber 6
UserTag summary Routine <<EOF
use vars qw/%summary_hash/;
sub {
my ($amount, $name, $currency, $format, $total, $reset, $hide) = @_;
unless ($name) {
$name = 'ONLY0000';
%summary_hash = () if Vend::Util::is_yes($reset);
else {
$summary_hash{$name} = 0 if Vend::Util::is_yes($reset);
$summary_hash{$name} += $amount if length $amount;
$amount = $summary_hash{$name} if Vend::Util::is_yes($total);
return '' if defined $hide && Vend::Util::is_yes($hide);
return sprintf $format, $amount if $format;
return Vend::Util::currency($amount) if $currency;
return $amount;
EOF
UserTag db-date Order table format
UserTag db-date PosNumber 2
UserTag db-date Routine <<EOF
sub {
my ($format, $db) = @_;
$format = '%A %d %b %Y';
$db = 'products' unless $db;
my $mtime = (stat($Vend::Cfg->{Database}{'file'}))[9];
return POSIX::strftime($format, localtime($mtime));
EOF
UserTag db-count Order table
UserTag db-count PosNumber 1
UserTag db-count Routine <<EOF
sub {
my ($db) = @_;
$db = 'products' unless $db;
my $ref = Vend::Data::database_exists_ref($db)
or return "Bad table $db";
$ref = $ref->ref();
my $count;
while ($ref->each_record()) {
$count++;
}
return $count;
EOF
UserTag bar-button Order page current
UserTag bar-button PosNumber 2
UserTag bar-button HasEndTag 1
UserTag bar-button Routine <<EOR
sub {
use strict;
my ($page, $current, $html) = @_;
$current = $Global::Variable->{MV_PAGE}
if ! $current;
$html =~ s:\[selected\]([\000-\377]*)\[/selected]::i;
my $alt = $1;
return $html if $page ne $current;
return $alt;
EOR
#### Catalog config differences
3,30c3,30
< Variable SERVER_NAME __MVC_SERVERNAME__
< Variable CGI_URL __MVC_CGIURL__
< Variable SECURE_SERVER http://__MVC_SERVERNAME__
< Variable ORDERS_TO __MVC_MAILORDERTO__
< Variable IMAGE_DIR __MVC_IMAGEURL__
< Variable DOCROOT __MVC_DOCUMENTROOT__
< Variable SAMPLEHTML __MVC_SAMPLEHTML__
< Variable SAMPLEURL __MVC_SAMPLEURL__
<
< Variable COMPANY __MVC_COMPANY__
< Variable ADDRESS __MVC_ADDRESS__
< Variable CITY __MVC_CITY__
< Variable PHONE __MVC_PHONE__
< Variable TOLLFREE __MVC_TOLLFREE__
< Variable FAX __MVC_FAX__
< Variable LOGO __MVC_LOGO__
< Variable SMLOGO __MVC_SMLOGO__
< Variable HEADERBG __MVC_HEADERBG__
< Variable TABLEFG __MVC_TABLEFG__
< Variable HEADERTEXT __MVC_HEADERTEXT__
< Variable BARBG __MVC_BARBG__
< Variable BARTEXT __MVC_BARTEXT__
< Variable BGIMAGE __MVC_BGIMAGE__
< Variable BGCOLOR __MVC_BGCOLOR__
< Variable ENCRYPTOR __MVC_ENCRYPTOR__
< Variable TAXAREA __MVC_TAXAREA__
< Variable TAXRATE __MVC_TAXRATE__
< Variable TAXSHIPPING __MVC_TAXSHIPPING__
---
> Variable SERVER_NAME www.oem.com.br
> Variable CGI_URL /cgi-bin/netone
> Variable SECURE_SERVER http://www.oem.com.br
> Variable ORDERS_TO webadmin@oem.com.br
> Variable IMAGE_DIR /netone/images
> Variable DOCROOT /home/httpd/html
> Variable SAMPLEHTML /home/httpd/html/netone
> Variable SAMPLEURL http://www.oem.com.br/netone
>
> Variable COMPANY Net One comercio
> Variable ADDRESS Buenos Ayres
> Variable CITY Recife, PE 00000
> Variable PHONE (081) 4232237
> Variable TOLLFREE (888) 555-5555
> Variable FAX (555) 555-5556
> Variable LOGO artstore.gif
> Variable SMLOGO artsmall.gif
> Variable HEADERBG BGCOLOR=#00F0F0
> Variable TABLEFG BGCOLOR=#EEEEEE
> Variable HEADERTEXT #000000
> Variable BARBG #00F0F0
> Variable BARTEXT #FF0000
> Variable BGIMAGE blue_pap.gif
> Variable BGCOLOR #FFFFFF
> Variable ENCRYPTOR none
> Variable TAXAREA OH IL
> Variable TAXRATE OH=6, IL=7.25
> Variable TAXSHIPPING OH
39c39
< Variable MV_NO_CRYPT __MVC_NOCRYPT__
---
> Variable MV_NO_CRYPT teste
1002c1002
< Password __MVC_SUPASSWD__
---
> Password sWbRjRhdHtEec
1113c1113
< RemoteUser __MVC_SUPERUSER__
---
> RemoteUser webadmin
#### Main MiniVend error.log (last 50 lines)
- - - [30/novembro/1999:11:51:09 -0200] - - MiniVend V3.14-4
- - - [30/novembro/1999:11:51:09 -0200] - - Config '_mv_admin' at server startup
- - - [30/novembro/1999:11:51:11 -0200] - - Config 'netone' at server startup
- - - [30/novembro/1999:11:51:17 -0200] - - START server (23733) (INET and UNIX)
- - - [30/novembro/1999:11:51:17 -0200] - - Accepting connections from localhost|127\.0\.0\.1
- - - [30/novembro/1999:12:58:02 -0200] - - Runtime error: REQUEST_METHOD is not defined at /home/users/webadmin/mvend/bin/minivend line 2138.
>
- - - [30/novembro/1999:12:58:02 -0200] - - Could not open error file : No such file or directory
>
> to report this error:
> - - - [30/novembro/1999:12:58:02 -0200] - - Runtime error: REQUEST_METHOD is not defined at /home/users/webadmin/mvend/bin/minivend line 2138.
> >
>
- - - [01/dezembro/1999:15:09:51 -0200] - - STOP server (23733) on signal TERM
- - - [02/dezembro/1999:11:57:08 -0200] - - MiniVend V3.14-4
- - - [02/dezembro/1999:11:57:08 -0200] - - Config '_mv_admin' at server startup
- - - [02/dezembro/1999:11:57:10 -0200] - - Config 'netone' at server startup
- - - [02/dezembro/1999:11:57:14 -0200] - - START server (3465) (INET and UNIX)
- - - [02/dezembro/1999:11:57:14 -0200] - - Accepting connections from localhost|127\.0\.0\.1
- - - [02/dezembro/1999:12:02:37 -0200] - - STOP server (3465) on signal TERM
#### Catalog error.log (last 50 lines)
200.249.248.2 Cyq2Vcy8:200.249.248.2 - [30/novembro/1999:13:34:30 -0200] netone /cgi-bin/netone/process Hammered session lock LOCK_Cyq2Vcy8:200.249.248.2 left by PID 24360
200.249.248.2 Cyq2Vcy8:200.249.248.2 - [30/novembro/1999:13:36:05 -0200] netone /cgi-bin/netone/process Difficulty interacting with browser: No action passed from form
>
#### DBM Status
Have GDBM_File.
Have DB_File.