자유롭게 질의 및 응답을 할 수 있는 게시판입니다. 개발자 여러분의 답변이 큰 도움이 됩니다. 
  • 제품설치/등록 오류 문의: 설치/등록 Q&A 이용 (제품 구매 고객 한정)

본 게시판은 개발자들이 자유롭게 질문과 답변을 공유하는 게시판입니다.
* 따라서 최대한 정중하게 질문을 올려 주세요.
* 질문을 상세히 작성해 주실 수록 좋은 답변이 올라 옵니다.
* 다른 분들도 참고할 수 있도록 결과 댓글 필수(또는 감사 댓글)
(결과 댓글을 달지 않는 경우 다음 질문에 대한 답변이 달리지 않는 불이익이 있을 수 있습니다.)
-----------------------------------------------------------------------------------------------
암호화를 위해서 libsodium을 가지고 비공개키, 공개키를 만들고 암호화하는 작업을 해보고 있습니다.

다행히 델파이 버전이 있어서 windows에서는 그걸 이용해서 암호화하는 것을 성공했습니다만 모바일앱에도 같은 암호화 방법을 쓰려고 하니 기존의 dll이 windows만 지원하고 있어서 사용을 못하더군요.

그래서 고민을 하다가 java jni 버전을 가지고 와서 jar 파일을 만들고 java2op를 가지고 브릿지 파일(Android.JNI.libsodium.pas)까지 만들어서 작동을 시켜봤습니다. 물론 필요한 uses들을 넣었고요.

코드는 아래와 같습니다. 

그런데 신기하게도 SECRETKEY_BYTES값은 받아오는데 randombytes와 같은 함수는 invoke error: method not found를 계속해서 뱉어내는데 해결을 못하고 있습니다. classes.dex 문제인듯 하기도 하고.... 진전이 없습니다.

제가 델파이 초보라 아는게 이 정도인데 도움 부탁 좀 드려도 될까요?

뭐가 잘 못된걸까요?

 

-- 아래 --

 

unit android_sodium;

 

interface

 

uses

  System.SysUtils, System.Types, System.UITypes, System.Classes, System.Variants,

  FMX.Types, FMX.Controls, FMX.Forms, FMX.Graphics, FMX.Dialogs, FMX.Objects,

  Android.JNI.libsodium, Androidapi.Helpers, Androidapi.JNIBridge,

  Androidapi.JNI.JavaTypes, Androidapi.JNI.provider, FMX.helpers.Android,

  FMX.Controls.Presentation, FMX.StdCtrls;

 

type

  TForm1 = class(TForm)

    Button1: TButton;

    Text1: TText;

    Text2: TText;

    procedure Button1Click(Sender: TObject);

  private

    { Private declarations }

  public

    { Public declarations }

  end;

 

var

  Form1: TForm1;

 

implementation

 

{$R *.fmx}

 

 

procedure TForm1.Button1Click(Sender: TObject);

var

  sk: TJavaArray<byte>;

  SecByte: integer;

  Sodium : JSodium;

 

begin

//  TJSodium.JavaClass.init;

  SecByte := TJSodiumConstants.JavaClass.SECRETKEY_BYTES;

  Text1.Text := IntToStr(SecByte);

  sk := TJavaArray<byte>.Create(SecByte*2);

  Text2.Text := sk.Items[0].ToString;

 

// Test End

 

// Testing

  TJSodium.JavaClass.randombytes(sk, SecByte*2);

 

 

end;

 

end.