ACBrAbecsPinPad no Linux

[eliandro.may]

Boa tarde.

Estou tentando testar o ACBrAbecsPinPad no Linux, mas, sempre que tento abrir a porta serial, retorna o erro "Communication error 9990: Unknown Error (9990)"

Alguém já usou este componente no Linux?

[datilas]

se eu não me engano, no linux tem que usar as portas "tty"

usando virtual box com centos 9 eu ativei com a porta "/dev/ttyACM0" mas isso foi no meu caso,

provavelmente vc vai precisar de permissão para acessar essa porta

[eliandro.may]

Obrigado pela resposta.

Você conseguiu utilizar o ACBrAbecsPinPad no Linux então?

Eu tenho ele conectado, ele cria o device "/dev/ttyACM0", inclusive alterei as regras do Linux para criar o device com permissão 666.

Em outras aplicações consigo comunicar certinho com o Pinpad. Só no meu teste com o ACBrAbecsPinPad que não vai.

Testei com a aplicação de exemplo que vem junto com o ACBR, e também deu este erro.

O único detalhe é que estou usando o Lazarus com compilador cross para gerar os binários no Windows e rodar no linux, todo o restante está funcionando, somente o ACBrAbecsPinPad  que me retorna este erro.

[datilas]

tenta com permissão 777 eu consegui com 777.

[datilas]

vc pode tentar isso:

 

[datilas]

acabei de testar com linux mint 21.3 e virtual box.

usando lazarus no windows com cross compile para linux

aqui funcionou. "no meu pc funciona. kkkkkkk"(desculpa a piadinha de programador)

 

Editado 9 Setembro, 2025 por datilas

[eliandro.may]

Opa, maravilha, pelo menos eu sei que funciona.

Estava seguindo os fontes aqui, e ele acaba indo chamar as funções de serial na synaser.pas, e nela ele tenta  se referenciar ao device /dev/ttyS + o número da porta.

Como meus fontes estão atualizados, deve ser algum DEFINA que eu tenho errado.

Vou olhar mais. 

 

[eliandro.may]

15 horas atrás, datilas disse:

acabei de testar com linux mint 21.3 e virtual box.

usando lazarus no windows com cross compile para linux

aqui funcionou. "no meu pc funciona. kkkkkkk"(desculpa a piadinha de programador)

 

Bom dia.

Obrigado @datilas, tentei bastante coisas aqui, e ainda nada.

Você compilou para x86_64?

Passou alguma definição em "Custom Options"?

[datilas]

10 minutos atrás, eliandro.may disse:

Bom dia.

Obrigado @datilas, tentei bastante coisas aqui, e ainda nada.

Você compilou para x86_64?

Passou alguma definição em "Custom Options"?

nada em custom options

[eliandro.may]

Solução.

Verifiquei aqui que o problema ocorria no lock feito no Linux no componente de terceiro chamado synser.pas.

Para corrigir o erro, mudei a linha 825 FLinuxLock := False; para FLinuxLock := True; do constructor TBlockSerial.Create;

Ficando assim

constructor TBlockSerial.Create;
begin
  inherited create;
  FRaiseExcept := false;
  FHandle := INVALID_HANDLE_VALUE;
  FDevice := '';
  FComNr:= PortIsClosed;               {HGJ}
  FInstanceActive:= false;             {HGJ}
  Fbuffer := '';
  FRTSToggle := False;
  FMaxLineLength := 0;
  FTestDSR := False;
  FTestCTS := False;
  FDeadlockTimeout := 30000;
  FLinuxLock := True;
  FMaxSendBandwidth := 0;
  FNextSend := 0;
  FMaxRecvBandwidth := 0;
  FNextRecv := 0;
  FConvertLineEnd := False;
  SetSynaError(sOK);
  FRecvBuffer := 4096;
  FLastCR := False;
  FLastLF := False;
  FAtTimeout := 1000;
  FInterPacketTimeout := True;
end;

 

[Juliomar Marchetti]

Em 09/12/2025 at 11:45, eliandro.may disse:

Solução.

Verifiquei aqui que o problema ocorria no lock feito no Linux no componente de terceiro chamado synser.pas.

Para corrigir o erro, mudei a linha 825 FLinuxLock := False; para FLinuxLock := True; do constructor TBlockSerial.Create;

Ficando assim

constructor TBlockSerial.Create;
begin
  inherited create;
  FRaiseExcept := false;
  FHandle := INVALID_HANDLE_VALUE;
  FDevice := '';
  FComNr:= PortIsClosed;               {HGJ}
  FInstanceActive:= false;             {HGJ}
  Fbuffer := '';
  FRTSToggle := False;
  FMaxLineLength := 0;
  FTestDSR := False;
  FTestCTS := False;
  FDeadlockTimeout := 30000;
  FLinuxLock := True;
  FMaxSendBandwidth := 0;
  FNextSend := 0;
  FMaxRecvBandwidth := 0;
  FNextRecv := 0;
  FConvertLineEnd := False;
  SetSynaError(sOK);
  FRecvBuffer := 4096;
  FLastCR := False;
  FLastLF := False;
  FAtTimeout := 1000;
  FInterPacketTimeout := True;
end;

 

é a biblioteca synapse feita em freepascal. entra no projeto lá deles e sugere a correção

[eliandro.may]

Em 10/12/2025 at 13:17, Juliomar Marchetti disse:

é a biblioteca synapse feita em freepascal. entra no projeto lá deles e sugere a correção

Bom dia.

Certo, vou fazer isto.

1 minuto atrás, eliandro.may disse:

Bom dia.

Certo, vou fazer isto.

Na verdade, acessei lá o git deles, no endereço https://github.com/geby/synapse/blob/master/synaser.pas, e já estava alterado.

Muito obrigado!