support: Customer Portal
Focused on delivering choice, investment protection and flexibility to organizations with valuable COBOL assets
 

isCOBOL Knowledge Base
Home > All Categories > isCOBOL General > Where can I find more information on A$ENCRYPT and A$DECRYPT?
Question Title Where can I find more information on A$ENCRYPT and A$DECRYPT?

Question:

Where can I find more information on A$ENCRYPT and A$DECRYPT? I am getting errors involving 'padding' and 'multiple of 8 bytes' when I use these routines.

Answer:

The size of the key passed to A$ENCRYPT or A$DECRYPT must be less than or equal to 128-bits (i.e. 16 bytes). For example, use the following data item for your encryption key:
  77  encryption-key        pic x(16).
When A$ENCRYPT returns, the length of the encrypted-data is set to an exact value, and in A$DECRYPT the length of data-to-decrypt must be exact. Use items defined as PIC X ANY LENGTH to ensure that you can retrieve and set the lengths precisely. For example, use the following data items for your encrypted-data and data-to-decrypt:
  77  encrypted-data        pic x any length. 
  77  data-to-decrypt       pic x any length.

Then, for example, you can take the output from A$ENCRYPT (i.e. encrypted-data) and pass it as the input to A$DECRYPT (i.e. data-to-decrypt) to reverse the encryption.

See the attached sample program, encryption.cbl

Note that the encrypted data is binary and is not an encoded character string.

The A$ENCRYPT routine does the equivalent of the following Java code:
  public final static String CRYPT_ALGORITHM = "Blowfish";
  Cipher cipher = Cipher.getInstance(CRYPT_ALGORITHM);
  cipher.init(Cipher.ENCRYPT_MODE, new SecretKeySpec(encryptionKey, 0, encryptionKey.length, CRYPT_ALGORITHM));
  byte[] encryptedData = cipher.doFinal(dataToEncrypt, 0, dataToEncrypt.length));
where dataToEncrypt, encryptionKey and encryptedData are the 3 parameters passed to A$ENCRYPT.

The A$DECRYPT routine does the equivalent of the following Java code:

  public final static String CRYPT_ALGORITHM = "Blowfish";
  Cipher cipher = Cipher.getInstance(CRYPT_ALGORITHM);
  cipher.init(Cipher.DECRYPT_MODE, new SecretKeySpec(encryptionKey, 0, encryptionKey.length, CRYPT_ALGORITHM));
  byte[] decryptedData = cipher.doFinal(dataToDecrypt, 0, dataToDecrypt.length));
where dataToDecrypt, encryptionKey and decryptedData are the 3 parameters passed to A$DECRYPT.

PKCS5Padding is the default padding scheme for Blowfish ciphers.

Detailed information can be found in the Java™ Cryptography Architecture (JCA) Reference Guide here.

