FiveTech Support Forums

import java.security.MessageDigest;
import javax.xml.bind.DatatypeConverter;
public String algoritmoHash(byte[] pArchivo, String algorithm) {
String hashValue = "";
try {
MessageDigest messageDigest = MessageDigest.getInstance(algorithm);
       messageDigest.update(pArchivo);
       byte[] digestedBytes = messageDigest.digest();
hashValue = DatatypeConverter.printHexBinary(digestedBytes).toLowerCase();
}
catch (Exception e) {
System.out.println("Error generando Hash");
}
return hashValue;
}

public String obtenerSHA2(byte[] archivo) {
String vSha2 = algoritmoHash(archivo,"SHA-256");
       return vSha2;
}

// Harbour proporciona la función HB_SHA256( cText ) --> nHash

#Include "FiveWin.ch"

FUNCTION Main()

   // Ejemplo:
   ? hb_CStr( hb_SHA256( 'Probando CheckSum de este Texto', nil ) )

RETURN NIL