[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 5 subversion 2) configuration:
Platform:
osname=linux, osvers=2.2.5, archname=i586-linux
uname='linux pascal 2.2.5 #79 tue jan 19 12:41:20 met 1999 i686 unknown '
hint=recommended, useposix=true, d_sigaction=define
usethreads=undef useperlio=undef d_sfio=undef
Compiler:
cc='cc', optimize='-O2 -pipe', gccversion=egcs-2.91.66 19990314 (egcs-1.1.2 release)
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=4, doublesize=8
d_longlong=define, longlongsize=8, d_longdbl=define, longdblsize=12
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):
Built under linux
Compiled at Apr 4 1999 20:00:53
@INC:
/usr/lib/perl5/5.00502/i586-linux
/usr/lib/perl5/5.00502
/usr/lib/perl5/site_perl/5.005/i586-linux
/usr/lib/perl5/site_perl/5.005
.
#### OS version
Linux help01 2.2.5 #1 Fri Apr 2 16:37:56 MEST 1999 i686 unknown
#### Main server config
Catalog simple /usr/local/catalogs/simple /cgi-bin/simple /simple
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 192.168.11.12
> Variable CGI_URL /cgi-bin/simple
> Variable SECURE_SERVER http://192.168.11.12
> Variable ORDERS_TO root
> Variable IMAGE_DIR /simple/images/
> Variable DOCROOT /usr/local/httpd/htdocs/
> Variable SAMPLEHTML /usr/local/httpd/htdocs/simple/
> Variable SAMPLEURL http://192.168.11.12/simple/
>
> Variable COMPANY Test-WOV
> Variable ADDRESS strasse1
> Variable CITY bla
> Variable PHONE blu
> Variable TOLLFREE 4321
> Variable FAX 1234
> 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
1002c1002
< Password __MVC_SUPASSWD__
---
> Password sWbRjRhdHtEec
1113c1113
< RemoteUser __MVC_SUPERUSER__
---
> RemoteUser minivend
#### Main MiniVend error.log (last 50 lines)
192.168.11.12 - - [05/August/1999:14:21:10 +0200] - /cgi-bin/simple/noframes Undefined catalog: /cgi-bin/simple
192.168.11.12 - - [05/August/1999:14:21:16 +0200] - /cgi-bin/simple/frames Undefined catalog: /cgi-bin/simple
192.168.11.12 - - [05/August/1999:14:21:19 +0200] - /cgi-bin/simple/process/locale/en_US/page/index Undefined catalog: /cgi-bin/simple
- - - [05/August/1999:14:27:33 +0200] - - Added/changed catalog simple:
>
> Directory: /usr/local/catalogs/simple
> Script: /cgi-bin/simple
> Aliases: /simple
>
- - - [05/August/1999:14:27:33 +0200] - - Config 'simple' from running server (1024)
- - - [05/August/1999:14:27:37 +0200] - - Reconfig of simple successful, build=.
- - - [05/August/1999:14:27:58 +0200] - - STOP server (1024) on signal TERM
- - - [05/August/1999:14:28:27 +0200] - - MiniVend V3.14
- - - [05/August/1999:14:28:27 +0200] - - Config '_mv_admin' at server startup
- - - [05/August/1999:14:28:27 +0200] - - Config 'simple' at server startup
- - - [05/August/1999:14:28:29 +0200] - - START server (1221) (INET and UNIX)
- - - [05/August/1999:14:28:29 +0200] - - Accepting connections from localhost|127\.0\.0\.1
#### Catalog error.log (last 50 lines)
No entries.
#### DBM Status
Have GDBM_File.
Have DB_File.
