Re: OCI on Win

Tim (and anybody else that can point me in the right direction),
> Hint: I'm very unlikely to read that. Far better to include the
> text in the email (or attach it in a way that doesn't uuencode it).
Sorry about that. The Listing is fairly big and includes things I included
to deal with errors, identify things I wanted to modify and so on. The full
output of mod_boot is:

v-string in use/require non-portable at ./mod_boot line 3.

 Oracle home is reported to be :E:/Oracle/Ora81/

  OCI Include reported to be E:/Oracle/Ora81/oci/include/

A listing of the contents follows
Directory: /cygdrive/e/Oracle/Ora81/oci/include/
CDEMODP0.H
KUSAPI.H
KUSTAGS.H
NZERROR.H
NZT.H
OCI.H
OCI1.H
OCI8DP.H
OCIAP.H
OCIAPR.H
OCIDEF.H
OCIDEM.H
OCIDFN.H
OCIEXTP.H
OCIKP.H
OCIKPR.H
ODCI.H
ORATYPES.H
ORI.H
ORID.H
ORL.H
ORO.H
ORT.H
SX3.H
TNSAPI.H

Regex for h2xs ignores:
^OCI(?!AQ|AttrGet|Bind|Cache|Callback|CharSetConversionIsReplacementUsed|Cha
rSetToUnicode|CollIsLocator|Complex|Context|Date|D
irPath|EnvCallback|EnvCreate|Extract|File|Format|Interval|Iter|LobClose|LobC
reateTemporary|LobFreeTemporary|LobGetChunkSize|LobIsOpen|LobIsTemporary|L
obLocatorAssign|LobOpen|LobWriteAppend|Memory|Message|MultiByte|NlsGetInfo|N
umberDec|NumberInc|NumberIsInt|NumberPrec|NumberSetPi|NumberShift|NumberSi
gn|Object|Pickler|Raw|Ref|Reset|Security|SharedLibInit|StmtBindByName|StmtBi
ndByPos|StmtGetBindInfo|String|Subscription|Table|Terminate|Thread|Type|Ty
peArrayByName|TypeArrayByRef|UnicodeToCharSet|UserCallbackGet|UserCallbackRe
gister|WideChar|_FLAGS|_FNCODE_|_NLS_|_ORACLE|constant_OCI_LOB)|^SQL
Complete h2xs arguments: ./h2xs -d -O -n
Oracle::OCI -F -I/cygdrive/e/Oracle/Ora81/oci/include/ -I/cygdrive/e/Oracle/
Ora81/oci/include/ -E get_oci_err
or,get_oci_handle,oci_buf_len,OCIAttrGet -M
'^OCI(?!AQ|AttrGet|Bind|Cache|Callback|CharSetConversionIsReplacementUsed|Ch
arSetToUnicode|CollIsLocator|C
omplex|Context|Date|DirPath|EnvCallback|EnvCreate|Extract|File|Format|Interv
al|Iter|LobClose|LobCreateTemporary|LobFreeTemporary|LobGetChunkSize|LobIs
Open|LobIsTemporary|LobLocatorAssign|LobOpen|LobWriteAppend|Memory|Message|M
ultiByte|NlsGetInfo|NumberDec|NumberInc|NumberIsInt|NumberPrec|NumberSetPi
|NumberShift|NumberSign|Object|Pickler|Raw|Ref|Reset|Security|SharedLibInit|
StmtBindByName|StmtBindByPos|StmtGetBindInfo|String|Subscription|Table|Ter
minate|Thread|Type|TypeArrayByName|TypeArrayByRef|UnicodeToCharSet|UserCallb
ackGet|UserCallbackRegister|WideChar|_FLAGS|_FNCODE_|_NLS_|_ORACLE|constan
t_OCI_LOB)|^SQL' -k -x /cygdrive/e/Oracle/Ora81/OCI/INCLUDE/oci.h


Actual var sent to qx

