[Date Prev][Date Next][Thread Prev][Thread Next][Minivend by date
][Minivend by thread
]
[mv] Problem report
****** message to minivend-users from root <root@gandalf.neo.se> ******
#### Description of problem
#### Perl version
Summary of my perl5 (5.0 patchlevel 5 subversion 3) configuration:
Platform:
osname=linux, osvers=2.2.5-22smp, archname=i386-linux
uname='linux porky.devel.redhat.com 2.2.5-22smp #1 smp wed jun 2 09:11:51 edt 1999 i686 unknown '
hint=recommended, useposix=true, d_sigaction=define
usethreads=undef useperlio=undef d_sfio=undef
Compiler:
cc='cc', optimize='-O2', gccversion=egcs-2.91.66 19990314/Linux (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=undef, 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 -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 Aug 30 1999 23:09:51
@INC:
/usr/lib/perl5/5.00503/i386-linux
/usr/lib/perl5/5.00503
/usr/lib/perl5/site_perl/5.005/i386-linux
/usr/lib/perl5/site_perl/5.005
.
#### OS version
Linux gandalf.neo.se 2.2.12-20 #1 Mon Sep 27 10:25:54 EDT 1999 i586 unknown
#### Main server config
Catalog simple /home/minivend/mvend/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 gandalf.neo.se
> Variable CGI_URL /cgi-bin/simple
> Variable SECURE_SERVER http://gandalf.neo.se
> Variable ORDERS_TO minivend
> Variable IMAGE_DIR /simple/images
> Variable DOCROOT /home/httpd/html
> Variable SAMPLEHTML /home/httpd/html/simple
> Variable SAMPLEURL http://gandalf.neo.se/simple
>
> Variable COMPANY The Art Store
> Variable ADDRESS 123 Any St.
> Variable CITY Anytown, USA 00000
> Variable PHONE (555) 555-5555
> 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
1002c1002
< Password __MVC_SUPASSWD__
---
> Password sWbRjRhdHtEec
1113c1113
< RemoteUser __MVC_SUPERUSER__
---
> RemoteUser minivend
#### Main MiniVend error.log (last 50 lines)
- - - [29/December/1999:12:53:52 +0100] - - MiniVend V3.14-4
- - - [29/December/1999:12:53:52 +0100] - - Config '_mv_admin' at server startup
- - - [29/December/1999:12:53:53 +0100] - - Config 'simple' at server startup
- - - [29/December/1999:12:53:55 +0100] - - START server (13209) (INET and UNIX)
- - - [29/December/1999:12:53:55 +0100] - - Accepting connections from localhost|127\.0\.0\.1
#### Catalog error.log (last 50 lines)
No entries.
#### DBM Status
Have GDBM_File.
Have DB_File.
-
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
