'bug report': usage: escape_filename <filename-to-escape>

Timothee Besset <[email protected]> Mon, 15 Dec 2003 13:50:04 +0100
Newsgroups gmane.comp.version-control.revml
Message-ID <[email protected]>
Is the source in perforce public repository supposed to fully work?

I've been playing around with VCP functionality and the code errors out
quite easily. I gathered this one for instance:

$ rm out.revml ; rm vcp.log ; perl -I`pwd`/lib bin/vcp cvs:Quake2/null revml:out.revml
vcp: running cvs log Quake2/null
 
***BUG REPORT***
usage: escape_filename <filename-to-escape>
Please see vcp.log

Attached the vcp.log

I am running perl from debian sid package, all the perl modules are the
latest as in CPAN.

TTimo
vcp.log (application/octet-stream, 12.1 KB)
###############################################################################
0.002227 vcp: started Mon Dec 15 13:44:57 2003 (Mon Dec 15 12:44:57 2003 GMT)
0.128525 vcp: vcp cvs:Quake2/null revml:out.revml
0.146269 vcp: loaded 'VCP::Source::cvs' from '/home/timo/Build/perforce/public/revml/lib/VCP/Source/cvs.pm'
0.146664 vcp: VCP::Source::cvs work_root set to '/home/timo/Build/perforce/public/revml/tmp/vcp10051/source-cvs'
0.146833 vcp: VCP::Source::cvs command_chdir set to '/home/timo/Build/perforce/public/revml/tmp/vcp10051/source-cvs'
0.196365 vcp: loaded 'VCP::Dest::revml' from '/home/timo/Build/perforce/public/revml/lib/VCP/Dest/revml.pm'
0.196692 vcp: VCP::Dest::revml work_root set to '/home/timo/Build/perforce/public/revml/tmp/vcp10051/dest-revml'
0.196849 vcp: VCP::Dest::revml command_chdir set to '/home/timo/Build/perforce/public/revml/tmp/vcp10051/dest-revml'
0.197709 vcp: VCP::Source::cvs rev_root set to 'Quake2'
0.198017 vcp: $ mkdir --mode=0770 /home/timo/Build/perforce/public/revml/tmp/vcp10051/source-cvs
0.198432 vcp: $ chdir /home/timo/Build/perforce/public/revml/tmp/vcp10051/source-cvs
0.198530 vcp: $ cvs -Q -z9 --version
0.203440 vcp: VCP::Source::cvs command_chdir set to '/home/timo/Build/perforce/public/revml/tmp/vcp10051/source-cvs/co'
0.203866 vcp: $ mkdir --mode=0770 /home/timo/Build/perforce/public/revml/tmp/vcp10051/source-cvs/co
0.204177 vcp: $ chdir /home/timo/Build/perforce/public/revml/tmp/vcp10051/source-cvs/co
0.204275 vcp: $ cvs -Q -z9 checkout Quake2/null
1.477992 vcp: VCP::Source::cvs work_root set to '/home/timo/Build/perforce/public/revml/tmp/vcp10051/source-cvs/co'
1.485878 vcp: revml file name is /home/timo/Build/perforce/public/revml/out.revml
1.491494 vcp: plugin 0 is VCP::Source::cvs
1.491540 vcp: plugin 1 is VCP::Dest::revml
1.491687 vcp: Plugins: VCP::Source::cvs, VCP::Dest::revml
1.492400 vcp: running cvs log Quake2/null
1.492822 vcp: $ cvs -Q -z9 log Quake2/null
***BUG REPORT***
usage: escape_filename <filename-to-escape>