./h2xs -d -O -n
Oracle::OCI -F -I/cygdrive/e/Oracle/Ora81/oci/include/ -I/cygdrive/e/Oracle/
Ora81/oci/include/ -E get_oci_error,get_oci_handle,oci_buf
_len,OCIAttrGet -M
'^OCI(?!AQ|AttrGet|Bind|Cache|Callback|CharSetConversionIsReplacementUsed|Ch
arSetToUnicode|CollIsLocator|Complex|Context|Date|DirPa
th|EnvCallback|EnvCreate|Extract|File|Format|Interval|Iter|LobClose|LobCreat
eTemporary|LobFreeTemporary|LobGetChunkSize|LobIsOpen|LobIsTemporary|LobLo
catorAssign|LobOpen|LobWriteAppend|Memory|Message|MultiByte|NlsGetInfo|Numbe
rDec|NumberInc|NumberIsInt|NumberPrec|NumberSetPi|NumberShift|NumberSign|O
bject|Pickler|Raw|Ref|Reset|Security|SharedLibInit|StmtBindByName|StmtBindBy
Pos|StmtGetBindInfo|String|Subscription|Table|Terminate|Thread|Type|TypeAr
rayByName|TypeArrayByRef|UnicodeToCharSet|UserCallbackGet|UserCallbackRegist
er|WideChar|_FLAGS|_FNCODE_|_NLS_|_ORACLE|constant_OCI_LOB)|^SQL' -k -x /c
ygdrive/e/Oracle/Ora81/OCI/INCLUDE/oci.h
Running h2xs...
Scanning typemaps...
 Scanning /usr/lib/perl5/5.8.0/ExtUtils/typemap
