Subject | RE: [firebird-support] Re: Firebird 2.1.3 64bits y UDF not found.invalid request BLR at offset 63. |
---|---|
Author | Santiago Richard |
Post date | 2010-07-21T20:36:46Z |
Hello everyone ....
Compile with the latest version of lazarus. with FPC.exe and the ppcx64.exe.
Lazarus My Configuration is as follows:
Compilation Options, on the lapel of code:
Desired = Win64 OS
Desired Family CPU = x86_64
The only thing that the Offset code change from 63 to 81.
Now the error is:
"Not found.invalid request BLR at offset 81.
DESENCRYPTERTEXT function is not defined.
EntryPoint module name or Could not be found. "
Not indicating the offset ...
This the the code of my dll:
library UDFx64;
//{$mode objfpc}{$H+}{$ifdef fpc}{$mode delphi}{$endif}uses Classes { you can add units after this };
{$IFDEF WINDOWS}{$R UDFx64.rc}{$ENDIF}
Function EncrypterText(PStr: PChar): PChar;stdcall;export;var iKey:Integer;sResult, sStrAux:String;begin sResult := ''; //asigno el PChar a un String porque el PChar empieza desde 0 sStrAux := PStr; for iKey:=1 to Length(sStrAux) do sResult:=Chr(Byte(sStrAux[iKey])+1)+sResult; Result := PChar(sResult);end;
Function DesEncrypterText(PStr: PChar): PChar;cdecl;export;var iKey:Integer;sResult,sStrAux:String;begin sResult := ''; //asigno el PChar a un String porque el PChar empieza desde 0 sStrAux := PStr; for iKey:=1 to Length(sStrAux) do sResult:=Chr(Byte(sStrAux[iKey])-1)+sResult; Result := PChar(sResult);end;
function Mensaje(PStr:PChar):PChar;begin Result := PStr;end;
exports EncrypterText, DesEncrypterText, Mensaje;beginend.
Someone could compile it in 64bit and see if it goes ...
Thanks to all ....
Regards
PD /: automatically translated by Google Translator
To: firebird-support@yahoogroups.com
From: ismael@...
Date: Tue, 20 Jul 2010 16:48:19 -0400
Subject: Re: [firebird-support] Re: Firebird 2.1.3 64bits y UDF not found.invalid request BLR at offset 63.
I believe that not he should get compiled with Lazarus. You should make it with Delphi or C++.
I repeat, I have understood.
Regards
=========
|| ISMAEL ||
=========
Compile with the latest version of lazarus. with FPC.exe and the ppcx64.exe.
Lazarus My Configuration is as follows:
Compilation Options, on the lapel of code:
Desired = Win64 OS
Desired Family CPU = x86_64
The only thing that the Offset code change from 63 to 81.
Now the error is:
"Not found.invalid request BLR at offset 81.
DESENCRYPTERTEXT function is not defined.
EntryPoint module name or Could not be found. "
Not indicating the offset ...
This the the code of my dll:
library UDFx64;
//{$mode objfpc}{$H+}{$ifdef fpc}{$mode delphi}{$endif}uses Classes { you can add units after this };
{$IFDEF WINDOWS}{$R UDFx64.rc}{$ENDIF}
Function EncrypterText(PStr: PChar): PChar;stdcall;export;var iKey:Integer;sResult, sStrAux:String;begin sResult := ''; //asigno el PChar a un String porque el PChar empieza desde 0 sStrAux := PStr; for iKey:=1 to Length(sStrAux) do sResult:=Chr(Byte(sStrAux[iKey])+1)+sResult; Result := PChar(sResult);end;
Function DesEncrypterText(PStr: PChar): PChar;cdecl;export;var iKey:Integer;sResult,sStrAux:String;begin sResult := ''; //asigno el PChar a un String porque el PChar empieza desde 0 sStrAux := PStr; for iKey:=1 to Length(sStrAux) do sResult:=Chr(Byte(sStrAux[iKey])-1)+sResult; Result := PChar(sResult);end;
function Mensaje(PStr:PChar):PChar;begin Result := PStr;end;
exports EncrypterText, DesEncrypterText, Mensaje;beginend.
Someone could compile it in 64bit and see if it goes ...
Thanks to all ....
Regards
PD /: automatically translated by Google Translator
To: firebird-support@yahoogroups.com
From: ismael@...
Date: Tue, 20 Jul 2010 16:48:19 -0400
Subject: Re: [firebird-support] Re: Firebird 2.1.3 64bits y UDF not found.invalid request BLR at offset 63.
I believe that not he should get compiled with Lazarus. You should make it with Delphi or C++.
I repeat, I have understood.
Regards
=========
|| ISMAEL ||
=========
----- Original Message -----
From: santiagorichardsierra
To: firebird-support@yahoogroups.com
Sent: Tuesday, July 20, 2010 2:52 PM
Subject: [firebird-support] Re: Firebird 2.1.3 64bits y UDF not found.invalid request BLR at offset 63.
Hello Everyone ...
Compile a UDF to 64bit with Lazarus and continue with the same problem ....
Any Idea ....
Saluda atte ...
PD /: automatically translated by Google Translator
--- In firebird-support@yahoogroups.com, Thomas Steinmaurer <ts@...> wrote:
>
> Hello,
>
> > I am working with firebird 2.1.3 64bits on 64bits WinSeven
> > and want access to a UDF and I get the following error:
> >
> > Not found.invalid request BLR at offset 63. is not defined.
> > EntryPoint module name or Could not be found.
>
> One reason might be that your UDF hasn't been compiled with a 64-bit
> compiler.
>
> > I tried the same UDF in InterBase 2007 SP2 and doing well ... (Also in WinSeven 64bit)
>
> InterBase 2007 is 32-bit only, so it won't have a problem with using a
> 32-bit UDF library.
>
>
>
> --
> Best Regards,
> Thomas Steinmaurer
> LogManager Series - Logging/Auditing Suites supporting
> InterBase, Firebird, Advantage Database, MS SQL Server and
> NexusDB V2
> Upscene Productions
> http://www.upscene.com
> My blog:
> http://blog.upscene.com/thomas/
>
>
> > I tried changing the path of the UDF but the same error ....
> >
> >
> > Someone could help me??
> >
> > Saluda Atte.
> >
> >
> > PD/:Automatic Translation by Google Translator
> >
> >
> >
> >
> > ------------------------------------
> >
> > ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
> >
> > Visit http://www.firebirdsql.org and click the Resources item
> > on the main (top) menu. Try Knowledgebase and FAQ links !
> >
> > Also search the knowledgebases at http://www.ibphoenix.com
> >
> > ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
> > Yahoo! Groups Links
> >
> >
> >
> >
> >
>
[Non-text portions of this message have been removed]
_________________________________________________________________
[Non-text portions of this message have been removed]