%INC:
    /usr/lib/perl/5.8.2/auto/POSIX/autosplit.ix => '/usr/lib/perl/5.8.2/auto/POSIX/autosplit.ix'
    /usr/lib/perl/5.8.2/auto/POSIX/load_imports.al => '/usr/lib/perl/5.8.2/auto/POSIX/load_imports.al'
    Algorithm/Diff.pm => '/usr/local/share/perl/5.8.2/Algorithm/Diff.pm'
    AutoLoader.pm => '/usr/share/perl/5.8.2/AutoLoader.pm'
    Carp.pm => '/usr/share/perl/5.8.2/Carp.pm'
    Config.pm => '/usr/lib/perl/5.8.2/Config.pm'
    Cwd.pm => '/usr/lib/perl/5.8.2/Cwd.pm'
    Digest/MD5.pm => '/usr/lib/perl/5.8.2/Digest/MD5.pm'
    Digest/base.pm => '/usr/share/perl/5.8.2/Digest/base.pm'
    DynaLoader.pm => '/usr/lib/perl/5.8.2/DynaLoader.pm'
    Errno.pm => '/usr/lib/perl/5.8.2/Errno.pm'
    Exporter.pm => '/usr/share/perl/5.8.2/Exporter.pm'
    Exporter/Heavy.pm => '/usr/share/perl/5.8.2/Exporter/Heavy.pm'
    Fcntl.pm => '/usr/lib/perl/5.8.2/Fcntl.pm'
    File/Basename.pm => '/usr/share/perl/5.8.2/File/Basename.pm'
    File/Glob.pm => '/usr/lib/perl/5.8.2/File/Glob.pm'
    File/Path.pm => '/usr/share/perl/5.8.2/File/Path.pm'
    File/Spec.pm => '/usr/share/perl/5.8.2/File/Spec.pm'
    File/Spec/Unix.pm => '/usr/share/perl/5.8.2/File/Spec/Unix.pm'
    File/Temp.pm => '/usr/share/perl/5.8.2/File/Temp.pm'
    Getopt/Long.pm => '/usr/share/perl/5.8.2/Getopt/Long.pm'
    IO.pm => '/usr/lib/perl/5.8.2/IO.pm'
    IO/Handle.pm => '/usr/lib/perl/5.8.2/IO/Handle.pm'
    MIME/Base64.pm => '/usr/lib/perl/5.8.2/MIME/Base64.pm'
    POSIX.pm => '/usr/lib/perl/5.8.2/POSIX.pm'
    Regexp/Shellish.pm => '/usr/local/share/perl/5.8.2/Regexp/Shellish.pm'
    RevML/Doctype.pm => '/home/timo/Build/perforce/public/revml/lib/RevML/Doctype.pm'
    RevML/Doctype/v0_35.pm => '/home/timo/Build/perforce/public/revml/lib/RevML/Doctype/v0_35.pm'
    RevML/Writer.pm => '/home/timo/Build/perforce/public/revml/lib/RevML/Writer.pm'
    SDBM_File.pm => '/usr/lib/perl/5.8.2/SDBM_File.pm'
    SelectSaver.pm => '/usr/share/perl/5.8.2/SelectSaver.pm'
    Symbol.pm => '/usr/share/perl/5.8.2/Symbol.pm'
    Text/Diff.pm => '/usr/local/share/perl/5.8.2/Text/Diff.pm'
    Tie/Hash.pm => '/usr/share/perl/5.8.2/Tie/Hash.pm'
    Time/HiRes.pm => '/usr/lib/perl/5.8.2/Time/HiRes.pm'
    Time/Local.pm => '/usr/share/perl/5.8.2/Time/Local.pm'
    UNIVERSAL.pm => '/usr/share/perl/5.8.2/UNIVERSAL.pm'
    VCP.pm => '/home/timo/Build/perforce/public/revml/lib/VCP.pm'
    VCP/ConfigFileUtils.pm => '/home/timo/Build/perforce/public/revml/lib/VCP/ConfigFileUtils.pm'
    VCP/DB.pm => '/home/timo/Build/perforce/public/revml/lib/VCP/DB.pm'
    VCP/DB_File.pm => '/home/timo/Build/perforce/public/revml/lib/VCP/DB_File.pm'
    VCP/DB_File/big_records.pm => '/home/timo/Build/perforce/public/revml/lib/VCP/DB_File/big_records.pm'
    VCP/DB_File/sdbm.pm => '/home/timo/Build/perforce/public/revml/lib/VCP/DB_File/sdbm.pm'
    VCP/Debug.pm => '/home/timo/Build/perforce/public/revml/lib/VCP/Debug.pm'
    VCP/Dest.pm => '/home/timo/Build/perforce/public/revml/lib/VCP/Dest.pm'
    VCP/Dest/revml.pm => '/home/timo/Build/perforce/public/revml/lib/VCP/Dest/revml.pm'
    VCP/Driver.pm => '/home/timo/Build/perforce/public/revml/lib/VCP/Driver.pm'
    VCP/HeadRevsDB.pm => '/home/timo/Build/perforce/public/revml/lib/VCP/HeadRevsDB.pm'
    VCP/Logger.pm => '/home/timo/Build/perforce/public/revml/lib/VCP/Logger.pm'
    VCP/Plugin.pm => '/home/timo/Build/perforce/public/revml/lib/VCP/Plugin.pm'
    VCP/Rev.pm => '/home/timo/Build/perforce/public/revml/lib/VCP/Rev.pm'
    VCP/Revs.pm => '/home/timo/Build/perforce/public/revml/lib/VCP/Revs.pm'
    VCP/Source.pm => '/home/timo/Build/perforce/public/revml/lib/VCP/Source.pm'
    VCP/Source/cvs.pm => '/home/timo/Build/perforce/public/revml/lib/VCP/Source/cvs.pm'
    VCP/Utils.pm => '/home/timo/Build/perforce/public/revml/lib/VCP/Utils.pm'
    VCP/Utils/cvs.pm => '/home/timo/Build/perforce/public/revml/lib/VCP/Utils/cvs.pm'
    VCP/Utils/revml.pm => '/home/timo/Build/perforce/public/revml/lib/VCP/Utils/revml.pm'
    XML/AutoWriter.pm => '/usr/local/share/perl/5.8.2/XML/AutoWriter.pm'
    XML/Doctype.pm => '/usr/local/share/perl/5.8.2/XML/Doctype.pm'
    XML/Doctype/AttDef.pm => '/usr/local/share/perl/5.8.2/XML/Doctype/AttDef.pm'
    XML/Doctype/ElementDecl.pm => '/usr/local/share/perl/5.8.2/XML/Doctype/ElementDecl.pm'
    XML/ValidWriter.pm => '/usr/local/share/perl/5.8.2/XML/ValidWriter.pm'
    XSLoader.pm => '/usr/lib/perl/5.8.2/XSLoader.pm'
    base.pm => '/usr/share/perl/5.8.2/base.pm'
    constant.pm => '/usr/share/perl/5.8.2/constant.pm'
    fields.pm => '/usr/share/perl/5.8.2/fields.pm'
    integer.pm => '/usr/share/perl/5.8.2/integer.pm'
    overload.pm => '/usr/share/perl/5.8.2/overload.pm'
    re.pm => '/usr/lib/perl/5.8.2/re.pm'
    strict.pm => '/usr/share/perl/5.8.2/strict.pm'
    vars.pm => '/usr/share/perl/5.8.2/vars.pm'
    warnings.pm => '/usr/share/perl/5.8.2/warnings.pm'
    warnings/register.pm => '/usr/share/perl/5.8.2/warnings/register.pm'