Scanning /cygdrive/e/Oracle/Ora81/OCI/INCLUDE/oci.h for functions...
Scanning /cygdrive/e/Oracle/Ora81/OCI/INCLUDE/oci.h for typedefs...
Writing Oracle/OCI/OCI.pm
Writing Oracle/OCI/OCI.xs
Writing Oracle/OCI/typemap
Writing Oracle/OCI/Makefile.PL
Writing Oracle/OCI/test.pl
Writing Oracle/OCI/Changes
Writing Oracle/OCI/MANIFEST
Editing OCI.xs...
Editing Makefile.PL...
Building...
Using DBI 1.32 installed in
/usr/lib/perl5/site_perl/5.8.0/cygwin-multi-64int/auto/DBI
Checking if your kit is complete...
Looks good
Writing Makefile for Oracle::OCI
cp OCI.pm blib/lib/Oracle/OCI.pm
AutoSplitting blib/lib/Oracle/OCI.pm (blib/lib/auto/Oracle/OCI)
/usr/bin/perl.exe /usr/lib/perl5/5.8.0/ExtUtils/xsubpp  -typemap
/usr/lib/perl5/5.8.0/ExtUtils/typemap -typemap h2xs.typemap -typemap typemap
OCI.xs
> OCI.xsc && mv OCI.xsc OCI.c
Please specify prototyping behavior for OCI.xs (see perlxs manual)
gcc -c  -I/cygdrive/e/Oracle/Ora81/oci/include/ -I/usr/lib/perl5/site_perl/5
.8.0/cygwin-multi-64int/auto/DBD/Oracle -I/usr/lib/perl5/site_perl/5.8.0/c
ygwin-multi-64int/auto/DBI -DPERL_USE_SAFE_PUTENV -fno-strict-aliasing -DUSE
IMPORTLIB -g   -DVERSION=\"0.01\" -DXS_VERSION=\"0.01\"  "-I/usr/lib/perl5
/5.8.0/cygwin-multi-64int/CORE"  -I/cygdrive/e/Oracle/Ora81/oci/include/
OCI.c
OCI.xs: In function `constant_OCI_LOB':
OCI.xs:1456: warning: decimal constant is so large that it is unsigned
extra.xsh: In function `XS_Oracle__OCI_get_oci_handle':
extra.xsh:23: warning: cast from pointer to integer of different size
extra.xsh: In function `XS_Oracle__OCI_oci_buf_len':
extra.xsh:51: warning: assignment from incompatible pointer type
extra.xsh:52: warning: assignment from incompatible pointer type
extra.xsh:53: warning: cast from pointer to integer of different size
gcc -c  -I/cygdrive/e/Oracle/Ora81/oci/include/ -I/usr/lib/perl5/site_perl/5
.8.0/cygwin-multi-64int/auto/DBD/Oracle -I/usr/lib/perl5/site_perl/5.8.0/c
ygwin-multi-64int/auto/DBI -DPERL_USE_SAFE_PUTENV -fno-strict-aliasing -DUSE
IMPORTLIB -g   -DVERSION=\"0.01\" -DXS_VERSION=\"0.01\"  "-I/usr/lib/perl5
/5.8.0/cygwin-multi-64int/CORE"  -I/cygdrive/e/Oracle/Ora81/oci/include/
utility.c
utility.c: In function `oci_buf_getmaxlen':
utility.c:45: warning: cast to pointer from integer of different size
utility.c: In function `oci_buf_setcurlen':
utility.c:55: warning: cast to pointer from integer of different size
Running Mkbootstrap for Oracle::OCI ()
chmod 644 OCI.bs
rm -f blib/arch/auto/Oracle/OCI/OCI.dll
LD_RUN_PATH="/usr/lib" ld2  -s -L/usr/local/lib OCI.o utility.o  -o
blib/arch/auto/Oracle/OCI/OCI.dll
/usr/lib/perl5/5.8.0/cygwin-multi-64int/CORE/li
bperl.dll.a -loci
gcc -shared -o

OCI.dll -Wl,--out-implib=libOCI.dll.a -Wl,--export-all-symbols -Wl,--enable-
auto-import -Wl,--stack,8388608 \
-s -L/usr/local/lib OCI.o utility.o
/usr/lib/perl5/5.8.0/cygwin-multi-64int/CORE/libperl.dll.a -loci
Creating library file: libOCI.dll.a
mv OCI.dll libOCI.dll.a blib/arch/auto/Oracle/OCI/
chmod 755 blib/arch/auto/Oracle/OCI/OCI.dll
cp OCI.bs blib/arch/auto/Oracle/OCI/OCI.bs
chmod 644 blib/arch/auto/Oracle/OCI/OCI.bs
Manifying blib/man3/Oracle.OCI.3pm
/usr/bin/perl.exe "-MExtUtils::Command::MM" "-e" "test_harness(0,
'blib/lib', 'blib/arch')" t/*.t
t/01base....Can't load
'/home/dave/ORA_OCI/Oracle-OCI/Oracle/OCI/blib/arch/auto/Oracle/OCI/OCI.dll'
for module Oracle::OCI: dlopen: Win32 error 127 at
 /usr/lib/perl5/5.8.0/cygwin-multi-64int/DynaLoader.pm line 229.
 at t/01base.t line 9
Compilation failed in require at t/01base.t line 9.
BEGIN failed--compilation aborted at t/01base.t line 9.
t/01base....dubious
        Test returned status 255 (wstat 65280, 0xff00)
t/05dbi.....Can't load
'/home/dave/ORA_OCI/Oracle-OCI/Oracle/OCI/blib/arch/auto/Oracle/OCI/OCI.dll'
for module Oracle::OCI: dlopen: Win32 error 127 at
 /usr/lib/perl5/5.8.0/cygwin-multi-64int/DynaLoader.pm line 229.
 at t/05dbi.t line 8
Compilation failed in require at t/05dbi.t line 8.
BEGIN failed--compilation aborted at t/05dbi.t line 8.
t/05dbi.....dubious
        Test returned status 255 (wstat 65280, 0xff00)
FAILED--2 test scripts could be run, alas--no output ever seen
make: *** [test_dynamic] Error 2


Thanks
David