Authored by: Veryant Support This question has been viewed 97 times so far.
Click Here to View all the questions in isCOBOL General category.
File Attachments File Attachments
How helpful was this article to you?
User Comments User Comments Add Comment
There are no user comments for this question. Be the first to post a comment. Click Here
Related Questions Related Questions
  1. What Micro Focus library routines are not supported?
  2. How do I migrate indexed files to a format that is supported by isCOBOL?
  3. How would I create my own CBL_ALLOC_MEM and CBL_FREE_MEM routines?
  4. Should I use JISAM or isCOBOL ISAM Server (c-treeACE)?
  5. What is the best way to control Microsoft Word?
  6. What ACUCOBOL-GT library routines are not supported or work differently?
  7. How do I set up isCOBOL to access Vision files?
  8. How do I resolve "code too large for try statement" errors?
  9. What is the recommended method for specifying isCOBOL framework properties?
  10. What are the key technical advantages of isCOBOL?
  11. How does a program detect at runtime whether it is running standalone GUI, thin client or with Web Direct 2.0?
  12. How can I package my application and execute it in a JAR file?
  13. Is there currently a way to debug COBOL and Java source together?
  14. Do I need to worry about the compile warning "Note: MYPROG.java uses unchecked or unsafe operations?"
  15. How do I get my screens to be the same size and spacing as when I run with ACUCOBOL?
  16. How do I specify properties or a properties file on the command line?
  17. How do I resolve a compile error on PIC X(2) USAGE COMP-5?
  18. What compile option should I use for ICOBOL compatibility?
  19. How do I create a desktop shortcut icon to launch my program?
  20. Does isCOBOL APS support C$XML or other XML interfaces?
  21. BULK-ADDITION clause on the OPEN statement
  22. How do I print to a spooler in Unix?
  23. Is there a way to have single set of source code that will compile with both ACUCOBOL and isCOBOL?
  24. Why do I get a compile error "--S: Invalid open mode" on an OPEN I-O of an ORGANIZATION LINE SEQUENTIAL file?
  25. Is the isCOBOL 2009 SP1 release intended to deploy mainframe applications over the cloud? Or is it an integration mechanism for bringing in cloud data and apps?
  26. Is your runtime library backward compatible?
  27. How do I prevent hackers from decompiling Java class files to reverse engineer my COBOL application?
  28. Can Veryant recommend a good Web site to find 3rd party JavaBeans?
  29. How do I suppress multiple reserved words with the -rw compiler option?
  30. How do I select 11x17 paper size using WIN$PRINTER?
  31. Does SET ADDRESS OF X TO Y work?
  32. How do I get more information when I get java.lang.reflect.InvocationTargetException?
  33. How do I change the icon in the upper left corner of the Window?
  34. How do I increase the maximum Java heap size when compiling?
  35. How do I use conditional compilation?
  36. What is the easiest and/or best way to convert a legacy text-based user interface to a web front end?
  37. How do I compile for compatibility with older versions of Java?
  38. Does isCOBOL run on Linux on System z?
  39. Can you derive isCOBOL object classes from Java and vice versa?
  40. How do I set iscobol.file.index.FileName with variable file name assignments?
  41. What is the behavior difference of STOP THREAD?
  42. Can the file system (iscobol.file.index) be set programmatically?
  43. Can isCOBOL access a DLL or .so that is in a JAR file?
  44. Where can I obtain a copy of the ANSI 2002 COBOL standard?
  45. How do I turn on debug trace to produce a log file?
  46. Where can I learn more about Classpath, the Java class loader, JDK tools and utilities?
  47. How can I read an Excel spreadsheet from COBOL?
  48. How do I write my own replacement for a C$ library routine?
  49. I've heard there is a problem passing pointers to C functions. What is it?
  50. Does isCOBOL work with Flexus COBOL sp2?
  51. What are the defaults for the DATE-ENTRY control DISPLAY-FORMAT property and format styles?
  52. What algorithm does isCOBOL use to load framework properties (runtime config variables)?
  53. What is the best way to profile an isCOBOL program?
  54. How can I make my isCOBOL program to be called instead of a C routine when both have the same name?
  55. How can I use the F10 key in my application without it changing the keyboard focus?
  56. Does isCOBOL APS run on z/OS?
  57. Is there any equivalent to COPY RESOURCE?
  58. Can I use directory paths in CALL names?
  59. How do I compile fixed (ANSI) format source that COPYs terminal format source or vice versa?
  60. What should I use for USAGE HANDLE items instead of NULL?
  61. Is there any way to use isCOBOL with SCO 5.0.6 (JDK 1.3)?
  62. How do I specify which file status codes I want to use?
  63. How do I configure file locations with environment variables?
  64. How can I tell what changes were made in the isCOBOL latest update?
  65. Is isCOBOL backward compatible?
  66. Why do I get the error message "Native call not found" and how do I fix the problem?
  67. Why do I get the error java.lang.NoClassDefFoundError: com/iscobol/rts_n/StopRunException?
Article Information Additional Information
Article Number: 138
Created: 2010-07-21 12:12 PM
Rating: No Rating
 
Article Options Article Options
Print Question Print this Question
Email Question Email Question to Friend
Export to Adobe PDF Export to PDF File
Export to MS Word Export to MS Word
Bookmark Article
Subscribe to Article Subscribe to Article
 
Search Knowledge Base Search Knowledge Base



  Home   |   About Us   |   Contact   |   Legal   |   Privacy   |   Press  
 
 

© Veryant LLC - All Rights Reserved
Veryant and isCOBOL are trademarks or registered marks of Veryant LLC in the United States and other countries. All other marks are the property of their respective owners.