stack trace at /home/timo/Build/perforce/public/revml/lib/VCP/Logger.pm line 383
	eval {...} called at /home/timo/Build/perforce/public/revml/lib/VCP/Logger.pm line 383
	VCP::Logger::BUG('usage: escape_filename <filename-to-escape>') called at /home/timo/Build/perforce/public/revml/lib/VCP/Utils.pm line 106
	VCP::Utils::escape_filename('undef') called at /home/timo/Build/perforce/public/revml/lib/VCP/Driver.pm line 1021
	VCP::Driver::_db_store_location('VCP::Source::cvs=HASH(0x8561ea8)') called at /home/timo/Build/perforce/public/revml/lib/VCP/Driver.pm line 151
	VCP::Driver::revs('VCP::Source::cvs=HASH(0x8561ea8)') called at /home/timo/Build/perforce/public/revml/lib/VCP/Source.pm line 257
	VCP::Source::queue_rev('VCP::Source::cvs=HASH(0x8561ea8)','VCP::Rev=HASH(0x869b478)') called at /home/timo/Build/perforce/public/revml/lib/VCP/Source/cvs.pm line 1858
	VCP::Source::cvs::_create_rev('VCP::Source::cvs=HASH(0x8561ea8)','HASH(0x86b040c)','HASH(0x84b5b80)') called at /home/timo/Build/perforce/public/revml/lib/VCP/Source/cvs.pm line 767
	VCP::Source::cvs::queue_parsed_revs('VCP::Source::cvs=HASH(0x8561ea8)','HASH(0x86b040c)') called at /home/timo/Build/perforce/public/revml/lib/VCP/Source/cvs.pm line 1661
	VCP::Source::cvs::parse_cvs_log_output('VCP::Source::cvs=HASH(0x8561ea8)','GLOB(0x84a44cc)') called at /home/timo/Build/perforce/public/revml/lib/VCP/Source/cvs.pm line 635
	VCP::Source::cvs::__ANON__('GLOB(0x84a44cc)') called at /home/timo/Build/perforce/public/revml/lib/VCP/Driver.pm line 1202
	VCP::Driver::_run3('ARRAY(0x86b0310)','SCALAR(0x815d6e4)','CODE(0x86afe64)','SCALAR(0x867b3b0)') called at /home/timo/Build/perforce/public/revml/lib/VCP/Driver.pm line 1270
	VCP::Driver::run_safely('VCP::Source::cvs=HASH(0x8561ea8)','ARRAY(0x86b0310)','undef','CODE(0x86afe64)') called at /home/timo/Build/perforce/public/revml/lib/VCP/Utils/cvs.pm line 65
	VCP::Utils::cvs::cvs('VCP::Source::cvs=HASH(0x8561ea8)','ARRAY(0x8513a10)','undef','CODE(0x86afe64)','HASH(0x86aff9c)') called at /home/timo/Build/perforce/public/revml/lib/VCP/Source/cvs.pm line 646
	VCP::Source::cvs::get_revs_from_log_file('VCP::Source::cvs=HASH(0x8561ea8)') called at /home/timo/Build/perforce/public/revml/lib/VCP/Source/cvs.pm line 1477
	VCP::Source::cvs::copy_revs('VCP::Source::cvs=HASH(0x8561ea8)') called at /home/timo/Build/perforce/public/revml/lib/VCP.pm line 125
	eval {...} called at /home/timo/Build/perforce/public/revml/lib/VCP.pm line 123
	VCP::copy_all('VCP=HASH(0x8666354)','HASH(0x86ae664)','HASH(0x86ae6c4)') called at bin/vcp line 567
	eval {...} called at bin/vcp line 572
