section('FUNCIONES')

  MODULE('dlFirmaSAT2.lib')

     SAT_Version(), PASCAL, NAME('SAT_Version'), LONG
     SAT_CompileTime(*CSTRING, LONG), LONG, RAW, PASCAL, NAME('SAT_CompileTime')
     SAT_ModuleName(*CSTRING, LONG, LONG), LONG, RAW, PASCAL, NAME('SAT_ModuleName')
     SAT_LicenceType(), LONG, RAW, PASCAL, NAME('SAT_LicenceType')
     SAT_PKIVersion(), LONG, RAW, PASCAL, NAME('SAT_PKIVersion')
     SAT_PKICompileTime(*CSTRING, LONG), LONG, RAW, PASCAL, NAME('SAT_PKICompileTime')
     SAT_PKIModuleName(*CSTRING, LONG, LONG), LONG, RAW, PASCAL, NAME('SAT_PKIModuleName')
     SAT_LastError(*CSTRING, LONG), LONG, RAW, PASCAL, NAME('SAT_LastError')
     SAT_ErrorLookup(*CSTRING, LONG, LONG), LONG, RAW, PASCAL, NAME('SAT_ErrorLookup')


     SAT_MakePipeStringFromXml(*CSTRING, LONG, CONST *CSTRING, LONG), LONG, RAW, PASCAL, NAME('SAT_MakePipeStringFromXml')
     SAT_MakeSignatureFromXml(*CSTRING, LONG, CONST *CSTRING, CONST *CSTRING, CONST *CSTRING), LONG, RAW, PASCAL, NAME('SAT_MakeSignatureFromXml')
     SAT_ValidateXml(CONST *CSTRING, LONG), LONG, RAW, PASCAL, NAME('SAT_ValidateXml')
     SAT_VerifySignature(CONST *CSTRING, CONST *CSTRING, LONG), LONG, RAW, PASCAL, NAME('SAT_VerifySignature')
     SAT_SignXml(CONST *CSTRING, CONST *CSTRING, CONST *CSTRING, CONST *CSTRING, CONST *CSTRING, LONG), LONG, RAW, PASCAL, NAME('SAT_SignXml')
     SAT_GetXmlAttribute(*CSTRING, LONG, CONST *CSTRING, CONST *CSTRING, CONST *CSTRING), LONG, RAW, PASCAL, NAME('SAT_GetXmlAttribute')
     SAT_MakeDigestFromXml(*CSTRING, LONG, CONST *CSTRING, LONG), LONG, RAW, PASCAL, NAME('SAT_MakeDigestFromXml')
     SAT_ExtractDigestFromSignature(*CSTRING, LONG, CONST *CSTRING, CONST *CSTRING, LONG), LONG, RAW, PASCAL, NAME('SAT_ExtractDigestFromSignature')
     SAT_GetCertNumber(*CSTRING, LONG, CONST *CSTRING, LONG), LONG, RAW, PASCAL, NAME('SAT_GetCertNumber')
     SAT_GetCertExpiry(*CSTRING, LONG, CONST *CSTRING, LONG), LONG, RAW, PASCAL, NAME('SAT_GetCertExpiry')
     SAT_GetCertAsString(*CSTRING, LONG, CONST *CSTRING, LONG), LONG, RAW, PASCAL, NAME('SAT_GetCertAsString')

  .                     

  section('EQUATES')

SAT_ENCODE_UTF8         EQUATE(0)
SAT_ENCODE_LATIN1       EQUATE(1)


   !** NOTES
   !   Functions than provide output to szOut (like SAT_MakePipeStringFromXml) REQUIRE TO BE CALLED 2 TIMES !
   !   The first time, the function returns the total length of the string tried to create
   !   in this first time, szOut muste be set to NULL and 0 for the length
   !
   !   nCar         long
   !   szOut        cstring
   !   p2Out        &cstring
   !
   !   code
   !
   !   p2Out &= NULL
   !
   !   nCar = SAT_MakePipeStringFromXml(p2Out, 0, nFile, 0)     !returns the lenght of string to be created first pass
   !   if nCar <= 0
   !      do someError
   !   else
   !      nCar = SAT_MakePipeStringFromXml(szOut, nCar, nFile, 0)       !** Now szOut contains the output string
   !   .
   !
   !   by M.C. Peter Ralph N. Tolentino
   !   www.webcompusoft.com