On Sat, 24 Jul 2004, Guto wrote:
> I tried with both, but I get the same error...
Nevertheless, the library can be loaded and used without problems by
an FPC program, I tested this:
program testee;
function intmax (A,B : integer): integer; stdcall; external 'libteste' name
'intmax';
begin
Writeln('Intmax 1,2 : ',intmax(1,2));
end.
And it correctly prints 2.
So the error must be in Firebird somewhere.
- I am confused about the changing of owner and permissions. Have you tried
changing it to root, with permissions 755 ?
- About calling conventions:
Firebird will definitely expect 'cdecl' on Linux, but 'stdcall' on Windows.
A warning: 'integer' in standard FPC mode is 2 bytes, not 4, which is what
Firebird expects. I suggest you add a {$mode objfpc} at the start of your
code, which will make integer 4 bytes.
> > > mv libteste.so /usr/local/firebird/UDF/
> > >
> > > I changed permissions:
> > > cd /usr/local/firebird/UDF
> > > chown firebird:firebird libteste.so
> > > chmod 550 libteste.so
> > >
> > > I declared UDF:
> > >
This is the mistake you made:
DECLARE EXTERNAL FUNCTION INTMAX
INTEGER,
INTEGER
RETURNS INTEGER BY VALUE
ENTRY_POINT 'intmax' MODULE_NAME 'libteste';
You must explicitly add the 'lib'; firebird does not add it itself. Look at
the standard libraries, they also miss the 'lib' prefix.
if you change it to the above, (with calling convention cdecl) it works correctly.
Michael.
> > >
> > > I test it:
> > > select intmax(1,2) from rdb$database;
> > >
> > > And I got this error message:
> > > Invalid token.
> > > invalid request BLR at offset 60.
> > > function INTMAX is not defined.
> > > module name or entrypoint could not be found.
> > >
> > > Does anyone have any ideas?
> > >
> >
> > Are you 100% sure it doesn't have to be cdecl; instead of stdcall on *nix?
> >
> > _______________________________________________
> > fpc-pascal maillist - [EMAIL PROTECTED]
> > http://lists.freepascal.org/mailman/listinfo/fpc-pascal
> >
>
>
> --
> Guto
>
> _______________________________________________
> fpc-pascal maillist - [EMAIL PROTECTED]
> http://lists.freepascal.org/mailman/listinfo/fpc-pascal
>
_______________________________________________
fpc-pascal maillist - [EMAIL PROTECTED]
http://lists.freepascal.org/mailman/listinfo/fpc-pascal