Summary of my perl5 (revision 5.0 version 8 subversion 2) configuration:
  Platform:
    osname=linux, osvers=2.4.22-xfs+ti1211, archname=i386-linux-thread-multi
    uname='linux kosh 2.4.22-xfs+ti1211 #1 sat oct 25 10:11:37 est 2003 i686 gnulinux '
    config_args='-Dusethreads -Duselargefiles -Dccflags=-DDEBIAN -Dcccdlflags=-fPIC -Darchname=i386-linux -Dprefix=/usr -Dprivlib=/usr/share/perl/5.8.2 -Darchlib=/usr/lib/perl/5.8.2 -Dvendorprefix=/usr -Dvendorlib=/usr/share/perl5 -Dvendorarch=/usr/lib/perl5 -Dsiteprefix=/usr/local -Dsitelib=/usr/local/share/perl/5.8.2 -Dsitearch=/usr/local/lib/perl/5.8.2 -Dman1dir=/usr/share/man/man1 -Dman3dir=/usr/share/man/man3 -Dsiteman1dir=/usr/local/man/man1 -Dsiteman3dir=/usr/local/man/man3 -Dman1ext=1 -Dman3ext=3perl -Dpager=/usr/bin/sensible-pager -Uafs -Ud_csh -Uusesfio -Uusenm -Duseshrplib -Dlibperl=libperl.so.5.8.2 -Dd_dosuid -des'
    hint=recommended, useposix=true, d_sigaction=define
    usethreads=define use5005threads=undef useithreads=define usemultiplicity=define
    useperlio=define d_sfio=undef uselargefiles=define usesocks=undef
    use64bitint=undef use64bitall=undef uselongdouble=undef
    usemymalloc=n, bincompat5005=undef
  Compiler:
    cc='cc', ccflags ='-D_REENTRANT -D_GNU_SOURCE -DTHREADS_HAVE_PIDS -DDEBIAN -fno-strict-aliasing -I/usr/local/include -D_LARGEFILE_SOURCE -D_FILE_OFFSET_BITS=64',
    optimize='-O3',
    cppflags='-D_REENTRANT -D_GNU_SOURCE -DTHREADS_HAVE_PIDS -DDEBIAN -fno-strict-aliasing -I/usr/local/include'
    ccversion='', gccversion='3.3.2 (Debian)', gccosandvers=''
    intsize=4, longsize=4, ptrsize=4, doublesize=8, byteorder=1234
    d_longlong=define, longlongsize=8, d_longdbl=define, longdblsize=12
    ivtype='long', ivsize=4, nvtype='double', nvsize=8, Off_t='off_t', lseeksize=8
    alignbytes=4, prototype=define
  Linker and Libraries:
    ld='cc', ldflags =' -L/usr/local/lib'
    libpth=/usr/local/lib /lib /usr/lib
    libs=-lgdbm -lgdbm_compat -ldb -ldl -lm -lpthread -lc -lcrypt
    perllibs=-ldl -lm -lpthread -lc -lcrypt
    libc=/lib/libc-2.3.2.so, so=so, useshrplib=true, libperl=libperl.so.5.8.2
    gnulibc_version='2.3.2'
  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): 
  Compile-time options: MULTIPLICITY USE_ITHREADS USE_LARGE_FILES PERL_IMPLICIT_CONTEXT
  Built under linux
  Compiled at Nov 15 2003 17:52:08
  @INC:
    /etc/perl
    /usr/local/lib/perl/5.8.2
    /usr/local/share/perl/5.8.2
    /usr/lib/perl5
    /usr/share/perl5
    /usr/lib/perl/5.8.2
    /usr/share/perl/5.8.2
    /usr/local/lib/site_perl
    /usr/local/lib/perl/5.8.0
    /usr/local/share/perl/5.8.0
    .
1.968678 vcp: $ rm -rf /home/timo/Build/perforce/public/revml/tmp/vcp10051/source-cvs/co
1.971641 vcp: source_filebranch_id: 1
1.971726 vcp: ended